-
Notifications
You must be signed in to change notification settings - Fork 3
/
decor.p8
70 lines (66 loc) · 2.8 KB
/
decor.p8
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
62
63
64
65
66
67
68
69
70
; Decor on title screen
decor {
; char data
ubyte[] sidebar = [
$61, $20, $20, $20, $20, $20, $20, $20, $20,
$61, $13, $03, $0F, $12, $05, $40, $43, $6E,
$61, $4A, $43, $B0, $B0, $B0, $B0, $B0, $4B,
$61, $0C, $09, $16, $05, $13, $40, $43, $6E,
$61, $4A, $43, $43, $43, $43, $40, $B3, $4B,
$61, $13, $14, $01, $07, $05, $40, $43, $6E,
$61, $4A, $43, $43, $43, $40, $B0, $B1, $4B,
$61, $20, $20, $20, $20, $20, $20, $20, $20,
$61, $20, $20, $20, $20, $20, $20, $20, $20,
$61, $20, $20, $20, $20, $20, $20, $20, $20,
$61, $20, $20, $20, $20, $20, $20, $20, $20,
$61, $20, $20, $20, $20, $2E, $20, $20, $20,
$61, $20, $20, $20, $7B, $6C, $20, $20, $20,
$61, $20, $20, $6A, $75, $76, $74, $20, $2E,
$61, $2E, $20, $76, $74, $6A, $75, $20, $20,
$61, $20, $20, $E1, $E9, $DF, $61, $20, $20,
$61, $6A, $20, $F5, $A0, $A0, $F6, $2E, $74,
$61, $6A, $E9, $C7, $FC, $FE, $C8, $DF, $74,
$61, $6A, $D4, $C7, $CC, $FA, $C8, $D9, $74,
$61, $6A, $D4, $C7, $C0, $C0, $C8, $D9, $74,
$61, $6A, $69, $7C, $7E, $7C, $7E, $5F, $74,
$61, $20, $20, $67, $20, $20, $65, $20, $2E,
$61, $20, $2E, $76, $74, $6A, $75, $20, $20,
$61, $20, $20, $E1, $61, $76, $61, $20, $20,
$61, $20, $20, $20, $20, $2E, $20, $20, $20 ]
; color data
ubyte[] sidebar_col = [
$0C, $0F, $0F, $0F, $0F, $0F, $0F, $0F, $0F,
$0C, $07, $07, $07, $07, $07, $0F, $0F, $0F,
$0C, $0F, $0F, $01, $01, $01, $01, $01, $0F,
$0C, $0E, $0E, $0E, $0E, $0E, $0F, $0F, $0F,
$0C, $0F, $0F, $0F, $0F, $0F, $0F, $01, $0F,
$0C, $0D, $0D, $0D, $0D, $0D, $0F, $0F, $0F,
$0C, $0F, $0F, $0F, $0F, $0F, $01, $01, $0F,
$0C, $0F, $0F, $0F, $0F, $0F, $0F, $0F, $0F,
$0C, $0F, $0F, $0F, $0F, $0F, $0F, $0F, $0F,
$0C, $0F, $0F, $0F, $0F, $0F, $0F, $0F, $0F,
$0C, $0F, $0F, $0F, $0F, $0F, $0F, $0F, $0F,
$0C, $00, $00, $00, $00, $0D, $00, $00, $00,
$0C, $00, $00, $00, $0A, $02, $00, $00, $00,
$0C, $00, $00, $0C, $0A, $02, $0B, $00, $08,
$0C, $03, $00, $0C, $0A, $02, $0B, $00, $00,
$0C, $00, $00, $0C, $01, $0C, $0B, $00, $00,
$0C, $01, $00, $0C, $01, $0C, $0B, $09, $0F,
$0C, $0F, $0A, $0C, $0A, $02, $0B, $02, $0C,
$0C, $0F, $0A, $0C, $0A, $02, $0B, $02, $0C,
$0C, $0F, $0A, $0C, $0F, $0C, $0B, $02, $0C,
$0C, $0F, $0A, $0C, $0A, $02, $0B, $02, $0C,
$0C, $00, $00, $0D, $0E, $0E, $03, $00, $08,
$0C, $00, $0C, $0D, $03, $0D, $03, $00, $00,
$0C, $00, $00, $0D, $03, $0D, $03, $00, $00,
$0C, $00, $00, $00, $00, $02, $00, $00, $00 ]
const ubyte WDT = 9
const ubyte HGT = 25
sub draw() {
ubyte i
for i in 0 to (WDT*HGT - 1) {
txt.setcc( base.RBORDER+1 + (i % WDT), base.UBORDER + (i/WDT),
sidebar[i], sidebar_col[i] )
}
}
}