#pass 1 ** START 2000 ** LDA FIVE ** STA ALPHA ** ORG 2050 ** LDCH CHARZ ** STCH C1 ** ORG 3000 A EQU 2000 FIVE WORD 5 ** ORG 8000 B EQU 90 C1 RESB 4096 ** END ** LDA 03 STA 0f LDCH 53 STCH 57 END * A 2000 FIVE 3000 B 90 C1 8000 #pass 2 ** START 1000 1000 ** LDX ZERO 1003 ** LDA ZERO 1006 LOOP ADD TABLE, X 1009 ** TIX COUNT 100C ** JLT LOOP 100F ** STA TOTAL 1012 ** RSUB ** 1015 TABLE RESW 3000 1141 INPUT BYTE X'F1' 1142 COUNT RESW 1 1145 ZERO WORD 0 1148 STR BYTE C'Hello' 114D TOTAL RESW 1 1150 ** END FIRST LDX 04 LDA 00 ADD 08 TIX 12 JLT 38 STA 0C RSUB 4C END * FIRST 1000 LOOP 1006 TABLE 1015 INPUT 1141 COUNT 1142 ZERO 1145 STR 1148 TOTAL 114D #reloactable loader H COPY 000000 00107A T 000000 1E FFC 14 0033 48 1039 10 0036 28 0030 30 0015 48 1061 3C 0003 20 002A 1C 0039 30 002D$ T 002500 15 E00 1D 0036 48 1061 18 0033 4C 1000 80 1000 60 1003$ E 000000 #linking loader pass1 H PROGA 0000 1000 D LISTA 0040 ENDA 0054 R LISTB ENDB LISTC ENDC T 0020 141033 465555 678909 568787 345678 T 0054 000014 789087 776555 876666 456666 M 0054 06 +LISTC E 0000 H PROGB 0000 2000 D LISTB 0060 ENDB 0070 R LISTA ENDA LISTC ENDC T 0020 141033 465555 678909 568787 345678 T 0054 000000 789087 776555 876666 456666 M 0054 06 +ENDA M 0054 06 -LISTA M 0054 06 +LISTC E 0000 H PROGC 0000 3000 D LISTC 0030 ENDC 0042 R LISTA ENDA LISTC ENDB3 T 0020 141033 465555 678909 568787 345678 T 0054 000020 789087 776555 876666 456666 M 0054 06 +ENDA M 0054 06 -LISTA M 0054 06 +PROGC #linking loader pass 2 H PROGA 000000 000063 D LISTA 000054 R LISTB ENDB LISTC ENDC T 000020 0A 03201D 77100004 050014 T 000054 0F 100014 000008 004051 000004 100000 M 000024 05 +LISTB M 000054 06 +LISTC M 000060 06 +LISTB M 000060 06 -LISTA E 000020 H PROGB 000000 00007F D LISTB 000060 ENDB 000070 R LISTA LISTC ENDY T 000036 0B 03100000 772027 05100000 T 000070 0F 100000 000008 004051 000004 100060 M 000037 05 +LISTA M 00003E 05 -LISTA M 000070 06 -LISTA M 000070 06 +LISTC M 00007C 06 +PROGB M 00007C 06 -LISTA E 000000 H PROGC 000000 0000051 D LISTC 000030 ENDC 000042 R LISTA LISTB ENDB T 000018 0C 03100000 77100004 05100000 T 000042 0F 100030 000008 004051 000004 100000 M 00001D 05 +LISTB M 000021 05 -LISTA M 000042 06 -LISTA M 000042 06 +PROGC M 00004E 06 +LISTB M 00004E 06 -LISTA E END PROGA ** 4000 63 ** LISTA 4054 PROGB ** 4063 7F ** LISTB 40C3 ** ENDB 40D3 PROGC ** 40E2 51 ** LISTC 4112 ** ENDC 4124