home *** CD-ROM | disk | FTP | other *** search
/ Gold Fish 1 / GoldFishApril1994_CD2.img / d4xx / d462 / disterm / rxtermscripts / dismenu2 < prev    next >
Text File  |  1991-03-08  |  1KB  |  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.