ここからは 「SCCというサウンドチップ自体をいじってみたい」という方のための内容になります。
SCCで音を鳴らすため方法自体はとてもシンプルなのですが、そもそもアクセスするためにはスロットを切り替える必要があり、BASICから気軽にレジスタに値を出力してみる、というようなことができません。
そこで、PSGに対するSOUND文のように、簡単にSCCにアクセスするための拡張コマンドを作成してみました。
以下のプログラムを実行すると、BASICに新しいコマンド "CMD SCC" が追加されます。
CMD SCC インストールプログラム … CMDSCC.BAS（NandemoSCCforBASIC.zip に同梱）
10 '------------------- 20 'INSTALL "CMD SCC" 30 '------------------- 40 CLEAR300,&HDB00 50 FOR I=&HDB00 TO &HDB41:READ A$:POKE I,VAL("&H"+A$):NEXT 60 DEFUSR=&HDB00:A=USR(0) 70 DATA21,C3,0D,22,0D,FE,21,DB,01,22,0F,FE,C9,7E,FE,53 80 DATAC0,CD,66,46,FE,43,C0,CD,66,46,FE,43,C0,CD,66,46 90 DATAFE,28,C0,23,CD,2F,54,ED,53,35,DB,7E,FE,2C,C0,23 100 DATACD,1C,52,E5,21,00,00,5F,3A,10,FE,CD,14,00,E1,23 110 DATAF1,C9
CMD SCC(アドレス, データ)
SCCの5チャンネル全てを使って音を出すプログラムです。
SCCのレジスタは、PSGのレジスタに似た構造となっているので、BASICのSOUND文で音を鳴らす方法にかなり近いです。
SOUND文と比較したコメントなども書いておいたので、参考にしてみてください。
CMD SCC サンプルプログラム … SMPSCC.BAS（NandemoSCCforBASIC.zip に同梱）
1000 '------------------------------------ 1010 ' SAMPLE PROGAM FOR CMD SCC 1020 '------------------------------------ 1030 'SCC ﾉ ｿﾝｻﾞｲｽﾙ ｽﾛｯﾄ 1040 ' ｷﾎﾝｽﾛｯﾄ1 = &H01 1050 ' ｷﾎﾝｽﾛｯﾄ2 = &H02 1060 ' MSX0(ｶｸﾁｮｳｽﾛｯﾄ0-3) = &H8C 1070 ' MSXPLAYer(ｶｸﾁｮｳｽﾛｯﾄ1-3) = &H8D 1080 POKE&HFE10,&H01 1090 ' 1100 'ﾓｰﾄﾞ ｷﾘｶｴ(for SNATCHER) 1110 CMD SCC(&HBFFE,0):'ﾒｶﾞROM ｺﾞｶﾝ ﾓｰﾄﾞ 1120 ' 1130 'ﾊﾞﾝｸ ｷﾘｶｴ 1140 CMD SCC(&H9000,&H3F):'SCC ﾉ ｵﾔｸｿｸ 1150 ' 1200 'ﾊｹｲ ﾃﾞｰﾀ (32byte * 4ch) 1210 ' chA : 9800~981F 1220 ' chB : 9820~983F 1230 ' chC : 9840~985F 1240 ' chD : 9860~987F 1250 ' chE : (chD ﾄ ｵﾅｼﾞ) 1260 FOR CH=0 TO 3:RESTORE 1290:'chA-chE ｵﾅｼﾞ ﾊｹｲ ﾆ ｽﾙ 1270 FOR I=0 TO 31:READ A$:CMD SCC(&H9800+CH*32+I,VAL("&H"+A$)) 1280 NEXT:NEXT 1290 DATA 00,07,0F,17,1F,27,2F,37,3F,47,4F,57,5F,67,6F,77 1300 DATA 80,88,90,98,A0,A8,B0,B8,C0,C8,D0,D8,E0,E8,F0,F8 1310 ' 1400 'ﾁｬﾝﾈﾙ ON/OFF(1:ON 0:OFF) 1410 ' chE|chD|chC|chB|chA : 988F = SOUND 7,n ﾉ ﾋﾞｯﾄﾊﾝﾃﾝ 1420 CMD SCC(&H988F,&HB00000):'chA-chE ｽﾍﾞﾃOFF 1430 ' 1500 'ｼｭｳﾊｽｳ ﾃﾞｰﾀ (2byte * 5ch) 1510 ' chA : 9880,9881 = SOUND 0,n:SOUND 1,m 1520 ' chB : 9882,9883 = SOUND 2,n:SOUND 3,m 1530 ' chC : 9884,9885 = SOUND 4,n:SOUND 5,m 1540 ' chD : 9886,9887 1550 ' chE : 9888,9889 1560 CMD SCC(&H9880,&HAC):CMD SCC(&H9881,1):'chA : o4c ← 01ACH 1570 CMD SCC(&H9882,&H53):CMD SCC(&H9883,1):'chB : o4e ← 0153H 1580 CMD SCC(&H9884,&H1D):CMD SCC(&H9885,1):'chC : o4g ← 011DH 1590 CMD SCC(&H9886,&HE3):CMD SCC(&H9887,0):'chD : o4b ← 00E3H 1600 CMD SCC(&H9888,&HBE):CMD SCC(&H9889,0):'chE : o5d ← 00BEH 1610 ' 1700 'ﾎﾞﾘｭｰﾑ ﾃﾞｰﾀ (1byte * 5ch) 1710 ' chA : 988A = SOUND 8,n 1720 ' chB : 988B = SOUND 9,n 1730 ' chC : 988C = SOUND 10,n 1740 ' chD : 988D 1750 ' chE : 988E 1760 CMD SCC(&H988A,15):'chA : v15 1770 CMD SCC(&H988B,15):'chB : v15 1780 CMD SCC(&H988C,15):'chC : v15 1790 CMD SCC(&H988D,15):'chD : v15 1800 CMD SCC(&H988E,15):'chE : v15 1810 ' 2000 'ｴﾝｿｳ 2010 ' PLAY"v15o4c","v15o4e","v15o4g","v15o4b","v15o5d" 2020 PRINT"HIT ANY KEY TO PLAY";:A$=INPUT$(1):PRINT 2030 CMD SCC(&H988F,&B11111):'chA-chE ｽﾍﾞﾃON 2040 PRINT"HIT ANY KEY TO STOP";:A$=INPUT$(1):PRINT 2050 CMD SCC(&H988F,&B00000):'chA-chE ｽﾍﾞﾃOFF
| ＼オクターブ 音名＼ | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 |
| C | D5D | 6AF | 357 | 1AC | D6 | 6B | 35 | 1B |
| C# | C9C | 64E | 327 | 194 | CA | 65 | 32 | 19 |
| D | BE7 | 5F4 | 2FA | 17D | BE | 5F | 30 | 18 |
| D# | B3C | 59E | 2CF | 168 | B4 | 5A | 2D | 16 |
| E | A9B | 54E | 2A7 | 153 | AA | 55 | 2A | 15 |
| F | A02 | 501 | 281 | 140 | A0 | 50 | 28 | 14 |
| F# | 973 | 4BA | 25D | 12E | 97 | 4C | 26 | 13 |
| G | 8EB | 476 | 23B | 11D | 8F | 47 | 24 | 12 |
| G# | 86B | 436 | 21B | 10D | 87 | 43 | 22 | 11 |
| A | 7F2 | 3F9 | 1FD | FE | 7F | 40 | 20 | 10 |
| A# | 780 | 3C0 | 1E0 | F0 | 78 | 3C | 1E | F |
| B | 714 | 38A | 1C5 | E3 | 71 | 39 | 1C | E |
※「MSX2テクニカルハンドブック」より
CMD SCC などという名前ですが、実際は特定スロットの特定アドレスにデータを書き込むだけのコマンド だったりするので、FE10Hの値を書き換えれば、裏RAMやFM-PACへのアクセスもできます。 やっていることは「スロット指定のPOKE文」みたいなものですね。
処理も重いので、この命令だけを使って音楽演奏をさせるのはなかなか難しいですが、SCCの仕組みを学んだり、波形をエディットして音色を確認するくらいであれば、十分実用に耐えると思います。
興味を持ったというマニアックな方は、ぜひSCCを色々と触ってみてはいかがでしょうか。