home *** CD-ROM | disk | FTP | other *** search
/ Transactor / Transactor_25_1988_Transactor_Publishing.d64 / listing2 < prev    next >
Encoding:
Text File  |  1988-01-01  |  460 b   |  10 lines
  1. fill2     stx loop+1    ;save low byte into STA instruction
  2.           sty loop+2    ;save high byte into STA instruction
  3.           lda #$00      ;Acc. holds value to store in block
  4.           tay           ;set index register to zero
  5. ;
  6. loop2     sta $0000,y   ;save value of Acc. into memory
  7.           iny           ;move index pointer up one
  8.           bne loop2     ;keep going till INY sets zero flag
  9.           rts           ;now we're done, return to caller
  10.