OpenEuphoria

Re: Eu locking harddrives

• Posted by "Juergen Luethje" <j.lue at gmx.de> Feb 07, 2004
• 638 views

Wolf wrote:

>> 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)  -- ;)

Nice, thank you.

Regards,
   Juergen