* program body 00430000 00440000 00450000 00460000 00470000 00480000 00482000 46 47 48 49 50 51 52 53 54 55 56 57 58 59

[answerhappygod]

Program Body 00430000 00440000 00450000 00460000 00470000 00480000 00482000 46 47 48 49 50 51 52 53 54 55 56 57 58 59 1 (35.09 KiB) Viewed 56 times

Hi! I can count very fast.
00000001
IS THERE MORE?
00000002
IS THERE MORE?
00000003
IS THERE MORE?
00000004
IS THERE MORE?
00000005
IS THERE MORE?
00000006
IS THERE MORE?
00000007
IS THERE MORE?
00000008
IS THERE MORE?
00000009
IS THERE MORE?
00000010
IS THERE MORE?
00000011
IS THERE MORE?
00000012
IS THERE MORE?
MY FINAL ASSIGNMENT
* program body 00430000 00440000 00450000 00460000 00470000 00480000 00482000 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 OPEN (PRTLINE,OUTPUT) Open output file MVC LINE (26),MSGX PUT PRTLINE, LINE MVC LINE,BLANK LOOPINIT DS OH SR 2,2 Clear reg 2 2,-F' 12' Store 10 in reg 2 3,-F'1' Store 1 in reg 3 L 重 LOOP DS ӨН * 62 63 CVD 3,PACKAREA UNPK OUT,PACKAREA MVC LINE (35),OUT MVZ LINE+7(1),LINE PUT PRTLINE,LINE 3,=F'1' 64 65 00483000 06484000 00490000 00500000 00510004 00520000 00530000 00540000 00550000 00560000 00570000 0058000 00590000 00600000 00610000 00620000 00630000 00640000 00650000 00660000 00670000 Convert to decimal, store in packarea Convert to printable, store in out Move characters from out to line Move zone bits Put line in output file Add 1 to current total in reg 3 66 67 A 68 69 70 71 IT | вст 2,LOOP 1 CLOSE (PRTLINE) Subtract 1 from reg 2, if not zero then go to LOOP label Close output file 重 72 73

87 00810000 88 89 storage and constant definitions. print output definition. 90 91 92 * 93 94 95 1 96 00820000 00830000 00840000 00850000 00860000 00870000 00880000 00890000 00900000 X00910000 00920000 00930000 00940000 00950000 00960000 00962000 00963000 97 98 99 LINE DS OCL80 DC c' DC CL79" PRTLINE DCB DSORGEPS,DDNAME=PRTLINE , MACRF=PM, | | | | RECEM=FB, LRECL=88 SUM DC P'01" ONE DC P'01' TOT DS PL2 OUT DC X' 4040404040404040' MSGX DC CL26'Hi! I can count very fast.' BLANK DC CL80" PACKAREA DS CL8 SAVEAREA DC 18F'-1' register save area END ADD V/G.PRTLINE DD DSN=&SYSUID..OUTPUT (MYOUTPUT),DISP=SHR 100 101 102 103 104 105 106 00970000 00980000 00990000 01000002 107 108

1 2 3 nmin 4 5 6 7 Hi! I can count very fast. 00000001Hi! I can count very fast. 00000002Hi! I can count very fast. 00000003Hi! I can count very fast. 00000004Hi! I can count very fast. 00000005Hi! I can count very fast. 00000006Hi! I can count very fast. 00000007Hi! I can count very fast. 00000008Hi! I can count very fast. 00000009Hi! I can count very fast. 00000010Hi! I can count very fast. 00000011Hi! I can count very fast. 00000012Hi! I can count very fast. 8 9 10 11 12 13 14