Subversion Repositories pentevo

Rev

Rev 831 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
803 savelij 1 
 
1186 savelij 2 
; LAST UPDATE: 13.02.2025 savelij
803 savelij 3 
 
4 
        TITLE "pack main menu"
5 
 
1186 savelij 6 
        PHASE 0
803 savelij 7 
                JP $
8 
 
1186 savelij 9 
                DB 0x0008-$ DUP 0xFF
803 savelij 10 
                JP $
11 
 
1186 savelij 12 
                DB 0x0010-$ DUP 0xFF
803 savelij 13 
                JP $
14 
 
1186 savelij 15 
                DB ADR_SEL_ROM-$ DUP 0xFF
16 
                OUT (C),A                       ; 0014
803 savelij 17 
                NOP
18 
                RET
19 
 
1186 savelij 20 
                DB 0x0018-$ DUP 0xFF
803 savelij 21 
                JP $
22 
 
1186 savelij 23 
                DB 0x0020-$ DUP 0xFF
803 savelij 24 
                JP $
25 
 
1186 savelij 26 
                DB 0x0028-$ DUP 0xFF
803 savelij 27 
                JP $
28 
 
1186 savelij 29 
                DB 0x0030-$ DUP 0xFF
803 savelij 30 
                JP CALL2PAGE
31 
 
1186 savelij 32 
                DB 0x0038-$ DUP 0xFF
803 savelij 33 
                EI
34 
                RET
35 
 
1186 savelij 36 
                DB 0x0040-$ DUP 0xFF
803 savelij 37 
                JP UNP_MAINMENU
38 
 
1186 savelij 39 
                DB 0x0080-$ DUP 0xFF
803 savelij 40 
                include ../../dec40.a80
41 
 
1186 savelij 42 
                DB 0x00FF-$ DUP 0xFF
43 
                DW 0x0038
803 savelij 44 
 
45 
UNP_MAINMENU    PUSH BC
46 
                LD HL,.LOADADR
47 
                CALL UNPACK
48 
                POP BC
49 
                XOR A
50 
                JP ADR_SEL_ROM
51 
 
52 
.LOADADR
53 
        IFDEF DOS_FE
54 
                binclude ../../mainmenu/main_fe_pack.rom
55 
        ELSE
56 
                binclude ../../mainmenu/main_pack.rom
57 
        ENDIF
58 
 
1186 savelij 59 
FREE_MAINMENU   EQU 0x3FF6-$
831 savelij 60 
 
1186 savelij 61 
        PHASE $&0x3FFF
62 
                DB FREE_MAINMENU DUP 0xFF
63 
                DW FREE_MAINMENU                ; ᢮
803 savelij 64 
                DB "MNMENU"
65 
                DW DATA_VERS
1186 savelij 66 
        DEPHASE