optimization

This commit is contained in:
boykovra 2024-08-29 12:19:37 +03:00
parent 5fb3ff48fa
commit 4535de201a
5 changed files with 9 additions and 8 deletions

View File

@ -23,7 +23,7 @@ EPRINT
DSS_EXEC DSS_PCHARS
LD HL, WCOMMON.LINE_END
DSS_EXEC DSS_PCHARS
POP BC ; clear add from stack
POP BC ; clear addr from stack
DSS_EXEC 0x0200+DSS_EXIT ; and exit
; ------------------------------------------------------

View File

@ -513,4 +513,4 @@ RS_BUFF
ENDMODULE
END
ENDIF

View File

@ -55,7 +55,7 @@ ISA_OPEN
LD A, 0x11
OUT (C), A
ISA_SLOT EQU $+1
LD A,0x00
LD A, 0x00
SLA A
OR A, 0xD4 ; D4 - ISA1, D6 - ISA2
LD BC, PAGE3

View File

@ -165,9 +165,10 @@ CHK_ERROR
.MSG_ERR_UPT
DB "Unknown TFTP packet received!",0
; Buffer for UDP datagram with TFTP payload
; Length of TFTP packet
TFTF_PACKET_LEN
DW 0
; Buffer for UDP datagram with TFTP payload
TFTP_BUFF
DS 516,0

View File

@ -205,11 +205,11 @@ GET_SRV_PARAMS
.GSNP_NXT
INC HL
LD A,(HL)
CP A,'/' ; end slash
CP '/' ; end slash
JR Z,.GSN_EN
CP A,'0'
CP '0'
JP M,.GSN_EPN
CP A,0x3A ; >'9'?
CP 0x3A ; >'9'?
JP P,.GSN_EPN
LD (DE),A
INC DE
@ -555,4 +555,4 @@ TMP_BUFF EQU WIFI.RS_BUFF + RS_BUFF_SIZE
END MAIN.START
END ;MAIN.START