DEMONSTRATE MACROS, A SIMPLE ADDITION MACRO
LOC OBJECT CODE ADDR1 ADDR2 STMT SOURCE STATEMENT
2 MACRO
3 ADD &A,&B,&C
4 .* ADDS A TO B GIVING C, ASSUMES REGISTER 0 IS AVAILABLE
5 L 0,&A
6 A 0,&B
7 ST 0,&C
8 MEND
9 *
10 *
000000 11 P1 START
000000 05C0 12 BALR 12,0
00002 13 USING *,12
14 * YOUR PROGRAM GOES HERE
15 *
16 ADD A,B,C
000002 5800 C01A 0001C 17+ L 0,A
000006 5A00 C01E 00020 18+ A 0,B
00000A 5000 C022 00024 19+ ST 0,C
20 ADD D,E,F
00000E 5800 C026 00028 21+ L 0,D
000012 5A00 C02A 0002C 22+ A 0,E
000016 5000 C02E 00030 23+ ST 0,F
00001A 07FE 24 BR 14
25 *
26 * END OF YOURPROGRAM
27 *
00001C 00000003 28 A DC F'3'
000020 00000004 29 B DC F'4'
000024 30 C DS F
000028 00000008 31 D DC F'8'
00002C 00000004 32 E DC F'4'
000030 33 F DS F
34 END