git.hungrycats.org Git - xscreensaver/blob - hacks/images/m6502/noise.asm

   1 ; static noise
   2
   3 start: ldy #$ff
   4        ldx #$0
   5 loop:  lda $fe
   6        sta $200,x
   7        and #$7
   8        sta $300,x
   9        and #$3
  10        sta $400,x
  11        and #$1
  12        sta $500,x
  13        inx
  14        dey
  15        bne loop
  16        rts