@@ -160,17 +160,9 @@ ft_load_slide:
160160@Done:
161161 jsr ft_limit_note
162162 sta var_ch_Note, x
163-
164- ; FDS scratch write padding: guard $9000-9003
165- padjmp $8FFC , $9003 , .defined(USE_ALL) && .defined(PACKAGE)
166-
167163 sta var_ch_EchoBuffer, x ;;; ;; ;
168164 jsr ft_translate_freq_only
169165 lda var_ch_TimerPeriodLo, x
170-
171- ; FDS scratch write padding: guard $9010
172- padjmp $900D , $9010 , .defined(USE_ALL) && .defined(PACKAGE)
173-
174166 sta var_ch_PortaToLo, x
175167 lda var_ch_TimerPeriodHi, x
176168 sta var_ch_PortaToHi, x
@@ -187,10 +179,6 @@ ft_load_slide:
187179 pla
188180 sta var_ch_TimerPeriodLo, x
189181 ; change mode to sliding
190-
191- ; FDS scratch write padding: guard $9030
192- padjmp $902D , $9030 , .defined(USE_ALL) && .defined(PACKAGE)
193-
194182 clc
195183 lda var_ch_Effect, x
196184 adc #01
@@ -203,10 +191,6 @@ ft_load_slide:
203191 lda #EFF_SLIDE_DOWN
204192 jmp :++
205193: lda #EFF_SLIDE_UP
206-
207- ; FDS scratch write padding: guard $9000-$9003
208- padjmp $8FFB , $9003 , .defined(USE_ALL) && (.not .defined(PACKAGE))
209-
210194:
211195.endif
212196 sta var_ch_Effect, x
@@ -215,10 +199,6 @@ ft_load_slide:
215199 lda ft_channel_type, x ;;; ;; ;
216200.if .defined(USE_N163)
217201 cpx #CHAN_N163
218-
219- ; FDS scratch write padding: guard $9010
220- padjmp $900C , $9010 , .defined(USE_ALL) && (.not .defined(PACKAGE))
221-
222202 beq @Invert
223203.endif
224204 cpx #CHAN_NOI
@@ -229,20 +209,33 @@ ft_load_slide:
229209 beq :+
230210 lda #EFF_SLIDE_UP
231211 sta var_ch_Effect, x
232- : lda #EFF_SLIDE_DOWN
212+
213+ ; FDS scratch write padding: guard $9000-9003
214+ padjmp $8FFB , $9003 , .defined(USE_ALL) && .defined(PACKAGE)
215+
216+ : lda #EFF_SLIDE_DOWN
233217 sta var_ch_Effect, x
234218:
235219
236- ; FDS scratch write padding
237- jmppad {jmp ft_jump_to_effect }, $9028 , $9030 , .defined(USE_ALL) && (.not .defined(PACKAGE))
220+
221+ ; FDS scratch write padding: guard $9000-$9003
222+ jmppad {jmp ft_jump_to_effect }, $8FF8 , $9003 , .defined(USE_ALL) && !.defined(PACKAGE)
238223
239224; see CChannelHandler::CalculatePeriod()
225+
226+ ; FDS scratch write padding: guard $9010
227+ padnop $900C , $9010 , .defined(USE_ALL) && .defined(PACKAGE)
228+
240229ft_calc_period:
241230
242231 ; Load period
243232 lda var_ch_TimerPeriodLo, x
244233 sta var_ch_PeriodCalcLo, x
245234 lda var_ch_TimerPeriodHi, x
235+
236+ ; FDS scratch write padding: guard $9010
237+ padjmp $900D , $9010 , .defined(USE_ALL) && !.defined(PACKAGE)
238+
246239 sta var_ch_PeriodCalcHi, x
247240
248241.if .defined(USE_VRC7)
@@ -254,9 +247,17 @@ ft_calc_period:
254247 lda ft_channel_type, x
255248 cmp #CHAN_VRC7
256249 bne :+
250+
251+ ; FDS scratch write padding: guard $9030
252+ padjmp $902B , $9030 , .defined(USE_ALL) && .defined(PACKAGE)
253+
257254 lsr var_ch_PeriodCalcHi, x
258255 ror var_ch_PeriodCalcLo, x
259256 lsr var_ch_PeriodCalcHi, x
257+
258+ ; FDS scratch write padding: guard $9030
259+ padjmp $902B , $9030 , .defined(USE_ALL) && !.defined(PACKAGE)
260+
260261 ror var_ch_PeriodCalcLo, x
261262:
262263.endif
0 commit comments