OpenEuphoria

Re: Eu locking harddrives

• Posted by "Wolf" <wolfritz at king.igs.net> Feb 07, 2004
• 640 views

> BTW: How about allowing any atom as argument for sleep(), not only an
> integer? I just got an error message from Eu, because I tried to call
> sleep(0.5).

--for .exw (WinDoze)
include dll.e
include misc.e --for old sleep()
constant
k32=open_dll("kernel32"),
zSleep=define_c_proc(k32,"Sleep",{C_UINT})
--usage:
--c_proc(zSleep,{x})
--where x is in MILLISECONDS! --Zero allowed
--demo is:
printf(1,"%s\n",{"Start"})
c_proc(zSleep,{3500})
printf(1,"%s\n",{"3.5 seconds later..."})
sleep(2)  -- ;)