home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 18 REXX / 18-REXX.zip / sema4.zip / semaphor / main / 1013.3 < prev    next >
Text File  |  1994-02-17  |  182b  |  7 lines
  1. Arg window self
  2.  
  3. /* Get item value INTERVAL Spin Button */
  4. value = VpGetItemValue(window,'INTERVAL')
  5. /* duration in 1/1000 secs */
  6. CALL VpWindow window,'STARTTIMER',value*1000
  7.