Finished, it is finished!
Added nice intro disting. Better bounce sync and precalc more in hwbouncer table.master
parent
ee19981e8d
commit
1756405236
224
PARADIST.S
224
PARADIST.S
|
@ -1,7 +1,7 @@
|
||||||
|
|
||||||
; The Paralax distorter by Gunstick from Unlimited Matricks
|
; The Paralax distorter by Gunstick from Unlimited Matricks
|
||||||
parallax equ 0
|
parallax equ 0
|
||||||
parallay equ 0
|
parallay equ 10
|
||||||
bus equ 10
|
bus equ 10
|
||||||
digitest equ 10
|
digitest equ 10
|
||||||
|
|
||||||
|
@ -262,6 +262,8 @@ exit_with_408:
|
||||||
endc
|
endc
|
||||||
|
|
||||||
exit:
|
exit:
|
||||||
|
move.l my_reset+2,$42a.w
|
||||||
|
move.l $42a.w,my_reset+2
|
||||||
movem.l black(pc),d0-d7
|
movem.l black(pc),d0-d7
|
||||||
movem.l d0-d7,$ffff8240.w
|
movem.l d0-d7,$ffff8240.w
|
||||||
|
|
||||||
|
@ -562,6 +564,7 @@ initdist:
|
||||||
move.l #mwavetab,mnextcurv
|
move.l #mwavetab,mnextcurv
|
||||||
move.l mwavetab,mactcurv
|
move.l mwavetab,mactcurv
|
||||||
move.l #scrnadrs,nextscrn
|
move.l #scrnadrs,nextscrn
|
||||||
|
move.l scrnadrs,screenadr
|
||||||
move.l #ecran-(15*230)+160*6,cpybufdest
|
move.l #ecran-(15*230)+160*6,cpybufdest
|
||||||
; move.l #ecran-230*20,cpybufdest
|
; move.l #ecran-230*20,cpybufdest
|
||||||
lea scrolltextend,a0
|
lea scrolltextend,a0
|
||||||
|
@ -644,7 +647,7 @@ _no_vbl:
|
||||||
movep.w 0(a0),d1
|
movep.w 0(a0),d1
|
||||||
cmp.w d0,d1
|
cmp.w d0,d1
|
||||||
bne.s _no_vbl
|
bne.s _no_vbl
|
||||||
|
|
||||||
move.w #4000,d0
|
move.w #4000,d0
|
||||||
firsttopwait:
|
firsttopwait:
|
||||||
dbf d0,firsttopwait
|
dbf d0,firsttopwait
|
||||||
|
@ -676,6 +679,9 @@ firsttopwait:
|
||||||
|
|
||||||
lea predigi,a6
|
lea predigi,a6
|
||||||
lea mdistgraph,a5
|
lea mdistgraph,a5
|
||||||
|
move.w mbouncetab,d0
|
||||||
|
lsl.w #5,d0
|
||||||
|
add.w d0,a5
|
||||||
lea mdistadjust,a4
|
lea mdistadjust,a4
|
||||||
move.l mdistcurvptr,a3
|
move.l mdistcurvptr,a3
|
||||||
looop:
|
looop:
|
||||||
|
@ -2352,6 +2358,7 @@ mkdig1:
|
||||||
move.l #dig1,digmod
|
move.l #dig1,digmod
|
||||||
contdig1:
|
contdig1:
|
||||||
move.l #hwbouncetab,hwbounceptr
|
move.l #hwbouncetab,hwbounceptr
|
||||||
|
move.l #mbouncetab,mbounceptr
|
||||||
lea digisound-2,a6
|
lea digisound-2,a6
|
||||||
move.w (a6)+,d7
|
move.w (a6)+,d7
|
||||||
bra.s digiok
|
bra.s digiok
|
||||||
|
@ -2366,6 +2373,7 @@ mkdig2:
|
||||||
move.l #dig2,digmod
|
move.l #dig2,digmod
|
||||||
contdig2:
|
contdig2:
|
||||||
move.l #hwbouncetab,hwbounceptr
|
move.l #hwbouncetab,hwbounceptr
|
||||||
|
move.l #mbouncetab,mbounceptr
|
||||||
lea digisound2-2,a6
|
lea digisound2-2,a6
|
||||||
move.w (a6)+,d7
|
move.w (a6)+,d7
|
||||||
|
|
||||||
|
@ -2433,7 +2441,8 @@ calcpredigi:
|
||||||
move.l (a7,d7),(a0)+
|
move.l (a7,d7),(a0)+
|
||||||
move.l (a7,d7),(a0)+
|
move.l (a7,d7),(a0)+
|
||||||
|
|
||||||
dcb 70-20,$4e71
|
dcb 50,$4e71
|
||||||
|
|
||||||
tst.w $1f0.w
|
tst.w $1f0.w
|
||||||
bmi.s noend
|
bmi.s noend
|
||||||
subq.w #1,$1f0.w
|
subq.w #1,$1f0.w
|
||||||
|
@ -4959,10 +4968,127 @@ mdistcurv:
|
||||||
|
|
||||||
mbounceptr:
|
mbounceptr:
|
||||||
dc.l mbouncetab
|
dc.l mbouncetab
|
||||||
mbouncetab: ;do not use 0
|
mbouncetab: ;do not use 0
|
||||||
dc.w 2*1,2*1,2*2,2*1,2*2,2*2,2*3,2*2,2*3,2*3
|
ifeq 1
|
||||||
dc.w 2*4,2*4,2*4,2*5,2*5,2*6,2*7,2*6,2*5,2*5
|
dc.w 2*24
|
||||||
dc.w 2*4,2*4,2*4,2*3,2*3,2*2,2*3,2*2,2*2,2*2
|
dc.w 2*24
|
||||||
|
dc.w 2*24
|
||||||
|
dc.w 2*24,2*24
|
||||||
|
dc.w 2*22,2*22
|
||||||
|
dc.w 2*20,2*20
|
||||||
|
dc.w 2*18,2*18
|
||||||
|
dc.w 2*16,2*16
|
||||||
|
dc.w 2*14
|
||||||
|
dc.w 2*14
|
||||||
|
dc.w 2*12
|
||||||
|
dc.w 2*12
|
||||||
|
dc.w 2*10
|
||||||
|
dc.w 2*8
|
||||||
|
dc.w 2*6
|
||||||
|
dc.w 2*4
|
||||||
|
dc.w 0
|
||||||
|
dc.w 2*4
|
||||||
|
dc.w 2*6
|
||||||
|
dc.w 2*8
|
||||||
|
dc.w 2*10
|
||||||
|
dc.w 2*12,2*12
|
||||||
|
dc.w 2*14,2*14
|
||||||
|
dc.w 2*16,2*16
|
||||||
|
dc.w 2*18,2*18
|
||||||
|
dc.w 2*20,2*20
|
||||||
|
dc.w 2*22,2*22
|
||||||
|
dc.w 2*24,2*24
|
||||||
|
dc.w 2*24,2*24
|
||||||
|
|
||||||
|
dc.w 2*24
|
||||||
|
dc.w 2*24
|
||||||
|
dc.w 2*24,2*24
|
||||||
|
dc.w 2*22,2*22
|
||||||
|
dc.w 2*20,2*20
|
||||||
|
dc.w 2*18,2*18
|
||||||
|
dc.w 2*16,2*16
|
||||||
|
dc.w 2*14
|
||||||
|
dc.w 2*14
|
||||||
|
dc.w 2*12
|
||||||
|
dc.w 2*12
|
||||||
|
dc.w 2*10
|
||||||
|
dc.w 2*8
|
||||||
|
dc.w 2*6
|
||||||
|
dc.w 2*4
|
||||||
|
dc.w 0
|
||||||
|
dc.w 2*4
|
||||||
|
dc.w 2*6
|
||||||
|
dc.w 2*8
|
||||||
|
dc.w 2*10
|
||||||
|
dc.w 2*12,2*12
|
||||||
|
dc.w 2*14,2*14
|
||||||
|
dc.w 2*16,2*16
|
||||||
|
dc.w 2*18,2*18
|
||||||
|
dc.w 2*20,2*20
|
||||||
|
dc.w 2*22,2*22
|
||||||
|
dc.w 2*24,2*24
|
||||||
|
dc.w 2*24,2*24
|
||||||
|
endc
|
||||||
|
|
||||||
|
dc.w 2*24
|
||||||
|
dc.w 2*24
|
||||||
|
dc.w 2*24
|
||||||
|
dc.w 2*23,2*23
|
||||||
|
dc.w 2*22,2*21
|
||||||
|
dc.w 2*20,2*19
|
||||||
|
dc.w 2*18,2*17
|
||||||
|
dc.w 2*16,2*15
|
||||||
|
dc.w 2*14
|
||||||
|
dc.w 2*13
|
||||||
|
dc.w 2*12
|
||||||
|
dc.w 2*11
|
||||||
|
dc.w 2*10
|
||||||
|
dc.w 2*8
|
||||||
|
dc.w 2*6
|
||||||
|
dc.w 2*4
|
||||||
|
dc.w 2
|
||||||
|
dc.w 2*4
|
||||||
|
dc.w 2*6
|
||||||
|
dc.w 2*8
|
||||||
|
dc.w 2*10
|
||||||
|
dc.w 2*11,2*12
|
||||||
|
dc.w 2*13,2*14
|
||||||
|
dc.w 2*15,2*16
|
||||||
|
dc.w 2*17,2*18
|
||||||
|
dc.w 2*19,2*20
|
||||||
|
dc.w 2*21,2*22
|
||||||
|
dc.w 2*23,2*23
|
||||||
|
dc.w 2*24,2*24
|
||||||
|
|
||||||
|
dc.w 2*24
|
||||||
|
dc.w 2*24
|
||||||
|
dc.w 2*23,2*23
|
||||||
|
dc.w 2*22,2*21
|
||||||
|
dc.w 2*20,2*19
|
||||||
|
dc.w 2*18,2*17
|
||||||
|
dc.w 2*16,2*15
|
||||||
|
dc.w 2*14
|
||||||
|
dc.w 2*13
|
||||||
|
dc.w 2*12
|
||||||
|
dc.w 2*11
|
||||||
|
dc.w 2*10
|
||||||
|
dc.w 2*8
|
||||||
|
dc.w 2*6
|
||||||
|
dc.w 2*4
|
||||||
|
dc.w 2
|
||||||
|
dc.w 2*4
|
||||||
|
dc.w 2*6
|
||||||
|
dc.w 2*8
|
||||||
|
dc.w 2*10
|
||||||
|
dc.w 2*11,2*12
|
||||||
|
dc.w 2*13,2*14
|
||||||
|
dc.w 2*15,2*16
|
||||||
|
dc.w 2*17,2*18
|
||||||
|
dc.w 2*19,2*20
|
||||||
|
dc.w 2*21,2*22
|
||||||
|
dc.w 2*23,2*23
|
||||||
|
dc.w 2*24,2*24
|
||||||
|
|
||||||
dc.w -1
|
dc.w -1
|
||||||
|
|
||||||
hwbounceptr: dc.l hwbouncetab
|
hwbounceptr: dc.l hwbouncetab
|
||||||
|
@ -5111,10 +5237,14 @@ inwavetab:
|
||||||
dc.l _nix
|
dc.l _nix
|
||||||
dc.l _nix
|
dc.l _nix
|
||||||
dc.l _nix
|
dc.l _nix
|
||||||
dc.l sinschief
|
dc.l slowsin
|
||||||
dc.l sinschief
|
dc.l slowsin
|
||||||
dc.l sinschief
|
dc.l slowsin
|
||||||
dc.l sinschief
|
dc.l slowsin
|
||||||
|
dc.l slowsin
|
||||||
|
dc.l slowsin
|
||||||
|
dc.l slowsin
|
||||||
|
dc.l slowsin
|
||||||
dc.l _nix
|
dc.l _nix
|
||||||
dc.l boink
|
dc.l boink
|
||||||
dc.l _nix
|
dc.l _nix
|
||||||
|
@ -5129,20 +5259,34 @@ wavetab:
|
||||||
dc.l fast
|
dc.l fast
|
||||||
dc.l dreieck
|
dc.l dreieck
|
||||||
dc.l dreieck
|
dc.l dreieck
|
||||||
|
dc.l slowsin
|
||||||
|
dc.l slowsin
|
||||||
|
dc.l slowsin
|
||||||
|
dc.l slowsin
|
||||||
dc.l slowdist,slowdist,slowdist,slowdist
|
dc.l slowdist,slowdist,slowdist,slowdist
|
||||||
dc.l sinus
|
|
||||||
dc.l sinus
|
|
||||||
dc.l sinschief
|
dc.l sinschief
|
||||||
dc.l sinschief
|
dc.l sinschief
|
||||||
dc.l bigsin
|
dc.l bigsin
|
||||||
dc.l bigsin
|
dc.l bigsin
|
||||||
dc.l sinschief
|
dc.l sinschief
|
||||||
dc.l sinschief
|
dc.l sinschief
|
||||||
dc.l sinus
|
dc.l slowdist,slowdist,slowdist,slowdist
|
||||||
dc.l sinus
|
dc.l fast
|
||||||
|
dc.l bigsin
|
||||||
|
dc.l bigsin
|
||||||
|
dc.l bigsin
|
||||||
|
dc.l _nix
|
||||||
|
dc.l _nix
|
||||||
|
dc.l _nix
|
||||||
|
dc.l _nix
|
||||||
|
dc.l _nix
|
||||||
|
dc.l _nix
|
||||||
|
dc.l _nix
|
||||||
dc.l 0 ;end
|
dc.l 0 ;end
|
||||||
|
|
||||||
mwavetab:
|
mwavetab:
|
||||||
|
dc.l _nix,_nix,_nix,_nix
|
||||||
|
dc.l _nix,_nix,_nix,_nix
|
||||||
dc.l _nix,_nix,_nix,_nix
|
dc.l _nix,_nix,_nix,_nix
|
||||||
dc.l sinschief
|
dc.l sinschief
|
||||||
dc.l sinschief
|
dc.l sinschief
|
||||||
|
@ -5150,6 +5294,8 @@ mwavetab:
|
||||||
dc.l fuzzy,fuzzy,fuzzy,fuzzy
|
dc.l fuzzy,fuzzy,fuzzy,fuzzy
|
||||||
dc.l bigsin
|
dc.l bigsin
|
||||||
dc.l bigsin
|
dc.l bigsin
|
||||||
|
dc.l bigsin
|
||||||
|
dc.l bigsin
|
||||||
dc.l slowdist
|
dc.l slowdist
|
||||||
dc.l slowdist
|
dc.l slowdist
|
||||||
dc.l slowdist
|
dc.l slowdist
|
||||||
|
@ -5158,6 +5304,9 @@ mwavetab:
|
||||||
boink:
|
boink:
|
||||||
incbin includes\boink.bin
|
incbin includes\boink.bin
|
||||||
dc.w 128
|
dc.w 128
|
||||||
|
slowsin:
|
||||||
|
incbin includes\slowsin.bin
|
||||||
|
dc.w 128
|
||||||
slowdist:
|
slowdist:
|
||||||
dc.w 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
|
dc.w 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
|
||||||
dc.w 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
|
dc.w 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
|
||||||
|
@ -5198,13 +5347,6 @@ slowdist:
|
||||||
dc.w 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
|
||||||
dc.w 128
|
dc.w 128
|
||||||
|
|
||||||
bytezurueck:
|
|
||||||
dc.w -1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1
|
|
||||||
dc.w -1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1
|
|
||||||
dc.w -1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1
|
|
||||||
dc.w -1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1
|
|
||||||
dc.w -1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1
|
|
||||||
dc.w 128
|
|
||||||
fast:
|
fast:
|
||||||
incbin includes\fast.bin
|
incbin includes\fast.bin
|
||||||
dc.w 128
|
dc.w 128
|
||||||
|
@ -5215,32 +5357,6 @@ wordhinher:
|
||||||
dc.w 2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
|
dc.w 2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
|
||||||
dc.w -2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,128
|
dc.w -2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,128
|
||||||
|
|
||||||
wordschief:
|
|
||||||
dc.w 2,2,2,2,2,2,2,2,2,2
|
|
||||||
dc.w 2,2,2,2,2,2,2,2,2,2
|
|
||||||
dc.w 2,2,2,2,2,2,2,2,2,2
|
|
||||||
dc.w 2,2,2,2,2,2,2,2,2,2
|
|
||||||
dc.w 2,2,2,2,2,2,2,2,2,2
|
|
||||||
dc.w 2,2,2,2,2,2,2,2,2,2,128
|
|
||||||
wordzurueck:
|
|
||||||
dc.w -2,-2,-2,-2,-2,-2,-2,-2
|
|
||||||
dc.w -2,-2,-2,-2,-2,-2,-2,-2
|
|
||||||
dc.w -2,-2,-2,-2,-2,-2,-2,-2
|
|
||||||
dc.w -2,-2,-2,-2,-2,-2,-2,-2
|
|
||||||
dc.w -2,-2,-2,-2,-2,-2,-2,-2
|
|
||||||
dc.w -2,-2,-2,-2,-2,-2,-2,-2
|
|
||||||
dc.w -2,-2,-2,-2,-2,-2,-2,-2
|
|
||||||
dc.w -2,-2,-2,-2,-2,-2,-2,-2
|
|
||||||
dc.w -2,-2,-2,-2,-2,-2,-2,128
|
|
||||||
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
|
|
||||||
dc.w 1,1,1,1,1,1,1,1
|
|
||||||
dc.w 1,1,1,1,1,1,1,1
|
|
||||||
dc.w 1,1,1,1,1,1,1,1
|
|
||||||
dc.w 1,1,1,1,1,1,1,1,128
|
|
||||||
hops1: dc.w 1
|
|
||||||
_nix: dc.w 0
|
_nix: dc.w 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
|
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
|
||||||
|
@ -5312,16 +5428,8 @@ dreieck:
|
||||||
dc.w 1,1,1,1,1,1,1,1
|
dc.w 1,1,1,1,1,1,1,1
|
||||||
dc.w 1,1,1,1,1,1,1,1
|
dc.w 1,1,1,1,1,1,1,1
|
||||||
dc.w 128
|
dc.w 128
|
||||||
sinus:
|
|
||||||
dc.w 1,0,0,1,0,0,1,0,0,1,0,0,2,0,0,1,0,0,2,0,0,1,0,0,2,0,0,2
|
|
||||||
dc.w 0,0,2,0,0,2,0,0,3,0,0,2,0,0,3,0,0,2,0,0,3,0,0,3,0,0,3,0,0,3
|
|
||||||
dc.w 2,0,0,3,0,0,2,0,0,3,0,0,2,0,0,2,0,0,2,0,0,2,0,0,1,0,0,2,0,0,1,0,0,1,0,0,1,0,0,1
|
|
||||||
dc.w 0,0,0,1,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,-1,0,0,0,0,0,-1,0,0,0,0,0,-1
|
|
||||||
dc.w -1,0,0,-1,0,0,-1,0,0,-2,0,0,-1,0,0,-2,0,0,-1,0,0,-2,0,0,-2,0,0,-2,0,0,-3,0,0,-2
|
|
||||||
dc.w -3,0,0,-3,0,0,-3,0,0,-2,0,0,-3,0,0,-2,0,0,-2,0,0,-2,0,0,-1,0,0,-2,0,0,-1,0,0,-1,0,0,-1,0,0,-1,0,0,0,0,0,-1,0,0,0,0,0,0
|
|
||||||
dc.w 128
|
|
||||||
bigsin:
|
bigsin:
|
||||||
incbin includes\sinbigbi.n
|
incbin includes\sinbig.bin
|
||||||
dc.w 128
|
dc.w 128
|
||||||
|
|
||||||
fuzzy
|
fuzzy
|
||||||
|
@ -5455,3 +5563,5 @@ endprg:
|
||||||
bss_end: ;here ends the bss
|
bss_end: ;here ends the bss
|
||||||
end
|
end
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
Binary file not shown.
Binary file not shown.
Loading…
Reference in New Issue