1 MAIN START 2 LAD GR1,0 3 SUBA GR1,XMAX 4 LOOPX CPA GR1,XMAX 5 JPL FIN 6 OUT SEP,SLEN 7 CALL OUTA 8 OUT SEP,SLEN 9 LAD GR2,0 10 SUBA GR2,YMAX 11 LOOPY CPA GR2,YMAX 12 JPL XNEXT 13 CALL MULA 14 JOV WOV 15 PUSH 0,GR1 16 LD GR1,GR0 17 CALL OUTA 18 POP GR1 19 YNEXT OUT SEP,SLEN 20 LAD GR2,1,GR2 21 JUMP LOOPY 22 WOV OUT YOMSG,YLEN 23 JUMP YNEXT 24 XNEXT LAD GR1,1,GR1 25 JUMP LOOPX 26 FIN RET 27 XMAX DC 9 28 YMAX DC 9 29 SEP DC '--------------------' 30 SLEN DC 20 31 YOMSG DC 'Warning: overflow' 32 YLEN DC 17 33 END