diff options
Diffstat (limited to 'devtools/tasmrecover/dreamweb/titles.asm')
| -rw-r--r-- | devtools/tasmrecover/dreamweb/titles.asm | 68 |
1 files changed, 63 insertions, 5 deletions
diff --git a/devtools/tasmrecover/dreamweb/titles.asm b/devtools/tasmrecover/dreamweb/titles.asm index fb410ab134..8f2b46e3f4 100644 --- a/devtools/tasmrecover/dreamweb/titles.asm +++ b/devtools/tasmrecover/dreamweb/titles.asm @@ -9,7 +9,10 @@ Titles proc near else call clearpalette call biblequote + cmp quitrequested, 0 + jnz titlesearly call intro +titlesearly: ret endif @@ -64,7 +67,9 @@ loadspeech2: push ax call loadspeech mov al,50+12 call playchannel1 -notloadspeech2: cmp ch1playing,255 +notloadspeech2: + call vsync + cmp ch1playing,255 jnz notloadspeech2 pop ax inc al @@ -194,12 +199,20 @@ Biblequote proc near call fadescreenups mov cx,80 call hangone + cmp lasthardkey,1 + jz biblequotearly mov cx,560 call hangone + cmp lasthardkey,1 + jz biblequotearly call fadescreendowns mov cx,200 ;128 call hangone + cmp lasthardkey,1 + jz biblequotearly call cancelch0 +biblequotearly: + mov lasthardkey,0 ret endp @@ -215,9 +228,7 @@ hangonloope: push cx cmp lasthardkey,1 jz hangonearly loop hangonloope - ret -hangonearly: pop ax - pop ax +hangonearly: ret endp @@ -250,6 +261,9 @@ Intro proc near call playchannel0 call fadescreenups call runintroseq + cmp lasthardkey,1 + jz introearly + ;waitsound: cmp ch1blockstoplay,0 ; jnz waitsound call clearbeforeload @@ -257,11 +271,15 @@ Intro proc near mov newlocation,52 call loadintroroom call runintroseq + cmp lasthardkey,1 + jz introearly call clearbeforeload mov newlocation,53 call loadintroroom call runintroseq + cmp lasthardkey,1 + jz introearly call clearbeforeload call allpalette @@ -271,9 +289,13 @@ Intro proc near ;mov ah,255 ;call playchannel0 call runintroseq + cmp lasthardkey,1 + jz introearly call getridoftemptext call clearbeforeload +introearly: + mov lasthardkey, 0 ret endp @@ -312,7 +334,7 @@ moreintroseq: call vsync cmp getback,1 jnz moreintroseq ret -earlyendrun: pop ax ax +earlyendrun: call getridoftemptext call clearbeforeload ret @@ -430,12 +452,18 @@ RealCredits proc near call playchannel0 mov cx,2 call hangone + cmp lasthardkey,1 + jz realcreditsearly call allpalette mov cx,80 call hangone + cmp lasthardkey,1 + jz realcreditsearly call fadescreendowns mov cx,256 call hangone + cmp lasthardkey,1 + jz realcreditsearly mov dx,offset cs:title2graphics call showpcx @@ -444,12 +472,18 @@ RealCredits proc near call playchannel0 mov cx,2 call hangone + cmp lasthardkey,1 + jz realcreditsearly call allpalette mov cx,80 call hangone + cmp lasthardkey,1 + jz realcreditsearly call fadescreendowns mov cx,256 call hangone + cmp lasthardkey,1 + jz realcreditsearly if demo else @@ -460,12 +494,18 @@ RealCredits proc near call playchannel0 mov cx,2 call hangone + cmp lasthardkey,1 + jz realcreditsearly call allpalette mov cx,80 call hangone + cmp lasthardkey,1 + jz realcreditsearly call fadescreendowns mov cx,256 call hangone + cmp lasthardkey,1 + jz realcreditsearly mov dx,offset cs:title4graphics call showpcx @@ -474,12 +514,18 @@ RealCredits proc near call playchannel0 mov cx,2 call hangone + cmp lasthardkey,1 + jz realcreditsearly call allpalette mov cx,80 call hangone + cmp lasthardkey,1 + jz realcreditsearly call fadescreendowns mov cx,256 call hangone + cmp lasthardkey,1 + jz realcreditsearly mov dx,offset cs:title5graphics call showpcx @@ -488,12 +534,18 @@ RealCredits proc near call playchannel0 mov cx,2 call hangone + cmp lasthardkey,1 + jz realcreditsearly call allpalette mov cx,80 call hangone + cmp lasthardkey,1 + jz realcreditsearly call fadescreendowns mov cx,256 call hangone + cmp lasthardkey,1 + jz realcreditsearly endif mov dx,offset cs:title6graphics @@ -501,14 +553,20 @@ RealCredits proc near call fadescreenups mov cx,60 call hangone + cmp lasthardkey,1 + jz realcreditsearly mov al,13 mov ah,0 call playchannel0 mov cx,350 call hangone + cmp lasthardkey,1 + jz realcreditsearly call fadescreendowns mov cx,256 call hangone +realcreditsearly: + mov lasthardkey, 0 ret endp |