home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Gold Fish 1
/
GoldFishApril1994_CD2.img
/
d4xx
/
d462
/
disterm
/
rxtermscripts
/
dismenu2
< prev
next >
Wrap
Text File
|
1991-03-08
|
1KB
|
28 lines
/* An example of a disterm DISMENU command. */
/* It takes at least 2 args, the menu # and item #. For example, the QUIT menu */
/* item is in menu #0 (Project), and is the 5th item (always count from 0) */
/* so here's the line that would QUIT disTerm: */
/* 'MENU' 0 5 */
/* Certain MENU items (such as "Baud Rate") may take additional args */
/* Here's how I begin all of my rexx scripts meant to control disTerm */
ADDRESS 'disTerm' /* All the following commands go to disTerm */
OPTIONS FAILAT 20
OPTIONS RESULTS
quote = '27'X /* use this variable name in place of any ' char within a string */
/* Bring disTerm window to the front */
'DISWIND'
/* Let's add a BBS named 'Utica College' to the BBS list with the specified */
/* number. Note that since we have imbedded spaces, we use double quotes */
/* around the name. We could change our current settings before adding this */
/* number to the list via some other DISMENU commands. */
'DISMENU' 3 4 '"Utica College"' '792-3187'
/* Let's dial a BBS in the phone list named 'Utica College'. Note that if this */
/* BBS is not in our list, the dial will fail. I'll just assign the BBS name */
/* to a rexx variable just for the sake of demonstration */
name = '"Utica College"'
'DISMENU' 3 2 name