format PE GUI 4.0

include 'win32a.inc'

entry start

; ---------------------------------------
; MALIGNus  Multi-Byte NOPs ALIGN
; ---------------------------------------
macro MALIGN ali{
d=(($+(ali-1))and(-ali))-$      ;!!!
if d=2
db 66h,90h
else if d=3
db 0Fh,1Fh,00h
else if d=4
db 0Fh,1Fh,40h,00h
else if d=5
db 0Fh,1Fh,44h,00h,00
else if d=6
db 66h,0Fh,1Fh,44h,00h,00h
else if d=7
db 0Fh,1Fh,80h,00h,00h,00h,00h
else if d=8
db 0Fh,1Fh,84h,00h,00h,00h,00h,00h
else if d=9
db 66h,0Fh,1Fh,84h,00h,00h,00h,00h,00h
; ...
; 5+5?;5+6?;6+6?;6+7?;7+7?;7+8?
; at least 15
; ...
else
ALIGN ali       ;!!!
end if}
; ...or use old 386 fillers
; ---------------------------------------

section '.data' data readable writeable
; ...
bit     db 1

section '.code' code readable writeable
; ...
bit3    db "           "

MALIGN 16
start:
        jmp over
vars    db "filler+9",0

MALIGN 16
over:
        invoke GetModuleHandle,0
        mov ecx,100

MALIGN 16
redo:
                pause
                dec ecx
                jnz redo
;        jmp outx

MALIGN 16
outx:
        invoke ExitProcess,eax


section '.idata' import data readable writeable

library kernel32,'kernel32.dll'

include 'api/kernel32.inc'