Pecus/scorch_src
1
0
Fork 0
mirror of https://github.com/Pecusx/scorch_src.git synced 2026-05-21 21:34:20 +02:00
Code Issues Packages Projects Releases 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
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