mirror of
https://github.com/romychs/OK240.2-Firmware.git
synced 2026-04-21 10:53:18 +03:00
refactoring
This commit is contained in:
parent
5dee7d555c
commit
e54099e44a
@ -15,7 +15,6 @@
|
||||
|
||||
OUTPUT mon_E000.bin
|
||||
|
||||
|
||||
MODULE MONITOR
|
||||
|
||||
ORG 0xe000
|
||||
@ -366,6 +365,7 @@ l_wait_colon:
|
||||
LD L, A
|
||||
CALL read_hex_serial
|
||||
LD C, E
|
||||
|
||||
l_next_byte:
|
||||
CALL read_hex_serial
|
||||
LD (HL), A
|
||||
@ -376,6 +376,7 @@ l_next_byte:
|
||||
JP NZ, reset_m_stack
|
||||
JP l_wait_colon
|
||||
; read and ignore final 4 hex bytes in las
|
||||
|
||||
l_exit:
|
||||
CALL read_hex_serial
|
||||
CALL read_hex_serial
|
||||
@ -447,6 +448,7 @@ x_reg_found:
|
||||
x_wreg:
|
||||
CALL get_a_ref_sp
|
||||
RET
|
||||
|
||||
x_ret:
|
||||
CALL get_a_ref_sp
|
||||
x_next_reg:
|
||||
@ -1504,7 +1506,7 @@ m2_lf:
|
||||
INC E
|
||||
DEC C
|
||||
JP NZ, .cas_l7
|
||||
LD A,0x0
|
||||
LD A, 0
|
||||
OUT (SYS_DD17PB), A
|
||||
RET
|
||||
|
||||
|
||||
Loading…
Reference in New Issue
Block a user