starred/scorch_src
1
0
Fork 0
mirror of https://github.com/pkali/scorch_src.git synced 2026-05-20 22:34:21 +02:00
Code Issues 29 Packages Projects Releases 10 Wiki Activity

RoboTank indicator on status line

Browse Source
This commit is contained in:
Pecusx
2023-05-02 17:56:22 +02:00
parent b83e4f7169
commit 74df612e67
5 changed files with 31 additions and 29 deletions
Download Patch File Download Diff File Expand all files Collapse all files
scorch.asm
+1 -1
View File
@@ -737,7 +737,7 @@ CheckNextTankAD
lda TankStatusColoursTable,x
sta COLOR2 ; set color of status line
jsr PutTankNameOnScreen
jsr DisplayStatus
; jsr DisplayStatus ; There is no need anymore, it is always after PutTankNameOnScreen
lda SkillTable,x
beq ManualShooting
scorch.bin
BIN
View File
Binary file not shown.
scorch.xex
BIN
View File
Binary file not shown.
textproc.asm
+28 -26
View File
@@ -2030,6 +2030,34 @@ EndOfCredits
rts
.endp
;-------------------------------------------------
.proc PutTankNameOnScreen
;-------------------------------------------------
; puts name of the tank on the screen
ldy #$00
; lda TankNr
txa ; TankNr in X !
asl
asl
asl ; 8 chars per name
tax
NextChar02
lda tanksnames,x
sta statusBuffer+7,y
inx
iny
cpy #$08
bne NextChar02
; memory !!!!
ldx TankNr
ldy #$5e ; Computer symbol
lda SkillTable,x
bne ThisIsAI
ldy #$0a ; Joystick symbol
ThisIsAI
sty statusBuffer+16
; rts
.endp
;-------------------------------------------------
.proc DisplayStatus
;-------------------------------------------------
@@ -2242,32 +2270,6 @@ AngleDisplay
rts
.endp
;-------------------------------------------------
.proc PutTankNameOnScreen
; puts name of the tank on the screen
ldy #$00
lda TankNr
asl
asl
asl ; 8 chars per name
tax
NextChar02
lda tanksnames,x
sta statusBuffer+7,y
inx
iny
cpy #$08
bne NextChar02
; memory !!!!
; ldx TankNr
; ldy #$5e ; Computer symbol
; lda SkillTable,x
; bne ThisIsAI
; ldy #$0a ; Joystick symbol
;ThisIsAI
; sty statusBuffer+16
rts
.endp
;-------------------------------------------------
.proc RoundOverSprites
; fill sprites with bytes
ldy numberOfPlayers
weapons.asm
+2 -2
View File
@@ -1082,8 +1082,8 @@ ContinueToCheckMaxForce2
sta ForceTableL,x
@
mva #0 Erase
jsr DisplayStatus ;all digital values like force, angle, wind, etc.
jsr PutTankNameOnScreen
; jsr DisplayStatus ; There is no need anymore, it is always after PutTankNameOnScreen
jsr DrawTankNr
@@ -2534,7 +2534,7 @@ SpyHardEnd
lda TankStatusColoursTable,x
sta COLOR2 ; set color of status line
jsr PutTankNameOnScreen
jsr DisplayStatus
; jsr DisplayStatus ; There is no need anymore, it is always after PutTankNameOnScreen
rts
.endp
; -------------------------------------------------