home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware Overload
/
ShartewareOverload.cdr
/
educ
/
extol3.zip
/
MENU.EXT
< prev
next >
Wrap
Text File
|
1988-02-06
|
844b
|
43 lines
% MAIN FILE TO TEST NESTING OF CALLED FILES
% ALLOW SEVERAL FILES TO BE EXECUTED BY DEVELOPER'S EXTOL
:begin
.clear
.exact
.caseon
.reset(0)
EXTOL PROGRAM MENU
1. Beatles - Beatles quiz
2. Alice - Alice in Wonderland quiz
3. Text - Displays PC-EXTOL documentation
4. Graph - Display PC-EXTOL picture
Q. Quit - End PC-EXTOL session
Enter your choice:+
.accept
.match(0,1).1.
.match(0,2).2.
.match(0,3).3.
.match(0,4).4.
.match(0,5).Q.
.goto(0).begin.beatles.alice.text.graph.quit.
%
:beatles
.call BEATLES.EXT
.goto.begin.
%
:alice
.call ALICE.EXT
.goto.begin.
%
:text
.call TEXT.EXT
.goto.begin.
%
:graph
.call GRAPH.EXT
.goto.begin.
:quit
.stop