C64 Software  <  SCA: The C64 Software Collection / SAVER61824-65343

  Run
1000              ;
1010              ;SAVER #2.0
1020              ;
1030              ORG 16384
1040              ;
1050              ;
1060 ANFADR       EQU 61824
1070 PTR          EQU 254
1080              ;
1090 INIT         LDY #0
1100              LDA #<ANFADR
1110              STA PTR
1120              LDA #>ANFADR
1130              STA PTR+1
1140              LDA #55
1150              STA 1
1160              ;
1170 LOP1         SEI
1180              DEC 1
1190              DEC 1
1200              LDA (PTR),Y
1210              INC 1
1220              INC 1
1230              CLI
1240              JSR 65490
1250              INC PTR
1260              BNE LOP2
1270              INC PTR+1
1280 LOP2         LDX PTR+1
1290              INX
1300              BNE LOP1
1310              LDX PTR
1320              CPX #64
1330              BNE LOP1
1340              RTS
READY.