"start setup setup: "cmode "text "fetch minmnu.xsb^m" "rtn "key g "xcall minmnu,statements "message xbuf "rtn %define choice "text %0 "text ^i "text %1 "text ^m endm Statements: "%choice "ampm","Enter AM or PM (same as text ^+S:7)" "%choice "andeq","Use above IF for AND bolean logic (equal to)" "%choice "andgt","Use above IF for AND bolean logic (greater than)" "%choice "andge","Use above IF for AND bolean logic (greater or equal)" "%choice "andlt","Use above IF for AND bolean logic (less than)" "%choice "andle","Use above IF for AND bolean logic (less or equal)" "%choice "arguments} variable","Pick up arguments after Command Mode command" "%choice "asc} x,y","Convert from ASCII character (x) to decimal number (y)" "%choice "beep","Make the CRT beep" "%choice "block","Test character @ cursor: EQ if marked, NE if not marked" "%choice "boom","Pop everything off the EXTRA internal stack" "%choice "byp} x","Strip leading blanks from variable" "%choice "calc} @","Perform math mode function: @ load, + add, - sub, * mul, / div" "%choice "call} label","Call the subroutine at label" "%choice "center","Center text on current line (same as text ^+s^+c)" "%choice "chain","Set up command file to be executed by operating system" "%choice "chkcrt","Check CRT paramaters" "%choice "chr","Convert from decimal number to ASCII character" "%choice "cmd?","Test to see if in Command Mode, EQ if yes, NE if not" "%choice "cmode","Force into Command Mode" "%choice "cmp","Compare text at cursor with a constant" "%choice "cmpnum} x,y","Compare two numeric values" "%choice "cmpstr} x,y","Compare two text strings" "%choice "col?} x","Compare column number with a constant" "%choice "copy} filename","Copy another source file into this one during compilation" "%choice "cr","Move cursor to start of next line in document (same as text ^+m)" "%choice "crlf","Move cursor to start of next line on screen (display only)" "%choice "crt","Perform special CRT functions and move CRT cursor" "%choice "crtcols","Determine how many columns CRT has" "%choice "crtrows","Determine how many rows CRT has" "%choice "date","Type current date into document (same as text ^+s@)" "%choice "day","Type in current day of the month (same as text ^+s@5)" "%choice "ding","Make the CRT beep" "%choice "display-half","Re-enable SuperVUE display and redisplay text below cursor" "%choice "display-line","Re-enable SuperVUE display and redisplay current line" "%choice "display-off","Turn off all SuperVUE display" "%choice "display-pos","Re-enable SuperVUE display and position the cursor" "%choice "dmode","Force SuperVUE into Display Mode" "%choice "do} command","Create new Command Mode command" "%choice "down","Move cursor down one line (same as text ^+j)" "%choice "draw} down","Turn on drawing mode: up, down, right, left" "%choice "dv-column} name","Perform DV selections in column name" "%choice "dv-columname} variable","Retrieve the current column name" "%choice "dv-first","Move to first record in database" "%choice "dv-get column",<Get data from specified column into XBUF> "%choice "dv-last","Move to last record in database" "%choice "dv-next","Skip to the next record that matches the current criteria" "%choice "dv-nextsummary","Skip to the next summary record" "%choice "dv-open} file","Open a DataVUE file" "%choice "dv-previous","Skip to the previous record that matches the current criteria" "%choice "dv-previoussummary","Skip to the previous summary record" "%choice "dv-search} string","Find the first occurance of the string in the current column" "%choice "dv-search-next","Find the next occurance of the string in the current column" "%choice "dv-search-previous","Find the previous occurance of the string in the current column" "%choice "dv-summary","Test to see if the current record is a summary record" "%choice "dv-width} variable","Return the width of the current column" "%choice "edit-buffer} <row> [startchar] <prompt string> [terminators]","Edit the text in XBUF under program control" "%choice "else","Perform following statements if preceeding IF was false" "%choice "endif","Perform following statements no matter what the preceeding IF result was" "%choice "enduser","Terminates the user mode translation list (see the USER statement)" "%choice "eof","Test to see if on last line of document, EQ if on last line, else NE" "%choice "eof","Test to see if on last character of line, EQ if on last char, else NE" "%choice "esc","Simulates the ESCAPE key (same as text ^+[)" "%choice "first-char","Move the cursor to the first printing character on the line" "%choice "flag} chr","Display a character in the upper right hand corner of the screen" "%choice "force","Simulate a keystroke with the value in XCHAR" "%choice "getfield} variable","Copy text from the cursor into the variable. Stop when 2 blanks or eol" "%choice "getname} variable","Put name of file being edited into the variable" "%choice "home","Move cursor to upper left hand corner of document (same as text ^+^+)" "%choice "hour12","Type in the hour in AM/PM format (same as text ^+:6)" "%choice "hour24","Type in the hour in military format (same as text ^+:3)" "%choice "ifeq","Execute the following statements if logical state is EQUAL TO" "%choice "ifge","Execute the following statements if logical state is GREATER THAN or EQUAL TO" "%choice "ifgt","Execute the following statements if logical state is GREATER THAN" "%choice "ifle","Execute the following statements if logical state is LESS THAN or EQUAL TO" "%choice "iflt","Execute the following statements if logical state is LESS THAN" "%choice "input} <row> [startchar] <prompt string> [terminators]","Prompt the user to enter a line of text" "%choice "insert","Turn on insert mode" "%choice "jeq} label","Jump to label if logical state is EQUAL TO" "%choice "jge} label","Jump to label if logical state is GREATER THAN or EQUAL TO" "%choice "jgt} label","Jump to label if logical state is GREATER THAN" "%choice "jle} label","Jump to label if logical state is LESS THAN or EQUAL TO" "%choice "jlt} label","Jump to label if logical state is LESS THAN" "%choice "jmp} label","Jump to label" "%choice "kbstat} variable","If typeahead input is waiting it will be returned, otherwise null string" "%choice "key} chr","Define a display mode function that can be started with ^+G chr" "%choice "left","Move the cursor left one position (same as text ^h)" "%choice "length} x,y","Find length of x and put result in y" "%choice "loadmacro} variable","Convert note macro at cursor into playable sequence in variable" "%choice "loadvar} variable,file","Load entire file into the specified variable" "%choice "loop} value","Loop through the statements up to the corresponding NEXT statement" "%choice "lowercase} variable","Convert variable to lowercase" ; %choice "macro-off","Disable macro expansion (allow % and #)" "macro-off "text "macro-off^iDisable macro expansion (allow % and #)^m" "macro-on "%choice "macro-on","Re-enable macro expansion" "%choice "map} variable,length","Define a variable with the specified length" "%choice "margin-release","Release the margins" "%choice "math","Turn on math mode" "%choice "message} string","Display a string on the message line (usually 25th line)" "%choice "minutes","Type in the current minutes (same as text ^+s:4)" "%choice "mm","Type in the current month as two digits (same as text ^+s@4)" "%choice "mon","Type in the current month as three letters (same as text ^+s@8)" "%choice "month","Type in the current month fully spelled out (same as text ^+s@7)" "%choice "next","Search for next occurance (same as text ^+x)" "%choice "oncall","Multiple way call" "%choice "onjmp","Multiple way jump" "%choice "oreq","Use above IF for OR bolean logic (equal to)" "%choice "orgt","Use above IF for OR bolean logic (greater than)" "%choice "orge","Use above IF for OR bolean logic (greater or equal)" "%choice "orlt","Use above IF for OR bolean logic (less than)" "%choice "orle","Use above IF for OR bolean logic (less or equal)" "%choice "pad} x,y","Force first variable to be length specified by second variable" "%choice "page","ASK TIM WHAT THE HECK THIS IS" "%choice "pause","Wait for one (or more) characters from keyboard, result in XCHAR" "%choice "play} variable","Playback macro stored in variable" "%choice "pop","Remove item from internal stack" "%choice "print","Print list of variables and/or constants" "%choice "range","Check to see if character at cursor is in one or more ranges" "%choice "recall","Recall text in scrap buffer (same as text ^+s^+o)" "%choice "record} variable","Record keystrokes into variable" "%choice "reformat","Reformat paragraph (same as text ^+s^+f)" "%choice "req","Return from subroutine if logical state is EQUAL TO" "%choice "return","Return from subroutine call" "%choice "rge","Return from subroutine if logical state is GREATER THAN or EQUAL TO" "%choice "rgt","Return from subroutine if logical state is GREATER THAN" "%choice "rle","Return from subroutine if logical state is LESS THAN or EQUAL TO" "%choice "rlt","Return from subroutine if logical state is LESS THAN" "%choice "row} constant","Redisplay screen so that cursor is on specified row" "%choice "row?} constant","Check to see if cursor is on specified row" "%choice "rtn","Return from subroutine call" "%choice "rubout","Delete character in front of cursor (same as text ^+$)" "%choice "ruler","Get ruler character at current column position into XCHAR" "%choice "",""