22 lines
326 B
ArmAsm
22 lines
326 B
ArmAsm
// #LAYOUT# STD * #TAKE
|
|
// #LAYOUT# * BASIC_0 #TAKE
|
|
// #LAYOUT# * * #IGNORE
|
|
|
|
//
|
|
// Tries to convert PETSCII in .A to a digit (0-9 values), sets Carry to indicate failure
|
|
//
|
|
|
|
convert_PETSCII_to_digit:
|
|
|
|
sec
|
|
sbc #$30
|
|
bcc convert_PETSCII_to_digit_fail
|
|
|
|
cmp #$0A
|
|
rts
|
|
|
|
convert_PETSCII_to_digit_fail:
|
|
|
|
sec
|
|
rts
|