syn2cat
/
paradist
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity
paradist/PARADIST.S

2014 lines
50 KiB
ArmAsm
Raw Normal View History

parallax distorter. It was first meant to be an independant distorter on 2 playfields, only later it became the parallax distorter. This version features just hardware scroller with overscan. Use numpad to move around.
2012-02-18 23:32:41 +01:00
overscan:equ 0
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
; Double Megadistorter by Gunstick (c) ULM 1990
parallax distorter. It was first meant to be an independant distorter on 2 playfields, only later it became the parallax distorter. This version features just hardware scroller with overscan. Use numpad to move around.
2012-02-18 23:32:41 +01:00
x:
pea start(pc)
move.w #38,-(sp)
trap #14
addq.l #6,sp
clr.w -(sp)
trap #1
start:
bsr waitvbl
lea $ffff8240.w,a2
lea oldpal,a3
movem.l (a2),d0-d7
movem.l d0-d7,(a3)
movem.l hwpalette,d0-d7
movem.l d0-d7,(a2)
lea $ffff8201.w,a0
movep.w 0(a0),d0
lea screenad1,a2
move.w d0,(a2)
move.l #screen,d0
add.l #255,d0
and.l #$ffff00,d0
lea screenad2,a2
move.l d0,(a2)
movea.l d0,a2
ror.l #8,d0
movep.w d0,0(a0)
move.w #0,-(sp)
move.l a2,-(sp)
move.l a2,-(sp)
move.w #5,-(sp)
trap #14
lea 12(sp),sp
move.l screenad2,d0
sub.l #160*6,d0
move.l d0,screenadr
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
; addi.l #8*5-64,screenadr
parallax distorter. It was first meant to be an independant distorter on 2 playfields, only later it became the parallax distorter. This version features just hardware scroller with overscan. Use numpad to move around.
2012-02-18 23:32:41 +01:00
movea.l screenad2,a0
move.l #9999,d0
clear_loop:
clr.l (a0)+
dbra d0,clear_loop
movea.l screenad2,a0
movem.l graphic,d6-d7
move.w #285,d2
allline:
ifne overscan
move.w #20,d1
endc
ifeq overscan
move.w #27,d1
endc
alles:
move.l d6,(a0)+
move.l d7,(a0)+
dbra d1,alles
ifeq overscan
addq.l #6,a0
endc
dbra d2,allline
pea message
move.w #9,-(sp)
trap #1
addq.w #6,sp
bsr psginit
lea oldres,a0
move.b $ffff8260.w,(a0)
bsr waitvbl
move.b #0,$ffff8260.w
move.b #18,$fffffc02.w
bsr.s waitvbl
move.b #26,$fffffc02.w
bsr screen2
move.b #20,$fffffc02.w
bsr.s waitvbl
move.b #8,$fffffc02.w
bsr.s waitvbl
move.b #2,$ffff820a.w
bsr.s waitvbl
move.b #2,$ffff820a.w
move.b oldres,$ffff8260.w
lea $ffff8201.w,a0
moveq #0,d0
move.w screenad1,d0
movep.w d0,0(a0)
lsl.l #8,d0
move.w #0,-(sp)
move.l d0,-(sp)
move.l d0,-(sp)
move.w #5,-(sp)
trap #14
lea 12(sp),sp
bsr.s psginit
lea oldpal,a0
lea $ffff8240.w,a1
movem.l (a0),d0-d7
movem.l d0-d7,(a1)
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
bsr.s waitvbl
move.b #0,$ffff820a.w
parallax distorter. It was first meant to be an independant distorter on 2 playfields, only later it became the parallax distorter. This version features just hardware scroller with overscan. Use numpad to move around.
2012-02-18 23:32:41 +01:00
rts
waitvbl:
move.b $ffff8203.w,d0
lsl.w #8,d0
lea $ffff8207.w,a0
no_vbl:
movep.w 0(a0),d1
cmp.w d0,d1
bne.s no_vbl
rts
psginit:
lea psginittab,a0
nextinit:
move.b (a0)+,d0
cmp.b #$ff,d0
beq.s initend
move.b (a0)+,d1
move.b d0,$ffff8800.w
move.b d1,$ffff8802.w
bra.s nextinit
initend:
rts
screen2:
move sr,-(sp)
move #$2700,sr
move.l sp,stack
; clr.b lowbyte
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
;**********************************************************
; Distorted scroller by Gunstick
lea linebuffbegin,a0
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
moveq #25,d0 ;26 lines are scrolled
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
initdist:
jepp, thats a sort of lea storing directly the address
2012-02-19 00:17:50 +01:00
move.l #scrolltext,textptr-linebuffbegin(a0)
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
move.l a0,a1
lea buffer-linebuffbegin(a1),a1
move.l a1,bufptr-linebuffbegin(a0)
clr.w bufcnt-linebuffbegin(a0)
clr.w shift-linebuffbegin(a0)
lea linebuffend-linebuffbegin(a0),a0
dbf d0,initdist
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
lea wavetab,a0
move.l a0,wavetabptr
move.l (a0),a0
move.l a0,distwaveptr
Some code moving around. Not sure what this did, but the assembled result has now vertical bars instead of scroll text. Hmm vertical bars... playfield.
2012-02-19 00:48:22 +01:00
move.l #disttable,disttableptr
Now we are activating the multi buffered screens! First light of the full screen distorter capability. Just imagine how excited you are when this idea actually works.
2012-02-19 23:15:53 +01:00
move.l #scrnadrs,nextscrn
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
lea font,a0
lea buffer,a1
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
moveq #25,d0 ;init all unshiftet linebuffers
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
testinitbuff:
move.l (a0),(a1)+
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
move.l 4(a0),(a1)+
move.l 32*8(a0),(a1)+
move.l 32*8+4(a0),(a1)+
move.l 32*8*2(a0),(a1)+
move.l 32*8*2+4(a0),(a1)+
move.l 32*8*3(a0),(a1)+
move.l 32*8*3+4(a0),(a1)+
move.l 32*8*4(a0),(a1)+
move.l 32*8*4+4(a0),(a1)+
move.l 32*8*5(a0),(a1)+
move.l 32*8*5+4(a0),(a1)+
move.l 32*8*6(a0),(a1)+
move.l 32*8*6+4(a0),(a1)+
move.l 32*8*7(a0),(a1)+
move.l 32*8*7+4(a0),(a1)+
move.l 32*8*8(a0),(a1)+
move.l 32*8*8+4(a0),(a1)+
move.l 32*8*9(a0),(a1)+
move.l 32*8*9+4(a0),(a1)+
move.l 32*8*10(a0),(a1)+
move.l 32*8*10+4(a0),(a1)+
move.l 32*8*11(a0),(a1)+
move.l 32*8*11+4(a0),(a1)+
move.l 32*8*12(a0),(a1)+
move.l 32*8*12+4(a0),(a1)+
move.l 32*8*13(a0),(a1)+
move.l 32*8*13+4(a0),(a1)+
move.l 32*8*14(a0),(a1)+
move.l 32*8*14+4(a0),(a1)+
move.l 32*8*15(a0),(a1)+
move.l 32*8*15+4(a0),(a1)+
move.l 32*8*16(a0),(a1)+
move.l 32*8*16+4(a0),(a1)+
move.l 32*8*17(a0),(a1)+
move.l 32*8*17+4(a0),(a1)+
move.l 32*8*18(a0),(a1)+
move.l 32*8*18+4(a0),(a1)+
move.l 32*8*19(a0),(a1)+
move.l 32*8*19+4(a0),(a1)+
move.l 32*8*20(a0),(a1)+
move.l 32*8*20+4(a0),(a1)+
move.l 32*8*21(a0),(a1)+
move.l 32*8*21+4(a0),(a1)+
move.l 32*8*22(a0),(a1)+
move.l 32*8*22+4(a0),(a1)+
move.l 32*8*23(a0),(a1)+
move.l 32*8*23+4(a0),(a1)+
move.l 32*8*24(a0),(a1)+
move.l 32*8*24+4(a0),(a1)+
move.l 32*8*25(a0),(a1)+
move.l 32*8*25+4(a0),(a1)+
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
addq.l #8,a0
lea linebuffend-linebuffbegin-208(a1),a1
dbf d0,testinitbuff
;********************************************************
parallax distorter. It was first meant to be an independant distorter on 2 playfields, only later it became the parallax distorter. This version features just hardware scroller with overscan. Use numpad to move around.
2012-02-18 23:32:41 +01:00
lea screenadr,a3
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
; move.b lowbyte,3(a3)
bsr waitvbl ;lower border
move.w #4000,d0
parallax distorter. It was first meant to be an independant distorter on 2 playfields, only later it became the parallax distorter. This version features just hardware scroller with overscan. Use numpad to move around.
2012-02-18 23:32:41 +01:00
firsttopwait:
dbf d0,firsttopwait
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
;move.b #0,$ffff820a.w
parallax distorter. It was first meant to be an independant distorter on 2 playfields, only later it became the parallax distorter. This version features just hardware scroller with overscan. Use numpad to move around.
2012-02-18 23:32:41 +01:00
;ULM Hardware Scrolling PART 1
;THIS PART IS TO BE STARTED BEFORE THE BEGINNING OF THE VBL
;sets screen to adress contained in screenadr+(6 scanlines)
As we have hardscrolling, show it off by jumping up and down. This changes screenadr and we need to use a virtual address (logbase) to draw the scroll. Notice some places where lea is replaced by add and other places where move is replaced by lea. Takes less time.
2012-02-20 00:39:32 +01:00
lea screenadr,a3 ;~12
moveq #0,d1 ;~4
move.b 3(a3),d1 ;~12
move.w d1,d0 ;~4
add.w d1,d1 ;~4
add.w d0,d1 ;~4
add.w d1,d1 ;~4
add.w d1,d1 ;~4 *12 (24 byte per tabentry)
lea $ffff8201.w,a1 ;~8
lea hwscrolldat,a0 ;~12
add.w d1,a0 ;~8
movep.w 1(a3),d1 ;~16
move.b 2(a3),d1 ;~12
move.b (a0)+,d0 ;~8
ext.w d0 ;~4
add.w d0,d1 ;~4
movep.w d1,0(a1) ;~16
Some more overscan integration, in the process we lost the top border opening. If I'm right, the blue part minus hardscroll is the free processor time. That's not much...
2012-02-20 00:40:40 +01:00
move.l a0,tabentry-screenadr(a3) ;~16 save tablepos
parallax distorter. It was first meant to be an independant distorter on 2 playfields, only later it became the parallax distorter. This version features just hardware scroller with overscan. Use numpad to move around.
2012-02-18 23:32:41 +01:00
;ULM Hardware Scrolling END OF PART 1
Some more overscan integration, in the process we lost the top border opening. If I'm right, the blue part minus hardscroll is the free processor time. That's not much...
2012-02-20 00:40:40 +01:00
loop:
parallax distorter. It was first meant to be an independant distorter on 2 playfields, only later it became the parallax distorter. This version features just hardware scroller with overscan. Use numpad to move around.
2012-02-18 23:32:41 +01:00
bsr waitvbl
movem.l black,d0-d7
movem.l d0-d7,$ffff8240.w
movem.l hwpalette,d2-d7/a2-a3
lea $ffff8209.w,a1
moveq #10,d1
Some more overscan integration, in the process we lost the top border opening. If I'm right, the blue part minus hardscroll is the free processor time. That's not much...
2012-02-20 00:40:40 +01:00
movea.l tabentry,a0 ;get back tablepos
parallax distorter. It was first meant to be an independant distorter on 2 playfields, only later it became the parallax distorter. This version features just hardware scroller with overscan. Use numpad to move around.
2012-02-18 23:32:41 +01:00
move.w #1500,d0
opentopwait:
dbra d0,opentopwait
Some more overscan integration, in the process we lost the top border opening. If I'm right, the blue part minus hardscroll is the free processor time. That's not much...
2012-02-20 00:40:40 +01:00
dcb $4e71,196-72-2
parallax distorter. It was first meant to be an independant distorter on 2 playfields, only later it became the parallax distorter. This version features just hardware scroller with overscan. Use numpad to move around.
2012-02-18 23:32:41 +01:00
move.b #0,$ffff820a.w
move.w #$007,$ffff8240.w
dcb $4e71,8
move.b #2,$ffff820a.w
;ULM Hardware Scrolling PART 2
;THIS PART IS TO BE STARTED BEFORE THE END OF THE VBL
;Sets colors to zero
;Sets screen to screenadr(+6 lines)
;Initializes colors with hwpalette
;Uses : d0-a3
sync:
move.b (a1),d0
beq.s sync
sub.w d0,d1
lsl.w d1,d1
moveq #5,d0
nop
bra intoall
switchloop:
dcb $4e71,3
; move.b #2,$ffff8260.w ;GunsticK's right border end switch
; move.b #0,$ffff8260.w
tst.b (a0)+
bne.s links1
move.b #2,$ffff820a.w
dcb $4e71,19 ;-4*2
bra.s cont1
links1:
move.b #1,$ffff8260.w ;GunsticK's right border end switch
move.b #0,$ffff8260.w
;links1:
move.b #2,$ffff820a.w
dcb $4e71,5
move.b #2,$ffff8260.w
move.b #0,$ffff8260.w
cont1:
dcb $4e71,28
intoall:
tst.b (a0)+
bne.s mitte
dcb $4e71,6
bra.s cont3
mitte:
move.b #2,$ffff8260.w
move.b #0,$ffff8260.w
cont3:
dcb $4e71,33
tst.b (a0)+
bne.s rechts1
tst.b (a0)+
bne.s rechts2
dcb $4e71,7
bra.s cont4
rechts1:
move.b #0,$ffff820a.w
addq.w #1,a0
dcb $4e71,4
bra.s cont4
rechts2:
dcb $4e71,4
move.b #0,$ffff820a.w
nop
cont4:
dbra d0,switchloop
move.b #2,$ffff820a.w
;HERE WE ARE SYNCHRON
;These lines are to be used if the screen uses left border
dcb $4e71,3
move.b #1,$ffff8260.w ;GunsticK's right border end switch
move.b #0,$ffff8260.w
movem.l d2-d4,$ffff8240.w
move.b #2,$ffff8260.w ;Open left border
move.b #0,$ffff8260.w
movem.l d5-d7/a2-a3,12+$ffff8240.w
Some code moving around. Not sure what this did, but the assembled result has now vertical bars instead of scroll text. Hmm vertical bars... playfield.
2012-02-19 00:48:22 +01:00
;**********************************************************
; Distorted scroller by Gunstick
;INITIALISATIONS
;***** Calc next screenadress ****
As we have hardscrolling, show it off by jumping up and down. This changes screenadr and we need to use a virtual address (logbase) to draw the scroll. Notice some places where lea is replaced by add and other places where move is replaced by lea. Takes less time.
2012-02-20 00:39:32 +01:00
lea nextscrn,a3 ;~12
move.l (a3),a0 ;~20
move.l (a0)+,d0 ;~12
Now we are activating the multi buffered screens! First light of the full screen distorter capability. Just imagine how excited you are when this idea actually works.
2012-02-19 23:15:53 +01:00
bne scrnok ;~12
As we have hardscrolling, show it off by jumping up and down. This changes screenadr and we need to use a virtual address (logbase) to draw the scroll. Notice some places where lea is replaced by add and other places where move is replaced by lea. Takes less time.
2012-02-20 00:39:32 +01:00
lea scrnadrs-nextscrn(a3),a0 ;~12
move.l (a0)+,d0 ;~12
Some more overscan integration, in the process we lost the top border opening. If I'm right, the blue part minus hardscroll is the free processor time. That's not much...
2012-02-20 00:40:40 +01:00
move.l #screen-(20*230),cpybufdest-nextscrn(a3);~24
Now we are activating the multi buffered screens! First light of the full screen distorter capability. Just imagine how excited you are when this idea actually works.
2012-02-19 23:15:53 +01:00
_scrnok:
As we have hardscrolling, show it off by jumping up and down. This changes screenadr and we need to use a virtual address (logbase) to draw the scroll. Notice some places where lea is replaced by add and other places where move is replaced by lea. Takes less time.
2012-02-20 00:39:32 +01:00
move.l d0,logbase-nextscrn(a3) ;~20
move.l a0,(a3) ;~20
;do some hardwarebouncing
move.l hwbounceptr-nextscrn(a3),a0 ;~20
move.w (a0)+,d1 ;~8
bne.s hwbounceok ;~8
Some more overscan integration, in the process we lost the top border opening. If I'm right, the blue part minus hardscroll is the free processor time. That's not much...
2012-02-20 00:40:40 +01:00
lea hwbouncetab-nextscrn(a3),a0 ;~8
As we have hardscrolling, show it off by jumping up and down. This changes screenadr and we need to use a virtual address (logbase) to draw the scroll. Notice some places where lea is replaced by add and other places where move is replaced by lea. Takes less time.
2012-02-20 00:39:32 +01:00
move.w (a0)+,d1 ;~8
_hwbounceok:
Some more overscan integration, in the process we lost the top border opening. If I'm right, the blue part minus hardscroll is the free processor time. That's not much...
2012-02-20 00:40:40 +01:00
move.l a0,hwbounceptr-nextscrn(a3) ;~16
As we have hardscrolling, show it off by jumping up and down. This changes screenadr and we need to use a virtual address (logbase) to draw the scroll. Notice some places where lea is replaced by add and other places where move is replaced by lea. Takes less time.
2012-02-20 00:39:32 +01:00
subi.w #230*16,d1 ;~8
ext.l d1 ;~4
add.l d1,d0 ;~8
move.l d0,screenadr-nextscrn(a3);~16
; dcb $4e71,4
Some more overscan integration, in the process we lost the top border opening. If I'm right, the blue part minus hardscroll is the free processor time. That's not much...
2012-02-20 00:40:40 +01:00
dcb $4e71,4+2-6
As we have hardscrolling, show it off by jumping up and down. This changes screenadr and we need to use a virtual address (logbase) to draw the scroll. Notice some places where lea is replaced by add and other places where move is replaced by lea. Takes less time.
2012-02-20 00:39:32 +01:00
dcb $4e71,25-23
Now we are activating the multi buffered screens! First light of the full screen distorter capability. Just imagine how excited you are when this idea actually works.
2012-02-19 23:15:53 +01:00
dcb $4e71,17
little changes
2012-02-19 00:52:30 +01:00
Now we are activating the multi buffered screens! First light of the full screen distorter capability. Just imagine how excited you are when this idea actually works.
2012-02-19 23:15:53 +01:00
move.b #0,$ffff820a.w ;Open right border
move.b #2,$ffff820a.w
bra.s cont6
scrnok:
Some more overscan integration, in the process we lost the top border opening. If I'm right, the blue part minus hardscroll is the free processor time. That's not much...
2012-02-20 00:40:40 +01:00
dcb $4e71,3-1+6
As we have hardscrolling, show it off by jumping up and down. This changes screenadr and we need to use a virtual address (logbase) to draw the scroll. Notice some places where lea is replaced by add and other places where move is replaced by lea. Takes less time.
2012-02-20 00:39:32 +01:00
bra _scrnok ;~12
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
As we have hardscrolling, show it off by jumping up and down. This changes screenadr and we need to use a virtual address (logbase) to draw the scroll. Notice some places where lea is replaced by add and other places where move is replaced by lea. Takes less time.
2012-02-20 00:39:32 +01:00
hwbounceok:
Some more overscan integration, in the process we lost the top border opening. If I'm right, the blue part minus hardscroll is the free processor time. That's not much...
2012-02-20 00:40:40 +01:00
dcb $4e71,0
As we have hardscrolling, show it off by jumping up and down. This changes screenadr and we need to use a virtual address (logbase) to draw the scroll. Notice some places where lea is replaced by add and other places where move is replaced by lea. Takes less time.
2012-02-20 00:39:32 +01:00
bra _hwbounceok ;~12
Now we are activating the multi buffered screens! First light of the full screen distorter capability. Just imagine how excited you are when this idea actually works.
2012-02-19 23:15:53 +01:00
cont6:
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
the line marked "wow!" needs an expalantion. Maybe one day I will find it. New in this code is the distorter wave handler. This code does not assemble.
2012-02-19 00:25:44 +01:00
;***** Do the 8 following distorter entrys ****
Some code moving around. Not sure what this did, but the assembled result has now vertical bars instead of scroll text. Hmm vertical bars... playfield.
2012-02-19 00:48:22 +01:00
;; first copy the wave to the disttable
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
;Registerdefs: take care of the order. Modify also the addx.l !!!!
the line marked "wow!" needs an expalantion. Maybe one day I will find it. New in this code is the distorter wave handler. This code does not assemble.
2012-02-19 00:25:44 +01:00
d_0 equr d0
d_1 equr d1
d_2 equr d2
d_3 equr d3
a_0 equr a0
a_1 equr a1
a_2 equr a2
a_3 equr a3
little changes
2012-02-19 00:52:30 +01:00
Finally the first wavy scoller does it's debut. Notice that it's never going right. You can change the wave by uncommenting lines in wavetab to get other moves. The code moving right breaks the overscan on the lower part of the screen.
2012-02-19 00:57:52 +01:00
distspeed equ 5
disthigh equ 20
;copy (disthigh-distspeed)/2 registers
As we have hardscrolling, show it off by jumping up and down. This changes screenadr and we need to use a virtual address (logbase) to draw the scroll. Notice some places where lea is replaced by add and other places where move is replaced by lea. Takes less time.
2012-02-20 00:39:32 +01:00
movem.l disttable+distspeed*2,d1-d7/a1 ;copy disttab
movem.l d1-d7/a1,disttable
little changes
2012-02-19 00:52:30 +01:00
As we have hardscrolling, show it off by jumping up and down. This changes screenadr and we need to use a virtual address (logbase) to draw the scroll. Notice some places where lea is replaced by add and other places where move is replaced by lea. Takes less time.
2012-02-20 00:39:32 +01:00
little changes
2012-02-19 00:52:30 +01:00
Some more overscan integration, in the process we lost the top border opening. If I'm right, the blue part minus hardscroll is the free processor time. That's not much...
2012-02-20 00:40:40 +01:00
dcb $4e71,25
Now we are activating the multi buffered screens! First light of the full screen distorter capability. Just imagine how excited you are when this idea actually works.
2012-02-19 23:15:53 +01:00
dcb $4e71,17
little changes
2012-02-19 00:52:30 +01:00
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
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
movem.l d0/d1/d2,$ffff8250.w ;mdist
little changes
2012-02-19 00:52:30 +01:00
move.b #2,$ffff8260.w ;Open left border
move.b #0,$ffff8260.w
move.l d3,$ffff824e.w ;mdist
As we have hardscrolling, show it off by jumping up and down. This changes screenadr and we need to use a virtual address (logbase) to draw the scroll. Notice some places where lea is replaced by add and other places where move is replaced by lea. Takes less time.
2012-02-20 00:39:32 +01:00
dcb $4e71,27
little changes
2012-02-19 00:52:30 +01:00
Finally the first wavy scoller does it's debut. Notice that it's never going right. You can change the wave by uncommenting lines in wavetab to get other moves. The code moving right breaks the overscan on the lower part of the screen.
2012-02-19 00:57:52 +01:00
lea disttable+disthigh*2-distspeed*2,a_3 ;position to write new
the line marked "wow!" needs an expalantion. Maybe one day I will find it. New in this code is the distorter wave handler. This code does not assemble.
2012-02-19 00:25:44 +01:00
move.l distwaveptr,a_0 ;position in the actual wave
Finally the first wavy scoller does it's debut. Notice that it's never going right. You can change the wave by uncommenting lines in wavetab to get other moves. The code moving right breaks the overscan on the lower part of the screen.
2012-02-19 00:57:52 +01:00
moveq #distspeed-1,d_0 ;read 8
Some code moving around. Not sure what this did, but the assembled result has now vertical bars instead of scroll text. Hmm vertical bars... playfield.
2012-02-19 00:48:22 +01:00
moveq #0,d_3
move.w distcalc,d_2
little changes
2012-02-19 00:52:30 +01:00
the line marked "wow!" needs an expalantion. Maybe one day I will find it. New in this code is the distorter wave handler. This code does not assemble.
2012-02-19 00:25:44 +01:00
distwaveread:
As we have hardscrolling, show it off by jumping up and down. This changes screenadr and we need to use a virtual address (logbase) to draw the scroll. Notice some places where lea is replaced by add and other places where move is replaced by lea. Takes less time.
2012-02-20 00:39:32 +01:00
dcb $4e71,17 ;mdist
little changes
2012-02-19 00:52:30 +01:00
dcb $4e71,25 ;digi
move.b #0,$ffff820a.w ;Open right border
move.b #2,$ffff820a.w
bra.s cont
notnextwavetab: ;~12 time adjust
As we have hardscrolling, show it off by jumping up and down. This changes screenadr and we need to use a virtual address (logbase) to draw the scroll. Notice some places where lea is replaced by add and other places where move is replaced by lea. Takes less time.
2012-02-20 00:39:32 +01:00
dcb $4e71,20
little changes
2012-02-19 00:52:30 +01:00
bra.s _notnextwavetab ;~12
notendwavetab: ;~12
bra.s _notendwavetab ;~12
cont:
As we have hardscrolling, show it off by jumping up and down. This changes screenadr and we need to use a virtual address (logbase) to draw the scroll. Notice some places where lea is replaced by add and other places where move is replaced by lea. Takes less time.
2012-02-20 00:39:32 +01:00
move.w (a_0)+,d_1 ;~8
dcb $4e71,3
little changes
2012-02-19 00:52:30 +01:00
move.b #1,$ffff8260.w ;GunsticK's right border end switch
move.b #0,$ffff8260.w
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
movem.l d0/d1/d2,$ffff8250.w ;mdist
little changes
2012-02-19 00:52:30 +01:00
move.b #2,$ffff8260.w ;Open left border
move.b #0,$ffff8260.w
move.l d3,$ffff824e.w ;mdist
cmp.w #128,d_1 ;~8
bne.s notnextwavetab ;~8
move.l wavetabptr,a_1 ;~20 next wave to be read
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
tst.l (a_1) ;~12
little changes
2012-02-19 00:52:30 +01:00
bne.s notendwavetab ;~8
lea wavetab,a_1 ;~12 reset wavetabptr
nop
_notendwavetab:
move.l (a_1)+,a_0 ;~12
move.w (a_0)+,d_1 ;~12
move.l a_1,wavetabptr ;~20
the line marked "wow!" needs an expalantion. Maybe one day I will find it. New in this code is the distorter wave handler. This code does not assemble.
2012-02-19 00:25:44 +01:00
_notnextwavetab:
little changes
2012-02-19 00:52:30 +01:00
add.w d_1,d_3 ;~4
add.w d_1,d_2 ;~4
sub.w 16(a_3),d_2 ;~16
move.w d_1,16(a_3) ;~12
move.w d_2,(a_3)+ ;~8 write new curve
Some code moving around. Not sure what this did, but the assembled result has now vertical bars instead of scroll text. Hmm vertical bars... playfield.
2012-02-19 00:48:22 +01:00
little changes
2012-02-19 00:52:30 +01:00
dbf d_0,distwaveread ;~12/16
Some code moving around. Not sure what this did, but the assembled result has now vertical bars instead of scroll text. Hmm vertical bars... playfield.
2012-02-19 00:48:22 +01:00
As we have hardscrolling, show it off by jumping up and down. This changes screenadr and we need to use a virtual address (logbase) to draw the scroll. Notice some places where lea is replaced by add and other places where move is replaced by lea. Takes less time.
2012-02-20 00:39:32 +01:00
dcb $4e71,24 ;digi
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
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
Finally the first wavy scoller does it's debut. Notice that it's never going right. You can change the wave by uncommenting lines in wavetab to get other moves. The code moving right breaks the overscan on the lower part of the screen.
2012-02-19 00:57:52 +01:00
lea disttable+4,a_3 ;~12 scroll begins 18 lines before end of screen
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
lea shift,a_0 ;~12 pointer to the shifts
Finally the first wavy scoller does it's debut. Notice that it's never going right. You can change the wave by uncommenting lines in wavetab to get other moves. The code moving right breaks the overscan on the lower part of the screen.
2012-02-19 00:57:52 +01:00
move.w #-(18*8),count ;~20 scroll has 18 lines
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
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
Finally the first wavy scoller does it's debut. Notice that it's never going right. You can change the wave by uncommenting lines in wavetab to get other moves. The code moving right breaks the overscan on the lower part of the screen.
2012-02-19 00:57:52 +01:00
dcb $4e71,41-20
dcb $4e71,25 ;digi
dcb $4e71,17 ;mdist
move.b #0,$ffff820a.w ;Open right border
move.b #0,$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.b #2,$ffff820a.w
Some more overscan integration, in the process we lost the top border opening. If I'm right, the blue part minus hardscroll is the free processor time. That's not much...
2012-02-20 00:40:40 +01:00
;ULM Hardware Scrolling PART 1
;THIS PART IS TO BE STARTED BEFORE THE BEGINNING OF THE VBL
;sets screen to adress contained in screenadr+(6 scanlines)
lea screenadr,a3 ;~12
moveq #0,d1 ;~4
move.b 3(a3),d1 ;~12
move.w d1,d0 ;~4
add.w d1,d1 ;~4
add.w d0,d1 ;~4
add.w d1,d1 ;~4
add.w d1,d1 ;~4 *12 (24 byte per tabentry)
lea $ffff8201.w,a1 ;~8
lea hwscrolldat-screenadr(a3),a0 ;~8
add.w d1,a0 ;~8
movep.w 1(a3),d1 ;~16
move.b 2(a3),d1 ;~12
move.b (a0)+,d0 ;~8
ext.w d0 ;~4
add.w d0,d1 ;~4
movep.w d1,0(a1) ;~16
move.l a0,tabentry-screenadr(a3) ;~16 save tablepos
;ULM Hardware Scrolling END OF PART 1
; dcb $4e71,41-4-33
Finally the first wavy scoller does it's debut. Notice that it's never going right. You can change the wave by uncommenting lines in wavetab to get other moves. The code moving right breaks the overscan on the lower part of the screen.
2012-02-19 00:57:52 +01:00
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
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
Some more overscan integration, in the process we lost the top border opening. If I'm right, the blue part minus hardscroll is the free processor time. That's not much...
2012-02-20 00:40:40 +01:00
rept 5
dcb $4e71,41
dcb $4e71,25 ;digi
dcb $4e71,17 ;mdist
move.b #0,$ffff820a.w ;Open right border
move.b #2,$ffff820a.w
; move.b #2,$ffff8260.w ;Open left border
; move.b #0,$ffff8260.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
endr
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
Finally the first wavy scoller does it's debut. Notice that it's never going right. You can change the wave by uncommenting lines in wavetab to get other moves. The code moving right breaks the overscan on the lower part of the screen.
2012-02-19 00:57:52 +01:00
bra copydistscroll
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
dcb $4e71,41-9
little changes
2012-02-19 00:52:30 +01:00
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
dcb $4e71,25 ;digi
dcb $4e71,17 ;mdist
little changes
2012-02-19 00:52:30 +01:00
; move.w #221-16,d7
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
move.w #32,d7 ;~8
little changes
2012-02-19 00:52:30 +01:00
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
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
movem.l d0/d1/d2,$ffff8250.w ;mdist
little changes
2012-02-19 00:52:30 +01:00
move.b #2,$ffff8260.w ;Open left border
move.b #0,$ffff8260.w
move.l d3,$ffff824e.w ;mdist
dcb $4e71,83
move.b #0,$ffff820a.w ;Open right border
move.b #2,$ffff820a.w
dcb $4e71,5
dbra d7,overscanloop
move.b #1,$ffff8260.w ;GunsticK's right border end switch
move.b #0,$ffff8260.w
asd
the line marked "wow!" needs an expalantion. Maybe one day I will find it. New in this code is the distorter wave handler. This code does not assemble.
2012-02-19 00:25:44 +01:00
;=-| read the new distortions and shift the buffers
; letters of font must be 256 bytes !!!!!!!!
;-> advance this line by one word
vorwaerts:
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
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
the line marked "wow!" needs an expalantion. Maybe one day I will find it. New in this code is the distorter wave handler. This code does not assemble.
2012-02-19 00:25:44 +01:00
;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
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
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
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
_nottextend:
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
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
Finally the first wavy scoller does it's debut. Notice that it's never going right. You can change the wave by uncommenting lines in wavetab to get other moves. The code moving right breaks the overscan on the lower part of the screen.
2012-02-19 00:57:52 +01:00
lea font+(18*8),a_1 ;~8
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
add.w count,a_1 ;~20
lea (a_1,d_1),a_2 ;~12 C
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
; lea (a_1),a_2 ;C
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
movem.l (a_1,d_2),d_1/d_3 ;~36 K
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
; movem.w 256(a_1),d_0/d_1/d_2/d_3 ;K
;d0:xxxxxxxxxxxxxxxx
;d1:aaaaaaaabbbbbbbb
;d2:xxxxxxxxxxxxxxxx
;d3:ccccccccdddddddd
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
move.w d_1,d_2 ;~4
move.w d_3,d_0 ;~4
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
;d0:xxxxxxxxdddddddd
;d1:aaaaaaaabbbbbbbb
;d2:xxxxxxxxbbbbbbbb
;d3:ccccccccdddddddd
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
swap d_0 ;~4
swap d_2 ;~4
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
;d0:ddddddddxxxxxxxxx
;d1:aaaaaaaabbbbbbbbb
;d2:bbbbbbbbxxxxxxxxx
;d3:ccccccccddddddddd
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
move.l bufptr-shift(a_0),a_1 ;~16
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
;prepare shifter
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
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
the line marked "wow!" needs an expalantion. Maybe one day I will find it. New in this code is the distorter wave handler. This code does not assemble.
2012-02-19 00:25:44 +01:00
;uff one line of the 2 letters is in d0-d3
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
;d0 dddddddd|AAAAAAAA
;d1 aaaaaaaa|BBBBBBBB
;d2 bbbbbbbb|CCCCCCCC
;d3 cccccccc|DDDDDDDD
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
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:
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
dcb $4e71,5
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
dcb $4e71,2
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
call_shifter:
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
;write first buffer
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
movem.w d_0/d_1/d_2/d_3,(a_1) ;~24
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
lea 26*8(a_1),a_1 ;~8
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
move.w #7,shiftcnt ;~16
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
shifter: ;(~12)
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
dcb $4e71,25
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
dcb $4e71,17
move.b #0,$ffff820a.w ;Open right border
move.b #2,$ffff820a.w
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
dcb $4e71,8-3
swap d_1 ;~4
addx.w d1,d1 ;~4 ;a out
swap d_1 ;~4
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
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
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
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
Some code moving around. Not sure what this did, but the assembled result has now vertical bars instead of scroll text. Hmm vertical bars... playfield.
2012-02-19 00:48:22 +01:00
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
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
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
dcb $4e71,25
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
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
the line marked "wow!" needs an expalantion. Maybe one day I will find it. New in this code is the distorter wave handler. This code does not assemble.
2012-02-19 00:25:44 +01:00
;-< back this line by one word
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
the line marked "wow!" needs an expalantion. Maybe one day I will find it. New in this code is the distorter wave handler. This code does not assemble.
2012-02-19 00:25:44 +01:00
rueckwaerts:
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
add.w #16,d_2 ;~8
move.w d_2,(a_0) ;~8 write back new shift
dcb $4e71,2+7
dcb $4e71,25 ;digi
dcb $4e71,17 ;mdist
move.b #0,$ffff820a.w ;Open right border
move.b #2,$ffff820a.w
bra.s cont5
rueckbufok:
subq.l #8,bufptr-shift(a_0) ;~16
DCB $4E71,2
bra.s _rueckbufok ;~12
cont5:
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
subq.w #4,bufcnt-shift(a_0) ;~12
bhs.s rueckbufok ;~8
move.w #25*4,bufcnt-shift(a_0) ;~16 screenwidth = 26 words
add.l #25*8,bufptr-shift(a_0) ;~32
the line marked "wow!" needs an expalantion. Maybe one day I will find it. New in this code is the distorter wave handler. This code does not assemble.
2012-02-19 00:25:44 +01:00
_rueckbufok:
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
move.l textptr-shift(a_0),a_1 ;~16
dcb $4e71,7
the line marked "wow!" needs an expalantion. Maybe one day I will find it. New in this code is the distorter wave handler. This code does not assemble.
2012-02-19 00:25:44 +01:00
;movep : 5 nops weniger
;actual = if any bit of the letter appears in one buffer
; textptr
; | |
;YEAH THIS IS UNLIMITED MATRICKS a bit of C appears somewhere
;a bit of A appears somewhere
;now we have to write a bit of E and A
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
movep.w -27(a_1),d_1 ;~16 previous letter : E
movep.w -26(a_1),d_2 ;~16 act letter : A
lea -1(a_1),a_1 ;~8
move.l a_1,textptr-shift(a_0) ;~16 textptr points to I
clr.b d_1 ;~4 E
clr.b d_2 ;~4 A
lea font+(18*8),a_1 ;~12
add.w count,a_1 ;~20
lea (a_1,d_1),a_2 ;~12 E
movem.l (a_1,d_2),d_1/d_3 ;~36 A
Some code moving around. Not sure what this did, but the assembled result has now vertical bars instead of scroll text. Hmm vertical bars... playfield.
2012-02-19 00:48:22 +01:00
;d0:xxxxxxxxxxxxxxxx
;d1:aaaaaaaabbbbbbbb
;d2:xxxxxxxxxxxxxxxx
;d3:ccccccccdddddddd
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
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 bufptr-shift(a_0),a_1 ;~16
move.w d_1,d_2 ;~4
move.w d_3,d_0 ;~4
Some code moving around. Not sure what this did, but the assembled result has now vertical bars instead of scroll text. Hmm vertical bars... playfield.
2012-02-19 00:48:22 +01:00
;d0:xxxxxxxxdddddddd
;d1:aaaaaaaabbbbbbbb
;d2:xxxxxxxxbbbbbbbb
;d3:ccccccccdddddddd
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
swap d_0 ;~4
swap d_2 ;~4
Some code moving around. Not sure what this did, but the assembled result has now vertical bars instead of scroll text. Hmm vertical bars... playfield.
2012-02-19 00:48:22 +01:00
;d0:ddddddddxxxxxxxxx
;d1:aaaaaaaabbbbbbbbb
;d2:bbbbbbbbxxxxxxxxx
;d3:ccccccccddddddddd
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
Some code moving around. Not sure what this did, but the assembled result has now vertical bars instead of scroll text. Hmm vertical bars... playfield.
2012-02-19 00:48:22 +01:00
;prepare shifter
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
move.l bufptr-shift(a_0),a_1 ;~16
move.w (a_2)+,d_0 ;~8 E
move.w (a_2)+,d_1 ;~8
move.w (a_2)+,d_2 ;~8
move.w (a_2)+,d_3 ;~8
Some code moving around. Not sure what this did, but the assembled result has now vertical bars instead of scroll text. Hmm vertical bars... playfield.
2012-02-19 00:48:22 +01:00
the line marked "wow!" needs an expalantion. Maybe one day I will find it. New in this code is the distorter wave handler. This code does not assemble.
2012-02-19 00:25:44 +01:00
;uff one line of the 2 letters is in d0-d3
; A E
Some code moving around. Not sure what this did, but the assembled result has now vertical bars instead of scroll text. Hmm vertical bars... playfield.
2012-02-19 00:48:22 +01:00
;d0 dddddddd|AAAAAAAA
;d1 aaaaaaaa|BBBBBBBB
;d2 bbbbbbbb|CCCCCCCC
;d3 cccccccc|DDDDDDDD
;write first buffer
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
dcb $4e71,5
bra call_shifter
the line marked "wow!" needs an expalantion. Maybe one day I will find it. New in this code is the distorter wave handler. This code does not assemble.
2012-02-19 00:25:44 +01:00
copydistscroll:
;**** Copy all the buffers to the screen ****
As we have hardscrolling, show it off by jumping up and down. This changes screenadr and we need to use a virtual address (logbase) to draw the scroll. Notice some places where lea is replaced by add and other places where move is replaced by lea. Takes less time.
2012-02-20 00:39:32 +01:00
move.l logbase,a6 ;put it there
add.l #6*160+230*(280-20),a6 ;for hwscroll
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
lea buffer,a4
Finally the first wavy scoller does it's debut. Notice that it's never going right. You can change the wave by uncommenting lines in wavetab to get other moves. The code moving right breaks the overscan on the lower part of the screen.
2012-02-19 00:57:52 +01:00
moveq #18,d0 ;scrollhigh:18
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
; not $ffff8240.w
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
scrollcpy:
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
move.w shift-buffer(a4),d1
mulu #208,d1
; lea 208*15(a4),a5
lea (a4,d1),a5
; move.w #0,d1
move.w bufcnt-buffer(a4),d1
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
lea cpyjsr,a0
move.l (a0,d1),a0
Finally the first wavy scoller does it's debut. Notice that it's never going right. You can change the wave by uncommenting lines in wavetab to get other moves. The code moving right breaks the overscan on the lower part of the screen.
2012-02-19 00:57:52 +01:00
; move.l a5,a6
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
jmp (a0) ;(a5)+ -> (a6)
endcpy:
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
lea 230(a6),a6
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
lea linebuffend-linebuffbegin(a4),a4
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
dbf d0,scrollcpy
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
; not $ffff8240.w
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
; lea bufcnt,a5
; moveq #25,d0 ;scrollhigh:26
;wordscroll:
; add.w #4,(a5)
; cmp.w #4*26,(a5)
; bne.s notend
; clr.w (a5)
;notend:
; lea linebuffend-linebuffbegin(a5),a5
; dbf d0,wordscroll
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
; lea font,a0
As we have hardscrolling, show it off by jumping up and down. This changes screenadr and we need to use a virtual address (logbase) to draw the scroll. Notice some places where lea is replaced by add and other places where move is replaced by lea. Takes less time.
2012-02-20 00:39:32 +01:00
; move.l logbase,a1 ;put it there
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
; add.l #6*160+40,a1 ;for hwscroll
; moveq #26,d0 ;init all unshiftet linebuffers
;ttestinitbuff:
; move.l (a0),(a1)+
; move.l 4(a0),(a1)+
; move.l 26*8(a0),(a1)+
; move.l 26*8+4(a0),(a1)+
; addq.l #8,a0
; lea 230-16(a1),a1
; dbf d0,ttestinitbuff
Some more overscan integration, in the process we lost the top border opening. If I'm right, the blue part minus hardscroll is the free processor time. That's not much...
2012-02-20 00:40:40 +01:00
;**********************************************************
;buffercopy
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
;**********************************************************
parallax distorter. It was first meant to be an independant distorter on 2 playfields, only later it became the parallax distorter. This version features just hardware scroller with overscan. Use numpad to move around.
2012-02-18 23:32:41 +01:00
btst #0,$fffffc00.w
beq no_key
move.b $fffffc02.w,d0
cmpi.b #99,d0
bne.s notl
addi.l #16,codmod+2
notl:
cmpi.b #100,d0
bne.s notr
addi.l #-16,codmod+2
notr:
cmpi.b #107,d0
bne.s not5
move.l #0,codmod+2
not5:
cmpi.b #110,d0
bne.s not2
ifeq overscan
addi.l #-230,codmod+2
endc
ifne overscan
addi.l #-160,codmod+2
endc
not2:
cmpi.b #104,d0
bne.s not8
ifeq overscan
addi.l #230,codmod+2
endc
ifne overscan
addi.l #160,codmod+2
endc
not8:
cmpi.b #108,d0
bne.s not6
addi.l #-8,codmod+2
not6:
cmpi.b #78,d0
bne.s notd
; add.l #-320,codmod+2
addi.b #-2,lowbyte
lea screenadr,a3
move.b lowbyte,3(a3)
notd:
cmpi.b #106,d0
bne.s not4
addi.l #8,codmod+2
not4:
cmpi.b #74,d0
bne.s notu
; add.l #320,codmod+2
addi.b #2,lowbyte
lea screenadr,a3
move.b lowbyte,3(a3)
notu:
cmpi.b #57,d0
bne.s no_key
movea.l stack,sp
move (sp)+,sr
rts
no_key:
lea screenadr,a3
codmod:
addi.l #0,(a3)
moveq #0,d0
move.b 3(a3),d0
lsr.l #1,d0
lea str,a3
move.l #"0000",-4(a3)
bsr.s d0todeza3
pea prt
move.w #9,-(sp)
; trap #1
addq.w #6,sp
bra loop
exit:
movea.l stack,sp
move (sp)+,sr
rts
d0todeza3:
movem.l d0-d1/a3,-(sp)
addq.w #1,a3
moveq #3,d1
divu #10000,d0
beq.s smallone
hexdezinit:
move.b #"0",-(a3)
dbra d1,hexdezinit
bsr.s hextodez
addq.w #4,a3
smallone:
swap d0
bsr.s hextodez
movem.l (sp)+,d0-d1/a3
rts
hextodez:
movem.l d1/a3,-(sp)
move.w d0,d1
nexthextodez:
divu #10,d1
swap d1
add.b #"0",d1
move.b d1,-(a3)
clr.w d1
swap d1
bne.s nexthextodez
movem.l (sp)+,d1/a3
rts
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
;**********************************************************
; Distorted scroller by Gunstick
;The 26 copyroutines
cpyjsr:
dc.l cpy00,cpy01,cpy02,cpy03,cpy04
dc.l cpy05,cpy06,cpy07,cpy08,cpy09
dc.l cpy10,cpy11,cpy12,cpy13,cpy14
dc.l cpy15,cpy16,cpy17,cpy18,cpy19
dc.l cpy20,cpy21,cpy22,cpy23,cpy24
dc.l cpy25
;copy 208 bytes from (a5) to (a6) (52 registers)
;6 movems : 9,9,9,9,9,7 regs (6 scanlines)
;read/write: 24+8*n = 16*(1.5+n) (max: 10.5)
c0 equr a1
c1 equr d1
c2 equr d2
c3 equr d3
c4 equr d4
c5 equr d5
c6 equr d6
c7 equr d7
c8 equr a0
cpy00: ;7,9,9,9,9,9
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6
movem.l c0/c1/c2/c3/c4/c5/c6,(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*7(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*16(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*25(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*34(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*43(a6)
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
bra endcpy
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
cpy01: ;2+5,9,9,9,9,9
movem.l (a5)+,c0/c1
movem.l c0/c1,4*50(a6)
movem.l (a5)+,c0/c1/c2/c3/c4
movem.l c0/c1/c2/c3/c4,(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*5(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*14(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*23(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*32(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*41(a6)
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
bra endcpy
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
cpy02: ;4+3,9,9,9,9,9
movem.l (a5)+,c0/c1/c2/c3
movem.l c0/c1/c2/c3,4*48(a6)
movem.l (a5)+,c0/c1/c2
movem.l c0/c1/c2,(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*3(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*12(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*21(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*30(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*39(a6)
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
bra endcpy
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
cpy03: ;6+1,9,9,9,9,9
movem.l (a5)+,c0/c1/c2/c3/c4/c5
movem.l c0/c1/c2/c3/c4/c5,4*46(a6)
movem.l (a5)+,c0
movem.l c0,(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*1(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*10(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*19(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*28(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*37(a6)
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
bra endcpy
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
cpy04: ;8,8,9,9,9,9
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7
movem.l c0/c1/c2/c3/c4/c5/c6/c7,4*44(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7
movem.l c0/c1/c2/c3/c4/c5/c6/c7,(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*8(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*17(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*26(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*35(a6)
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
bra endcpy
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
cpy05: ;9,1+6,9,9,9,9
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*42(a6)
movem.l (a5)+,c0
movem.l c0,4*51(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5
movem.l c0/c1/c2/c3/c4/c5,(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*6(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*15(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*24(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*33(a6)
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
bra endcpy
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
cpy06: ;9,3+4,9,9,9,9
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*40(a6)
movem.l (a5)+,c0/c1/c2
movem.l c0/c1/c2,4*49(a6)
movem.l (a5)+,c0/c1/c2/c3
movem.l c0/c1/c2/c3,(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*4(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*13(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*22(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*31(a6)
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
bra endcpy
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
cpy07: ;9,5+2,9,9,9,9
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*38(a6)
movem.l (a5)+,c0/c1/c2/c3/c4
movem.l c0/c1/c2/c3/c4,4*47(a6)
movem.l (a5)+,c0/c1
movem.l c0/c1,(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*2(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*11(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*20(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*29(a6)
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
bra endcpy
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
cpy08: ;9,7,9,9,9,9
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*36(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6
movem.l c0/c1/c2/c3/c4/c5/c6,4*45(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*9(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*18(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*27(a6)
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
bra endcpy
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
cpy09: ;9,9,7,9,9,9
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*34(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*43(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6
movem.l c0/c1/c2/c3/c4/c5/c6,(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*7(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*16(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*25(a6)
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
bra endcpy
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
cpy10: ;9,9,2+5,9,9,9
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*32(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*41(a6)
movem.l (a5)+,c0/c1
movem.l c0/c1,4*50(a6)
movem.l (a5)+,c0/c1/c2/c3/c4
movem.l c0/c1/c2/c3/c4,(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*5(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*14(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*23(a6)
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
bra endcpy
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
cpy11: ;9,9,4+3,9,9,9
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*30(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*39(a6)
movem.l (a5)+,c0/c1/c2/c3
movem.l c0/c1/c2/c3,4*48(a6)
movem.l (a5)+,c0/c1/c2
movem.l c0/c1/c2,(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*3(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*12(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*21(a6)
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
bra endcpy
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
cpy12: ;9,9,6+1,9,9,9
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*28(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*37(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5
movem.l c0/c1/c2/c3/c4/c5,4*46(a6)
movem.l (a5)+,c0
movem.l c0,(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*1(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*10(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*19(a6)
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
bra endcpy
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
cpy13: ;9,9,8,8,9,9
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*26(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*35(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7
movem.l c0/c1/c2/c3/c4/c5/c6/c7,4*44(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7
movem.l c0/c1/c2/c3/c4/c5/c6/c7,(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*8(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*17(a6)
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
bra endcpy
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
cpy14: ;9,9,9,1+6,9,9
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*24(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*33(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*42(a6)
movem.l (a5)+,c0
movem.l c0,4*51(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5
movem.l c0/c1/c2/c3/c4/c5,(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*6(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*15(a6)
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
bra endcpy
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
cpy15: ;9,9,9,3+4,9,9
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*22(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*31(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*40(a6)
movem.l (a5)+,c0/c1/c2
movem.l c0/c1/c2,4*49(a6)
movem.l (a5)+,c0/c1/c2/c3
movem.l c0/c1/c2/c3,(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*4(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*13(a6)
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
bra endcpy
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
cpy16: ;9,9,9,5+2,9,9
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*20(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*29(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*38(a6)
movem.l (a5)+,c0/c1/c2/c3/c4
movem.l c0/c1/c2/c3/c4,4*47(a6)
movem.l (a5)+,c0/c1
movem.l c0/c1,(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*2(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*11(a6)
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
bra endcpy
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
cpy17: ;9,9,9,7,9,9
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*18(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*27(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*36(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6
movem.l c0/c1/c2/c3/c4/c5/c6,4*45(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*9(a6)
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
bra endcpy
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
cpy18: ;9,9,9,9,7,9
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*16(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*25(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*34(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*43(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6
movem.l c0/c1/c2/c3/c4/c5/c6,(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*7(a6)
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
bra endcpy
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
cpy19: ;9,9,9,9,2+5,9
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*14(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*23(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*32(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*41(a6)
movem.l (a5)+,c0/c1
movem.l c0/c1,4*50(a6)
movem.l (a5)+,c0/c1/c2/c3/c4
movem.l c0/c1/c2/c3/c4,(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*5(a6)
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
bra endcpy
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
cpy20: ;9,9,9,9,4+3,9
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*12(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*21(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*30(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*39(a6)
movem.l (a5)+,c0/c1/c2/c3
movem.l c0/c1/c2/c3,4*48(a6)
movem.l (a5)+,c0/c1/c2
movem.l c0/c1/c2,(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*3(a6)
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
bra endcpy
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
cpy21: ;9,9,9,9,6+1,9
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*10(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*19(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*28(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*37(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5
movem.l c0/c1/c2/c3/c4/c5,4*46(a6)
movem.l (a5)+,c0
movem.l c0,(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*1(a6)
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
bra endcpy
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
cpy22: ;9,9,9,9,8,8
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*8(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*17(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*26(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*35(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7
movem.l c0/c1/c2/c3/c4/c5/c6/c7,4*44(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7
movem.l c0/c1/c2/c3/c4/c5/c6/c7,(a6)
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
bra endcpy
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
cpy23: ;9,9,9,9,9,1+6
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*6(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*15(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*24(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*33(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*42(a6)
movem.l (a5)+,c0
movem.l c0,4*51(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5
movem.l c0/c1/c2/c3/c4/c5,(a6)
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
bra endcpy
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
cpy24: ;9,9,9,9,9,3+4
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*4(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*13(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*22(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*31(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*40(a6)
movem.l (a5)+,c0/c1/c2
movem.l c0/c1/c2,4*49(a6)
movem.l (a5)+,c0/c1/c2/c3
movem.l c0/c1/c2/c3,(a6)
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
bra endcpy
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
cpy25: ;9,9,9,9,9,5+2
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*2(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*11(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*20(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*29(a6)
movem.l (a5)+,c0/c1/c2/c3/c4/c5/c6/c7/c8
movem.l c0/c1/c2/c3/c4/c5/c6/c7/c8,4*38(a6)
movem.l (a5)+,c0/c1/c2/c3/c4
movem.l c0/c1/c2/c3/c4,4*47(a6)
movem.l (a5)+,c0/c1
movem.l c0/c1,(a6)
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
bra endcpy
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
;
;**********************************************************
parallax distorter. It was first meant to be an independant distorter on 2 playfields, only later it became the parallax distorter. This version features just hardware scroller with overscan. Use numpad to move around.
2012-02-18 23:32:41 +01:00
section data
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
;**********************************************************
; Distorted scroller by Gunstick
As we have hardscrolling, show it off by jumping up and down. This changes screenadr and we need to use a virtual address (logbase) to draw the scroll. Notice some places where lea is replaced by add and other places where move is replaced by lea. Takes less time.
2012-02-20 00:39:32 +01:00
hwbounceptr: dc.l hwbouncetab
hwbouncetab:
dc.w 230*16,230*16
dc.w 230*15,230*15
dc.w 230*14,230*14
dc.w 230*13,230*12
dc.w 230*11,230*10
dc.w 230*8,230*6
dc.w 230*3,230*1
dc.w 230*3,230*6
dc.w 230*8,230*11
dc.w 230*12,230*13
dc.w 230*14,230*14
dc.w 230*15,230*15
dc.w 230*16,230*16
dc.w 230*16,230*16
dc.w 0
Now we are activating the multi buffered screens! First light of the full screen distorter capability. Just imagine how excited you are when this idea actually works.
2012-02-19 23:15:53 +01:00
scrnadrs:
As we have hardscrolling, show it off by jumping up and down. This changes screenadr and we need to use a virtual address (logbase) to draw the scroll. Notice some places where lea is replaced by add and other places where move is replaced by lea. Takes less time.
2012-02-20 00:39:32 +01:00
dc.l screen+64400*0
dc.l screen+64400*1
dc.l screen+64400*2
dc.l screen+64400*3
dc.l screen+64400*0+230*20
dc.l screen+64400*1+230*20
dc.l screen+64400*2+230*20
dc.l screen+64400*3+230*20
dc.l screen+64400*0+230*40
dc.l screen+64400*1+230*40
dc.l screen+64400*2+230*40
dc.l screen+64400*3+230*40
dc.l screen+64400*0+230*60
dc.l screen+64400*1+230*60
dc.l screen+64400*2+230*60
dc.l screen+64400*3+230*60
dc.l screen+64400*0+230*80
dc.l screen+64400*1+230*80
dc.l screen+64400*2+230*80
dc.l screen+64400*3+230*80
dc.l screen+64400*0+230*100
dc.l screen+64400*1+230*100
dc.l screen+64400*2+230*100
dc.l screen+64400*3+230*100
dc.l screen+64400*0+230*120
dc.l screen+64400*1+230*120
dc.l screen+64400*2+230*120
dc.l screen+64400*3+230*120
dc.l screen+64400*0+230*140
dc.l screen+64400*1+230*140
dc.l screen+64400*2+230*140
dc.l screen+64400*3+230*140
dc.l screen+64400*0+230*160
dc.l screen+64400*1+230*160
dc.l screen+64400*2+230*160
dc.l screen+64400*3+230*160
dc.l screen+64400*0+230*180
dc.l screen+64400*1+230*180
dc.l screen+64400*2+230*180
dc.l screen+64400*3+230*180
dc.l screen+64400*0+230*200
dc.l screen+64400*1+230*200
dc.l screen+64400*2+230*200
dc.l screen+64400*3+230*200
dc.l screen+64400*0+230*220
dc.l screen+64400*1+230*220
dc.l screen+64400*2+230*220
dc.l screen+64400*3+230*220
dc.l screen+64400*0+230*240
dc.l screen+64400*1+230*240
dc.l screen+64400*2+230*240
dc.l screen+64400*3+230*240
dc.l screen+64400*0+230*260
dc.l screen+64400*1+230*260
dc.l screen+64400*2+230*260
dc.l screen+64400*3+230*260
Now we are activating the multi buffered screens! First light of the full screen distorter capability. Just imagine how excited you are when this idea actually works.
2012-02-19 23:15:53 +01:00
dc.l 0
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
font equ *-32*8
incbin "font.bin"
even
wavetab:
Now we are activating the multi buffered screens! First light of the full screen distorter capability. Just imagine how excited you are when this idea actually works.
2012-02-19 23:15:53 +01:00
dc.l nix
dc.l nix
dc.l nix
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
dc.l wordschief
Now we are activating the multi buffered screens! First light of the full screen distorter capability. Just imagine how excited you are when this idea actually works.
2012-02-19 23:15:53 +01:00
dc.l wordschief
dc.l byteschief
dc.l byteschief
dc.l byteschief
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
dc.l byteschief
Now we are activating the multi buffered screens! First light of the full screen distorter capability. Just imagine how excited you are when this idea actually works.
2012-02-19 23:15:53 +01:00
dc.l byteschief
dc.l byteschief
dc.l byteschief
dc.l byteschief
dc.l byteschief
dc.l byteschief
dc.l nix
dc.l nix
dc.l wordhinher
dc.l nix
dc.l nix
; dc.l dreieck
dc.l dreieck
dc.l dreieck
dc.l dreieck
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
dc.l dreieck
dc.l dreieck
Now we are activating the multi buffered screens! First light of the full screen distorter capability. Just imagine how excited you are when this idea actually works.
2012-02-19 23:15:53 +01:00
dc.l dreieck
dc.l dreieck
dc.l dreieck
dc.l dreieck
dc.l sinus
dc.l sinus
dc.l sinus
dc.l sinus
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
dc.l sinus
Now we are activating the multi buffered screens! First light of the full screen distorter capability. Just imagine how excited you are when this idea actually works.
2012-02-19 23:15:53 +01:00
dc.l sinus
dc.l sinschief
dc.l sinschief
dc.l sinschief
dc.l sinschief
dc.l sinschief
dc.l sinschief
dc.l sinschief
Finally the first wavy scoller does it's debut. Notice that it's never going right. You can change the wave by uncommenting lines in wavetab to get other moves. The code moving right breaks the overscan on the lower part of the screen.
2012-02-19 00:57:52 +01:00
dc.l sinschief
Now we are activating the multi buffered screens! First light of the full screen distorter capability. Just imagine how excited you are when this idea actually works.
2012-02-19 23:15:53 +01:00
dc.l bigsin
dc.l bigsin
dc.l bigsin
dc.l bigsin
dc.l bigsin
dc.l bigsin
dc.l bigsin
dc.l bigsin
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
dc.l 0 ;end
Finally the first wavy scoller does it's debut. Notice that it's never going right. You can change the wave by uncommenting lines in wavetab to get other moves. The code moving right breaks the overscan on the lower part of the screen.
2012-02-19 00:57:52 +01:00
sinschief;
Now we are activating the multi buffered screens! First light of the full screen distorter capability. Just imagine how excited you are when this idea actually works.
2012-02-19 23:15:53 +01:00
dc.w 0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,1
Finally the first wavy scoller does it's debut. Notice that it's never going right. You can change the wave by uncommenting lines in wavetab to get other moves. The code moving right breaks the overscan on the lower part of the screen.
2012-02-19 00:57:52 +01:00
dc.w 0,0,1,0,0,1,0,0,2,0,0,1,0,0,1,0,0,2,0,0,2,0,0,2,0,0,2,0,0,1,0,0,1
dc.w 0,0,2,0,0,1,0,0,1,0,0,1,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,128
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
wordhinher:
Now we are activating the multi buffered screens! First light of the full screen distorter capability. Just imagine how excited you are when this idea actually works.
2012-02-19 23:15:53 +01:00
dc.w 2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
dc.w -2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,128
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
wordschief:
dc.w 2,2,2,2,2,2,2,2
Now we are activating the multi buffered screens! First light of the full screen distorter capability. Just imagine how excited you are when this idea actually works.
2012-02-19 23:15:53 +01:00
dc.w 2,2,2,2,2,2,2,20
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
dc.w 0
dc.w 3,2,2,2,2,2,2,2,128
byteschief:
Now we are activating the multi buffered screens! First light of the full screen distorter capability. Just imagine how excited you are when this idea actually works.
2012-02-19 23:15:53 +01:00
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
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
dc.w 1,1,1,1,1,1,1,1,128
Now we are activating the multi buffered screens! First light of the full screen distorter capability. Just imagine how excited you are when this idea actually works.
2012-02-19 23:15:53 +01:00
nix: dc.w 0
little changes
2012-02-19 00:52:30 +01:00
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
Now we are activating the multi buffered screens! First light of the full screen distorter capability. Just imagine how excited you are when this idea actually works.
2012-02-19 23:15:53 +01:00
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
little changes
2012-02-19 00:52:30 +01:00
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
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
dreieck:
Some code moving around. Not sure what this did, but the assembled result has now vertical bars instead of scroll text. Hmm vertical bars... playfield.
2012-02-19 00:48:22 +01:00
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
dc.w 1,0,1,0,1,0,1,0
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
dc.w 1,1,1,1,1,1,1,1
Some code moving around. Not sure what this did, but the assembled result has now vertical bars instead of scroll text. Hmm vertical bars... playfield.
2012-02-19 00:48:22 +01:00
dc.w -1,0,0,-1,0,0,-1,0,0,-1,0,0,-1,0,0,-1,0,0,-1,0,0,-1
dc.w -1,0,0,-1,0,0,-1,0,0,-1,0,0,-1,128
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
dc.w 2,2,2,2,2,2,2,2
Some code moving around. Not sure what this did, but the assembled result has now vertical bars instead of scroll text. Hmm vertical bars... playfield.
2012-02-19 00:48:22 +01:00
dc.w 1,0,0,0,0,0,0,0
dc.w 0,0,0,0,0,0,0,0
dc.w 0,0,0,1,0,0,0,0
dc.w 0,0,-3,-2,-1,0,1,2
dc.w 1,0,0,0,0,0,0,0
dc.w 0,0,0,0,0,0,0,0
dc.w 0,0,0,0,0,0,0,-1
dc.w -1,0,0,0,0,0,0,0
dc.w 0,0,0,0,0,0,0,0
dc.w 0,0,0,0,0,0,0,0
dc.w 0,0,0,0,0,0,0,1
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
dc.w 2,2,2,2,2,2,2,2
dc.w 3,3,3,3,3,3,3,3
Some code moving around. Not sure what this did, but the assembled result has now vertical bars instead of scroll text. Hmm vertical bars... playfield.
2012-02-19 00:48:22 +01:00
dc.w 3,3,3,3,3,3,3,3
dc.w 4,4,4,4,4,4,4,4
dc.w 4,4,4,4,4,4,4,4
dc.w 5,5,5,5,5,5,5,5
dc.w 5,5,5,5,5,5,5,5
dc.w 5,5,5,5,5,5,5,5
dc.w 5,5,5,5,5,5,5,5
dc.w 5,5,5,5,5,5,5,5
dc.w 4,4,4,4,4,4,4,4
dc.w 4,4,4,4,4,4,4,4
dc.w 4,4,4,4,4,4,4,4
dc.w 3,3,3,3,3,3,3,3
dc.w 3,3,3,3,3,3,3,3
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
dc.w 2,2,2,2,2,2,2,2
dc.w 2,2,2,2,2,2,2,2
dc.w 1,1,1,1,1,1,1,1
dc.w 0,0,0,0,0,0,0,0
dc.w -1,-1,-1,-1,-1,-1,-1,-1
Some code moving around. Not sure what this did, but the assembled result has now vertical bars instead of scroll text. Hmm vertical bars... playfield.
2012-02-19 00:48:22 +01:00
dc.w -2,-2,-2,-2,-2,-2,-2,-2
dc.w -3,-3,-3,-3,-3,-3,-3,-3
dc.w -3,-3,-3,-3,-3,-3,-3,-3
dc.w -4,-4,-4,-4,-4,-4,-4,-4
dc.w -4,-4,-4,-4,-4,-4,-4,-4
dc.w -4,-4,-4,-4,-4,-4,-4,-4
dc.w -4,-4,-4,-4,-4,-4,-4,-4
dc.w -4,-4,-4,-4,-4,-4,-4,-4
dc.w -3,-3,-3,-3,-3,-3,-3,-3
dc.w -3,-3,-3,-3,-3,-3,-3,-3
dc.w -2,-2,-2,-2,-2,-2,-2,-2
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
dc.w -1,-1,-1,-1,-1,-1,-1,-1
Some code moving around. Not sure what this did, but the assembled result has now vertical bars instead of scroll text. Hmm vertical bars... playfield.
2012-02-19 00:48:22 +01:00
dc.w 0,0,0,0,0,0,0,0,128
dc.w 16,16,16,16,16,16,16,16
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
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
dc.w 1,1,1,1,1,1,1,1
dc.w 128
Some code moving around. Not sure what this did, but the assembled result has now vertical bars instead of scroll text. Hmm vertical bars... playfield.
2012-02-19 00:48:22 +01:00
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
Now we are activating the multi buffered screens! First light of the full screen distorter capability. Just imagine how excited you are when this idea actually works.
2012-02-19 23:15:53 +01:00
bigsin: dc.w 1,0,0,1,0,0,1,0,0,2,0,0,2,0,0,2,0,0,3,0,0,3,0,0,3,0,0,4,0,0,4,0,0,4
dc.w 5,0,0,5,0,0,5,0,0,4,0,0,4,0,0,3,0,0,3,0,0,2,0,0,2,0,0,1,0,0,1,0,0,0
dc.w 0,0,0,-1,0,0,-1,0,0,-2,0,0,-2,0,0,-3,0,0,-3,0,0,-4
dc.w -4,0,0,-5,0,0,-5,0,0,-4,0,0,-4,0,0,-4,0,0,-3,0,0,-3
dc.w -3,0,0,-2,0,0,-2,0,0,-2,0,0,-1,0,0,-1,0,0,-1,0,0,0,0,0,0,0,0,0,0,0,128
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
;Panic buffer for scrolltext
Now we are activating the multi buffered screens! First light of the full screen distorter capability. Just imagine how excited you are when this idea actually works.
2012-02-19 23:15:53 +01:00
dc.b 01,0,0,0,0,0,0,0,0,01,0,0,01,0,0,01,0,0,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01
the line marked "wow!" needs an expalantion. Maybe one day I will find it. New in this code is the distorter wave handler. This code does not assemble.
2012-02-19 00:25:44 +01:00
dc.b 01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
scrolltext:
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
dc.b 87,87
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
dc.b 01,02,03,04,05,06,07,08,09,10,11,12,13,14,15,16,17,18,19,20
dc.b 21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40
This is one of the most important decisions. Reduce the scroller height from the classic 32 pixel height to 26, because there is not enough CPU time left to do 32 pixel! We can do this because there is no 8 lines/scroll limit when using the hardscroller.
2012-02-19 00:32:21 +01:00
dc.b 41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60
dc.b 61,62,63,64,65,66,67,68,69,70,71,72,73,74,75,76,77,78,79,80
dc.b 81,82,83,84,85,86,87
26 copy routines. The screen is 416 px wide. Scroll buffer is same width to save space. But we do not shift the scroll buffer around. Instead there are 416/16=26 different cases in the scroll buffer where the left border of the scroller is. We simply use 26 different copy routines. If you scroll now too far with the numpad, the copied scroller will overwrite code, devpac or system. Crash ahoi!
2012-02-18 23:34:18 +01:00
dc.b 0
even
;**********************************************************
parallax distorter. It was first meant to be an independant distorter on 2 playfields, only later it became the parallax distorter. This version features just hardware scroller with overscan. Use numpad to move around.
2012-02-18 23:32:41 +01:00
prt:
dc.b 27,"Y",32+20,32+1," 000"
str: dc.b "0 ",0
even
psginittab:dc.b 0,$ff,1,$ff,2,$ff,3,$ff,4,$ff,5,$ff,6,0
dc.b 7,$7f,8,7,9,7,10,7,$ff,0
even
hwpalette:
dc.w $0700,$07,$0474,$0777,$0606,$0700,$0170,$62
dc.w $0770,$0707,$50,$0505,$75,$0777,$00,$0711
graphic:
dc.w $d555,$3333,$0f0f,$ff
message:
dc.b 27,"c",6,13,10,13,10,10,10,10,10,10,10,10,10,"Hardware scrolling discovery"
dc.b 13,10,"Scroll !!!!!!",13,10,10
test: equ 0
ifeq test
dc.b 'UUUU LLLL MMMMMM MMMMMM',13,10
dc.b 'UUUU LLLL MMMM MMMMMMMM',13,10
dc.b 'UUUU LLLL MMMMMMMM 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 UUUU LLLL MMMM',13,10
dc.b 'UUUUUUUUUUUUU LLLLLLLLLLLLLL MMMM',13,10
endc
ifne test
dc.b ' ',13,10
dc.b ' TTTTTTTTTTT HH HH EEEEEEEEE ',13,10
dc.b ' TT HH HH EE ',13,10
dc.b ' TT HH HH EE ',13,10
dc.b ' TT HHHHHHHHH EEEEE ',13,10
dc.b ' TT HH HH EE ',13,10
dc.b ' TT HH HH EE ',13,10
dc.b ' TT HH HH EEEEEEEEE ',13,10
dc.b ' ',13,10
dc.b 'FFFFFFFFF AAAAAAAAA TTTTTTTTTT EEEEEEEEEE',13,10
dc.b 'FF AA AA TT EE ',13,10
dc.b 'FF AA AA TT EE ',13,10
dc.b 'FFFFF AAAAAAAAA TT EEEEE ',13,10
dc.b 'FF AA AA TT EE ',13,10
dc.b 'FF AA AA TT EE ',13,10
dc.b 'FF AA AA TT EEEEEEEEEE',13,10
dc.b ' ',13,10
endc
dc.b 27,"Y",32+20,32,"|"
dc.b 13,10,"|"
dc.b 13,10,"0123456789012345678901234567890123456789"
dc.b 13,10,"0000000000111111111122222222223333333333"
dc.b 13,10,"||||||||||||||||||||||||||||||||||||||||",0
dc.b 13,10,"||||||||||||||||||||||||||||||||||||||||",0
even
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
hwscrolldat:
parallax distorter. It was first meant to be an independant distorter on 2 playfields, only later it became the parallax distorter. This version features just hardware scroller with overscan. Use numpad to move around.
2012-02-18 23:32:41 +01:00
; dc.b $00,$00,$00,$00
; dc.b $00,$00,$00,$ff ;44
; dc.b $00,$00,$ff,$00 ;-2
; dc.b $00,$ff,$00,$00 ;-106
; dc.b $ff,$00,$00,$00 ;26
; dc.b $ff,$00,$00,$ff ;70
; dc.b $ff,$00,$ff,$00 ;24
; dc.b $ff,$ff,$00,$00 ;-80
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
incbin "hwscroll.dat"
parallax distorter. It was first meant to be an independant distorter on 2 playfields, only later it became the parallax distorter. This version features just hardware scroller with overscan. Use numpad to move around.
2012-02-18 23:32:41 +01:00
even
lowbyte:
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
dc.b 0
parallax distorter. It was first meant to be an independant distorter on 2 playfields, only later it became the parallax distorter. This version features just hardware scroller with overscan. Use numpad to move around.
2012-02-18 23:32:41 +01:00
section bss
stack: ds.l 1
oldpal: ds.w 16
oldres: ds.w 1
screenad1:ds.w 1
screenad2:ds.l 1
screenadr:ds.l 1
As we have hardscrolling, show it off by jumping up and down. This changes screenadr and we need to use a virtual address (logbase) to draw the scroll. Notice some places where lea is replaced by add and other places where move is replaced by lea. Takes less time.
2012-02-20 00:39:32 +01:00
logbase: ds.l 1 ;screen where to put scroll
parallax distorter. It was first meant to be an independant distorter on 2 playfields, only later it became the parallax distorter. This version features just hardware scroller with overscan. Use numpad to move around.
2012-02-18 23:32:41 +01:00
black: ds.l 8
Some more overscan integration, in the process we lost the top border opening. If I'm right, the blue part minus hardscroll is the free processor time. That's not much...
2012-02-20 00:40:40 +01:00
tabentry:
ds.l 1 ;for hwscroll
cpybufdest:
ds.l 1 ;copy from (this+4buffers-1scroll) to (this)
Now we are activating the multi buffered screens! First light of the full screen distorter capability. Just imagine how excited you are when this idea actually works.
2012-02-19 23:15:53 +01:00
nextscrn:
ds.l 1 ;points to next screenadress to be used
place holders for digi sound and playfield distorter appear code starts to get integrated into overscan switches hardware scroll table is now in a binary include
2012-02-19 00:54:45 +01:00
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
parallax distorter. It was first meant to be an independant distorter on 2 playfields, only later it became the parallax distorter. This version features just hardware scroller with overscan. Use numpad to move around.
2012-02-18 23:32:41 +01:00
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
screen:
Now we are activating the multi buffered screens! First light of the full screen distorter capability. Just imagine how excited you are when this idea actually works.
2012-02-19 23:15:53 +01:00
rept 5
Some more overscan integrating ALso note the replacement of jsr/rts by jmp/bra for the copy routines
2012-02-19 23:09:28 +01:00
ds.l 8000
ds.l 8000
endr
parallax distorter. It was first meant to be an independant distorter on 2 playfields, only later it became the parallax distorter. This version features just hardware scroller with overscan. Use numpad to move around.
2012-02-18 23:32:41 +01:00
end
little changes
2012-02-19 00:52:30 +01:00