mirror of
https://github.com/Tolik-Trek/Estex-DSS.git
synced 2026-06-15 17:31:47 +03:00
20 lines
516 B
NASM
20 lines
516 B
NASM
;///////////////////////////////////////////////////////////////////////
|
|
; ”ãªæ¨ï #54. ‚ë¡à âì ªâ¨¢ãî áâà ¨æã íªà .
|
|
;
|
|
; ¢å®¤: B - áâà ¨æ íªà 0/1
|
|
; ¢ë室: A - ª®¤ ®è¨¡ª¨, ¥á«¨ CF=1
|
|
;///////////////////////////////////////////////////////////////////////
|
|
SELPAGE:
|
|
LD A,(VMODE)
|
|
;BIT 7,A
|
|
CP %1000'0000
|
|
JR NC,.SEL2
|
|
PUSH BC
|
|
LD C,A
|
|
CALL SETVMOD.TEXT_M
|
|
POP BC
|
|
.SEL2: LD A,B
|
|
AND #01
|
|
OUT (SCREEN_SWITCH),A
|
|
RET
|
|
;/////////////////////////////////////////////////////////////////////// |