mirror of
https://github.com/Pecusx/scorch_src.git
synced 2026-05-20 22:33:43 +02:00
Faster status line updates after AI uses defensives
This commit is contained in:
@@ -242,7 +242,7 @@ LowBatteries
|
|||||||
sta ActiveDefenceWeapon,x
|
sta ActiveDefenceWeapon,x
|
||||||
jsr PutTankNr ; and draw tank witch Flag
|
jsr PutTankNr ; and draw tank witch Flag
|
||||||
EnoughEnergy
|
EnoughEnergy
|
||||||
jsr DisplayStatus.DisplayEnergy
|
; jsr DisplayStatus.DisplayEnergy ; not necessary - status update after othher defensives
|
||||||
rts
|
rts
|
||||||
.endp
|
.endp
|
||||||
;
|
;
|
||||||
@@ -276,37 +276,9 @@ NoBatteries
|
|||||||
; but not allways
|
; but not allways
|
||||||
randomize 1 3
|
randomize 1 3
|
||||||
cmp #1
|
cmp #1
|
||||||
bne NoUseDefensive
|
bne UseBattery.NoBatteries ; nearest RTS
|
||||||
; first check check if any is in use
|
; now use defensive like Tosser
|
||||||
lda ActiveDefenceWeapon,x
|
jmp TosserDefensives
|
||||||
bne DefensiveInUse
|
|
||||||
ldy #last_real_defensive+1 ;the last defensive weapon
|
|
||||||
@
|
|
||||||
dey
|
|
||||||
cpy #ind_Hovercraft ;first defensive weapon (White Flag, Battery and Hovercraft - never use)
|
|
||||||
beq NoUseDefensive
|
|
||||||
lda (temp),y ; has address of TanksWeaponsTable
|
|
||||||
beq @-
|
|
||||||
; decrease in inventory
|
|
||||||
sec
|
|
||||||
sbc #1
|
|
||||||
sta (temp),y ; has address of TanksWeaponsTable
|
|
||||||
; activate defensive weapon
|
|
||||||
tya ; number of selectet defensive weapon
|
|
||||||
sta ActiveDefenceWeapon,x
|
|
||||||
lda DefensiveEnergy,y
|
|
||||||
sta ShieldEnergy,x
|
|
||||||
NoUseDefensive
|
|
||||||
DefensiveInUse
|
|
||||||
rts
|
|
||||||
.endp
|
|
||||||
;----------------------------------------------
|
|
||||||
.proc Tosser
|
|
||||||
jsr UseBatteryOrFlag
|
|
||||||
; use best defensive :)
|
|
||||||
jsr TosserDefensives
|
|
||||||
; Toosser is like Poolshark but allways uses defensives
|
|
||||||
jmp Poolshark.firstShoot
|
|
||||||
.endp
|
.endp
|
||||||
;----------------------------------------------
|
;----------------------------------------------
|
||||||
.proc TosserDefensives
|
.proc TosserDefensives
|
||||||
@@ -333,9 +305,20 @@ DefensiveInUse
|
|||||||
sta ShieldEnergy,x
|
sta ShieldEnergy,x
|
||||||
DefensiveInUse
|
DefensiveInUse
|
||||||
NoUseDefensive
|
NoUseDefensive
|
||||||
|
DefensiveStatusLine
|
||||||
|
; update status line
|
||||||
|
jsr DisplayStatus
|
||||||
rts
|
rts
|
||||||
.endp
|
.endp
|
||||||
;----------------------------------------------
|
;----------------------------------------------
|
||||||
|
.proc Tosser
|
||||||
|
jsr UseBatteryOrFlag
|
||||||
|
; use best defensive :)
|
||||||
|
jsr TosserDefensives
|
||||||
|
; Toosser is like Poolshark but allways uses defensives
|
||||||
|
jmp Poolshark.firstShoot
|
||||||
|
.endp
|
||||||
|
;----------------------------------------------
|
||||||
.proc Chooser
|
.proc Chooser
|
||||||
; like cyborg but more randomizing force
|
; like cyborg but more randomizing force
|
||||||
jsr UseBatteryOrFlag
|
jsr UseBatteryOrFlag
|
||||||
|
|||||||
BIN
Binary file not shown.
BIN
Binary file not shown.
Binary file not shown.
Reference in New Issue
Block a user