福野泰介の一日一創

Making rhythm is fun! リズムづくりは楽しい！
Play the easy sampler "volca sample" by IchigoJam.
お手軽サンプラー「volca sample」をIchigoJamで奏でよう！

1. prepare a MIDI output. MIDI出力を準備します
2. connect つなぎます
3. test a sound 試しにならしてみます

BPS31250 OK ?CHR$(#90,1,1) OK

*volca sample MIDI Implementation Chart / MIDI仕様書

4. program it! プログラムを打ち込みます

10 UART0:CLS:?"MIDI DRUMS" 15 BPS31250 20 P="12345678QWERTYUIASDFGHJKZXCVBNM," 30 FORI=0TO8*4-1:LCI%8*2,I/8*2+4 40 IF RND(3)=0 ?"O" ELSE ?"." 50 NEXT 60 W=10 70 BPS31250:N=0 75 LC 0,14:?"WAIT:";DEC$(W,3) 80 LCN*2,12:?"^" 90 UART1:LC0,-1:FORI=0TO3 92 IF SCR(N*2,I*2+4)=79 ?CHR$(#90+I,1,1); 94 NEXT:UART0 100 WAIT W 110 LCN*2,12:?" " 120 N=(N+1)%8 130 K=INKEY() 140 IF K=UP W=W-1 150 IF K=DOWN W=W+1 160 IF K=SPACE GOTO30 170 IF K GOSUB300 180 IF K=8 FORI=0TO8*4-1:LCI%8*2,I/8*2+4:?".":NEXT 200 GOTO 75 300 FORI=0TO8*4-1:IF ASC(P+I)=K LCI%8*2,I/8*2+4:IF SCR()=79 ?"." ELSE ?"O" 310 NEXT:RETURN

5. Enjoy! 楽しむ！
How to play - 演奏法
1-8 Q-I A-K Z-, - Make the PATTERN (キーボードのキーで音を置いたり取ったり)
SPACE - RANDOM PATTERN (スペースでランダムパターン)
Backspace - CLEAR PATTERN (バックスペースでパターンクリア)
Cursor UP - Up the Tempo (上キーでテンポアップ)
Cursor DOWN - Down the Tempo (下キーでテンポダウン)

Comming soon MIDI I/O kit for IchigoJam! MIDI入出力キットも準備中！

links
- volca sample
- MIDI Random Rhythm Machine with KORG volca beats x IchigoJam
- シンセサイザー / キーボード | KORG (Japan)