-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathFLAPPYCH.BAS
25 lines (25 loc) · 997 Bytes
/
FLAPPYCH.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
1000 CLS
1010 PRINT "LOADING CHARACTER SET"
1020 RESTORE
1030 FOR I=0 TO 31
1040 PRINT ".";
1050 READ D$
1060 DEFCHAR(192+I,D$)
1070 NEXT I
1080 PRINT:PRINT "DONE"
5000 DATA "000000030C10207C82","000000F028444A4A22"
5010 DATA "827C20180601000000","1E215E221CE0000000"
5020 DATA "000000030C10788482","C64438080601000000"
5030 DATA "000000030C10204040","7E8182844E39000000"
5040 DATA "0000000000000000FC","043434370404353535"
5050 DATA "040535353404053535","3404C4C4C400000000"
5060 DATA "000000000000070404","050505FC0405B5B5B4"
5070 DATA "04B5B5B50404B5B5B5","0404E5E5E500000000"
5080 DATA "1F1010131313F00000","999999000099999900"
5090 DATA "009999990000999999","000099999900000000"
5100 DATA "E0202020202020203F","A0A0AC2C2CA0A0AC2C"
5110 DATA "2CA0ACAC2C20A0ACAC","2C20ADADA100000000"
5120 DATA "191919191919191919","F8F8F8F8F8F8F8F8F8"
5130 DATA "FFFFC0C0CFCFFFFF00","FFFF0303FFFFFFFF00"
5140 DATA "00FFFFCFCFC0C0FFFF","00FFFFFFFF0303FFFF"
5150 DATA "000103070F1F3F7FFF","00FFFEFCF8F0E0C080"