#11 Article 116 Posted at 1987/05/07 23:36:39 by SHINOBU (MAP055) [PRG.CHA]
Subject: ﾁｬｲ･ﾛｰﾀﾞｰ FM (ﾏｼﾝｺﾞ ﾌﾞﾌﾞﾝ)
10 FOR I=&H6000 TO &H60FF STEP 16
20 READ A$
30 FOR X=0 TO 15:POKE I+X,VAL("&H"+MID$(A$,X*2+1,2))
40 NEXT X,I:END
1000 DATA2002202D8E0000AF8D00F28608A78D00
1010 DATAEE1A5086FD1F8B8D38308D0065CEFC82
1020 DATAC67EA680A7C05A26F90F054F1F8B1CAF
1030 DATA391A5086FD1F8B8D18308D0045CEFC82
1040 DATAC67BA680A7C05A26F90F054F1F8B1CAF
1050 DATA3996052BFC8680970596052AFC390000
1060 DATA00000000000000000000000000000000
1070 DATA00000000000000000000000000000000
1080 DATA00003F0F09001F002B210093D38F90AE
1090 DATA8C6B338CEFC60634046F8CEE648CE424
1100 DATA036A8CE67DD409A6C04CA18C522B33A0
1110 DATA8C4D3402E68C48A68CD04869845A26FA
1120 DATA3001C608E78C3835025F81082B058008
1130 DATA5C20F75D270C3402A68CAFA7805A26FB
1140 DATA35024D270CE68CA25869846A8C114A26
1150 DATAF77FD40935045A269EAF8C0139000008