>* Millisecond time resolution >#DEFINE TIME_HALF 500 >#DEFINE TIME_10 10000 >#DEFINE TIME_5 5000 >#DEFINE BEEP_FREQ 440 > >loDrawer = CREATEOBJECT('OPOS.CashDrawer') >loDrawer.Open('InsertNameOfDrawerHere') >loDrawer.Claim(TIME_HALF) && For exclusive use -- millisecond parameter >loDrawer.OpenDrawer() >loDrawer.WaitForDrawerClose(TIME_10, BEEP_FREQ, TIME_HALF, TIME_5) >* Start beeping in 10 seconds at 440Hz for half a second with 5 seconds between beeps >loDrawer.Close() && We're done >>