mirror of
https://github.com/Tolik-Trek/ZX-SP-ROMs.git
synced 2026-11-03 11:47:03 +03:00
...
This commit is contained in:
1 parent
09d50ef6e6
commit
03cdbeca7d
2 files changed
+14
-14
No files matched your search
+1
-1
Submodule Shared_Includes updated: 04aaef8ac9...4f546cb1d2.
+13
-13
@@ -415,9 +415,9 @@ KOMP_CONT2:
|
||||
MSDOS_KOMP_ALL:
|
||||
LD A,(DE)
|
||||
INC DE
|
||||
CP 20H
|
||||
CP " "
|
||||
JR Z,MSDOS_KOMP_ALL
|
||||
CP 13
|
||||
CP "\r"
|
||||
JR Z,KOMP_ERROR_NAME ; �…‚…��Ž… ˆŒŸ
|
||||
DEC DE
|
||||
|
||||
@@ -426,11 +426,11 @@ MSDOS_KOMP_ALL:
|
||||
RET NZ
|
||||
|
||||
LD A,(DE)
|
||||
CP '.'
|
||||
CP "."
|
||||
JR Z,KOMP_POINT
|
||||
CP 13
|
||||
CP "\r"
|
||||
JR Z,KOMP_SPACING3
|
||||
CP 20H
|
||||
CP " "
|
||||
JR Z,KOMP_SPACING3
|
||||
KOMP_ERROR_NAME: ; �…‚…��Ž… ˆŒŸ
|
||||
LD A,1
|
||||
@@ -453,21 +453,21 @@ KOMP_POINT:
|
||||
;****************************************************
|
||||
KOMP_TX:
|
||||
LD A,(DE)
|
||||
CP 13
|
||||
CP "\r"
|
||||
JR Z,KOMP_SPACING
|
||||
CP 20H
|
||||
CP " "
|
||||
JR Z,KOMP_SPACING
|
||||
CP '.'
|
||||
CP "."
|
||||
JR Z,KOMP_SPACING
|
||||
CP '?'
|
||||
CP "?"
|
||||
JR Z,KOMP_EX_OK
|
||||
CP '*'
|
||||
CP "*"
|
||||
JR Z,KOMP_EX_OK2
|
||||
CP 'a'
|
||||
CP "a"
|
||||
JR C,KOMP_EXEC
|
||||
CP 'z'+1
|
||||
CP "z"+1
|
||||
JR NC,KOMP_EXEC
|
||||
AND 223
|
||||
AND %1101'1111
|
||||
KOMP_EXEC:
|
||||
CP (HL)
|
||||
RET NZ ; ¥â ᮢ¯ ¤¥¨ï
|
||||
|
||||
Reference in new issue
Block a user