C64 Software  <  SCA: The C64 Software Collection / TERRA HIGH

  Run
; Load: 37294 ($91AE), len: 592 bytes

91AE  87          ??
91AF  A2 67       LDX #$67
91B1  C3          ??
91B2  60          RTS
91B3  BD AA A9    LDA $A9AA,X
91B6  00          BRK
91B7  8D 23 11    STA $1123
91BA  18          CLC
91BB  CA          DEX
91BC  30 04       BMI $91C2
91BE  69 06       ADC #$06
91C0  D0 F9       BNE $91BB
91C2  AA          TAX
91C3  A9 00       LDA #$00
91C5  A0 23       LDY #$23
91C7  A9 00       LDA #$00
91C9  99 B7 10    STA $10B7,Y
91CC  99 DB 10    STA $10DB,Y
91CF  99 FF 10    STA $10FF,Y
91D2  88          DEY
91D3  10 F4       BPL $91C9
91D5  A8          TAY
91D6  BD 8F 17    LDA $178F,X
91D9  8D BA 10    STA $10BA
91DC  85 F8       STA $F8
91DE  BD 90 17    LDA $1790,X
91E1  8D BB 10    STA $10BB
91E4  85 F9       STA $F9
91E6  B1 F8       LDA ($F8),Y
91E8  8D B8 10    STA $10B8
91EB  C8          INY
91EC  B1 F8       LDA ($F8),Y
91EE  8D B9 10    STA $10B9
91F1  88          DEY
91F2  BD 91 17    LDA $1791,X
91F5  8D DE 10    STA $10DE
91F8  85 F8       STA $F8
91FA  BD 92 17    LDA $1792,X
91FD  8D DF 10    STA $10DF
9200  85 F9       STA $F9
9202  B1 F8       LDA ($F8),Y
9204  8D DC 10    STA $10DC
9207  C8          INY
9208  B1 F8       LDA ($F8),Y
920A  8D DD 10    STA $10DD
920D  88          DEY
920E  BD 93 17    LDA $1793,X
9211  8D 02 11    STA $1102
9214  85 F8       STA $F8
9216  BD 94 17    LDA $1794,X
9219  8D 03 11    STA $1103
921C  85 F9       STA $F9
921E  B1 F8       LDA ($F8),Y
9220  8D 00 11    STA $1100
9223  C8          INY
9224  B1 F8       LDA ($F8),Y
9226  8D 01 11    STA $1101
9229  C8          INY
922A  8C BC 10    STY $10BC
922D  8C E0 10    STY $10E0
9230  8C 04 11    STY $1104
9233  88          DEY
9234  8C C7 10    STY $10C7
9237  8C EB 10    STY $10EB
923A  8C 0F 11    STY $110F
923D  88          DEY
923E  8C B7 10    STY $10B7
9241  8C DB 10    STY $10DB
9244  8C FF 10    STY $10FF
9247  8C D4 10    STY $10D4
924A  8C F8 10    STY $10F8
924D  8C 1C 11    STY $111C
9250  8C D8 10    STY $10D8
9253  8C FC 10    STY $10FC
9256  8C 20 11    STY $1120
9259  20 16 1D    JSR $1D16
925C  A9 01       LDA #$01
925E  8D 5D 12    STA $125D
9261  8D F3 1C    STA $1CF3
9264  8D F4 1C    STA $1CF4
9267  8D 23 11    STA $1123
926A  60          RTS
926B  00          BRK
926C  57          ??
926D  1A          ??
926E  33          ??
926F  1A          ??
9270  02          ??
9271  AB          ??
9272  39 10 13    AND $1310,Y
9275  0C          ??
9276  00          BRK
9277  42          ??
9278  03          ??
9279  90 06       BCC $9281
927B  00          BRK
927C  04          ??
927D  02          ??
927E  04          ??
927F  60          RTS
9280  01 08       ORA ($08,X)
9282  0C          ??
9283  01 40       ORA ($40,X)
9285  40          RTI
9286  00          BRK
9287  70 1A       BVS $92A3
9289  37          ??
928A  1A          ??
928B  02          ??
928C  AA          TAX
928D  3A          ??
928E  01 10       ORA ($10,X)
9290  26 0C       ROL $0C
9292  00          BRK
9293  C0 09       CPY #$09
9295  1C          ??
9296  07          ??
9297  00          BRK
9298  04          ??
9299  02          ??
929A  04          ??
929B  60          RTS
929C  01 08       ORA ($08,X)
929E  0D 01 40    ORA $4001
92A1  40          RTI
92A2  10 88       BPL $922C
92A4  1A          ??
92A5  3B          ??
92A6  1A          ??
92A7  02          ??
92A8  A3          ??
92A9  24 80       BIT $80
92AB  17          ??
92AC  82          ??
92AD  17          ??
92AE  A3          ??
92AF  24 01       BIT $01
92B1  10 3E       BPL $92F1
92B3  0C          ??
92B4  A2 28       LDX #$28
92B6  4E 00 08    LSR $0800
92B9  00          BRK
92BA  28          PLP
92BB  14          ??
92BC  28          PLP
92BD  60          RTS
92BE  A4 24       LDY $24
92C0  10 10       BPL $92D2
92C2  00          BRK
92C3  50 A2       BVC $9267
92C5  61 61       ADC ($61,X)
92C7  A5 F8       LDA $F8
92C9  48          PHA
92CA  A5 F9       LDA $F9
92CC  48          PHA
92CD  A5 FA       LDA $FA
92CF  48          PHA
92D0  A5 FB       LDA $FB
92D2  48          PHA
92D3  20 47 11    JSR $1147
92D6  20 24 1C    JSR $1C24
92D9  68          PLA
92DA  85 FB       STA $FB
92DC  68          PLA
92DD  85 FA       STA $FA
92DF  68          PLA
92E0  85 F9       STA $F9
92E2  68          PLA
92E3  85 F8       STA $F8
92E5  60          RTS
92E6  60          RTS
92E7  AD 23 11    LDA $1123
92EA  F0 FA       BEQ $92E6
92EC  CE 5D 12    DEC $125D
92EF  D0 26       BNE $9317
92F1  A9 B7       LDA #$B7
92F3  85 FA       STA $FA
92F5  A9 10       LDA #$10
92F7  85 FB       STA $FB
92F9  20 ED 13    JSR $13ED
92FC  A9 DB       LDA #$DB
92FE  85 FA       STA $FA
9300  A9 10       LDA #$10
9302  85 FB       STA $FB
9304  20 ED 13    JSR $13ED
9307  A9 FF       LDA #$FF
9309  85 FA       STA $FA
930B  A9 10       LDA #$10
930D  85 FB       STA $FB
930F  20 ED 13    JSR $13ED
9312  A9 05       LDA #$05
9314  8D 5D 12    STA $125D
9317  A9 B7       LDA #$B7
9319  85 FA       STA $FA
931B  A9 10       LDA #$10
931D  85 FB       STA $FB
931F  20 C6 14    JSR $14C6
9322  8E CC 10    STX $10CC
9325  8C CD 10    STY $10CD
9328  A9 DB       LDA #$DB
932A  85 FA       STA $FA
932C  A9 10       LDA #$10
932E  85 FB       STA $FB
9330  20 C6 14    JSR $14C6
9333  8E F0 10    STX $10F0
9336  8C F1 10    STY $10F1
9339  A9 FF       LDA #$FF
933B  85 FA       STA $FA
933D  A9 10       LDA #$10
933F  85 FB       STA $FB
9341  20 C6 14    JSR $14C6
9344  8E 14 11    STX $1114
9347  8C 15 11    STY $1115
934A  AD F3 1C    LDA $1CF3
934D  F0 36       BEQ $9385
934F  AD CC 10    LDA $10CC
9352  8D 00 D4    STA $D400
9355  AD CD 10    LDA $10CD
9358  8D 01 D4    STA $D401
935B  AD CE 10    LDA $10CE
935E  8D 02 D4    STA $D402
9361  AD CF 10    LDA $10CF
9364  8D 03 D4    STA $D403
9367  AD CA 10    LDA $10CA
936A  8D 05 D4    STA $D405
936D  AD CB 10    LDA $10CB
9370  8D 06 D4    STA $D406
9373  AE DA 10    LDX $10DA
9376  AD D0 10    LDA $10D0
9379  F0 06       BEQ $9381
937B  CE D0 10    DEC $10D0
937E  8E 04 D4    STX $D404
9381  E8          INX
9382  8E 04 D4    STX $D404
9385  AD F0 10    LDA $10F0
9388  8D 07 D4    STA $D407
938B  AD F1 10    LDA $10F1
938E  8D 08 D4    STA $D408
9391  AD F2 10    LDA $10F2
9394  8D 09 D4    STA $D409
9397  AD F3 10    LDA $10F3
939A  8D 0A D4    STA $D40A
939D  AD EE 10    LDA $10EE
93A0  8D 0C D4    STA $D40C
93A3  AD EF 10    LDA $10EF
93A6  8D 0D D4    STA $D40D
93A9  AE FE 10    LDX $10FE
93AC  AD F4 10    LDA $10F4
93AF  F0 06       BEQ $93B7
93B1  CE F4 10    DEC $10F4
93B4  8E 0B D4    STX $D40B
93B7  E8          INX
93B8  8E 0B D4    STX $D40B
93BB  AD F4 1C    LDA $1CF4
93BE  F0 36       BEQ $93F6
93C0  AD 14 11    LDA $1114
93C3  8D 0E D4    STA $D40E
93C6  AD 15 11    LDA $1115
93C9  8D 0F D4    STA $D40F
93CC  AD 16 11    LDA $1116
93CF  8D 10 D4    STA $D410
93D2  AD 17 11    LDA $1117
93D5  8D 11 D4    STA $D411
93D8  AD 12 11    LDA $1112
93DB  8D 13 D4    STA $D413
93DE  AD 13 11    LDA $1113
93E1  8D 14 D4    STA $D414
93E4  AE 22 11    LDX $1122
93E7  AD 18 11    LDA $1118
93EA  F0 06       BEQ $93F2
93EC  CE 18 11    DEC $1118
93EF  8E 12 D4    STX $D412
93F2  E8          INX
93F3  8E 12 D4    STX $D412
93F6  AD 85 16    LDA $1685
93F9  8D 18 D4    STA $D418
93FC  60          RTS
93FD  00          BRK
READY.