Lots of utilities and original grafics which I forgot in previous release.

Some more work on the distorters and a little PSG init correction.
Added reset demo handling.
master
Georges Kesseler 2012-02-21 23:23:10 +01:00
parent cecd6521ae
commit ee19981e8d
14 changed files with 62 additions and 75 deletions

View File

@ -585,7 +585,8 @@ prepdigi:
move.w (a6)+,d7 move.w (a6)+,d7
move.l a6,digiptr move.l a6,digiptr
move.l $42a.w,my_reset+2
move.l #my_reset,$42a.w
ifeq test ifeq test
lupo: lupo:
@ -2152,9 +2153,6 @@ notreset:
move.b $fffffc02.w,d0 move.b $fffffc02.w,d0
move.b #5,$ffff8800.w
move.b d0,$ffff8802.w
move.l #$0d000200,$ffff8800.w
move.l cheatcodepos,a0 move.l cheatcodepos,a0
cmp.b (a0)+,d0 cmp.b (a0)+,d0
beq.s cheatok beq.s cheatok
@ -2215,7 +2213,9 @@ cheatcodmod: equ *+2
no_esc: no_esc:
cmpi.b #57,d0 cmpi.b #57,d0
bne.s no_key bne.s no_key
bra.s myexit
my_reset:
move.l #0,resetexit
myexit: myexit:
;restore digisound ;restore digisound
move.w #(256+512/4)-1,d0 move.w #(256+512/4)-1,d0
@ -2225,7 +2225,7 @@ restdigi:
move.l (a0)+,(a1)+ move.l (a0)+,(a1)+
dbf d0,restdigi dbf d0,restdigi
resetexit: equ *+2
jmp exit jmp exit
no_key: no_key:
@ -2433,7 +2433,12 @@ calcpredigi:
move.l (a7,d7),(a0)+ move.l (a7,d7),(a0)+
move.l (a7,d7),(a0)+ move.l (a7,d7),(a0)+
dcb 70,$4e71 dcb 70-20,$4e71
tst.w $1f0.w
bmi.s noend
subq.w #1,$1f0.w
beq myexit
noend:
move.l a6,digiptr move.l a6,digiptr
@ -5118,11 +5123,13 @@ wavetab:
dc.l wordhinher dc.l wordhinher
dc.l _nix dc.l _nix
dc.l _nix dc.l _nix
dc.l hacker,hacker,hacker dc.l fast
dc.l fast
dc.l fast
dc.l fast
dc.l dreieck dc.l dreieck
dc.l dreieck dc.l dreieck
dc.l slowdist,slowdist,slowdist,slowdist dc.l slowdist,slowdist,slowdist,slowdist
dc.l hacker,hacker,hacker
dc.l sinus dc.l sinus
dc.l sinus dc.l sinus
dc.l sinschief dc.l sinschief
@ -5133,21 +5140,6 @@ wavetab:
dc.l sinschief dc.l sinschief
dc.l sinus dc.l sinus
dc.l sinus dc.l sinus
dc.l bytezurueck
dc.l bytezurueck
dc.l bytezurueck
dc.l bytezurueck
dc.l bytezurueck
dc.l bytezurueck
dc.l bytezurueck
dc.l bytezurueck
dc.l bytezurueck
dc.l bytezurueck
dc.l bytezurueck
dc.l bytezurueck
dc.l wordschief
dc.l wordschief
dc.l wordschief
dc.l 0 ;end dc.l 0 ;end
mwavetab: mwavetab:
@ -5161,44 +5153,11 @@ mwavetab:
dc.l slowdist dc.l slowdist
dc.l slowdist dc.l slowdist
dc.l slowdist dc.l slowdist
dc.l wordschief
dc.l 0 ;end dc.l 0 ;end
boink: boink:
incbin includes\boink.bin incbin includes\boink.bin
dc.w 128 dc.w 128
hacker:
dc.w 2-1,-2,2,-2,2,-2,2,-2-1
dc.w 4,-4,4,-4,4,-4,4,-4-1
dc.w 6,-6,6,-6,6,-6,6,-6-1
dc.w 8,-8,8,-8,8,-8,8,-8-3
dc.w 12,-12,12,-12,12,-12,12,-12-1
dc.w 14,-14,14,-14,14,-14,14,-14-1
dc.w 16,-16,16,-16,16,-16,16,-16
dc.w 16,-16,16,-16,16,-16,16,-16+1
dc.w 14,-14,14,-14,14,-14,14,-14+1
dc.w 12,-12,12,-12,12,-12,12,-12+3
dc.w 8,-8,8,-8,8,-8,8,-8+1
dc.w 6,-6,6,-6,6,-6,6,-6+1
dc.w 4,-4,4,-4,4,-4,4,-4+1
dc.w 2,-2,2,-2,2,-2,2,-2+1
dc.w 128
dc.w 0,0,0,0,0,0,0,0,0,0
dc.w 0,0,0,0,0,0,0,0,0,0
dc.w 0,0,0,0,0,0,0,0,0,0
dc.w 0,0,0,0,0,0,0,0,0,0,16
dc.w 0,0,0,0,0,0,0,0,0,0
dc.w 0,0,0,0,0,0,0,0,0,0
dc.w 0,0,0,0,0,0,0,0,0,0
dc.w 0,0,0,0,0,0,0,0,0,0,-16
dc.w 0,0,0,0,0,0,0,0,0,0
dc.w 0,0,0,0,0,0,0,0,0,0
dc.w 0,0,0,0,0,0,0,0,0,0
dc.w 0,0,0,0,0,0,0,0,0,0,16
dc.w 0,0,0,0,0,0,0,0,0,0
dc.w 0,0,0,0,0,0,0,0,0,0
dc.w 0,0,0,0,0,0,0,0,0,0,-16
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
@ -5246,23 +5205,23 @@ 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 128 dc.w 128
fast:
incbin includes\fast.bin
dc.w 128
sinschief: sinschief:
incbin includes\sisi.bin incbin includes\sisi.bin
dc.w 128 dc.w 128
wordhinher: 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
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
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: 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
@ -5385,15 +5344,9 @@ scrolltextend:
;********************************************************** ;**********************************************************
prt:
dc.b 27,"Y",32+20,32+1," 000"
str: dc.b "0 ",0
even even
psginittab:dc.b 0,$ff,1,$ff,2,$ff,3,$ff,4,$ff,5,$ff,6,0 psginittab:dc.b 0,$ff,1,$ff,2,$ff,3,$ff,4,$ff,5,$ff,6,0
dc.b 7,%11111011,8,0,9,0,10,16,11,5,12,100,13,2,$ff,0 dc.b 7,%11111011,8,0,9,0,10,0,11,5,12,100,13,2,$ff,0
even even
hwpalette: hwpalette:
dc.w $000,$227,$005,$654,$543,$432,$321,$777 dc.w $000,$227,$005,$654,$543,$432,$321,$777
@ -5413,7 +5366,7 @@ lowbyte:
even even
hwscrolldat: hwscrolldat:
incbin "includes\hwscroll.dat" incbin "includes\hwdat.bin"
even even
section bss section bss

