/******************** ICE-1500 (DOS) TUTORIAL SCREEN #20 **********************/ menu = 1 define literally PR = 'include scr.19 nolist' define literally R = 'include scr.20 nolist' define literally RTN = 'include scr.20 nolist' define literally N = 'include scr.21 nolist' define literally M = 'include scr.2 nolist' map 0k length 12k ice load messg namescope = rotate DEFINE PROC CRT = DO CURY = 20T CHAR .DISP_BUFFER LENGTH BUFF_SIZE RETURN FALSE END DEFINE BRKREG CRTBRK = CHAR_DISPLAY CALL CRT cls /******************************************************************************/ ' ------------------------' 'Now find the error in the MESSG program... | SCR20: VERIFY TEMP 1 |' ' | N = Next screen |' 'The variable TEMP accepts the left-most character | R = Rewrite SCR20 |' 'of DISP_BUFFER and assigns it to the right-most | PR = Previous screen |' 'position. | M = Go to main menu |' ' | Q = Quit tutorial |' 'Verify that the variable TEMP is getting the correct | SCR# = Screen desired |' 'value. In order to check the value, emulation must ------------------------' 'be stopped right after TEMP is assigned a value (program code line #28; ' 'address 0064H). Use the TIL option of the GO command to set a breakpoint ' 'at line #28. Enter:' ' ' ' GO FROM 0 TIL #28 (#28 is address 0064H)' ' ' 'NOTE: If the MESSG program was written in ASM, there would not be a line ' 'number to use. Address 0064H (or a label) would be used as a breakpoint.' ' ' '-------------------------------------------------------------------------------'