#10 Article 440 Posted at 1989/04/21 09:13:33 by MX (MAP632) [LEMON]
Subject: レモンエンジェル・黄昏ロンリー
こんにちは、ＭＸです。またもやＲＢＢＳでＢＡＳＩＣの演奏プログラムを見つ
けたので転載します。アニメと言うか、まぁメイプルにはファンが沢山いるだろう
と思いまして・・・。でもＣＱＦのなんとかと言うのはたぶんＰＣ－ＶＡＮのＩＤ
だと思いますので、すでに聞かれた方もいらっしゃるかもしれません。転載元は、
４３８．９８ＭｈｚのＪＳ１ＣＹＩ－１：ＲＢＢＳです。
ではではいきますよの。
番号_容量__________________表題____________________読_日付_発信者_宛(To)_転送__
91 5194 PDS>ﾀｿｶﾞﾚﾛﾝﾘｰ (ﾚﾓﾝｴﾝｼﾞｪﾙ) [ 3]0419 JG7AWI MUSIC JPN
書込人 : JG7AWI 転送元BBS : JH0ZHW
書込日時 : 890417/1817
転送経路 : JS1CYI<JF1OMT<JF1FGE<JK1PZM<JA1WOI<JA1WOI<JH0EXA<JH0ZHW
MsgId: 17524_JH0ZHW
こんにちは。新潟市のＪＧ７ＡＷＩ／０です。
だいぶ前に作った曲ですが、まだ＠ＪＰＮで流していなかったので、流してみます。
特に関東地方の方で聞いた方がありましたら、感想などよろしくね。
ｄｅ ＪＧ７ＡＷＩ／０ ＠ＪＨ０ＺＨＷ CREAMY.ISHIKAWA
-------------------------------------------------------------------------------
1 '｢ﾀｿｶﾞﾚ ﾛﾝﾘｰ｣ song by ｻｸﾗｲ ﾄﾓ (ﾚﾓﾝｴﾝｼﾞｪﾙ)
2 ' MUSIC PROGRAM for MZ-2500 (PC-8801FH ﾖｳ ﾆ PLAY ﾌﾞﾝ ﾉ ｶｸﾁｮｳ ｶﾞ ﾋﾂﾖｳ ﾃﾞｽ)
3 ' programed by CQF26265 CREAMY.I (CALLSIGN:JG7AWI/0 S.ISHIKAWA @JH0ZHW)
4 ' *** FMｵﾝｹﾞﾝ ﾉ ｵﾝｼｮｸ ﾊ PC88ｼﾘｰｽﾞ ﾄ ｵﾅｼﾞ ﾃﾞｽ ***
5 '
6 ' ﾁｮｯﾄ ﾌﾙｲｹﾄﾞ ... 6ｼﾞｶﾝ ﾌﾞｯﾂﾂﾞｹ ﾃﾞ ﾌﾟﾛｸﾞﾗﾑ ｼﾏｼﾀ｡
7 '
100 DR1$="C8C8C8C8C8C8C8Q8C16C16Q3"
110 D1$="O5L16ED+EF+G+F+G+ABA+B>C+DC+DD+"
120 DR2$="RCRCRCRQ8C8C8Q3"
130 A1$="O5A4>C4<A4>C4<A4>C4<BA4."
140 B1$="O5E4A4E4A4E4A4EE4."
150 DR3$="RCRCRCRQ8C8C16C16Q3"
160 C1$="G4D4G4D4G4B4>D<BG4"
170 B2$="D4G4D4G4DD4DD4."
180 DR4$="CCCCCCC6C6C6"
190 DR5$="RCRCQ8C8C8C8C8R8Y6,250C8Y6,150C8Y6,2Q3"
200 C2$="A4E4A4E4FFFER2"
210 A2$="V12@40O6REEEEDC<BA8.A16>CE4R4."
220 B3$="V10@29O6R1R2L16RAG+A>E8C8"
230 C3$="O3A4>C4E4C4<A4>C4<B4A4"
240 A4$="RDDDDC<BAG8.G16B>D4R4."
250 B4$="O6L8B1R2L16RGF+G>D8<B8"
260 C4$="O3G4B4>D4<B4G4B4A4G4"
270 D2$="RCRCRCRCRCRCRCRC"
280 E2$="RFRFRFRFRFRFRFRF"
290 B5$="REG+B>D<B>CDEDC<B&B2"
300 D3$="RBRBRBRBRBRBRBRB"
310 E3$="RERERERERERERERE"
320 A5$="D4.<B>C4DE&E2R4<B>C"
330 C5$="D4D4EE4<AA4E4A4A4"
340 DR6$="RCC8CC8RCRC"
350 D4$="G1&G2<G4>F4"
360 E4$="E1&E<E>CDECEG"
370 DR7$="L8C4C4C4C4CCCCCCCQ8C16C16Q3L4"
380 C6$="E4E4E4E4EEEEEEEE16E16"
390 A6$="<A2RRAB>C2RRCD"
400 A7$="E2B4A4E2RREE"
410 A8$="D+2RRD+EF+2<B4>B4"
420 D5$="RD+RD+RD+RD+RD+RD+RD+RD+"
430 E5$="RBRBRBRBBBBBR2"
440 C7$="O3A4E4A4E4A4E4>C<AE4"
450 A9$="C2RRE4D2<B4G4"
460 C8$="F4A4>C4<A4G4G4R2"
470 DR8$="RCRCC8C8C8C8C8"
480 '
490 play init:C=1
500 play "T150V10L8","T150V10L8","T150@4V10L8"
510 play ,,,"T150Q7V12","T150Q7V12L8","T150S0M1500Y7,28Y6,2O4L4Q3"
520 play ,,,,,"Q8{CCC}8Q4C4"
530 play "O5V8@11CRCRCRCR","O4V8@11ARARARAR","O4E4E4E4E4",,,"CCCC"
540 play "<BBBBBBBB16B16","G+G+G+G+G+G+G+G+16G+16","EEEEEEEE16E16",D1$,,DR1$
550 play A1$,B1$,"O3A4E4A4E4A4>C4EC<A4","L8E1&E2DC4.","O6C1&C2<BA4.",DR2$
560 play "G4B4G4B4AA4AG4.",B2$,C1$,"<B1&B4>D4C<B4.","G1&G4B4AG4.",DR3$
570 play "R4F4A4B4>C4R4<B6A6G6","R1R2E6E6E6","F4R2.R4F4G6G6G6","A4","F4",DR4$
580 play "A1R1V10","E1R1V10",C2$,"O5A2&AA>CEFFFER2","O5E2&EEG>CCCC<BR2",DR5$
590 play A2$,B3$,C3$,"O5"+E3$,"O4RARARARARARARARA","RCRCRCRC"
600 play A4$,B4$,C4$,"RDRDRDRDRDRDRDRD","RGRGRGRGRGRGRGRG","RCRCRCRC"
610 play "RCCCC<BBAR>CCCC<B4A","L8A1","F4A4>C4<A4F4A4G4F4",D2$,E2$,"RCRCRCRC"
620 play ">E1R2.FE",B5$,"E4G+4B4>D4E4D4C4<B4","O4"+D3$,E3$,"RCRCRCRC"
630 play A5$,B6$,">D4<A4>D4D4E4<B4>E4E4","O5A1G+1","O5F1E1","RCRCRCRC"
640 play "D4EDC<B4A&A1","R1REAB>C<BAG+",C5$,"A2BB4>C&C1","F2G+G+4A&A1",DR6$
650 play "R1","A2R2","A>E4D4C4<A",,,"R8CCCC8"
660 play "O5RRBBB4>C4D2G4A4",,"G4.GG2G4.GG2","O5"+D4$,"V10O6"+D4$,"RRRCRRRC"
670 play "E2CD4E&E2R4CC",,">C4.CC2C4.CC2<",E4$,E4$,"RRRCRRRC"
680 play "<B2RBB>CD2RDCD",,"B4.BB2E4.EE2","F2A2G+2B2","F2A2G+2B2","RRRCRRRC"
690 play "E1R2.EE",,"A4.AA2A4.A>E4<A4","B2A2E1","B2A2E1","RRRCRRRC"
700 play "D+D+4.R4D+D+B2.A4",,"B4.BB2B4.BB2","F+1D+1","F+1D+1","RRRCRRRC"
710 play "G+4G+4G+4A4B2R2",,C6$,"E4E4E4E4Q8"+D1$+"Q7","E4E4E4E4R1",DR7$
720 play "V8@11"+A1$,"V8@11"+B1$,"O3A4E4A4E4A4>C4EC<A4","O6L8E1&E2DC4.",,DR2$
730 play "G4B4G4B4AA4AG4.","D4G4D4G4DD4DD4.",C1$,"<B1&B4>D4C<B4.",,DR3$
740 play "R4F4A4B4>C4R4<B6A6G6","R1R2E6E6E6","F4R2.R4F4G6G6G6","A4",,DR4$
750 if C=3 goto 840
760 play "A1","E1","O3A4E4A4E4","O5REAB>C<BAG+","O4A2&AA>CE","RCRC"
770 if C=2 then C=3:play "V12@40R1","V10@29","A>E4D4C4<A","A1","E1":goto 660
780 play "V10@2O5R4E4D4C4","V8@2O4R4E4D4C4","A4E4>C<AE4","A2R2","A2R2","RCRC"
790 play A6$,A6$,"A4>C4F4C4F4C4FC<A4","O5"+E2$,D2$,"RCRCRCRC"
800 play A7$,A7$,"A4>E4<A4>E4<A4>E4AE<A4",E3$,D2$,"RCRCRCRC"
810 play A8$,A8$,"B4>D+4F+4D+4<B4>D+4F+4B",D5$,"<"+D3$,"RCRCRCRC"
820 play "A1G+2R2","A1G+2R2","<E4G+4B4G+4EEEER2","REREREREEEEER2",E5$,DR5$
830 C=2:goto 590
840 play "A1V10@2O4R2.AB","E1V8@2O3R2.AB",C7$,D6$,"O4A2&AA>CEA2R2","RCRCRCRC"
850 play "O5"+A9$,"O4"+A9$,C8$,"F1GRG4R2","C1DRD4R2","RCRCCCRR"
860 play "A1R1","A1R1","A4E4A4E4RAAAA","AEAB>C<BAG+AAAAA","E1REEEE",DR8$
-------------------------------------------------------------------------------
ﾀﾞｳﾝﾛｰﾄﾞ ｼﾀ ｶﾀ ｺﾞｸﾛｳｻﾝ! ﾃﾝｿｳ ｼﾃ ｲﾀﾀﾞｲﾀ sysopｻﾝ ﾄﾞｳﾓ ｱﾘｶﾞﾄｳ ｺﾞｻﾞｲﾏｽ｡
メッセージ 91番 はこれで終りよ．
■ 電子掲示板 # 13 ｢音楽｣ (F,FA,FM,FN,L,R,W,W@,K,A,Q,B,D,?) >