home *** CD-ROM | disk | FTP | other *** search
/ ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng) / ProfitPress-MegaCDROM2.B6I / WINDOWS / COMM / WINCOMM5.ZIP / TOUR.WMS < prev    next >
Encoding:
Text File  |  1990-09-25  |  1009 b   |  26 lines
  1. ;WinComm Guided tour start up macro.
  2.  
  3. CHGDIR(GETSESSSTR(28))                  ; set default dir to macro dir
  4. OPEN("TOUR.WSF","",1)
  5. USERWINDOW(5,0,100,33410)
  6. METABKG(0,0,0,"solis.wmf")
  7. SHOW(8)
  8. i = TIME?+2
  9. WHILE(TIME? <i)
  10. WEND
  11.  
  12.    DIALOGBOX 23, 20, 230, 118, 21, "WinComm Guided Tour"
  13.       LTEXT 9, 9, 216, 32, "This Macro is a launching point that will take you on a guided tour of WinComm.  The Function keys at the bottom of the screen can be selected to start other Macros for the demonstration.  The VT102, ANSI, and VIDTEX keys will load"
  14.       LTEXT 9, 40, 216, 41, "a Session for these types of emulations and will 'play back' a file that contain escapes to exercise the emulation.  The other keys will run Macros to demonstrate WinComms other features.  To halt macros that change the menu bar, select 'WinComm Menu'."
  15.       DEFCANCELBUTTON 78, 97, 76, 14, "&Continue"
  16.    DEND
  17.  
  18. i = time?+45
  19. j = 255
  20. while((time?<i) && (j == 255))
  21. j = DIALOG?
  22. wend
  23. if(j == 255) DESTROYDLG
  24.  
  25. end
  26.