SBP
 ÿ‡
 ÿ{"This is a menu example program."
 ÿ{
 ÿ{"Please note that all the menus are now under MY control!"
 ÿ{
 ÿ{"Select Quit (under Project) to stop this torture!"
 
 ÿ½ Sample Menu Editor/General Type 5 Example
 Flg%ÿ1
 ÿ¬1,0,1,"Project"
 ÿ¬1,1,1,"About Example"
 ÿ¬1,2,0,"-------------"
 ÿ¬1,3,1,"Quit Example "
 ÿ¬2,0,1,"Sample 1"
 ÿ¬2,1,1," A   "
 ÿ¬2,2,1," B   "
 ÿ¬2,3,1," C   "
 ÿ¬2,4,1," D   "
 ÿ¬2,5,1," E   "
 ÿ¬3,0,1,"Sequential"
 ÿ¬3,1,2,"  Pick me first"
 ÿ¬3,2,1,"  Then Me      "
 ÿ¬3,3,1,"  Me Next!     "
 ÿ¬3,4,1,"  Finally, me  "
 
10 :
 ÿ¬ÿ³m%,b%
 ÿÏÿ¬:ÿ½ New command allows proper multi-tasking instead of busy loop
 ÿ³m%ÿwProj,Sam1,Seq 
 ÿw10
 
Proj: 
 ÿ³b%ÿwAbout,20,quitProg
 ÿw10
About: 
 ÿ‡
 ÿ{" Just for your information:"
 ÿ{
 ÿ{"    This stupid menu example was written by:  Mark C. Johnson"
 ÿ{
 ÿ{"    (Under duress from Daniel P. Browning --- Very Late at Night!)"
 ÿ{
 ÿ{"    (Version 3.21288333CD Alpha)
 ÿ{
 ÿw10
quitProg: 
 ÿ‡
 ÿ{"Remember:  Wherever you go, there you are."
 ÿ’
Sam1: 
 ÿ³b%ÿwA,B,C,D,E 
 ÿw10
A: 
 ÿ‡
 ÿ{"   *  "
 ÿ{"  * * "
 ÿ{" *   *"
 ÿ{" *****"
 ÿ{" *   *"
 ÿ{" *   *"
 ÿ{" *   *"
 ÿw10
B: 
 ÿ‡
 ÿ{" **** "
 ÿ{" *   *"
 ÿ{" *   *"
 ÿ{" ****"
 ÿ{" *   *"
 ÿ{" *   *"
 ÿ{" ****"
 ÿw10
C: 
 ÿ‡
 ÿ{"  ***"
 ÿ{" *   *"
 ÿ{" *"
 ÿ{" *"
 ÿ{" *"
 ÿ{" *   *"
 ÿ{"  ***"
 ÿw10
D: 
 ÿ‡
 ÿ{" ****"
 ÿ{"  *  *"
 ÿ{"  *  *"
 ÿ{"  *  *"
 ÿ{"  *  *"
 ÿ{"  *  *"
 ÿ{" ****"
 ÿw10
E:
 ÿ‡
 ÿ{" *****"
 ÿ{" *"
 ÿ{" *"
 ÿ{" ****"
 ÿ{" *"
 ÿ{" *"
 ÿ{" *"
 ÿ{
 ÿ{
 ÿ{" (Hah!  Fooled ya!)"
 ÿw10
Seq: 
 ÿ³b%ÿwFrst,Second,Third,Final 
 ÿw10
Frst: 
 ÿ¡Flg%ÿ1ÿpÿw10:ÿ½ Force proper sequence
 Flg%ÿ2:ÿ½ Set next proper sequence
 ÿ¬3,1,1:ÿ½ Turn checkmark off
 ÿ¬3,2,2:ÿ½ Turn checkmark on
 ÿw10
Second: 
 ÿ¡Flg%ÿ2ÿpÿw10
 Flg%ÿ3
 ÿ¬3,2,1
 ÿ¬3,3,2
 ÿw10
Third: 
 ÿ¡Flg%ÿ3ÿpÿw10
 Flg%ÿ4
 ÿ¬3,3,1
 ÿ¬3,4,2
 ÿw10
Final: 
 ÿ¡Flg%ÿ4ÿpÿw10
 Flg%ÿ1
 ÿ¬3,4,1
 ÿ¬3,1,2
 ÿw10