/************************* ICE-5100 TUTORIAL SCREEN Q4 ****************************/
menu = 1
define literally PR   = 'include SCRQ.3 nolist'
define literally R   = 'include SCRQ.4 nolist'
define literally N   = 'include SCRQ.5 nolist'
define literally M   = 'include FMOD nolist'
load MESSG
source = false
presrc = 0
postsrc = 0
SET :MAIN_DISPLAY TO MESSG.LST    
cls
/*******************************************************************************/
'                                                   ---------------------------'
'The SOURCE pseudo-variable enables display of     | SCRQ4: SOURCE CODE 4      |'
'source code during disassembly, trace display and | N = Next screen           |'
'at execution breakpoints.  During disassembly and | R = Rewrite SCRQ4         |'
'trace display, the source code display is high-   | PR = Previous screen      |'
'lighted (in a color of your choice on a color     | M = Go to main menu       |'
'monitor.)                                         | Q = Quit tutorial         |'
'To see source code SOURCE must be set to TRUE.    | RTN = Return to main path |'
'The initial default is FALSE.  Set SOURCE by      | SCR# = Screen desired     |'
'entering:                                          -------------------------- '
'     SOURCE = TRUE '
' '
'Now let''s set a breakpoint.  Enter: '
'     GO FROM 0 TIL #10   '
' '
'The ==> indicates where the break occurred and the source code for that'
'instruction is displayed. '
' '
'The PRESRC and POSTSRC commands are used to display source code before and '
'after an execution break.  Go to the next screen to learn more about PRESRC.'
' '
'------------- Enter N <Enter> to continue with Aid Module Q ------------------'
source = true