#11 Article 894 Posted at 1988/01/15 01:19:11 by ｱﾙﾙｶﾝ (MAP475) [PRG.NL3]
Subject: GR FOR FM7
1 ' SAVE"GR"
2 CLEAR 300,&H5FFF:AD=&H6000
3 READ A$:IF A$="END" THEN SAVEM"gr.",&H6000,AD-1,&H6000:END
4 FOR I=1 TO LEN(A$) STEP 2:POKE AD,VAL("&H"+MID$(A$,I,2)):AD=AD+1:NEXT
5 GOTO 3
6 DATA 7E60297E60457E61137E61E07E62AA7E62C67E62580000000000000000000000
7 DATA 000000000000000000B66019B76420B6601AB76421B6601BB76422B66015F660
8 DATA 16BD639539B66019B76420B6601AB76421B6601BB764228601B7601F4FF66015
9 DATA 3406F66017A3E1240A3406CC0000A3E170601FFD60214F5849FD60258601B760
10 DATA 204FF660163406F66018A3E1240A3406CC0000A3E1706020F760244F5849FD60
11 DATA 2710B360252436B66015F660161F01CC0000B3602110BE602131211E013436BD
12 DATA 63953536BB601F1E01F360272B0A1E01FB60201E01B36025313F26DF39B66015
13 DATA F660161F01CC0000B3602310BE602331211E013436BD63953536FB60201E01F3
14 DATA 60252B0A1E01BB601F1E01B36027313F26DF39B66019B76420B6601AB76421B6
15 DATA 601BB76422B66015F660168E64921F138D1F1700A47D03132613341011A3E127
16 DATA 0F8D198D4F8D2F8D1F8D3A20E87F031339ED818C6C9226038E649239ECC11183
17 DATA 6C922603CE649239C00125088D3427048DDF8D655C394C81A024088D2527048D
18 DATA D08D564A395CC16424088D1627048DC18D474A39800125088D0827048DB38D39
19 DATA 4C393456BD62EDB6634DB1601C2612B6634EB1601D260AB6634FB1601E260235
20 DATA D6B6634DB16019260EB6634EB1601A2606B6634FB1601B35D63456BD639535D6
21 DATA B66019B76420B6601AB76421B6601BB76422C601B66017B060152402C6FFF760
22 DATA 1FC601B66018B060162402C6FFF76020F66016B660157D031326393406BD62ED
23 DATA B6634DB1601C2615B6634EB1601D260DB6634FB1601E2605ECE4BD63953506B1
24 DATA 60172705BB601F20CDF160182705FB602020C0397F031339B66019B76420B660
25 DATA 1AB76421B6601BB76422C601B66017B060152402C6FFF7601FC601B66018B060
26 DATA 162402C6FFF76020F66016B660153406BD63953506B160172705BB601F20EFF1
27 DATA 60182705FB602020E239B66015F66016BD62EDB6634DB76019B6634EB7601AB6
28 DATA 634FB7601B39B660198D14B76019B6601A8D0CB7601AB6601B8D04B7601B396F
29 DATA E2C6084424026CE45A26F83582341686A03D1F01E6E4543ABF6371863FB7635A
30 DATA 8E63509DDE8E6367A6E44425208D0FB7634D8D0AB7634E8D05B7634F3596A680
31 DATA 84F03402A68044444444AAE0398D0FB7634D8D0AB7634E8D05B7634F3596A680
32 DATA 484848483402A680840FAAE03900000011006358003D003D00003F59414D4155
33 DATA 43484993D39590000000000000B6D4098E0000A684E68850FDD38FA6894000E6
34 DATA 894050FDD391A6898000E6898050FDD393FDD40939341686A03D1F01E6E4543A
35 DATA BF6444A6E444253C860FB76449B76453B7645FB7646CB76479B76486B664208D
36 DATA 1AFD643AB664218D12FD643CB664228D0AFD643E8E64239DDE35961F8984F058
37 DATA 5858583986F0B76449B76453B7645FB7646CB76479B76486B664208D1AFD643A
38 DATA B664218D12FD643CB664228D0AFD643E8E64239DDE35961F8944444444C40F39
39 DATA 0000001000642B0067006700003F59414D415543484993D39590000000000000
40 DATA B6D4098E0000A6848400BAD38FA784A688508400BAD390A78850A68940008400
41 DATA BAD391A7894000A68940508400BAD392A7894050A68980008400BAD393A78980
42 DATA 00A68980508400BAD394A7898050B7D40939,END