home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 3 Comm / 03-Comm.zip / scrmod.zip / INPUT < prev    next >
Text File  |  1991-10-28  |  575b  |  18 lines
  1. > title1 = 'INPUT test dialog1 - ' + SESSIONNAME
  2. > prompt1 = 'A prompt for INPUT test dialog1'
  3. > input(title1,prompt1,input1)
  4. > windowpos(0,0)
  5. > windowprms(OFF,OFF,OFF)
  6. > windowshow()
  7. > title2 = 'INPUT test dialog2 - ' + SESSIONNAME
  8. > prompt2 = 'A prompt for INPUT test dialog2'
  9. > input(title2,prompt2,input2)
  10. > message('1st dialog was processed on runtime shell window')
  11. > message('2nd dialog was processed on script window')
  12. > message('1st input = [' + input1 + ']')
  13. > message('2nd input = [' + input2 + ']')
  14. > watch(ON,ON,ON)
  15. > timeout = 0
  16. > wait()
  17. > end
  18.