C64 Software  <  SCA: The C64 Software Collection / VIEWMASCH

  Run
; Load: 4096 ($1000), len: 39 bytes

1000  85 FD       STA $FD
1002  78          SEI
1003  A9 34       LDA #$34
1005  85 01       STA $01
1007  A0 00       LDY #$00
1009  84 FC       STY $FC
100B  84 FE       STY $FE
100D  A9 20       LDA #$20
100F  85 FF       STA $FF
1011  A2 04       LDX #$04
1013  B1 FC       LDA ($FC),Y
1015  91 FE       STA ($FE),Y
1017  C8          INY
1018  D0 F9       BNE $1013
101A  E6 FD       INC $FD
101C  E6 FF       INC $FF
101E  CA          DEX
101F  D0 F2       BNE $1013
1021  A9 37       LDA #$37
1023  85 01       STA $01
1025  58          CLI
1026  60          RTS
READY.