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

2026-05-21 06:39:40 +02:00 · 2022-08-24 20:55:17 +02:00
parent abb0bc52fb
commit 378fae3361
3 changed files with 7 additions and 5 deletions
@@ -577,10 +577,10 @@ RoboTanks
    lda kbcode
    cmp #28  ; ESC
    bne @+
-      jsr AreYouSure
-      bit escFlag
-	  spl:rts
-@
+    jsr AreYouSure
+@	lda escFlag
+    seq:rts		; keys Esc or O
+

    jmp AfterManualShooting

@@ -1111,7 +1111,9 @@ LastNameChar
    lda #$80 ; place cursor on the end
    sta NameAdr,y
 	dey
-    sty PositionInName
+	bpl @+
+	iny	; if old name is empty or first time entering
+@   sty PositionInName


 CheckKeys