Better Hovercraft text and good price :)

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

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            

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

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