diff --git a/scorch.xex b/scorch.xex index 505843b..4114ed9 100644 Binary files a/scorch.xex and b/scorch.xex differ diff --git a/textproc.asm b/textproc.asm index 29881f5..401c2d0 100644 --- a/textproc.asm +++ b/textproc.asm @@ -785,6 +785,16 @@ invSelectDef lda IndexesOfWeaponsL2,y tay ldx tankNr + cmp #ind_White_Flag_____ + bne NotWhiteFlag + cmp ActiveDefenceWeapon,x + bne NoDeactivateWhiteFlag + lda #$00 ; if try to activate activated White Flag then deactivate Defence + sta ActiveDefenceWeapon,x + sta ShieldEnergy,x + beq DefActivationEnd +NotWhiteFlag +NoDeactivateWhiteFlag sta ActiveDefenceWeapon,x ; decrease number of defensives lda TanksWeaponsTableL,x @@ -798,6 +808,7 @@ invSelectDef lda DefensiveEnergy,y sta ShieldEnergy,x +DefActivationEnd jmp WaitForKeyRelease ; rts .endp diff --git a/weapons.asm b/weapons.asm index 4fe0d41..277dd14 100644 --- a/weapons.asm +++ b/weapons.asm @@ -1046,6 +1046,11 @@ notpressed cmp #$0d ; I bne @+ callInventory + ; Hide all tanks - after inventory they may have other shapes + mva #1 Erase + jsr DrawTanks + mva #0 Erase + ; mva #$ff isInventory jsr Purchase mva #0 escFlag