mirror of
https://github.com/Pecusx/scorch_src.git
synced 2026-05-20 22:33:43 +02:00
WIP: my hovercraft is full of eels
This commit is contained in:
+2
-2
@@ -127,7 +127,7 @@ OffensiveTextTableH
|
|||||||
NumberOfOffensiveTexts=54
|
NumberOfOffensiveTexts=54
|
||||||
NumberOfDeffensiveTexts=60
|
NumberOfDeffensiveTexts=60
|
||||||
.endp
|
.endp
|
||||||
hoverFull dta d"MY HOVERCRAFT IS FULL OF EELS!"
|
hoverFull dta d"MY HOVERCRAFT IS FULL OF EELS!", $ff
|
||||||
hoverFullEnd
|
hoverFullEnd
|
||||||
hoverEmpty dta d"RUNNING OUT OF EELS"
|
hoverEmpty dta d"RUNNING OUT OF EELS", $ff
|
||||||
hoverEmptyEnd
|
hoverEmptyEnd
|
||||||
+2
-2
@@ -134,7 +134,7 @@
|
|||||||
.zpvar HowToDraw .byte
|
.zpvar HowToDraw .byte
|
||||||
.zpvar gravity .byte
|
.zpvar gravity .byte
|
||||||
.zpvar LineLength .word
|
.zpvar LineLength .word
|
||||||
.zpvar LineAddress4x4 .word
|
;.zpvar LineAddress4x4 .word
|
||||||
.zpvar tracerflag .byte
|
.zpvar tracerflag .byte
|
||||||
.zpvar isInventory .byte
|
.zpvar isInventory .byte
|
||||||
.zpvar DifficultyLevel .byte
|
.zpvar DifficultyLevel .byte
|
||||||
@@ -146,7 +146,7 @@
|
|||||||
.zpvar RMT_Zero_Page_V .byte
|
.zpvar RMT_Zero_Page_V .byte
|
||||||
|
|
||||||
displayposition = modify
|
displayposition = modify
|
||||||
|
LineAddress4x4 = temp
|
||||||
|
|
||||||
;-------------------------------
|
;-------------------------------
|
||||||
|
|
||||||
|
|||||||
BIN
Binary file not shown.
+7
-3
@@ -1582,18 +1582,22 @@ end_found
|
|||||||
.proc TypeLine4x4 ;
|
.proc TypeLine4x4 ;
|
||||||
;-------------------------------
|
;-------------------------------
|
||||||
;this routine prints line ending with $ff
|
;this routine prints line ending with $ff
|
||||||
;address in LineAddress4x4
|
;address in LineAddress4x4 (it is the same as `temp`)
|
||||||
;starting from LineXdraw, LineYdraw
|
;starting from LineXdraw, LineYdraw
|
||||||
|
|
||||||
|
lda #1
|
||||||
|
|
||||||
|
staplot4x4color
|
||||||
|
sta plot4x4color
|
||||||
|
|
||||||
|
|
||||||
ldy #0
|
ldy #0
|
||||||
sty LineCharNr
|
sty LineCharNr
|
||||||
mva #1 plot4x4color
|
|
||||||
|
|
||||||
TypeLine4x4Loop
|
TypeLine4x4Loop
|
||||||
ldy LineCharNr
|
ldy LineCharNr
|
||||||
|
|
||||||
mwa LineAddress4x4 temp
|
;mwa LineAddress4x4 temp ; LineAddress4x4 === temp
|
||||||
lda (temp),y
|
lda (temp),y
|
||||||
cmp #$ff
|
cmp #$ff
|
||||||
beq EndOfTypeLine4x4
|
beq EndOfTypeLine4x4
|
||||||
|
|||||||
+23
@@ -2427,6 +2427,11 @@ InverseScreenByte
|
|||||||
mva #sfx_plasma_2_2 sfx_effect
|
mva #sfx_plasma_2_2 sfx_effect
|
||||||
|
|
||||||
; display text 4x4 - fuel full
|
; display text 4x4 - fuel full
|
||||||
|
|
||||||
|
mwa #hoverFull LineAddress4x4
|
||||||
|
mwa #((ScreenWidth/2)-((hoverFullEnd-hoverFull)*2)) LineXdraw ; centering
|
||||||
|
mva #4 LineYdraw
|
||||||
|
jsr TypeLine4x4
|
||||||
|
|
||||||
; TankNr in X reg.
|
; TankNr in X reg.
|
||||||
; now animate Up
|
; now animate Up
|
||||||
@@ -2465,6 +2470,12 @@ ReachSky
|
|||||||
jsr DrawTankRocketEngine
|
jsr DrawTankRocketEngine
|
||||||
|
|
||||||
; display text 4x4 - fuel full (clear text)
|
; display text 4x4 - fuel full (clear text)
|
||||||
|
mwa #hoverFull LineAddress4x4
|
||||||
|
mwa #((ScreenWidth/2)-((hoverFullEnd-hoverFull)*2)) LineXdraw ; centering
|
||||||
|
mva #4 LineYdraw
|
||||||
|
lda #0
|
||||||
|
jsr TypeLine4x4.staplot4x4color
|
||||||
|
|
||||||
|
|
||||||
; check keyboard/joy and move tank left/right - code copied from BeforeFire
|
; check keyboard/joy and move tank left/right - code copied from BeforeFire
|
||||||
;keyboard reading
|
;keyboard reading
|
||||||
@@ -2481,6 +2492,12 @@ KeyboardAndJoyCheck
|
|||||||
nop
|
nop
|
||||||
|
|
||||||
; display text 4x4 - low fuel
|
; display text 4x4 - low fuel
|
||||||
|
mwa #hoverEmpty LineAddress4x4
|
||||||
|
mwa #((ScreenWidth/2)-((hoverEmptyEnd-hoverEmpty)*2)) LineXdraw ; centering
|
||||||
|
mva #4 LineYdraw
|
||||||
|
;lda #0
|
||||||
|
jsr TypeLine4x4 ;.staplot4x4color
|
||||||
|
|
||||||
|
|
||||||
notpressed
|
notpressed
|
||||||
; let's animate "engine"
|
; let's animate "engine"
|
||||||
@@ -2736,6 +2753,12 @@ ItIsMe
|
|||||||
GoDown
|
GoDown
|
||||||
|
|
||||||
; display text 4x4 - low fuel (clear text)
|
; display text 4x4 - low fuel (clear text)
|
||||||
|
mwa #hoverEmpty LineAddress4x4
|
||||||
|
mwa #((ScreenWidth/2)-((hoverEmptyEnd-hoverEmpty)*2)) LineXdraw ; centering
|
||||||
|
mva #4 LineYdraw
|
||||||
|
lda #0
|
||||||
|
jsr TypeLine4x4.staplot4x4color
|
||||||
|
|
||||||
|
|
||||||
mwa #mountaintable temp
|
mwa #mountaintable temp
|
||||||
clc
|
clc
|
||||||
|
|||||||
Reference in New Issue
Block a user