/************************* ICE-5100 TUTORIAL SCREEN Q2 ****************************/
menu = 1
define literally PR   = 'include SCRQ.1 nolist'
define literally R   = 'include SCRQ.2 nolist'
define literally N   = 'include SCRQ.3 nolist'
define literally M   = 'include FMOD nolist'
load MESSG
source = false
presrc = 0
postsrc = 0
cls
/*******************************************************************************/
'                                                   ---------------------------'
'Use SET to set a directory path when the default  | SCRQ2: SOURCE CODE 2      |'
'does not apply.                                   | N  = Next screen          |'
'                                                  | R  = Rewrite SCRQ2        |'
'In this tutorial, the load module is              | PR = Previous screen      |'
':MAIN_DISPLAY and the base file is :MESSG.        | M  = Go to main menu      |'
'Use the SET command to set the path.  Enter:      | Q  = Quit tutorial        |'
'                                                  | RTN = Return to main path |'
'     SET :MAIN_DISPLAY TO MESSG.LST               | SCR# = Screen desired     |'
'                                                   ---------------------------' 
'The MESSG.LST list file has been loaded for you.  In the next screen we will'
'take a look at source code using the SHOWSRC command.'
'------------- Enter N <Enter> to continue with Aid Module Q ------------------'