izaya/collapseos
1
0
Fork 0
mirror of https://github.com/hsoft/collapseos.git synced 2025-04-04 13:38:39 +11:00
Code Issues Releases Wiki Activity

Better explanation and layout

Browse Source
This commit is contained in:
Clanmaster21 2019-10-13 18:34:46 +01:00 committed by GitHub
parent 4185650ce1
commit f871ea671e
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 15 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
apps/ed/cmd.asm
View File

@ -89,8 +89,11 @@ cmdParse:
jr z, .dot
cp '$'
jr z, .eof
add a, 0xc6 ; inline parseDecimalDigit
sub 0xf6
; inline parseDecimalDigit
add a, 0xc6 ; maps '0'-'9' onto 0xf6-0xff
sub 0xf6 ; maps to 0-9 and carries if not a digit
jr c, .notHandled
; straight number
ld a, ABSOLUTE
@ -122,8 +125,11 @@ cmdParse:
inc hl ; advance cmd cursor
ld a, (hl)
ld de, 1 ; if .pmNoSuffix
add a, 0xc6 ; Inline parseDecimalDigit
sub 0xf6
; inline parseDecimalDigit
add a, 0xc6 ; maps '0'-'9' onto 0xf6-0xff
sub 0xf6 ; maps to 0-9 and carries if not a digit
jr c, .pmNoSuffix
call .parseDecimalM ; --> DE
.pmNoSuffix:
@ -151,8 +157,11 @@ cmdParse:
.loop:
inc hl
ld a, (hl)
add a, 0xc6 ; Inline parseDecimalDigit
sub 0xf6
; inline parseDecimalDigit
add a, 0xc6 ; maps '0'-'9' onto 0xf6-0xff
sub 0xf6 ; maps to 0-9 and carries if not a digit
jr nc, .loop
; We're at the first non-digit char. Let's save it because we're going
; to temporarily replace it with a null.