decrease activated defensives #26

textproc.asm

@@ -780,6 +780,16 @@ invSelectDef
     tay
     ldx tankNr
     sta ActiveDefenceWeapon,x
+    ; decrease number of defensives
+    lda TanksWeaponsTableL,x
+    sta weaponPointer
+    lda TanksWeaponsTableH,x
+    sta weaponPointer+1
+    lda (weaponPointer),y
+    sec
+    sbc #1
+    sta (weaponPointer),y
+    
     lda DefensiveEnergy,y
     sta ShieldEnergy,x
     rts

variables.asm

@@ -49,7 +49,7 @@ moneyH ;we place zero at the end of prices and money
     ;and have range from 0 to 99990 (not too much)
     ;money players have (maybe one more byte is needed?)
     .DS [MaxPlayers]
-moneyL 
+moneyL
     .DS [MaxPlayers]
 ;----------------------------------------------------
 gainH ;how much money player gets after the round