Task

Write a program that does the following in this order:

 Input an amount of time to sleep in whatever units are most natural for your language (milliseconds, seconds, ticks, etc.). This unit should be noted in comments or in a description.
 Print "Sleeping..."
 Sleep the main thread for the given amount of time.
 Print "Awake!"
 End.


Related task

   Nautical bell


 
SLEEP
    ; the HANG command can use fractional seconds; the Awake line will be slightly off due to processing time
    read "How long to sleep in seconds?: ",sleep
    write !,"Sleeping... time is "_$ztime($piece($ztimestamp,",",2,2),1,2)
    hang +sleep    ; use + to cast numeric, if non-numeric will hang 0
    write !,"Awake!  Time is "_$ztime($piece($ztimestamp,",",2,2),1,2)
    quit
 