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