diff --git a/constants.asm b/constants.asm index fbbb01e..f6455cb 100644 --- a/constants.asm +++ b/constants.asm @@ -423,7 +423,7 @@ WeaponUnits .by 3 ;Battery________ .by 0 ;Bal_Guidance___ .by 0 ;Horz_Guidance__ - .by 5 ;Floating_Tank__ + .by 2 ;Floating_Tank__ .by 0 ;Lazy_Boy_______ .by 3 ;Parachute______ .by 2 ;StrongParachute diff --git a/definitions.asm b/definitions.asm index 91094b4..9594628 100644 --- a/definitions.asm +++ b/definitions.asm @@ -93,7 +93,7 @@ price_White_Flag_____ = $0 ;_48_($30) price_Battery________ = 300 ;_49 price_Bal_Guidance___ = $ffff ;_50 price_Horz_Guidance__ = $ffff ;_51 -price_Floating_Tank__ = 20 ;_52 +price_Floating_Tank__ = 352 ;_52 price_Lazy_Boy_______ = $ffff ;_53 price_Parachute______ = 234 ;_54 price_StrongParachute = 1000 ;_55 diff --git a/grafproc.asm b/grafproc.asm index fe2ae1c..0b7dd6d 100644 --- a/grafproc.asm +++ b/grafproc.asm @@ -983,7 +983,7 @@ ToHighToParachute jsr plot inw xdraw ; plot 6 random color pixels - mva #6 FloatingAlt ; sorry reuse! + mva #6 temp @ lda Erase eor #%00000001 and random @@ -991,7 +991,7 @@ ToHighToParachute sta color jsr plot inw xdraw - dec FloatingAlt + dec temp bne @- ; clear last pixel under tank mva #0 color diff --git a/scorch.xex b/scorch.xex index e16e705..24baa43 100644 Binary files a/scorch.xex and b/scorch.xex differ diff --git a/weapons.asm b/weapons.asm index 8f074ad..eeba2c8 100644 --- a/weapons.asm +++ b/weapons.asm @@ -2438,7 +2438,10 @@ StoreMaxAlt mwa #hoverFull LineAddress4x4 mwa #((ScreenWidth/2)-((hoverFullEnd-hoverFull)*2)) LineXdraw ; centering - mva #4 LineYdraw + sec + lda FloatingAlt + sbc #12 + sta LineYdraw jsr TypeLine4x4 ldx TankNr @@ -2482,7 +2485,10 @@ ReachSky ; display text 4x4 - fuel full (clear text) mwa #hoverFull LineAddress4x4 mwa #((ScreenWidth/2)-((hoverFullEnd-hoverFull)*2)) LineXdraw ; centering - mva #4 LineYdraw + sec + lda FloatingAlt + sbc #12 + sta LineYdraw lda #0 jsr TypeLine4x4.staplot4x4color ldx TankNr @@ -2504,7 +2510,10 @@ KeyboardAndJoyCheck ; display text 4x4 - low fuel mwa #hoverEmpty LineAddress4x4 mwa #((ScreenWidth/2)-((hoverEmptyEnd-hoverEmpty)*2)) LineXdraw ; centering - mva #4 LineYdraw + sec + lda FloatingAlt + sbc #12 + sta LineYdraw ;lda #0 jsr TypeLine4x4 ;.staplot4x4color ldx TankNr @@ -2617,6 +2626,16 @@ NoLEdge jmp KeyboardAndJoyCheck pressedSpace + ; display text 4x4 - low fuel (clear text) + mwa #hoverEmpty LineAddress4x4 + mwa #((ScreenWidth/2)-((hoverEmptyEnd-hoverEmpty)*2)) LineXdraw ; centering + sec + lda FloatingAlt + sbc #12 + sta LineYdraw + lda #0 + jsr TypeLine4x4.staplot4x4color + ldx TankNr ;================================= ; left or right from center of screen ? ldy #0 @@ -2713,14 +2732,6 @@ ItIsMe sta XtankstableL,x GoDown - ; 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 - ldx TankNr - mwa #mountaintable temp clc lda temp