http://www.jwz.org/xscreensaver/xscreensaver-5.13.tar.gz
[xscreensaver] / 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