home *** CD-ROM | disk | FTP | other *** search
- UPLOADED ON 7/10/91 FROM VINCENT SIMONE COMPUSERVE ID 72740,417
-
- Compile with /n /w /a
-
- This get reader will allow the user to hit the space bar to pan thru
- each get. This can be used if you want the user to respond to a get
- with either yes or no, pan thru the days of the week, months in the
- year or anything else that a list is required. Just include the
- space.ch for the command. Also, make sure that each selection is
- separated by a comma, eg "ITEM1,ITEM2".
-
- the static array arr is a multi-dimmensional array that will hold
- the variable name and then each selection item. The reason why
- the arr array is multi-dimmensional is if you wanted to nest gets.
- the first position is the variable name that is going to be used for
- selection, and the remaining positions are the items that can be
- selected. The local variable gvar is used to see what position
- in the array the variable you are getting is in. This is accomplished
- by doing an ascan equal to oGet:name, which is the get variable name.
-
- Each time you press the spacebar the new value is stuffed into the
- get buffer, updated and displayed. Another feature is if you typed
- the first letter of the item you want to select, you will automatically
- be moved to it.
-
- Well that is it for now. I have tested this function a few times and
- it seems to work ok. If you have any questions or suggestions I welcome
- them. If you are asking yourself why I wrote this, well I just wanted
- to fool around with the get system.