mirror of
https://github.com/Tolik-Trek/DOOM2.git
synced 2026-06-15 00:51:33 +03:00
Updated CLP
This commit is contained in:
parent
55de177565
commit
b7a1fb227f
16
D2_FRAM.asm
16
D2_FRAM.asm
@ -1974,18 +1974,16 @@ SAVE_PIC_PR:
|
||||
PUSH HL
|
||||
PUSH DE
|
||||
PUSH BC
|
||||
LD A,(FLAG)
|
||||
.flag+1: LD A,0
|
||||
AND A
|
||||
JR NZ,NO_SAVE
|
||||
|
||||
LD A,#FF
|
||||
LD (FLAG),A
|
||||
; A=0
|
||||
DEC A
|
||||
LD (.flag),A
|
||||
CALL SAVE_PIC
|
||||
LD A,0
|
||||
LD (FLAG),A
|
||||
NO_SAVE:
|
||||
|
||||
POP BC
|
||||
XOR A
|
||||
LD (.flag),A
|
||||
NO_SAVE: POP BC
|
||||
POP DE
|
||||
POP HL
|
||||
POP IX
|
||||
|
||||
23
DOOM2.asm
23
DOOM2.asm
@ -70,7 +70,7 @@ MIN_VER: ; 1.70.887
|
||||
org_addr EQU #8000+CLP_Buffer
|
||||
code_addr EQU BEGIN
|
||||
stack_point EQU #BFFF
|
||||
program_start EQU BEGIN
|
||||
program_start EQU START
|
||||
Loader_length EQU 0
|
||||
;-----------------------------------------------------------------------
|
||||
;
|
||||
@ -95,9 +95,17 @@ TABLE_W EQU #2000 ; ⥪
|
||||
;[]-------------------------------------------------------------------[]
|
||||
|
||||
|
||||
;[]-------------------------------------------------------------------[]
|
||||
BEGIN: BLOCK #8100-$,0 ;‚›<E2809A>€‚<E282AC>ˆ‚€<E2809A>ˆ…
|
||||
; âãâ ¢ëà ¢¨¢ ¨¥ 0 ¢ ¬« ¤è¥¬
|
||||
; ¡¨â¥ ¤à¥á
|
||||
TABLE_MAIN: DS 37 ; ¡ãä¥à ¯®¤ áâà ¨æë ä ©« resurses.res +1
|
||||
TABLE_PIC: DS 6
|
||||
;[]-------------------------------------------------------------------[]
|
||||
|
||||
|
||||
;[]-------------------------------------------------------------------[]
|
||||
BEGIN: DI
|
||||
START: DI
|
||||
LD (CMD_Line),IX ; á®åà ¨âì 㪠§ â¥«ì ¯ à ¬¥âàë § ¯ãáª
|
||||
CMD_Line+1:
|
||||
LD HL,#8080
|
||||
@ -340,7 +348,7 @@ SPSave2+1:
|
||||
;----------------------------------------------------------------------;
|
||||
;
|
||||
|
||||
FLAG: DB 0
|
||||
;FLAG: DB 0
|
||||
;SAVE_PORT_Y: DB 0
|
||||
;
|
||||
;
|
||||
@ -1008,15 +1016,6 @@ NEXT_HL_FFING:
|
||||
; RET
|
||||
*/
|
||||
|
||||
;***************************************
|
||||
BLOCK #8700-$,0 ;‚›<E2809A>€‚<E282AC>ˆ‚€<E2809A>ˆ…
|
||||
;!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
||||
; âãâ ¢ëà ¢¨¢ ¨¥ 0 ¢ ¬« ¤è¥¬
|
||||
; ¡¨â¥ ¤à¥á
|
||||
TABLE_MAIN: DS 37 ; ¡ãä¥à ¯®¤ áâà ¨æë ä ©« resurses.res +1
|
||||
TABLE_PIC: DS 6
|
||||
;!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
||||
|
||||
;-------[§ £à㧪 à¥áãàᮢ ¨£àë]--------
|
||||
Load_Resources:
|
||||
in a,(SLOT3)
|
||||
|
||||
@ -1 +1 @@
|
||||
Subproject commit e1dc7ec10dc9c7e9153a05884e42973a57378a63
|
||||
Subproject commit c1b96797e8d7872943c17d5e32565d19c7947349
|
||||
Loading…
Reference in New Issue
Block a user