opt 37› org $a000›› jsr zer› lda <dl› sta $230› lda >dl› sta $231›› jsr cz› jsr zer›› lda ad› clc› adc #160› sta ad›› jsr cz› jsr zer› lda ad› clc› adc #160› sta ad› bcc *+5› inc ad+1›› jsr cz› jsr zer› lda ad› clc› adc #160› sta ad› bcc *+5› inc ad+1››*jsr cz›*jsr zer››*lda ad›*clc›*adc #160›*sta ad›*=+c *+5›*inc ad+1›› jsr cz› jsr zer› lda #0› sta 559› jmp cz_››zer lda #0› sta 708› sta 709› sta 711› jsr cz_› rts››cz lda #0› sta 19› lda #$ff› sta 764››cz2 lda #1› sta 20›p1 lda 709› cmp #$f› bcs p2› inc 709›p2 lda 708› cmp #$f› bcs p3› inc 708›p3 lda 711› cmp #$f› bcs p4›p4 jsr cz_› lda 764› cmp #$ff› bne ex› lda 20› bne p1› lda 19› cmp #2› bcc cz2›ex rts››cz_ ldx 20› cpx 20› beq *-2› rts›› org $b200›dl dta b($70),b($70),b($70),b($70)› dta b($47)›ad dta a(ekr)› dta b(7),b(7),b(7),b(7),b(7),b(7),b(7)› dta a($41),a(dl)›› org $b400››ekr equ *› dta d'                    '› dta d'                    '› dta d'                    '› dta d'   - timekeeper -   '› dta d'                    '› dta d'                    '› dta d'                    '› dta d'                    '› dta d'                    '› dta d'done by (alphabetic)'› dta d'                    '› dta d'mikey,mloda,quakoon '› dta d'roland, solo, tiger '› dta d'                    '› dta d' of new generation  '                '› dta d'                    '› dta d'I jeszcze jedno.    '› dta d'                    '› dta d'PIORUN,bez urazy,ale'› dta d'    SPIERDALAJ!     '› dta d'                    '› dta d'     -new generation'› dta d'                    '› dta d'                    '› dta d'                    '› dta d'                    '› dta d'aha...              '› dta d' fajny bigskrin ;-) '› dta d'                    '› dta d'vasco, bez urazy !!!'› dta d'                    '› dta d'                    '› dta d'                    '› dta d'                    '› dta d'                    '››