RosettaCodeData/Task/Sleep/DCL/sleep.dcl
2023-07-01 13:44:08 -04:00

4 lines
150 B
Text

$ amount_of_time = p1 ! hour[:[minute][:[second][.[hundredth]]]]
$ write sys$output "Sleeping..."
$ wait 'amount_of_time
$ write sys$output "Awake!"