This commit is contained in:
Anatoliy Belyanskiy committed 2023-08-03 00:17:40 +10:00
1 parent 1f599b0a0c
commit 5edf364e91
2 files changed
+10 -7

No files matched your search

+9 -6
View File
@@ -1837,19 +1837,22 @@ WIN_PUT_SYM: ; DE -
CALL LP_END_P
RET
WIN_MOVE_WIN: ; HL - à §¬¥à ®ª­ 
; DE - ¯®«®¦¥­¨¥ ®ª­ 
AND A ; A - ­®¬¥à ®ª­ 
SCF ; IX - ­®¢®¥ ¯®«®¦¥­¨¥ ®ª­ 
; HL - à §¬¥à ®ª­ 
; DE - ¯®«®¦¥­¨¥ ®ª­ 
; A - ­®¬¥à ®ª­ 
; IX - ­®¢®¥ ¯®«®¦¥­¨¥ ®ª­ 
WIN_MOVE_WIN:
AND A
SCF
RET NZ
PUSH IX
PUSH HL
LD B,0FFH
LD B,0FFH ;!HARDCODE SHARED_PAGE
LD IX,0C000H
CALL WIN_COPY_WIN1
POP HL
POP DE
LD B,0FFH
LD B,0FFH ;!HARDCODE SHARED_PAGE
LD IX,0C000H
CALL WIN_REST_WIN1
AND A