mirror of
https://github.com/Tolik-Trek/Estex-DSS.git
synced 2026-06-15 09:21:47 +03:00
20 lines
544 B
NASM
20 lines
544 B
NASM
//////////////////////////////////////////////////////////////////////
|
|
; ”ãªæ¨ï #3D. ‚뤥«¥¨¥ ¡«®ª ¯ ¬ïâ¨.
|
|
;
|
|
; ¢å®¤: B - à §¬¥à ¡«®ª ¢ áâà ¨æ å ¯® 16kB
|
|
; ¢ë室: A - ¨¤¥â¨ä¨ª â®à ¡«®ª ¯ ¬ïâ¨, ¥á«¨ CF=0
|
|
; A - ª®¤ ®è¨¡ª¨, ¥á«¨ CF=1
|
|
//////////////////////////////////////////////////////////////////////
|
|
GETMEM: LD C,BIOS.GetMem
|
|
RST ToBIOS
|
|
LD E,A
|
|
LD A,DSS_Error.sys.NOT_ENOUGH_MEMORY
|
|
RET C
|
|
LD D,#00
|
|
LD HL,MEMTAB ; ¬ áᨢ ᯨ᪠¢ë¤¥«. áâà ¨æ
|
|
ADD HL,DE
|
|
LD A,(TASK) ; ã஢¥ì ⥪ã饩 ¯à®£à ¬¬ë
|
|
LD (HL),A
|
|
LD A,E
|
|
;AND A
|
|
RET |