-
Notifications
You must be signed in to change notification settings - Fork 1
/
Copy pathpg1fx.a80
61 lines (49 loc) · 1.54 KB
/
pg1fx.a80
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
device zxspectrum128
org #C000
define isFX 1
display "Composing bank ",/D,isFX
@_fxpage = #11
@_fxpage_start
;;-----------------------------------------------------------------------------
; Every part is defined with this descriptor:
;
; fx_demopart: incbin "demo-part-folder/final.pak"
; .pg = _fxpage ; current fx 128k page
; ; (set bit.7 to just ldir given length, not decompress)
; .sync = 1234 ; some constant to sync with part passed in DE
; .length ; optional when data transfer (ldir) needed
fx_micka: incbin "priskocmicka/final.pak"
.pg = _fxpage
.sync = 766
display "'priskocmicka' part length: ",/D,($-fx_micka)
fx_grinder: incbin "grinder/final.pak"
.pg = _fxpage
.sync = 1340
display "'grinder' part length: ",/D,($-fx_grinder)
lookupTables = #D800
;;-----------------------------------------------------------------------------
if $ > lookupTables
display "Too long! ",/D,($-lookupTables)," bytes out!"
end
else
display /D,(lookupTables-$)," bytes free in bank ",/D,isFX
endif
org lookupTables
include "grinder/lookups.a80"
align 16384,0
savebin "bank1",(_fxpage_start),$-(_fxpage_start)
;;-----------------------------------------------------------------------------
; Every part descriptor values should be exported:
;
; export fx_demopart
; export fx_demopart.pg
; export fx_demopart.sync
export fx_micka
export fx_micka.pg
export fx_micka.sync
export fx_grinder
export fx_grinder.pg
export fx_grinder.sync
export sinusTabs
export finalTabs
export vramTabs