diff --git a/PARADIST.S b/PARADIST.S index 1d02d3a..f2fced1 100644 --- a/PARADIST.S +++ b/PARADIST.S @@ -406,7 +406,7 @@ a_3 equr a3 dcb $4e71,8 move.b #1,$ffff8260.w ;GunsticK's right border end switch move.b #0,$ffff8260.w - movem.l d0/d1/d2,$ffff8240.w ;mdist + movem.l d0/d1/d2,$ffff8250.w ;mdist move.b #2,$ffff8260.w ;Open left border move.b #0,$ffff8260.w move.l d3,$ffff824e.w ;mdist @@ -418,16 +418,17 @@ a_3 equr a3 moveq #0,d_3 move.w distcalc,d_2 - dcb $4e71,27 + dcb $4e71,26+3 distwaveread: - dcb $4e71,17 ;mdist + dcb $4e71,1 + dcb $4e71,17-3 ;mdist dcb $4e71,25 ;digi move.b #0,$ffff820a.w ;Open right border move.b #2,$ffff820a.w bra.s cont notnextwavetab: ;~12 time adjust - dcb $4e71,17 + dcb $4e71,19+1 bra.s _notnextwavetab ;~12 notendwavetab: ;~12 bra.s _notendwavetab ;~12 @@ -436,7 +437,7 @@ cont: dcb $4e71,5 move.b #1,$ffff8260.w ;GunsticK's right border end switch move.b #0,$ffff8260.w - movem.l d0/d1/d2,$ffff8240.w ;mdist + movem.l d0/d1/d2,$ffff8250.w ;mdist move.b #2,$ffff8260.w ;Open left border move.b #0,$ffff8260.w move.l d3,$ffff824e.w ;mdist @@ -445,6 +446,7 @@ cont: cmp.w #128,d_1 ;~8 bne.s notnextwavetab ;~8 move.l wavetabptr,a_1 ;~20 next wave to be read + tst.l (a_1) ;~12 bne.s notendwavetab ;~8 lea wavetab,a_1 ;~12 reset wavetabptr nop @@ -459,25 +461,94 @@ _notnextwavetab: move.w d_1,16(a_3) ;~12 move.w d_2,(a_3)+ ;~8 write new curve - dcb $4e71,1 dbf d_0,distwaveread ;~12/16 - move.l a_0,distwaveptr - move.w d_3,distcalc + dcb $4e71,25-3 ;digi + dcb $4e71,17 ;mdist + + + move.b #0,$ffff820a.w ;Open right border + move.b #2,$ffff820a.w + dcb $4e71,8 + move.b #1,$ffff8260.w ;GunsticK's right border end switch + move.b #0,$ffff8260.w + movem.l d0/d1/d2,$ffff8250.w ;mdist + move.b #2,$ffff8260.w ;Open left border + move.b #0,$ffff8260.w + move.l d3,$ffff824e.w ;mdist + move.l a_0,distwaveptr ;~20 + move.w d_3,distcalc ;~16 + + lea disttable+8,a_3 ;~12 scroll begins 26 lines before end of screen + lea shift,a_0 ;~12 pointer to the shifts + move.w #-(17*8),count ;~20 scroll has 16 lines +distcalcloop: ;(~12) + + move.w (a_3)+,d_1 ;~8 + move.w (a_0),d_2 ;~8 ;read shift + add.w d_1,d_2 ;~4 + bmi rueckwaerts ;~12 + sub.w #16,d_2 ;~8 + bhs vorwaerts ;~12 + add.w #16,d_2 ;~8 + move.w d_2,(a_0) ;~8 ;write back new shift + dcb $4e71,4-2 + moveq #9,d_2 +noshift: + nop + dcb $4e71,25 ;digi + dcb $4e71,17 ;mdist + move.b #0,$ffff820a.w ;Open right border + move.b #2,$ffff820a.w + dcb $4e71,8 + move.b #1,$ffff8260.w ;GunsticK's right border end switch + move.b #0,$ffff8260.w + movem.l d0/d1/d2,$ffff8250.w ;mdist + move.b #2,$ffff8260.w ;Open left border + move.b #0,$ffff8260.w + move.l d3,$ffff824e.w ;mdist + dcb $4e71,41-4 + dbf d_2,noshift + +indistcalcloop: + dcb $4e71,25 ;digi + dcb $4e71,17 ;mdist + move.b #0,$ffff820a.w ;Open right border + move.b #2,$ffff820a.w + dcb $4e71,8 + move.b #1,$ffff8260.w ;GunsticK's right border end switch + move.b #0,$ffff8260.w + movem.l d0/d1/d2,$ffff8250.w ;mdist + move.b #2,$ffff8260.w ;Open left border + move.b #0,$ffff8260.w + move.l d3,$ffff824e.w ;mdist + dcb $4e71,10 + + + lea linebuffend-linebuffbegin(a_0),a_0 ;~8 next line + addq.w #8,count ;~4 + bne distcalcloop ;~12 + bra copydistscroll + dcb $4e71,41-9 + + + + dcb $4e71,25 ;digi + dcb $4e71,17 ;mdist ; move.w #221-16,d7 - move.w #32,d7 + move.w #32,d7 ;~8 move.b #0,$ffff820a.w ;Open right border move.b #2,$ffff820a.w dcb $4e71,8 overscanloop: move.b #1,$ffff8260.w ;GunsticK's right border end switch move.b #0,$ffff8260.w - movem.l d0/d1/d2,$ffff8240.w ;mdist + movem.l d0/d1/d2,$ffff8250.w ;mdist move.b #2,$ffff8260.w ;Open left border move.b #0,$ffff8260.w move.l d3,$ffff824e.w ;mdist @@ -495,86 +566,132 @@ asd ;=-| read the new distortions and shift the buffers ; letters of font must be 256 bytes !!!!!!!! - lea disttable+8,a_3 ;scroll begins 26 lines before end of screen - lea shift,a_0 ;pointer to the shifts - move.w #-(26*8),count ;scroll has 26 lines -distcalcloop: - move.w (a_3)+,d_1 - move.w (a_0),d_2 ;read shift - add.w d_1,d_2 - bmi rueckwaerts - sub.w #16,d_2 - bhs vorwaerts - add.w #16,d_2 ;plenty of time here - move.w d_2,(a_0) ;write back new shift -indistcalcloop: - lea linebuffend-linebuffbegin(a_0),a_0 ;next line - addq.w #8,count - bne.s distcalcloop - bra copydistscroll -nottextend: - lea 1(a_1),a_1 - bra.s _nottextend ;-> advance this line by one word vorwaerts: - move.w d_2,(a_0) ;write back new shift - move.l textptr-shift(a_0),a_1 + + move.w d_2,(a_0) ;~8 write back new shift + move.l textptr-shift(a_0),a_1 ;~16 + dcb $4e71,2 + dcb $4e71,25 ;digi + dcb $4e71,17 ;mdist + + + move.b #0,$ffff820a.w ;Open right border + move.b #2,$ffff820a.w + bra.s cont2 +nottextend: ;~12 + addq.w #1,a_1 ;~8 + bra _nottextend ;~12 +cont2: + dcb $4e71,5 + move.b #1,$ffff8260.w ;GunsticK's right border end switch + move.b #0,$ffff8260.w + movem.l d0/d1/d2,$ffff8250.w ;mdist + move.b #2,$ffff8260.w ;Open left border + move.b #0,$ffff8260.w + move.l d3,$ffff824e.w ;mdist + ;movep : 5 nops weniger ;actual = if any bit of the letter appears in one buffer ; textptr ; | ;UNLIMITED MATRICKS a bit of C appears somewhere ;now we have to write a bit of K and C - movep.w 0(a_1),d_1 ;previous letter : C - movep.w 1(a_1),d_2 ;act letter : K - tst.b d_1 ;test letter after act : S - bne.s nottextend - lea scrolltext,a_1 + movep.w 0(a_1),d_1 ;~16 previous letter : C + movep.w 1(a_1),d_2 ;~16 act letter : K + tst.b d_1 ;~4 test letter after act : S + bne.s nottextend ;~8 + lea scrolltext,a_1 ;~12 + nop + nop + nop _nottextend: - move.l a_1,textptr-shift(a_0) ;textptr points to K - clr.b d_1 ;C - clr.b d_2 ;K - lea font+(26*8),a_1 - add.w count,a_1 - lea (a_1,d_1),a_2 ;C + move.l a_1,textptr-shift(a_0) ;~16 textptr points to K + clr.b d_1 ;~4 C + clr.b d_2 ;~4 K + lea font+(26*8),a_1 ;~8 + add.w count,a_1 ;~20 + lea (a_1,d_1),a_2 ;~12 C ; lea (a_1),a_2 ;C - movem.l (a_1,d_2),d_1/d_3 ;K + movem.l (a_1,d_2),d_1/d_3 ;~36 K ; movem.w 256(a_1),d_0/d_1/d_2/d_3 ;K ;d0:xxxxxxxxxxxxxxxx ;d1:aaaaaaaabbbbbbbb ;d2:xxxxxxxxxxxxxxxx ;d3:ccccccccdddddddd - move.w d_1,d_2 - move.w d_3,d_0 + move.w d_1,d_2 ;~4 + move.w d_3,d_0 ;~4 ;d0:xxxxxxxxdddddddd ;d1:aaaaaaaabbbbbbbb ;d2:xxxxxxxxbbbbbbbb ;d3:ccccccccdddddddd - swap d_0 - swap d_2 + swap d_0 ;~4 + swap d_2 ;~4 ;d0:ddddddddxxxxxxxxx ;d1:aaaaaaaabbbbbbbbb ;d2:bbbbbbbbxxxxxxxxx ;d3:ccccccccddddddddd - move.l bufptr-shift(a_0),a_1 + move.l bufptr-shift(a_0),a_1 ;~16 ;prepare shifter - move.w (a_2)+,d_0 - move.w (a_2)+,d_1 - move.w (a_2)+,d_2 - move.w (a_2)+,d_3 ;C + move.w (a_2)+,d_0 ;~8 C + move.w (a_2)+,d_1 ;~8 + move.w (a_2)+,d_2 ;~8 + move.w (a_2)+,d_3 ;~8 ;uff one line of the 2 letters is in d0-d3 ;d0 dddddddd|AAAAAAAA ;d1 aaaaaaaa|BBBBBBBB ;d2 bbbbbbbb|CCCCCCCC ;d3 cccccccc|DDDDDDDD - ;write first buffer - movem.w d_0/d_1/d_2/d_3,(a_1) - lea 26*8(a_1),a_1 ;~8 - rept 15 - move #0,ccr + dcb $4e71,6 + dcb $4e71,17 ;mdist + + move.b #0,$ffff820a.w ;Open right border + move.b #2,$ffff820a.w + dcb $4e71,8 + move.b #1,$ffff8260.w ;GunsticK's right border end switch + move.b #0,$ffff8260.w + movem.l d0/d1/d2,$ffff8250.w ;mdist + move.b #2,$ffff8260.w ;Open left border + move.b #0,$ffff8260.w + move.l d3,$ffff824e.w ;mdist + + + + ;buffer gestion + cmpi.w #25*4,bufcnt-shift(a_0) ;~16 + blo.s vorbufok ;~8 + clr.w bufcnt-shift(a_0) ;~16 screenwidth = 26 words + subi.l #25*8,bufptr-shift(a_0) ;~20 + bra.s vorbufnok ;~12 +vorbufok: + addq.w #4,bufcnt-shift(a_0) ;~16 + addq.l #8,bufptr-shift(a_0) ;~16 + dcb $4e71,9-5 +vorbufnok: + dcb $4e71,3+5 + dcb $4e71,2 + + + ;write first buffer + movem.w d_0/d_1/d_2/d_3,(a_1) ;~24 + lea 26*8(a_1),a_1 ;~8 + move.w #7,shiftcnt +shifter: ;(~12) + dcb $4e71,25-3 + dcb $4e71,17 + move.b #0,$ffff820a.w ;Open right border + move.b #2,$ffff820a.w + dcb $4e71,8 + move.b #1,$ffff8260.w ;GunsticK's right border end switch + move.b #0,$ffff8260.w + movem.l d0/d1/d2,$ffff8250.w ;mdist + move.b #2,$ffff8260.w ;Open left border + move.b #0,$ffff8260.w + move.l d3,$ffff824e.w ;mdist + swap d_1 ;~4 addx.w d1,d1 ;~4 ;a out swap d_1 ;~4 @@ -584,17 +701,42 @@ _nottextend: addx.w d1,d1 ;~4 ;b in movem.w d_0/d_1/d_2/d_3,(a_1) ;~28 lea 26*8(a_1),a_1 ;~8 - endr - cmp.w #25*4,bufcnt-shift(a_0) - blo.s vorbufok - move.w #0,bufcnt-shift(a_0) ;screenwidth = 26 words - sub.l #25*8,bufptr-shift(a_0) - bra indistcalcloop -vorbufok: - addq.w #4,bufcnt-shift(a_0) - add.l #8,bufptr-shift(a_0) - bra indistcalcloop + swap d_1 ;~4 + addx.w d1,d1 ;~4 ;a out + swap d_1 ;~4 + addx.l d0,d0 ;~8 ;a in and d out + addx.l d3,d3 ;~8 ;d in and c out + addx.l d2,d2 ;~8 ;c in and b out + addx.w d1,d1 ;~4 ;b in + movem.w d_0/d_1/d_2/d_3,(a_1) ;~28 + lea 26*8(a_1),a_1 ;~8 + subq.w #1,shiftcnt ;~20 + bne shifter ;~12 + + dcb $4e71,25-3 + dcb $4e71,17 + move.b #0,$ffff820a.w ;Open right border + move.b #2,$ffff820a.w + dcb $4e71,8 + move.b #1,$ffff8260.w ;GunsticK's right border end switch + move.b #0,$ffff8260.w + movem.l d0/d1/d2,$ffff8250.w ;mdist + move.b #2,$ffff8260.w ;Open left border + move.b #0,$ffff8260.w + move.l d3,$ffff824e.w ;mdist + swap d_1 ;~4 + addx.w d1,d1 ;~4 ;a out + swap d_1 ;~4 + addx.l d0,d0 ;~8 ;a in and d out + addx.l d3,d3 ;~8 ;d in and c out + addx.l d2,d2 ;~8 ;c in and b out + addx.w d1,d1 ;~4 ;b in + movem.w d_0/d_1/d_2/d_3,(a_1) ;~28 + lea 26*8(a_1),a_1 ;~8 + + dcb $4e71,20 + bra indistcalcloop ;~12 26 nops before right borde ;-< back this line by one word @@ -664,6 +806,13 @@ _rueckbufok: movem.w d_0/d_1/d_2/d_3,(a_1) lea 26*8(a_1),a_1 ;~8 + + + + + + + rept 15 move #0,ccr swap d_1 ;~4 @@ -687,7 +836,7 @@ copydistscroll: move.l screenadr,a6 ;put it there add.l #6*160,a6 ;for hwscroll lea buffer,a4 - moveq #25,d0 ;scrollhigh:26 + moveq #17,d0 ;scrollhigh:16 ; not $ffff8240.w scrollcpy: move.w shift-buffer(a4),d1 @@ -698,7 +847,7 @@ scrollcpy: move.w bufcnt-buffer(a4),d1 lea cpyjsr,a0 move.l (a0,d1),a0 -; jsr (a0) ;(a5)+ -> (a6) + jsr (a0) ;(a5)+ -> (a6) lea 230(a6),a6 lea linebuffend-linebuffbegin(a4),a4 dbf d0,scrollcpy @@ -1350,34 +1499,31 @@ cpy25: ;9,9,9,9,9,5+2 font equ *-32*8 incbin "font.bin" even -count: - dc.l 0 ;for some dbf without register -distcalc: - dc.w 0 -distwaveptr: - dc.l 0 ;pointer in one distwave -wavetabptr: - dc.l 0 ;pointer to the next wave to be played -disttableptr: - dc.l 0 ;pointer to the distorter adjust table - ds.w 1600 ;panic for table -disttable: - ds.w 26*2+100 ;adjusttable for the two distorters - ds.w 1600 ;panic for table wavetab: - dc.l dreieck - dc.l dreieck +; dc.l wordschief + dc.l byteschief +; dc.l nix +; dc.l dreieck +; dc.l dreieck ; dc.l sinus dc.l 0 ;end -dreieck: +wordschief: + dc.w 2,2,2,2,2,2,2,2 + dc.w 2,2,2,2,2,2,2,2 + dc.w 0 + dc.w 3,2,2,2,2,2,2,2,128 +byteschief: + dc.w 1,1,1,1,1,1,1,1,128 +nix: dc.w 0,128 dc.w 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 dc.w 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 dc.w 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 - dc.w 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 + dc.w 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 dc.w 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 dc.w 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 dc.w 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 dc.w 0,128 +dreieck: dc.w 1,0,1,0,1,0,1,0 dc.w 1,0,1,0,1,0,1,0 dc.w 1,0,1,0,1,0,1,0 @@ -1462,25 +1608,6 @@ scrolltext: dc.b 81,82,83,84,85,86,87 dc.b 0 even -linebuffbegin: -textptr: - dc.l 0 ;letter not completly copied into buffer (forward) -bufptr: - dc.l 0 ;pos where graphic is added in preshift 0 -bufcnt: - dc.w 0 ;which one of the 26 routs to be used to copy -shift: - dc.w 0 ;which preshift to copy -buffer: - ds.l 2*26*16 ;16 shifts of the 1st line of the scrolling -linebuffend: - rept 25 ;26 lines scroll - dc.l 0 - dc.l 0 - dc.w 0 - dc.w 0 - ds.l 2*26*16 - endr ;********************************************************** @@ -1507,25 +1634,15 @@ message: test: equ 0 ifeq test dc.b 'UUUU LLLL MMMMMM MMMMMM',13,10 -; dc.b 'UUUU LLLL MMMMMMM MMMMMMM',13,10 dc.b 'UUUU LLLL MMMM MMMMMMMM',13,10 -; dc.b 'UUUU LLLL MMMM MMMM MMMM',13,10 dc.b 'UUUU LLLL MMMMMMMM MMMM',13,10 -; dc.b 'UUUU LLLL MMMMMM MMMM',13,10 dc.b 'UUUU LLLL MMMM MMMM',13,10 -; dc.b 'UUUU LLLL MMMM',13,10 dc.b 'UUUU LLLL MMMM',13,10 -; dc.b 'UUUU LLLL MMMM',13,10 dc.b 'UUUU LLLL MMMM',13,10 -; dc.b 'UUUU LLLL MMMM',13,10 dc.b 'UUUU LLLL MMMM',13,10 -; dc.b 'UUUU LLLL MMMM',13,10 dc.b 'UUUU LLLL MMMM',13,10 -; dc.b 'UUUU ULLLL MMMM',13,10 dc.b 'UUUU UUUU LLLL MMMM',13,10 -; dc.b 'UUUU UUUU LLLL MMMM',13,10 dc.b 'UUUUUUUUUUUUU LLLLLLLLLLLLLL MMMM',13,10 -; dc.b 'UUUUUUUUUUU LLLLLLLLLLLL MMMM',13,10 endc ifne test dc.b ' ',13,10 @@ -1553,9 +1670,7 @@ test: equ 0 dc.b 13,10,"||||||||||||||||||||||||||||||||||||||||",0 dc.b 13,10,"||||||||||||||||||||||||||||||||||||||||",0 even -savestart: -hwscrolldat: ; equ *+24*24 -; incbin 'hw.dat' +hwscrolldat: ; dc.b $00,$00,$00,$00 ; dc.b $00,$00,$00,$ff ;44 ; dc.b $00,$00,$ff,$00 ;-2 @@ -1565,913 +1680,10 @@ hwscrolldat: ; equ *+24*24 ; dc.b $ff,$00,$ff,$00 ;24 ; dc.b $ff,$ff,$00,$00 ;-80 -; c = Christian synchronistaion 1 -; C = Christian synchronisation 2 -; P = MMU mit Punkten bei farbumschaltung (franz.) -; g = Georges sync: bad overscan -; G = Georges sync: good overscan - -as: equ 2*0 - dc.b $ff ;0 cPgG - dc.b $00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $ff ;1 cPgG - dc.b $00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $00 ;2 cPgG - dc.b $ff,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$00,$ff - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $00 ;3 cPgG - dc.b $00,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$00,$ff - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $00 ;4 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$ff - dc.b $00,$00,$00,$ff - dc.b $ff,$00,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00 ;5 cPgG - dc.b $00,$ff,$00 - dc.b $00,$ff,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $00 ;6 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $00 ;7 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$ff,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $00 ;8 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$00,$00 - dc.b $ff,$ff,$00,$00 - dc.b $00 ;9 cPgG - dc.b $00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00 ;10 cPgG - dc.b $00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00 ;11 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $00 ;12 cPgG - dc.b $00,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $01 ;13 cPgG - dc.b $00,$00,$ff - dc.b $00,$ff,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$ff - dc.b $00 ;14 cPgG - dc.b $ff,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$ff,$00 - dc.b $00,$00,$00,$ff - dc.b $00 ;15 c gG - dc.b $ff,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $00 ;16 c gG - dc.b $00,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $00 ;17 cPgG - dc.b $00,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$00,$ff - dc.b $00 ;18 cPgG - dc.b $00,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $00 ;19 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$00,$ff - dc.b $00 ;20 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$00,$00 - dc.b $ff,$ff,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $00 ;21 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$00,$ff - dc.b $00 ;22 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$ff - dc.b $00 ;23 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $00 ;24 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $01 ;25 cPgG - dc.b $ff,$00,$00 - dc.b $ff,$ff,$00,$00 - dc.b $ff,$ff,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$ff,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $00 ;26 cPgG - dc.b $00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $00,$00,$00,$ff - dc.b $00,$ff,$00,$00 - dc.b $00,$00,$00,$ff - dc.b $00,$00,$00,$00 - dc.b $00 ;27 cPgG - dc.b $ff,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$00,$ff - dc.b $00 ;28 c gG - dc.b $00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $00,$ff,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $00 ;29 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $00 ;30 c gG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$00,$ff - dc.b $ff,$ff,$00,$00 - dc.b $00 ;31 cPgG - dc.b $00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $00 ;32 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $00 ;33 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $00 ;34 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $01 ;35 cPgG - dc.b $00,$00,$00 - dc.b $ff,$ff,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00 ;36 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $00 ;37 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $00 ;38 cPgG - dc.b $00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $00,$00,$00,$ff - dc.b $00,$ff,$00,$00 - dc.b $00,$00,$00,$ff - dc.b $ff,$00,$ff,$00 - dc.b $00 ;39 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$ff - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$00,$ff - dc.b $00,$ff,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00 ;40 cPgG - dc.b $ff,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$00,$ff - dc.b $00 ;41 cPgG - dc.b $00,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $00 ;42 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$00,$ff - dc.b $00,$00,$00,$ff - dc.b $00 ;43 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$00,$ff - dc.b $00,$00,$00,$ff - dc.b $00 ;44 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$ff - dc.b $00,$00,$00,$ff - dc.b $00 ;45 c gG - dc.b $00,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $00 ;46 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$ff,$00 - dc.b $00 ;47 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $01 ;48 cPgG - dc.b $00,$00,$00 - dc.b $ff,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $ff,$00,$00,$00 - dc.b $00 ;49 cPgG - dc.b $00,$ff,$00 - dc.b $ff,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $00 ;50 cPgG - dc.b $ff,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$00,$ff - dc.b $00 ;51 cPgG - dc.b $ff,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$00,$ff - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $00 ;52 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$ff - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$00,$ff - dc.b $ff,$ff,$00,$00 - dc.b $00 ;53 cPgG - dc.b $ff,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $00 ;54 cPgG - dc.b $00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$00,$ff - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $00 ;55 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$00,$ff - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $00 ;56 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$00,$ff - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $01 ;57 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $00 ;58 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $00 ;59 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$ff,$00 - dc.b $00 ;60 c gG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$ff,$00 - dc.b $00 ;61 cPgG - dc.b $00,$00,$00 - dc.b $ff,$00,$00,$00 - dc.b $ff,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $00 ;62 cPgG - dc.b $00,$00,$00 - dc.b $ff,$00,$00,$00 - dc.b $ff,$00,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $00 ;63 cPgG - dc.b $ff,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$00,$ff - dc.b $00 ;64 cPgG - dc.b $ff,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$ff,$00 - dc.b $00,$00,$00,$ff - dc.b $00 ;65 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$ff - dc.b $00,$00,$00,$ff - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$00,$ff - dc.b $00 ;66 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$ff - dc.b $00,$00,$00,$ff - dc.b $00,$00,$00,$ff - dc.b $00 ;67 c gG - dc.b $00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $00 ;68 c gG - dc.b $00,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $00 ;69 cPgG - dc.b $00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$ff,$00 - dc.b $00,$00,$00,$ff - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00 ;70 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $00 ;71 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $00 ;72 cPgG - dc.b $00,$00,$00 - dc.b $ff,$00,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $01 ;73 cPgG - dc.b $00,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $01 ;74 cPgG - dc.b $00,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $01 ;75 cPgG - dc.b $00,$00,$00 - dc.b $00,$ff,$00,$00 ;hoffentlich geht dieser immer ! - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00 ;76 cPgG - dc.b $ff,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $00 ;77 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $00,$00,$00,$ff - dc.b $00,$00,$00,$ff - dc.b $00 ;78 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $00,$00,$00,$ff - dc.b $00,$00,$00,$ff - dc.b $01 ;79 cPgG - dc.b $00,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $ff,$ff,$00,$00 - dc.b $00,$00,$00,$ff - dc.b $00,$00,$00,$ff - dc.b $00,$00,$00,$00 - dc.b $00 ;80 c gG - dc.b $00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $00 ;81 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $00 ;82 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $00 ;83 cPgG - dc.b $00,$00,$00 - dc.b $ff,$00,$00,$00 - dc.b $ff,$00,$00,$00 - dc.b $00,$00,$00,$ff - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $01 ;84 cPgG - dc.b $00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$ff,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $01 ;85 cPgG - dc.b $00,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $01 ;86 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $01 ;87 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $01 ;88 cPgG - dc.b $00,$00,$00 - dc.b $ff,$ff,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00 ;89 cPgG - dc.b $00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $00,$00,$00,$ff - dc.b $00,$00,$00,$ff - dc.b $00,$00,$00,$ff - dc.b $00 ;90 cPgG - dc.b $00,$ff,$00 - dc.b $00,$00,$00,$ff - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$ff,$00 - dc.b $00,$00,$00,$ff - dc.b $00,$00,$00,$00 - dc.b $00 ;91 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$ff,$00 - dc.b $00,$00,$00,$ff - dc.b $00,$00,$00,$ff - dc.b $01 ;92 cPgG - dc.b $00,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $ff,$ff,$00,$00 - dc.b $00,$00,$00,$ff - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $00 ;93 cPgG - dc.b $00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $00 ;94 c gG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $01 ;95 cPgG - dc.b $00,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$00,$ff - dc.b $00,$00,$00,$00 - dc.b $00 ;96 c gG - dc.b $00,$00,$00 - dc.b $ff,$00,$00,$00 - dc.b $ff,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $01 ;97 cPgG - dc.b $00,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $00,$00,$00,$ff - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $01 ;98 cPgG - dc.b $00,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $01 ;99 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $01 ;100 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$ff,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $01 ;101 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$00 - dc.b $ff,$ff,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00 ;102 cPgG - dc.b $00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$ff,$00 - dc.b $00,$00,$00,$ff - dc.b $00 ;103 gG - dc.b $00,$00,$ff - dc.b $00,$00,$00,$ff - dc.b $00,$00,$00,$ff - dc.b $ff,$00,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $00 ;104 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$ff - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$ff,$00 - dc.b $00 ;105 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$ff - dc.b $ff,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $00 ;106 c gG - dc.b $00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $01 ;107 cPgG - dc.b $ff,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $01 ;108 cPgG - dc.b $00,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $01 ;109 cPgG - dc.b $00,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $01 ;110 cPgG - dc.b $00,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $01 ;111 cPgG - dc.b $00,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $01 ;112 cPgG - dc.b $00,$00,$00 - dc.b $ff,$ff,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $01 ;113 cPgG - dc.b $00,$00,$00 - dc.b $ff,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$ff,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $01 ;114 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$00 - dc.b $ff,$00,$00,$00 - dc.b $ff,$ff,$00,$00 - dc.b $00 ;115 cPgG - dc.b $00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $00,$00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $00 ;116 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$ff,$00 - dc.b $00 ;117 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$ff,$00 - dc.b $01 ;118 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$00,$ff - dc.b $00,$00,$00,$ff - dc.b $01 ;119 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $00,$00,$00,$ff - dc.b $00,$00,$00,$ff - dc.b $01 ;120 c gG - dc.b $00,$ff,$00 - dc.b $00,$ff,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $01 ;121 c gG - dc.b $00,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $01 ;122 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$ff,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $ff,$00,$ff,$00 - dc.b $01 ;123 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$00,$ff - dc.b $00,$00,$00,$00 - dc.b $ff,$ff,$00,$00 - dc.b $01 ;124 cPgG - dc.b $00,$00,$00 - dc.b $ff,$ff,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $ff,$00,$ff,$00 - dc.b $ff,$00,$ff,$00 - dc.b $01 ;125 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $01 ;126 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $01 ;127 cPgG - dc.b $00,$00,$00 - dc.b $00,$00,$ff,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 - dc.b $00,$00,$00,$00 + incbin "hwscroll.dat" even -saveend: lowbyte: - dc.b as + dc.b 0 section bss stack: ds.l 1 oldpal: ds.w 16 @@ -2480,6 +1692,43 @@ screenad1:ds.w 1 screenad2:ds.l 1 screenadr:ds.l 1 black: ds.l 8 +shiftcnt: + ds.w 1 ;counter for shifter +count: + ds.l 1 ;for some dbf without register +distcalc: + ds.w 1 +distwaveptr: + ds.l 1 ;pointer in one distwave +wavetabptr: + ds.l 1 ;pointer to the next wave to be played +disttableptr: + ds.l 1 ;pointer to the distorter adjust table + ds.w 1600 ;panic for table +disttable: + ds.w 26*2+100 ;adjusttable for the two distorters + ds.w 1600 ;panic for table + +linebuffbegin: +textptr: + ds.l 1 ;letter not completly copied into buffer (forward) +bufptr: + ds.l 1 ;pos where graphic is added in preshift 0 +bufcnt: + ds.w 1 ;which one of the 26 routs to be used to copy +shift: + ds.w 1 ;which preshift to copy +buffer: + ds.l 2*26*16 ;16 shifts of the 1st line of the scrolling +linebuffend: + rept 25 ;26 lines scroll +; ds.l 1 +; ds.l 1 +; ds.w 1 +; ds.w 1 + ds.l 2*26*16+1+1+1 + endr + screen: ds.l 14300 end