/************************* ICE-5100 TUTORIAL SCREEN Q5 ****************************/
menu = 1
define literally PR   = 'include SCRQ.4 nolist'
define literally R   = 'include SCRQ.5 nolist'
define literally N   = 'include SCRQ.6 nolist'
define literally M   = 'include FMOD nolist'
load MESSG
source = true
presrc = 0
postsrc = 0
SET :MAIN_DISPLAY TO MESSG.LST    
cls
/*******************************************************************************/
'                                                   ---------------------------'
'To see source code before a breakpoint, set       | SCRQ5: SOURCE CODE 5      |'
'PRESRC to a numerical value between 0 and 65,535. | N = Next screen           |'
'When the break occurs this number of lines of     | R = Rewrite SCRQ5         |'
'source code are displayed before the source of    | PR = Previous screen      |'
'the breakpoint.  For example, enter:              | M = Go to main menu       |'
'                                                  | Q = Quit tutorial         |'
'     PRESRC = 5                                   | RTN = Return to main path |'
'     GO FROM 0 TIL #10                            | SCR# = Screen desired     |'  
'                                                   -------------------------- '
'The source code display includes any comments in the program.  Comments'
'are enclosed in a /*  */ sequence.'
' '
'Note: Entering this command may cause the tutorial screen to scroll out of   '
'view.  Once the command is through displaying, enter R to rewrite this '
'screen or N to go to the next screen.'
' '
'-------------- Enter N <Enter> to continue with Aid Module Q ------------------'