XProfan

Source wurde am 15.07.2007 aus der MMJ-Quellcodesammlung (Dietmar Horn) in die Babyklappe auf XProfan.Com abgelegt:
Warten: Sleep per API
Ab XProfan gibt es Sleep als Profan-Befehl.
Def Sleep(1) !KERNEL32,Sleep
cls
sleep(1000)
SetWindowPos %HWnd = 100,50 - 300,400;0
sleep(2000)
SetWindowPos %HWnd = 200,100 - 200,300;0
sleep(3000)
SetWindowPos %HWnd = 10,100 - 500,400;0
SetText %HWnd,Bitte eine Taste ...
WaitInput
end