Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2024-06-26 00:29:29 +00:00
Code Issues Projects Releases Wiki Activity

peasant: load_save, fix unnecessary setting bits high

Browse Source 
did weird things to the load/save menu
This commit is contained in:
Vince Weaver 2021-11-17 13:59:32 -05:00
parent 9b37d1c6e2
commit f5c549c165
1 changed files with 8 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
games/peasant/loadsave_menu.s
View File

@ -48,9 +48,10 @@ common_menu:
update_save_loop: update_save_loop:
;====================== ;======================
; print points ; print points
;======================
ldy #0 ldy #0
@ -63,11 +64,11 @@ usl_hundreds:
inc usl_leading_zero_smc+1 inc usl_leading_zero_smc+1
clc clc
adc #'0'+$80 adc #'0' ; convert to ascii
bne usl_print_hundreds ; bra bne usl_print_hundreds ; bra
usl_no_hundreds: usl_no_hundreds:
lda #' '+$80 lda #' ' ; no leading 0
usl_print_hundreds: usl_print_hundreds:
sta (OUTL),Y sta (OUTL),Y
@ -87,11 +88,11 @@ usl_leading_zero_smc:
beq usl_no_tens beq usl_no_tens
usl_go_tens: usl_go_tens:
adc #'0'+$80 adc #'0' ; convert to ASCII
bne usl_print_tens ; bra bne usl_print_tens ; bra
usl_no_tens: usl_no_tens:
lda #' '+$80 lda #' ' ; no leading 0
usl_print_tens: usl_print_tens:
sta (OUTL),Y sta (OUTL),Y
@ -103,7 +104,7 @@ usl_ones:
and #$f and #$f
clc clc
adc #'0'+$80 adc #'0' ; convert to ascii
sta (OUTL),Y sta (OUTL),Y
; move to text line ; move to text line
@ -121,7 +122,7 @@ usl_ones:
; clear out the old name ; clear out the old name
ldy #25 ldy #25
lda #' '+$80 lda #' ' ; clear to space
save_memset: save_memset:
sta (OUTL),Y sta (OUTL),Y
dey dey