/********* ICE-1500 EMULATOR (DOS) TUTORIAL FEATURE MODULE SCREEN #O.2 ********/
menu = 1
define literally PR = 'include SCRO.1 nolist'
define literally R  = 'include SCRO.2 nolist'
define literally N  = '''To go to the next screen, enter RTN or M'''
define literally M  = 'include FMOD   nolist'
define literally def = 'define'
define literally lit = 'literally'
def lit curup = 'cury=cury-2;cleareol'
cls
/******************************************************************************/
'                                                   ---------------------------'
'You can also define LITERALLYs to execute         | SCRO2: LITERALLY 2        |'
'multiple commands at once.  For example, define a | N  = Next Screen          |'
'LITERALLY to move the cursor up two lines, then   | R  = Rewrite SCRO2        |'
'clear that line of text.  Enter:                  | PR = Previous screen      |'
'                                                  | M  = Go to main menu      |'
'   DEF LIT CURUP = ''CURY=CURY-2;CLEAREOL'' <Enter> | Q  = Quit tutorial        |'
'                                                  | RTN = Return to main path |'
'Notice how the LITERALLYs DEF and LIT expanded    | SCR# = Screen desired     |'
'when the spaces were entered.                      ---------------------------'
' '
'Execute the LITERALLY by entering its name:'
' '
'   CURUP <Enter>'
' '
'Before continuing with the tutorial, remove the example LITERALLYs.  Enter: '
'   REMOVE DEF, LIT, CURUP <Enter>'
' '
'This ends Feature Module O.  Enter RTN <Enter> to return to the main path of'
'the tutorial, or M <Enter> to go to the features menu.'
'########################## END OF FEATURE MODULE O ############################'