5 lines
141 B
Text
5 lines
141 B
Text
|
DLG(NameEdit = milliseconds, Button = "Go to sleep")
|
||
|
|
WRITE(StatusBar) "Sleeping ... "
|
||
|
|
SYSTEM(WAIT = milliseconds)
|
||
|
|
WRITE(Messagebox) "Awake!"
|