File tree Expand file tree Collapse file tree
Expand file tree Collapse file tree Original file line number Diff line number Diff line change @@ -14,8 +14,10 @@ SAVE_CODE:
1414 LOCAL ROM_SAVE
1515 LOCAL __ERR_EMPTY
1616 LOCAL SAVE_STOP
17-
18- ROM_SAVE EQU 0970h
17+
18+ #ifdef __ENABLE_BREAK__
19+ ROM_SAVE EQU 0970h
20+ #endif
1921 MEMBOT EQU 23698 ; Use the CALC mem to store header
2022
2123 pop hl ; Return address
@@ -90,5 +92,54 @@ SAVE_CONT:
9092SAVE_STOP:
9193 pop ix
9294 jp __STOP
95+
96+ #ifndef __ENABLE_BREAK__
97+ LOCAL CHAN_OPEN
98+ LOCAL PO_MSG
99+ LOCAL WAIT_KEY
100+ LOCAL SA_BYTES
101+
102+ CHAN_OPEN EQU 1601h
103+ PO_MSG EQU 0C0Ah
104+ WAIT_KEY EQU 15D4h
105+ SA_BYTES EQU 04C6h
106+
107+ ROM_SAVE:
108+
109+ push hl
110+ ld a , 0FDh
111+ call CHAN_OPEN
112+ xor a
113+ ld de , 09A1h
114+ call PO_MSG
115+ set 5 , (iy + 02h )
116+ call WAIT_KEY
117+ push ix
118+ ld de , 0011h
119+ ld a , r
120+ push af
121+ xor a
122+ call SA_BYTES
123+
124+ pop ix
125+ ld b , 32h
126+
127+ LOCAL SA_1_SEC
128+ SA_1_SEC:
129+ halt
130+ djnz SA_1_SEC
131+
132+ ld e , (ix + 0Bh )
133+ ld d , (ix + 0Ch )
134+ ld a , 0FFh
135+ pop ix
136+ call SA_BYTES
137+
138+ pop af
139+ ret po
140+ ei
141+ ret
142+
143+ #endif
93144
94145 ENDP
You can’t perform that action at this time.
0 commit comments