home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 3 Comm / 03-Comm.zip / scrmod.zip / IF&ELSE.SCR < prev    next >
Text File  |  1991-12-30  |  343b  |  19 lines
  1. > timeout = 0
  2. > windowprms(off,0,0)
  3. > windowpos(10,10)
  4. > windowsize(3,30)
  5. > windowshow()
  6. > NUMB = 5
  7. > if NUMB == 5
  8. >     message('Conditional Match OK')
  9. > endif
  10. > Wait()
  11. > ; test again use Else structure
  12. > NUMB = 4
  13. > if NUMB == 5
  14. >     message('Conditional Match OK')
  15. > Else
  16. >    message('Numbers don't match')
  17. > endif
  18. > Wait()
  19. > end