ref
This commit is contained in:
parent
c8240c6c6b
commit
d0fa061800
@ -6,7 +6,7 @@
|
|||||||
;---------------------------------------------------------------
|
;---------------------------------------------------------------
|
||||||
;========================================================
|
;========================================================
|
||||||
SIZESEC EQU #0800
|
SIZESEC EQU #0800
|
||||||
PKTSIZE EQU 13
|
PKTSIZE EQU 12
|
||||||
RAM_ATAPI_PK EQU SYS_PAGE.SHARED_BUFFER_32b
|
RAM_ATAPI_PK EQU SYS_PAGE.SHARED_BUFFER_32b
|
||||||
RAM_ATAPI_READ EQU SYS_PAGE.SHARED_BUFFER_32b+16
|
RAM_ATAPI_READ EQU SYS_PAGE.SHARED_BUFFER_32b+16
|
||||||
|
|
||||||
|
|||||||
@ -180,8 +180,9 @@ LP_PRINT_AL1:
|
|||||||
|
|
||||||
LD A,SYS_PAGE
|
LD A,SYS_PAGE
|
||||||
OUT (SLOT3),A
|
OUT (SLOT3),A
|
||||||
CALL LP_END_P
|
JP LP_END_P
|
||||||
RET
|
;CALL LP_END_P
|
||||||
|
;RET
|
||||||
|
|
||||||
LP_PRINT_SYM:
|
LP_PRINT_SYM:
|
||||||
CALL LP_BEG_P
|
CALL LP_BEG_P
|
||||||
@ -207,8 +208,9 @@ LP_PRINT_SY1:
|
|||||||
|
|
||||||
LD A,SYS_PAGE
|
LD A,SYS_PAGE
|
||||||
OUT (SLOT3),A
|
OUT (SLOT3),A
|
||||||
CALL LP_END_P
|
JP LP_END_P
|
||||||
RET
|
;CALL LP_END_P
|
||||||
|
;RET
|
||||||
|
|
||||||
LP_PRINT_ATR:
|
LP_PRINT_ATR:
|
||||||
CALL LP_BEG_P
|
CALL LP_BEG_P
|
||||||
@ -240,9 +242,9 @@ LP_PRINT_AT1:
|
|||||||
|
|
||||||
LD A,SYS_PAGE
|
LD A,SYS_PAGE
|
||||||
OUT (SLOT3),A
|
OUT (SLOT3),A
|
||||||
CALL LP_END_P
|
JP LP_END_P
|
||||||
RET
|
;CALL LP_END_P
|
||||||
|
;RET
|
||||||
|
|
||||||
LP_PRINT_LINE:
|
LP_PRINT_LINE:
|
||||||
CALL LP_BEG_P
|
CALL LP_BEG_P
|
||||||
@ -281,8 +283,9 @@ LP_PRINT_LN1:
|
|||||||
|
|
||||||
LD A,SYS_PAGE
|
LD A,SYS_PAGE
|
||||||
OUT (SLOT3),A
|
OUT (SLOT3),A
|
||||||
CALL LP_END_P
|
JP LP_END_P
|
||||||
RET
|
;CALL LP_END_P
|
||||||
|
;RET
|
||||||
|
|
||||||
|
|
||||||
LP_PRINT_LINE2:
|
LP_PRINT_LINE2:
|
||||||
@ -312,8 +315,9 @@ LP_PRINT_LN2:
|
|||||||
|
|
||||||
LD A,SYS_PAGE
|
LD A,SYS_PAGE
|
||||||
OUT (SLOT3),A
|
OUT (SLOT3),A
|
||||||
CALL LP_END_P
|
JP LP_END_P
|
||||||
RET
|
;CALL LP_END_P
|
||||||
|
;RET
|
||||||
|
|
||||||
LP_PRINT_LINE3:
|
LP_PRINT_LINE3:
|
||||||
CALL LP_BEG_P
|
CALL LP_BEG_P
|
||||||
@ -359,8 +363,9 @@ LP_PR_L31:
|
|||||||
|
|
||||||
LD A,SYS_PAGE
|
LD A,SYS_PAGE
|
||||||
OUT (SLOT3),A
|
OUT (SLOT3),A
|
||||||
CALL LP_END_P
|
JP LP_END_P
|
||||||
RET
|
;CALL LP_END_P
|
||||||
|
;RET
|
||||||
|
|
||||||
|
|
||||||
LP_PRINT_LINE4:
|
LP_PRINT_LINE4:
|
||||||
@ -402,8 +407,9 @@ LP_PR_L41:
|
|||||||
|
|
||||||
LD A,SYS_PAGE
|
LD A,SYS_PAGE
|
||||||
OUT (SLOT3),A
|
OUT (SLOT3),A
|
||||||
CALL LP_END_P
|
JP LP_END_P
|
||||||
RET
|
;CALL LP_END_P
|
||||||
|
;RET
|
||||||
|
|
||||||
|
|
||||||
LP_PRINT_LINE5:
|
LP_PRINT_LINE5:
|
||||||
@ -449,8 +455,9 @@ LP_PRINT_LN5:
|
|||||||
LP_PR_L51:
|
LP_PR_L51:
|
||||||
LD A,SYS_PAGE
|
LD A,SYS_PAGE
|
||||||
OUT (SLOT3),A
|
OUT (SLOT3),A
|
||||||
CALL LP_END_P
|
JP LP_END_P
|
||||||
RET
|
;CALL LP_END_P
|
||||||
|
;RET
|
||||||
|
|
||||||
LP_PRINT_LINE6:
|
LP_PRINT_LINE6:
|
||||||
CALL LP_BEG_P
|
CALL LP_BEG_P
|
||||||
@ -488,8 +495,9 @@ LP_PRINT_LN6:
|
|||||||
LP_PR_L61:
|
LP_PR_L61:
|
||||||
LD A,SYS_PAGE
|
LD A,SYS_PAGE
|
||||||
OUT (SLOT3),A
|
OUT (SLOT3),A
|
||||||
CALL LP_END_P
|
JP LP_END_P
|
||||||
RET
|
;CALL LP_END_P
|
||||||
|
;RET
|
||||||
|
|
||||||
LP_PRINT_LINE_DIR:
|
LP_PRINT_LINE_DIR:
|
||||||
|
|
||||||
@ -546,8 +554,9 @@ LP_PRINT_LN_D1:
|
|||||||
LP_LN_DD1:
|
LP_LN_DD1:
|
||||||
LD A,SYS_PAGE
|
LD A,SYS_PAGE
|
||||||
OUT (SLOT3),A
|
OUT (SLOT3),A
|
||||||
CALL LP_END_P
|
JP LP_END_P
|
||||||
RET
|
;CALL LP_END_P
|
||||||
|
;RET
|
||||||
|
|
||||||
LP_PRINT_LN_D11:
|
LP_PRINT_LN_D11:
|
||||||
LD A,#50
|
LD A,#50
|
||||||
@ -641,8 +650,9 @@ LP_SET_PLACE: ; !!!!!
|
|||||||
CALL LP_BEG_P
|
CALL LP_BEG_P
|
||||||
CALL LP_AT_D
|
CALL LP_AT_D
|
||||||
CALL LP_TAB_E
|
CALL LP_TAB_E
|
||||||
CALL LP_END_P
|
JP LP_END_P
|
||||||
RET
|
;CALL LP_END_P
|
||||||
|
;RET
|
||||||
|
|
||||||
LP_GET_PLACE:
|
LP_GET_PLACE:
|
||||||
CALL LP_BEG_P
|
CALL LP_BEG_P
|
||||||
@ -650,23 +660,26 @@ LP_GET_PLACE:
|
|||||||
LD A,(SYS_PAGE.WIN_MAP_IX+WIN_H_BEG)
|
LD A,(SYS_PAGE.WIN_MAP_IX+WIN_H_BEG)
|
||||||
NEG
|
NEG
|
||||||
EXX
|
EXX
|
||||||
ADD A,D
|
ADD A,D
|
||||||
EXX
|
EXX
|
||||||
LD E,A
|
LD E,A
|
||||||
|
|
||||||
LD A,(SYS_PAGE.WIN_MAP_IX+WIN_V_BEG)
|
LD A,(SYS_PAGE.WIN_MAP_IX+WIN_V_BEG)
|
||||||
NEG
|
NEG
|
||||||
EXX
|
EXX
|
||||||
ADD A,L
|
ADD A,L
|
||||||
DEC A
|
DEC A
|
||||||
EXX
|
EXX
|
||||||
RRCA
|
RRCA
|
||||||
RRCA
|
RRCA
|
||||||
AND #3F
|
AND #3F
|
||||||
LD D,A
|
LD D,A
|
||||||
|
;!TEST cursor
|
||||||
CALL LP_END_P
|
JP LP_END_P2
|
||||||
RET
|
;CALL LP_END_P2
|
||||||
|
;AND A
|
||||||
|
;RET
|
||||||
|
;
|
||||||
|
|
||||||
;*********************************************
|
;*********************************************
|
||||||
|
|
||||||
@ -722,8 +735,9 @@ LP_CLS_L1:
|
|||||||
|
|
||||||
CALL LP_AT_D
|
CALL LP_AT_D
|
||||||
CALL LP_TAB_E
|
CALL LP_TAB_E
|
||||||
CALL LP_END_P
|
JP LP_END_P
|
||||||
RET
|
;CALL LP_END_P
|
||||||
|
;RET
|
||||||
|
|
||||||
;*******************************************************
|
;*******************************************************
|
||||||
;
|
;
|
||||||
@ -732,7 +746,6 @@ LP_CLS_L1:
|
|||||||
; 1 - ver size
|
; 1 - ver size
|
||||||
; 2 - hor place
|
; 2 - hor place
|
||||||
; 3 - ver place
|
; 3 - ver place
|
||||||
|
|
||||||
LP_SIZE: ; ®¯à¥¤¥«¥¨¥ size
|
LP_SIZE: ; ®¯à¥¤¥«¥¨¥ size
|
||||||
LP_OPEN_PG
|
LP_OPEN_PG
|
||||||
LD DE,(SYS_PAGE.WIN_MAP_IX+WIN_SIZE_H)
|
LD DE,(SYS_PAGE.WIN_MAP_IX+WIN_SIZE_H)
|
||||||
@ -843,14 +856,14 @@ LP_NEXT_HL1:
|
|||||||
LP_BEG_P:
|
LP_BEG_P:
|
||||||
EX AF,AF'
|
EX AF,AF'
|
||||||
EXX
|
EXX
|
||||||
LP_OPEN_PG
|
LP_OPEN_PG
|
||||||
LD HL,(SYS_PAGE.WIN_MAP_IX+WIN_HL)
|
LD HL,(SYS_PAGE.WIN_MAP_IX+WIN_HL)
|
||||||
LD DE,(SYS_PAGE.WIN_MAP_IX+WIN_DE)
|
LD DE,(SYS_PAGE.WIN_MAP_IX+WIN_DE)
|
||||||
LD BC,(SYS_PAGE.WIN_MAP_IX+WIN_BC)
|
LD BC,(SYS_PAGE.WIN_MAP_IX+WIN_BC)
|
||||||
LD A,E
|
LD A,E
|
||||||
AND A
|
AND A
|
||||||
RRA
|
RRA
|
||||||
OUT (PORT_Y),A
|
OUT (PORT_Y),A
|
||||||
EXX
|
EXX
|
||||||
EX AF,AF'
|
EX AF,AF'
|
||||||
RET
|
RET
|
||||||
@ -935,7 +948,6 @@ LP_INI_L1:
|
|||||||
EX AF,AF'
|
EX AF,AF'
|
||||||
LD A,(SYS_PAGE.COPY_SLOT1)
|
LD A,(SYS_PAGE.COPY_SLOT1)
|
||||||
OUT (SLOT1),A
|
OUT (SLOT1),A
|
||||||
|
|
||||||
RET
|
RET
|
||||||
|
|
||||||
LP_INI_P:
|
LP_INI_P:
|
||||||
@ -996,13 +1008,12 @@ LP_INI_40:
|
|||||||
LP_END_P: ; !!!!! ®¦¨¤ ¥âáï, çâ® ¯®àâïâáï ⮫쪮 «ìâ¥à â¨¢ë¥ à¥£¨áâàë ¨ â¥, çâ® ª ª ¯ à ¬¥âàë ¢å®¤¥
|
LP_END_P: ; !!!!! ®¦¨¤ ¥âáï, çâ® ¯®àâïâáï ⮫쪮 «ìâ¥à â¨¢ë¥ à¥£¨áâàë ¨ â¥, çâ® ª ª ¯ à ¬¥âàë ¢å®¤¥
|
||||||
EX AF,AF'
|
EX AF,AF'
|
||||||
EXX
|
EXX
|
||||||
RLA
|
RLA
|
||||||
LD E,A
|
LD E,A
|
||||||
LD (SYS_PAGE.WIN_MAP_IX+WIN_HL),HL ; ¬¥áâ® ¯¥ç â¨
|
LD (SYS_PAGE.WIN_MAP_IX+WIN_HL),HL ; ¬¥áâ® ¯¥ç â¨
|
||||||
LD (SYS_PAGE.WIN_MAP_IX+WIN_DE),DE
|
LD (SYS_PAGE.WIN_MAP_IX+WIN_DE),DE
|
||||||
LD (SYS_PAGE.WIN_MAP_IX+WIN_BC),BC
|
LD (SYS_PAGE.WIN_MAP_IX+WIN_BC),BC
|
||||||
|
LP_CLOSE_PG
|
||||||
LP_CLOSE_PG
|
|
||||||
EXX
|
EXX
|
||||||
EX AF,AF'
|
EX AF,AF'
|
||||||
AND A
|
AND A
|
||||||
@ -1014,6 +1025,7 @@ LP_END_P2:
|
|||||||
LP_CLOSE_PG
|
LP_CLOSE_PG
|
||||||
EXX
|
EXX
|
||||||
EX AF,AF'
|
EX AF,AF'
|
||||||
|
AND A
|
||||||
RET
|
RET
|
||||||
|
|
||||||
;********************************************************
|
;********************************************************
|
||||||
@ -1325,7 +1337,6 @@ LP_EXIT_MODE:
|
|||||||
LD A,SYS_PAGE
|
LD A,SYS_PAGE
|
||||||
OUT (SLOT3),A
|
OUT (SLOT3),A
|
||||||
EX AF,AF'
|
EX AF,AF'
|
||||||
|
|
||||||
RET
|
RET
|
||||||
|
|
||||||
; “áâ ®¢ª ०¨¬ «¨¨¨
|
; “áâ ®¢ª ०¨¬ «¨¨¨
|
||||||
@ -1425,7 +1436,6 @@ LP_EXIT_MODE2:
|
|||||||
|
|
||||||
LD (IX+WIN_WORK_1),B
|
LD (IX+WIN_WORK_1),B
|
||||||
LD (IX+WIN_WORK_2),A
|
LD (IX+WIN_WORK_2),A
|
||||||
|
|
||||||
RET
|
RET
|
||||||
|
|
||||||
|
|
||||||
@ -1532,7 +1542,6 @@ LP_EXIT_MODE3:
|
|||||||
LD A,(IX+WIN_WORK_1)
|
LD A,(IX+WIN_WORK_1)
|
||||||
ADD A,8
|
ADD A,8
|
||||||
LD (IX+WIN_WORK_1),A
|
LD (IX+WIN_WORK_1),A
|
||||||
|
|
||||||
RET
|
RET
|
||||||
|
|
||||||
LP_GR_640:
|
LP_GR_640:
|
||||||
@ -1819,8 +1828,9 @@ WIN_PUT_SYM:
|
|||||||
LD A,SYS_PAGE
|
LD A,SYS_PAGE
|
||||||
OUT (SLOT3),A
|
OUT (SLOT3),A
|
||||||
|
|
||||||
CALL LP_END_P
|
JP LP_END_P
|
||||||
RET
|
;CALL LP_END_P
|
||||||
|
;RET
|
||||||
|
|
||||||
; HL - à §¬¥à ®ª
|
; HL - à §¬¥à ®ª
|
||||||
; DE - ¯®«®¦¥¨¥ ®ª
|
; DE - ¯®«®¦¥¨¥ ®ª
|
||||||
@ -1916,9 +1926,9 @@ WIN_COPY_WIN1:
|
|||||||
POP AF
|
POP AF
|
||||||
OUT (SLOT1),A
|
OUT (SLOT1),A
|
||||||
|
|
||||||
CALL LP_END_P2
|
JP LP_END_P2
|
||||||
AND A
|
;AND A
|
||||||
RET
|
;RET
|
||||||
|
|
||||||
|
|
||||||
; HL - à §¬¥à á®åà 塞®£® ®ª
|
; HL - à §¬¥à á®åà 塞®£® ®ª
|
||||||
@ -1985,10 +1995,10 @@ LP_REST_L1:
|
|||||||
|
|
||||||
POP AF
|
POP AF
|
||||||
OUT (SLOT1),A
|
OUT (SLOT1),A
|
||||||
|
JP LP_END_P2
|
||||||
CALL LP_END_P2
|
;CALL LP_END_P2
|
||||||
AND A
|
;AND A
|
||||||
RET
|
;RET
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user