Tolik-Trek/ZX-SP-ROMs
1
0
Fork 0
mirror of https://github.com/Tolik-Trek/ZX-SP-ROMs.git synced 2026-06-15 17:31:45 +03:00
Code Issues Actions Packages Projects Releases Wiki Activity

...

Browse Source
This commit is contained in:
Tolik 2024-07-12 02:22:56 +10:00
parent 698a864b04
commit 6d36e21c3c
2 changed files with 14 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Shared_Includes

@ -1 +1 @@
Subproject commit 04aaef8ac955971d913babd95921a62937b597ae Subproject commit 4f546cb1d2cd8eeb1aec0de2c3e9902d1bb52fee

26
TRDOS/TR_MSD_2.ASZ
View File

@ -415,9 +415,9 @@ KOMP_CONT2:
MSDOS_KOMP_ALL: MSDOS_KOMP_ALL:
LD A,(DE) LD A,(DE)
INC DE INC DE
CP 20H CP " "
JR Z,MSDOS_KOMP_ALL JR Z,MSDOS_KOMP_ALL
CP 13 CP "\r"
JR Z,KOMP_ERROR_NAME ; <20>…‚…<E2809A><E280A6>Ž… ˆŒŸ JR Z,KOMP_ERROR_NAME ; <20>…‚…<E2809A><E280A6>Ž… ˆŒŸ
DEC DE DEC DE
@ -426,11 +426,11 @@ MSDOS_KOMP_ALL:
RET NZ RET NZ
LD A,(DE) LD A,(DE)
CP '.' CP "."
JR Z,KOMP_POINT JR Z,KOMP_POINT
CP 13 CP "\r"
JR Z,KOMP_SPACING3 JR Z,KOMP_SPACING3
CP 20H CP " "
JR Z,KOMP_SPACING3 JR Z,KOMP_SPACING3
KOMP_ERROR_NAME: ; <20>…‚…<E2809A><E280A6>Ž… ˆŒŸ KOMP_ERROR_NAME: ; <20>…‚…<E2809A><E280A6>Ž… ˆŒŸ
LD A,1 LD A,1
@ -453,21 +453,21 @@ KOMP_POINT:
;**************************************************** ;****************************************************
KOMP_TX: KOMP_TX:
LD A,(DE) LD A,(DE)
CP 13 CP "\r"
JR Z,KOMP_SPACING JR Z,KOMP_SPACING
CP 20H CP " "
JR Z,KOMP_SPACING JR Z,KOMP_SPACING
CP '.' CP "."
JR Z,KOMP_SPACING JR Z,KOMP_SPACING
CP '?' CP "?"
JR Z,KOMP_EX_OK JR Z,KOMP_EX_OK
CP '*' CP "*"
JR Z,KOMP_EX_OK2 JR Z,KOMP_EX_OK2
CP 'a' CP "a"
JR C,KOMP_EXEC JR C,KOMP_EXEC
CP 'z'+1 CP "z"+1
JR NC,KOMP_EXEC JR NC,KOMP_EXEC
AND 223 AND %1101'1111
KOMP_EXEC: KOMP_EXEC:
CP (HL) CP (HL)
RET NZ ; ­¥â ᮢ¯ ¤¥­¨ï RET NZ ; ­¥â ᮢ¯ ¤¥­¨ï