mirror of
https://github.com/Pecusx/scorch_src.git
synced 2026-05-20 22:33:43 +02:00
hovercraft erase optymiz
This commit is contained in:
BIN
Binary file not shown.
+26
-18
@@ -2629,25 +2629,33 @@ TankOnRightSide
|
||||
TankOnLeftSide
|
||||
sty FloatingAlt ; I know, not elegant byt this variable it's free now (0 go right, $ff go left)
|
||||
; now we have direction of bypassing tanks on screen
|
||||
|
||||
; clear "engine pixels" under tank
|
||||
lda XtankstableL,x
|
||||
sta xdraw
|
||||
lda XtankstableH,x
|
||||
sta xdraw+1
|
||||
clc
|
||||
lda Ytankstable,x
|
||||
adc #1
|
||||
sta ydraw
|
||||
mva #0 ydraw+1
|
||||
sta color
|
||||
; draw horizontal line
|
||||
mva #8 temp
|
||||
@
|
||||
jsr plot
|
||||
inw xdraw
|
||||
dec temp
|
||||
bne @-
|
||||
ldx TankNr
|
||||
mva #1 erase
|
||||
jsr drawTankNr
|
||||
inc ytanksTable,x
|
||||
mva #0 erase
|
||||
jsr drawTankNr
|
||||
|
||||
|
||||
; lda XtankstableL,x
|
||||
; sta xdraw
|
||||
; lda XtankstableH,x
|
||||
; sta xdraw+1
|
||||
; clc
|
||||
; lda Ytankstable,x
|
||||
; adc #1
|
||||
; sta ydraw
|
||||
; mva #0 ydraw+1
|
||||
; sta color
|
||||
; ; draw horizontal line
|
||||
; mva #8 temp
|
||||
;@
|
||||
; jsr plot
|
||||
; inw xdraw
|
||||
; dec temp
|
||||
; bne @-
|
||||
; ldx TankNr
|
||||
; first check if we over any tank
|
||||
; Warning! in xdraw wird we have position of floating tank (after DrawTankNr)
|
||||
CheckForTanksBelow
|
||||
|
||||
Reference in New Issue
Block a user