BIN
back.pal Executable file

Binary file not shown.

BIN
fond_7c.neo Executable file

Binary file not shown.

BIN
fond_7c.rst Executable file

Binary file not shown.

BIN
includes/fast.bin Executable file

Binary file not shown.

BIN
includes/hwdat.bin Executable file

Binary file not shown.

BIN
mkcolors.gfa Executable file

Binary file not shown.

BIN
mksinus.gfa Executable file

Binary file not shown.

BIN
newback.neo Executable file

Binary file not shown.

BIN
newback.rst Executable file

Binary file not shown.

BIN
test.neo Executable file

Binary file not shown.

BIN
test.rst Executable file

Binary file not shown.

BIN
test2.rst Executable file

Binary file not shown.

34
text.txt Executable file
View File

@ -0,0 +1,34 @@
<20> wow !! this is gunstick's revolutionary
fullscreen-screen. nobody can beat <20> !!! this
screen uses the <20>-playfield technique. i hope
it will be the best fullscreen distorter ever made.
the font is from oxar ” (great work!). the wonderful
background was designed by dizzy from tool 8.
all code and music sampling by gunstick. i'm sorry
for all the people who don't like slow scrollers, but
this text is a bit longer, to show you, that nothing is
precalculated. many of those shitty disting
one-plane scrolls are preshifted. theese ones
are not! if you still think this is easy then look at
the parallaxed (bidirectional !!!) background:[
| ]<5D>[
|| ||
]have you
noticed that it's not simply parallaxed? there's another
wave in it. i don't want to make greetings here, so
let's continue talking about fullscreens and hardscrollers.
i haven't seen any hardscroller which works always correctly
on all st's. so if you see some nasty flickering on the top
border you have an st model i wasn't able to test. until
now i found 14 different hardware configurations. our hardscroller
works on all, but there might be more . . . so if you are a
programmer, please test your overscan routine on every st you can
find (especially those in other countries !!) message to griff: i
tried to use the keyboard processor for hardscrolling but it didn't work.
do you want to know how i manage to shift all the scrollings??? well
the dma chip can serialize data. by programming it in a special way
(reading and writing the same time)
the dma sends the data back, but shifted by one bit. little 3d graphics
hint: what about doing your 3d graphics with the midi interface?
as you have now often enough seen the distortion wave and heard
the digisound i think it's time to press space and i will wrap here