home *** CD-ROM | disk | FTP | other *** search
/ Piper's Pit BBS/FTP: ibm 0020 - 0029 / ibm0020-0029 / ibm0028.tar / ibm0028 / XTALK1.ZIP / INTRO.XWS < prev    next >
Encoding:
Text File  |  1990-04-30  |  14.4 KB  |  268 lines
  1. /*
  2.         Introduction to Crosstalk for Windows
  3.         INTRO.XWS
  4.         7-11-89
  5.         -maf
  6. */
  7.  
  8.  
  9. ; Variable type declerations
  10.  
  11.         integer calls,config,kbinfo,mouseinfo,start_script
  12.  
  13. ; Variable assignments
  14.  
  15.         calls = 1
  16.         config = 1
  17.         kbinfo = 1
  18.         mouseinfo = 1
  19.         start_script = 0
  20.  
  21. ; Put up the initial dialog
  22.  
  23.         dialogbox 10,20,300,190
  24.                 defpushbutton 240,75,40,14,'&OK',tabstop focus
  25.                 ltext 85,5,220,8,"Welcome to Crosstalk for Windows!"
  26.                 ltext 5,15,295,8,"You're probably anxious to get online.  As you are fairly new to"
  27.                 ltext 5,23,295,8,"Crosstalk for Windows, you may wish to review the items in the list"
  28.                 ltext 5,31,295,8,"below.  These are basic things to know about using the program and"
  29.                 ltext 5,39,295,8,"its many unique features.  If you don't first read the Crosstalk for"
  30.                 ltext 5,47,295,8,"Windows User's Guide, you should at least review the information"
  31.                 ltext 5,55,295,8,"presented here."
  32.                 groupbox 5,65,220,72,""
  33.                 checkbox 12,72,114,12,"How to configure Crosstalk",config,tabstop
  34.                 checkbox 12,84,82,12,"How to place calls",calls,tabstop
  35.                 checkbox 12,96,118,12,"Overview of mouse functions",mouseinfo,tabstop
  36.                 checkbox 12,108,130,12,"Overview of keyboard functions",kbinfo,tabstop
  37.                 checkbox 12,120,182,12,"Run this script every time Crosstalk starts",start_script,tabstop
  38.                 ltext 5,140,295,8,"The script you are now using is called INTRO.XWS.  Unless you check"
  39.                 ltext 5,148,295,8,"the empty box above, the script runs as the startup script only the"
  40.                 ltext 5,156,295,8,"first time you use Crosstalk.  To run this script any other time, use"
  41.                 ltext 5,164,295,8,"the Actions menu's 'Scripts' command to display available scripts,"
  42.                 ltext 5,172,295,8,"highlight INTRO, and select the Run button."
  43.         enddialog
  44.  
  45. ; Determine where to go after the dialogbox
  46.  
  47.         if config = 1 then gosub config_info
  48.         if choice = 1 and calls = 1 then gosub calling_info
  49.         if choice = 1 and kbinfo = 1 then gosub keyboard_info
  50.         if choice = 1 and mouseinfo = 1 then gosub mouse_info
  51.  
  52.         if start_script = 0 then startup = "" 
  53.         else startup = "intro.xws"
  54.         
  55.         global save
  56.         
  57.         if exists(dirxwp+"\normal.xwp") then {
  58.  
  59.                 if choice = 2 then end
  60.  
  61.                 dialogbox 44,23,235,62
  62.                     defpushbutton 190,40,40,14,"&OK",tabstop,focus
  63.                     ctext 5,21,225,8,"We hope you enjoy using Crosstalk for Windows!"
  64.                 enddialog
  65.                 end
  66.         }
  67.  
  68.         dialogbox 25,23,275,83
  69.                 defpushbutton 54,50,54,14,"&Run Config",tabstop,focus
  70.                 pushbutton 166,50,54,14,"&Cancel",tabstop
  71.                 ctext 5,21,265,8,"It does not appear that Crosstalk for Windows has been configured."
  72.         enddialog        
  73.  
  74.  
  75.         if choice = 2 then {
  76.  
  77.             dialogbox 25,23,275,83
  78.                 defpushbutton 54,50,54,14,"&Run Config",tabstop,focus
  79.                 pushbutton 166,50,54,14,"&Cancel",tabstop
  80.                 ctext 5,21,265,8,"Are you sure you don't want to run config?"
  81.             enddialog        
  82.  
  83.             if choice = 2 then end
  84.         }
  85.  
  86.         if exists(dirxws+"\config.xwc") then chain "config"
  87.         if exists(dirxws+"\config.xws") then chain "config"
  88.  
  89.         dialogbox 44,23,235,62
  90.                 defpushbutton 190,40,40,14,"&Cancel",tabstop,focus
  91.                 ctext 5,21,225,8,"CONFIG.XW* not found in the scripts directory."
  92.         enddialog   
  93.         end
  94.         
  95. label config_info
  96.         dialogbox 34,23,253,175
  97.                 defpushbutton 204,155,40,14,"&OK",tabstop,focus
  98.                 pushbutton 160,155,40,14,"&Cancel",tabstop
  99.                 ltext 5,5,250,8,"Program Configuration"
  100.                 ltext 5,21,250,8,"Before you start using Crosstalk for Windows, you need to"
  101.                 ltext 5,29,250,8,"configure it for the type of modem you have and a few other"
  102.                 ltext 5,37,250,8,"basic things."
  103.                 ltext 5,53,250,8,"Configuration is easily accomplished with the help of the"
  104.                 ltext 5,61,250,8,"supplied CONFIG.XWS script.  To run the script, use the"
  105.                 ltext 5,69,250,8,"Actions menu's 'Scripts' command to display available"
  106.                 ltext 5,77,250,8,"scripts, highlight CONFIG, and select the Run button."
  107.                 ltext 5,93,250,8,"If Crosstalk for Windows needs to be configured, we'll"
  108.                 ltext 5,101,250,8,"give you the option to run the configuration script "
  109.                 ltext 5,109,250,8,"as part of this introduction."
  110.         enddialog
  111.         return
  112.  
  113. label calling_info
  114.         dialogbox 34,23,253,175
  115.                 defpushbutton 204,155,40,14,"&More >>",tabstop,focus
  116.                 pushbutton 160,155,40,14,"&Cancel",tabstop
  117.                 ltext 5,5,250,8,"How To Place Calls"
  118.                 ltext 5,21,250,8,"Pressing 'F7' or selecting 'Dial' from the Actions menu"
  119.                 ltext 5,29,250,8,"presents you with a point and shoot dialing directory of"
  120.                 ltext 5,37,250,8,"your phone book entries."
  121.                 ltext 5,61,250,8,"Setting up to Place Calls"
  122.                 ltext 5,77,250,8,"For any system you call, you need to know its phone number"
  123.                 ltext 5,85,250,8,"and the communications parameters it requires (speed, data"
  124.                 ltext 5,93,250,8,"bits, etc.) and you need to supply this information to"
  125.                 ltext 5,101,250,8,"Crosstalk."
  126.                 ltext 5,117,250,8,"You may set up to place a call by using:"
  127.                 ltext 5,133,250,8,"  ╖The File menu's 'New phone book entry' command"
  128.                 ltext 5,143,250,8,"  ╖The supplied NEWCALL script"
  129.                 ltext 5,153,150,8,"  ╖The various Setup menu commands"
  130.         enddialog
  131.  
  132.         if choice = 2 or choice = 0 then return
  133.  
  134.         dialogbox 34,23,253,175
  135.                 defpushbutton 204,155,40,14,"&More >>",tabstop,focus
  136.                 pushbutton 160,155,40,14,"&Cancel",tabstop
  137.                 ltext 5,5,250,8,"Using the 'New phone book entry' command"
  138.                 ltext 5,21,250,8,"The 'New phone book entry' command presents you with a dialog"
  139.                 ltext 5,29,250,8,"which contains the minimum number of parameters you need to"
  140.                 ltext 5,37,250,8,"set to connect to another system."
  141.                 ltext 5,53,250,8,"Once the parameters are set, you have the option to dial the"
  142.                 ltext 5,61,250,8,"system and/or save the settings in a phone book entry."
  143.                 ltext 5,77,250,8,"If you create a phone book entry, you can then recall it by"
  144.                 ltext 5,85,250,8,"using the Actions menu's 'Dial' command."
  145.         enddialog
  146.  
  147.         if choice = 2 or choice = 0 then return
  148.  
  149.         dialogbox 34,23,253,175
  150.                 defpushbutton 204,155,40,14,"&More >>",tabstop,focus
  151.                 pushbutton 160,155,40,14,"&Cancel",tabstop
  152.                 ltext 5,5,250,8,"Using the NEWCALL script"
  153.                 ltext 5,21,250,8,"The NEWCALL script provides configurations for calling many"
  154.                 ltext 5,29,250,8,"of the popular online services such as CompuServe, MCI Mail"
  155.                 ltext 5,37,250,8,"and the Crosstalk BBS."
  156.                 ltext 5,53,250,8,"To run the NEWCALL script, use the Actions menu's 'Scripts'"
  157.                 ltext 5,61,250,8,"command, and highlight NEWCALL.  Click the Run button, and"
  158.                 ltext 5,69,250,8,"and the script will run."
  159.                 ltext 5,85,250,8,"Using the NEWCALL script to create phone book entries is"
  160.                 ltext 5,93,250,8,"especially useful to new users because it provides helpful"
  161.                 ltext 5,101,250,8,"information for each setting."
  162.                 ltext 5,117,250,8,"In most cases, NEWCALL attaches an automatic login script to"
  163.                 ltext 5,125,250,8,"the phone book entry created."
  164.                 ltext 5,141,250,8,"To recall a phone book entry, use the Actions menu's 'Dial'"
  165.                 ltext 5,149,100,8,"command or press 'F7'."
  166.         enddialog
  167.  
  168.         if choice = 2 or choice = 0 then return
  169.  
  170.         dialogbox 34,23,253,175
  171.                 defpushbutton 204,155,40,14,"&Ok",tabstop,focus
  172.                 pushbutton 160,155,40,14,"&Cancel",tabstop
  173.                 ltext 5,5,250,8,"Using The Setup Menu Commands"
  174.                 ltext 5,21,250,8,"Setup menu commands give you the most flexibility in setting"
  175.                 ltext 5,29,250,8,"up phone book entries."
  176.                 ltext 5,45,250,8,"To create an entry using the Setup menu, pull down the menu,"
  177.                 ltext 5,53,250,8,"and use the commands above the line ('Session', 'Device',"
  178.                 ltext 5,61,250,8,"etc.) to fill in and select the appropriate parameters for"
  179.                 ltext 5,69,250,8,"the host you are going to call.  After completing this step,"
  180.                 ltext 5,77,250,8,"use the File menu's 'Save' or 'Save As...' commands to save"
  181.                 ltext 5,85,250,8,"the settings in a phone book entry."
  182.                 ltext 5,101,250,8,"You can recall a phone book entry with the Actions menu's"
  183.                 ltext 5,109,250,8,"'Dial' command, or by pressing 'F7'."
  184.         enddialog
  185.  
  186.         return
  187.  
  188. label mouse_info
  189.         dialogbox 34,23,253,175
  190.                 defpushbutton 204,155,40,14,"&OK",tabstop,focus
  191.                 pushbutton 160,155,40,14,"&Cancel",tabstop
  192.                 ltext 5,5,250,8,"Mouse Functions"
  193.                 ltext 5,21,250,8,"By pointing and double-clicking the left button you can:"
  194.                 ltext 5,33,250,8,"  ╖Select a string on the terminal screen and send the"
  195.                 ltext 5,41,250,8,"   string to the host."
  196.                 ltext 5,49,250,8,"  ╖Change communication settings (terminal type, speed,"
  197.                 ltext 5,57,250,8,"   data bits, etc.)."
  198.                 ltext 5,65,250,8,"  ╖Toggle CAPTURE or PRINTER functions."
  199.                 ltext 5,73,250,8,"  ╖Toggle scroll mode to review text."
  200.                 ltext 5,89,250,8,"In scroll mode, clicking the left mouse button selects text"
  201.                 ltext 5,97,250,8,"which can then be copied to the Clipboard, to a file, or to"
  202.                 ltext 5,105,250,8,"the printer."
  203.                 ltext 5,121,250,8,"By pointing and clicking the right mouse button using VT102,"
  204.                 ltext 5,129,250,8,"VT52, or IBM 3101 emulation, you can:"
  205.                 ltext 5,141,250,8,"  ╖Select a new location for the cursor.  Especially handy"
  206.                 ltext 5,149,155,8,"   when using a full-screen editor."
  207.         enddialog
  208.         return
  209.  
  210. label keyboard_info
  211.         dialogbox 34,23,253,175
  212.                 defpushbutton 204,155,40,14,"&More >>",tabstop,focus
  213.                 pushbutton 160,155,40,14,"&Cancel",tabstop
  214.                 ltext 5,5,250,8,"Keyboard Functions"
  215.                 ltext 5,21,250,8,"Crosstalk uses several keys as accelerators to provide quick"
  216.                 ltext 5,29,250,8,"access to commonly used functions such as dialing, data "
  217.                 ltext 5,37,250,8,"capture, and script execution."
  218.                 ltext 5,53,250,8,"Crosstalk's accelerators are:"
  219.                 ltext 5,69,250,8,"  F5   Capture toggle--turns capture on or off"
  220.                 ltext 5,79,250,8,"  F6   Connect--Initiates the connection process as specified"
  221.                 ltext 5,87,250,8,"       by the current parameters."
  222.                 ltext 5,97,250,8,"  F7   Dial--Lists available phone book entries and allows"
  223.                 ltext 5,105,250,8,"       you to select one to dial."
  224.                 ltext 5,115,250,8,"  F8   Scripts--Displays available scripts and allows you to"
  225.                 ltext 5,123,250,8,"       run, edit, compile, or delete a script."
  226.                 ltext 5,133,250,8,"  F9   Input line toggle--allows you to edit commands or text"
  227.                 ltext 5,141,250,8,"       before sending it to the host."
  228.         enddialog
  229.  
  230.         if choice = 2 or choice = 0 then return
  231.  
  232.         dialogbox 34,23,253,175
  233.                 defpushbutton 204,155,40,14,"&More >>",tabstop,focus
  234.                 pushbutton 160,155,40,14,"&Cancel",tabstop
  235.                 ltext 5,5,250,8,"Programmable Keys"
  236.                 ltext 5,21,250,8,"48 user-programmable keys can be used to send text to a host"
  237.                 ltext 5,29,250,8,"or to run a Crosstalk script.  These keys can be displayed"
  238.                 ltext 5,37,250,8,"on the screen as icons, or they can be used from the User"
  239.                 ltext 5,45,250,8,"menu by giving the key a label."
  240.                 ltext 5,61,250,8,"Key icons are displayed in groups of twelve.  You can tell"
  241.                 ltext 5,69,250,8,"Crosstalk to display only those keys you have defined, and"
  242.                 ltext 5,77,250,8,"the icons will be automatically resized as necessary for"
  243.                 ltext 5,85,250,8,"better display."
  244.                 ltext 5,101,250,8,"A key may be invoked by clicking on an icon with the mouse,"
  245.                 ltext 5,109,250,8,"by pressing the corresponding key combination on the key-"
  246.                 ltext 5,117,250,8,"board, or by selecting it from the User menu."
  247.                 ltext 5,133,250,8,"Keys are programmed using the Setup menu's 'Function keys'"
  248.                 ltext 5,141,250,8,"command."
  249.         enddialog
  250.  
  251.         if choice = 2 or choice = 0 then return
  252.  
  253.         dialogbox 34,23,253,175
  254.                 defpushbutton 204,155,40,14,"&OK",tabstop,focus
  255.                 pushbutton 160,155,40,14,"&Cancel",tabstop
  256.                 ltext 5,5,250,8,"Other Special Keys"
  257.                 ltext 5,21,250,8,"Scroll+Lock   Toggles in and out of Scroll mode"
  258.                 ltext 5,31,250,8,"     Ctrl+=   Resets and clears the terminal screen area"
  259.                 ltext 5,41,250,8," Ctrl+Right   Pans terminal screen to the right"
  260.                 ltext 5,51,250,8,"  Ctrl+Left   Pans terminal screen to the left"
  261.                 ltext 5,61,250,8," Ctrl+Break   Sends a break signal to the host"
  262.                 ltext 5,71,250,8,"   Ctrl+Ins   Copies to the Clipboard or another application"
  263.                 ltext 5,81,250,8,"  Shift+Ins   Pastes to the Clipboard or another application"
  264.         enddialog
  265.         return
  266.  
  267.          
  268.