Data update

Task/Sleep/ArkScript/sleep.ark

@@ -0,0 +1,4 @@
+(let amount (toNumber (input "ms to sleep for> ")))
+(print "Sleeping...")
+(sys:sleep amount)
+(print "Awake!")

Task/Sleep/FutureBasic/sleep.basic

@@ -0,0 +1,14 @@
+include "NSlog.incl"
+
+local fn Sleep
+  printf @"\nReady to sleep...\n"
+  CFStringRef secondsToSleep = input %(100,100), @"Enter seconds to sleep: ", @"0123456789", YES, 3, _formatUnsignedFloat
+  fn ThreadSleepForTimeInterval( fn StringFloatValue( secondsToSleep ) )
+  printf @"Waking from %@ seconds of sleep...", secondsToSleep
+end fn
+
+window 1
+
+fn Sleep
+
+HandleEvents

Task/Sleep/Pluto/sleep.pluto

@@ -0,0 +1,5 @@
+io.write("Enter the amout of time to sleep in milliseconds: ")
+local ms = io.read("n")
+print("Sleeping...")
+os.sleep(ms)  -- pause this thread for 'ms' milliseconds.
+print("Awake!")