diff options
| author | Simon Rettberg | 2024-09-06 14:42:37 +0200 |
|---|---|---|
| committer | Simon Rettberg | 2024-09-06 14:42:37 +0200 |
| commit | badef32037f52f79abc1f1440b786cd71afdf270 (patch) | |
| tree | 412b792d4cab4a7a110db82fcf74fe8a1ac55ec1 /hacks/images/m6502/cellular-600.asm | |
| parent | Delete pre-6.00 files (diff) | |
| download | xscreensaver-master.tar.gz xscreensaver-master.tar.xz xscreensaver-master.zip | |
Diffstat (limited to 'hacks/images/m6502/cellular-600.asm')
| -rw-r--r-- | hacks/images/m6502/cellular-600.asm | 209 |
1 files changed, 0 insertions, 209 deletions
diff --git a/hacks/images/m6502/cellular-600.asm b/hacks/images/m6502/cellular-600.asm deleted file mode 100644 index db5497c..0000000 --- a/hacks/images/m6502/cellular-600.asm +++ /dev/null @@ -1,209 +0,0 @@ -; Code 600 cellular automata - by D.S. - lda #1 - sta $22f - -l3: - ldy #29 - -l2: - lda $220,y - adc $221,y - adc $222,y - tax - lda rule,x - sta $201,y - dey - bpl l2 - - ldy #$c0 - sec -ll2: - lda $503,y - sta $523,y - sta $53b,y - lda $504,y - sta $524,y - sta $53a,y - lda $505,y - sta $525,y - sta $539,y - lda $506,y - sta $526,y - sta $538,y - lda $507,y - sta $527,y - sta $537,y - lda $508,y - sta $528,y - sta $536,y - lda $509,y - sta $529,y - sta $535,y - lda $50a,y - sta $52a,y - sta $534,y - lda $50b,y - sta $52b,y - sta $533,y - lda $50c,y - sta $52c,y - sta $532,y - lda $50d,y - sta $52d,y - sta $531,y - lda $50e,y - sta $52e,y - sta $530,y - lda $50f,y - sta $52f,y - tya - adc #$df - tay - bcs ll2 - - ldy #$e0 - sec -ll3: - lda $403,y - sta $423,y - sta $43b,y - lda $404,y - sta $424,y - sta $43a,y - lda $405,y - sta $425,y - sta $439,y - lda $406,y - sta $426,y - sta $438,y - lda $407,y - sta $427,y - sta $437,y - lda $408,y - sta $428,y - sta $436,y - lda $409,y - sta $429,y - sta $435,y - lda $40a,y - sta $42a,y - sta $434,y - lda $40b,y - sta $42b,y - sta $433,y - lda $40c,y - sta $42c,y - sta $432,y - lda $40d,y - sta $42d,y - sta $431,y - lda $40e,y - sta $42e,y - sta $430,y - lda $40f,y - sta $42f,y - tya - adc #$df - tay - bcs ll3 - - ldy #$e0 - sec -ll4: - lda $303,y - sta $323,y - sta $33b,y - lda $304,y - sta $324,y - sta $33a,y - lda $305,y - sta $325,y - sta $339,y - lda $306,y - sta $326,y - sta $338,y - lda $307,y - sta $327,y - sta $337,y - lda $308,y - sta $328,y - sta $336,y - lda $309,y - sta $329,y - sta $335,y - lda $30a,y - sta $32a,y - sta $334,y - lda $30b,y - sta $32b,y - sta $333,y - lda $30c,y - sta $32c,y - sta $332,y - lda $30d,y - sta $32d,y - sta $331,y - lda $30e,y - sta $32e,y - sta $330,y - lda $30f,y - sta $32f,y - tya - adc #$df - tay - bcs ll4 - - - ldy #$e0 - sec -ll1: - lda $203,y - sta $223,y - sta $23b,y - lda $204,y - sta $224,y - sta $23a,y - lda $205,y - sta $225,y - sta $239,y - lda $206,y - sta $226,y - sta $238,y - lda $207,y - sta $227,y - sta $237,y - lda $208,y - sta $228,y - sta $236,y - lda $209,y - sta $229,y - sta $235,y - lda $20a,y - sta $22a,y - sta $234,y - lda $20b,y - sta $22b,y - sta $233,y - lda $20c,y - sta $22c,y - sta $232,y - lda $20d,y - sta $22d,y - sta $231,y - lda $20e,y - sta $22e,y - sta $230,y - lda $20f,y - sta $22f,y - tya - adc #$df - tay - bcs ll1 - - jmp l3 - -; Rules, uncomment only one line of the following. -rule: - dcb 0,2,0,1,1,2,0 ; CODE 600 -; dcb 0,2,1,0,2,0,0 ; CODE 177 -; dcb 0,1,2,0,2,0,1; CODE 912
\ No newline at end of file |
