-
Notifications
You must be signed in to change notification settings - Fork 0
/
5TH-CAKE.BAS
58 lines (56 loc) Β· 2.72 KB
/
5TH-CAKE.BAS
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
' IchigoJam 5th Anniversaty | IchigoCake BASIC+
' Copyright (c) 2019 Keiichi Shiga (BALLOON | FU-SEN)
' IchigoJam officially logo - CC BY IchigoJam http://ichigojam.net/ Licensed by jig.jp
' The MIT License (MIT) - https://mit.balloon.net.eu.org/#2019
POKE#1000,0,0,0,0,0,0,0,138,0,0,138,0,130,0,0,0
POKE#1010,0,0,138,0,0,0,0,0,0,0,0,0,0,0,0,0
POKE#1020,0,0,0,0,0,0,0,138,138,131,138,139,138,138,139,138
POKE#1030,139,0,138,138,139,130,135,135,133,0,0,0,0,0,0,0
POKE#1040,0,0,0,0,0,0,0,130,130,131,130,130,130,130,139,130
POKE#1050,131,130,131,130,131,129,129,129,129,0,0,0,0,0,0,0
POKE#1060,0,0,0,0,0,0,0,130,131,131,131,131,131,130,131,130
POKE#1070,131,131,131,131,131,131,131,131,129,0,0,0,0,0,0,0
POKE#1080,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
POKE#1090,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
POKE#10A0,0,0,0,0,0,143,143,143,143,143,143,143,143,143,143,0
POKE#10B0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
POKE#10C0,0,0,0,0,0,143,143,143,143,143,143,143,143,143,143,0
POKE#10D0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
POKE#10E0,0,0,0,0,0,143,143,0,0,0,0,0,0,0,0,0
POKE#10F0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
POKE#1100,0,0,0,0,0,143,143,0,0,0,0,0,0,0,0,0
POKE#1110,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
POKE#1120,0,0,0,0,0,143,143,143,143,143,143,143,143,0,0,0
POKE#1130,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
POKE#1140,0,0,0,0,0,143,143,143,143,143,143,143,143,0,0,0
POKE#1150,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
POKE#1160,0,0,0,0,0,0,0,0,0,0,0,0,0,143,143,0
POKE#1170,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
POKE#1180,0,0,0,0,0,0,0,0,0,0,0,0,0,143,143,0
POKE#1190,0,143,0,0,0,0,143,0,0,0,0,0,0,0,0,0
POKE#11A0,0,0,0,0,0,0,0,0,0,0,0,0,0,143,143,0
POKE#11B0,0,143,0,0,0,0,143,0,0,0,0,0,0,0,0,0
POKE#11C0,0,0,0,0,0,0,0,0,0,0,0,0,0,143,143,0
POKE#11D0,143,143,143,143,143,0,143,0,143,143,0,0,0,0,0,0
POKE#11E0,0,0,0,0,0,143,143,0,0,0,0,0,0,143,143,0
POKE#11F0,0,143,0,0,0,0,143,143,0,0,143,0,0,0,0,0
POKE#1200,0,0,0,0,0,143,143,0,0,0,0,0,0,143,143,0
POKE#1210,0,143,0,0,0,0,143,0,0,0,143,0,0,0,0,0
POKE#1220,0,0,0,0,0,0,0,143,143,143,143,143,143,0,0,0
POKE#1230,0,143,0,0,0,0,143,0,0,0,143,0,0,0,0,0
POKE#1240,0,0,0,0,0,0,0,143,143,143,143,143,143,0,0,0
POKE#1250,0,0,143,143,0,0,143,0,0,0,143,0,0,0,0,0
POKE#1260,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
POKE#1270,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
POKE#1280,134,131,132,0,0,0,0,0,0,130,0,0,0,0,0,0
POKE#1290,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
POKE#12A0,133,0,133,135,131,132,135,131,132,139,0,133,0,133,134,131
POKE#12B0,132,141,131,132,134,131,129,130,131,132,138,134,137,138,0,138
POKE#12C0,135,131,133,133,0,133,133,0,133,138,0,138,138,0,135,131
POKE#12D0,129,133,0,0,130,131,132,134,131,133,138,0,0,0,133,133
POKE#12E0,129,0,129,129,0,129,129,0,129,130,0,0,129,0,130,131
POKE#12F0,0,129,0,0,131,131,0,130,131,130,130,0,0,136,134,0
10 '5th Anniversary
20 R=RND(768)
30 COPY#900+R,#1000+R,1
40 GOTO 20