http://www.tienza.es/crux/src/www.jwz.org/xscreensaver/xscreensaver-5.05.tar.gz

[xscreensaver] / hacks / images / m6502 / noise.asm

diff --git a/hacks/images/m6502/noise.asm b/hacks/images/m6502/noise.asm
new file mode 100644 (file)
index 0000000..32447d7
--- /dev/null
+++ b/hacks/images/m6502/noise.asm
@@ -0,0 +1,16 @@
+; static noise
+
+start: ldy #$ff
+       ldx #$0
+loop:  lda $fe
+       sta $200,x
+       and #$7
+       sta $300,x
+       and #$3
+       sta $400,x
+       and #$1
+       sta $500,x
+       inx
+       dey
+       bne loop
+       rts