First letter in name bugfix and better Start+Option :)

This commit is contained in:
Pecusx
2022-08-24 20:55:17 +02:00
parent abb0bc52fb
commit 378fae3361
3 changed files with 7 additions and 5 deletions
+4 -4
View File
@@ -577,10 +577,10 @@ RoboTanks
lda kbcode lda kbcode
cmp #28 ; ESC cmp #28 ; ESC
bne @+ bne @+
jsr AreYouSure jsr AreYouSure
bit escFlag @ lda escFlag
spl:rts seq:rts ; keys Esc or O
@
jmp AfterManualShooting jmp AfterManualShooting
BIN
View File
Binary file not shown.
+3 -1
View File
@@ -1111,7 +1111,9 @@ LastNameChar
lda #$80 ; place cursor on the end lda #$80 ; place cursor on the end
sta NameAdr,y sta NameAdr,y
dey dey
sty PositionInName bpl @+
iny ; if old name is empty or first time entering
@ sty PositionInName
CheckKeys CheckKeys