home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 496.lha / DisTerm / RxTermScripts / dismenu2 < prev    next >
Encoding:
Text File  |  1991-04-07  |  1.3 KB  |  28 lines
  1. /* An example of a disterm`DISMENU command.                    */
  2. /* It takes at least 2 args, the menu # and item #. For example, the QUIT menu    */
  3. /* item is in menu #0 (Project), and is the 5th item (always count from 0)    */
  4. /* so here's the line that would QUIT disTerm:                    */
  5. /*  'MENU' 0 5                                    */
  6. /* Certain MENU items (such as "Baud Rate") may take additional args        */
  7.  
  8. /* Here's how I begin all of my rexx scripts meant to control disTerm */
  9. ADDRESS 'disTerm'  /* All the following commands go to disTerm */
  10. OPTIONS FAILAT 20
  11. OPTIONS RESULTS
  12. quote = '27'X   /* use this variable name in place of any ' char within a string */
  13.  
  14. /* Bring disTerm window to the front */
  15.  'DISWIND'
  16.  
  17. /* Let's add a BBS named 'Utica College' to the BBS list with the specified */
  18. /* number. Note that since we have imbedded spaces, we use double quotes    */
  19. /* around the name. We could change our current settings before adding this */
  20. /* number to the list via some other DISMENU commands. */
  21.  'DISMENU' 3 4 '"Utica College"' '792-3187'
  22.  
  23. /* Let's dial a BBS in the phone list named 'Utica College'. Note that if this */
  24. /* BBS is not in our list, the dial will fail. I'll just assign the BBS name   */
  25. /* to a rexx variable just for the sake of demonstration */
  26. name = '"Utica College"'
  27.  'DISMENU' 3 2 name
  28.