home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
RBBS in a Box Volume 1 #2
/
RBBS_vol1_no2.iso
/
add2
/
windemo.sc
< prev
next >
Wrap
Text File
|
1989-05-25
|
394b
|
15 lines
PLAY "Windo"
VIEW "Session#"
Formkey
CLEAR
MKWINDO(9,10,10,32,15,
"This is a test and only a test!",
"This is a second test, and only a second test!")
MKWINDO(16,21,5,16,15,"Press any key to see the current lots...","")
x = GETCHAR()
WAIT TABLE
PROMPT "[PgUp] and [PgDn] to move, [Home] for first, [End] for last",
"Press [F] when you are finished..."
UNTIL "F","f"