nlgplay for mbed
Dependencies: SDFileSystemEx mbed
main.cpp@2:f0b7779b03c7, 2014-05-20 (annotated)
- Committer:
- bkc_mbed
- Date:
- Tue May 20 09:24:55 2014 +0000
- Revision:
- 2:f0b7779b03c7
- Parent:
- 1:ec416e6d5739
- Child:
- 3:aed228fa3ae4
version 1.06
Who changed what in which revision?
User | Revision | Line number | New contents of line |
---|---|---|---|
bkc_mbed | 0:2053640461b5 | 1 | #include "mbed.h" |
bkc_mbed | 0:2053640461b5 | 2 | #include "SDFileSystem.h" |
bkc_mbed | 0:2053640461b5 | 3 | #include "lcd.h" |
bkc_mbed | 0:2053640461b5 | 4 | |
bkc_mbed | 0:2053640461b5 | 5 | DigitalOut io01(dp13); |
bkc_mbed | 0:2053640461b5 | 6 | DigitalOut io02(dp26); |
bkc_mbed | 0:2053640461b5 | 7 | DigitalOut io03(dp17); |
bkc_mbed | 0:2053640461b5 | 8 | DigitalOut io04(dp4); |
bkc_mbed | 0:2053640461b5 | 9 | |
bkc_mbed | 0:2053640461b5 | 10 | DigitalIn sw_play(dp24,PullUp); |
bkc_mbed | 0:2053640461b5 | 11 | DigitalIn sw_next(dp10,PullUp); |
bkc_mbed | 0:2053640461b5 | 12 | |
bkc_mbed | 1:ec416e6d5739 | 13 | DigitalOut led1(LED1); |
bkc_mbed | 1:ec416e6d5739 | 14 | DigitalOut led2(LED2); |
bkc_mbed | 0:2053640461b5 | 15 | |
bkc_mbed | 0:2053640461b5 | 16 | // MOSI, MISO, SCLK, CS |
bkc_mbed | 0:2053640461b5 | 17 | SDFileSystem sd(dp2, dp1, dp6, dp25, "sd"); |
bkc_mbed | 0:2053640461b5 | 18 | |
bkc_mbed | 0:2053640461b5 | 19 | // |
bkc_mbed | 0:2053640461b5 | 20 | // nlg_emb.c |
bkc_mbed | 0:2053640461b5 | 21 | // |
bkc_mbed | 0:2053640461b5 | 22 | |
bkc_mbed | 0:2053640461b5 | 23 | #define CMD_PSG 0x00 |
bkc_mbed | 0:2053640461b5 | 24 | #define CMD_OPM 0x01 |
bkc_mbed | 0:2053640461b5 | 25 | #define CMD_OPM2 0x02 |
bkc_mbed | 0:2053640461b5 | 26 | #define CMD_IRQ 0x80 |
bkc_mbed | 0:2053640461b5 | 27 | |
bkc_mbed | 0:2053640461b5 | 28 | #define CMD_CTC0 0x81 |
bkc_mbed | 0:2053640461b5 | 29 | #define CMD_CTC3 0x82 |
bkc_mbed | 0:2053640461b5 | 30 | |
bkc_mbed | 0:2053640461b5 | 31 | #define NLG_VER (110) |
bkc_mbed | 0:2053640461b5 | 32 | #define NLG_BASECLK (4000000) |
bkc_mbed | 0:2053640461b5 | 33 | |
bkc_mbed | 0:2053640461b5 | 34 | FILE *nlg_file; |
bkc_mbed | 0:2053640461b5 | 35 | |
bkc_mbed | 0:2053640461b5 | 36 | char nlg_title[80]; |
bkc_mbed | 0:2053640461b5 | 37 | int nlg_baseclk; |
bkc_mbed | 0:2053640461b5 | 38 | int nlg_tick; |
bkc_mbed | 0:2053640461b5 | 39 | int nlg_length; |
bkc_mbed | 0:2053640461b5 | 40 | int nlg_loop_ptr; |
bkc_mbed | 0:2053640461b5 | 41 | int nlg_version; |
bkc_mbed | 0:2053640461b5 | 42 | |
bkc_mbed | 0:2053640461b5 | 43 | int nlg_ctc0; |
bkc_mbed | 0:2053640461b5 | 44 | int nlg_ctc3; |
bkc_mbed | 0:2053640461b5 | 45 | |
bkc_mbed | 0:2053640461b5 | 46 | #define RCK io04 |
bkc_mbed | 0:2053640461b5 | 47 | #define SCK io03 |
bkc_mbed | 0:2053640461b5 | 48 | #define DBS io01 |
bkc_mbed | 0:2053640461b5 | 49 | #define CTS io02 |
bkc_mbed | 0:2053640461b5 | 50 | |
bkc_mbed | 0:2053640461b5 | 51 | void init_io(void) |
bkc_mbed | 0:2053640461b5 | 52 | { |
bkc_mbed | 0:2053640461b5 | 53 | RCK = 0; |
bkc_mbed | 0:2053640461b5 | 54 | SCK = 0; |
bkc_mbed | 0:2053640461b5 | 55 | DBS = 0; |
bkc_mbed | 0:2053640461b5 | 56 | CTS = 0; |
bkc_mbed | 0:2053640461b5 | 57 | } |
bkc_mbed | 0:2053640461b5 | 58 | |
bkc_mbed | 2:f0b7779b03c7 | 59 | #define _WAIT for(int wcnt=0; wcnt < 5; wcnt++) |
bkc_mbed | 2:f0b7779b03c7 | 60 | |
bkc_mbed | 0:2053640461b5 | 61 | // 16bit output |
bkc_mbed | 0:2053640461b5 | 62 | void ioShiftOut(unsigned int data) |
bkc_mbed | 0:2053640461b5 | 63 | { |
bkc_mbed | 0:2053640461b5 | 64 | int i; |
bkc_mbed | 0:2053640461b5 | 65 | |
bkc_mbed | 0:2053640461b5 | 66 | for(i = 0; i < 8; i++) |
bkc_mbed | 0:2053640461b5 | 67 | { |
bkc_mbed | 0:2053640461b5 | 68 | /* 2ビット分のデータをそれぞれ出力 */ |
bkc_mbed | 0:2053640461b5 | 69 | if (data & 0x80) |
bkc_mbed | 0:2053640461b5 | 70 | CTS = 1; |
bkc_mbed | 0:2053640461b5 | 71 | else |
bkc_mbed | 0:2053640461b5 | 72 | CTS = 0; |
bkc_mbed | 0:2053640461b5 | 73 | |
bkc_mbed | 0:2053640461b5 | 74 | if (data & 0x8000) |
bkc_mbed | 0:2053640461b5 | 75 | DBS = 1; |
bkc_mbed | 0:2053640461b5 | 76 | else |
bkc_mbed | 0:2053640461b5 | 77 | DBS = 0; |
bkc_mbed | 0:2053640461b5 | 78 | |
bkc_mbed | 0:2053640461b5 | 79 | data <<= 1; |
bkc_mbed | 0:2053640461b5 | 80 | |
bkc_mbed | 0:2053640461b5 | 81 | SCK = 1; |
bkc_mbed | 2:f0b7779b03c7 | 82 | _WAIT; |
bkc_mbed | 0:2053640461b5 | 83 | SCK = 0; |
bkc_mbed | 2:f0b7779b03c7 | 84 | _WAIT; |
bkc_mbed | 0:2053640461b5 | 85 | } |
bkc_mbed | 0:2053640461b5 | 86 | |
bkc_mbed | 0:2053640461b5 | 87 | RCK = 1; |
bkc_mbed | 2:f0b7779b03c7 | 88 | _WAIT; |
bkc_mbed | 0:2053640461b5 | 89 | RCK = 0; |
bkc_mbed | 2:f0b7779b03c7 | 90 | _WAIT; |
bkc_mbed | 2:f0b7779b03c7 | 91 | } |
bkc_mbed | 2:f0b7779b03c7 | 92 | |
bkc_mbed | 2:f0b7779b03c7 | 93 | |
bkc_mbed | 2:f0b7779b03c7 | 94 | // 16bit output |
bkc_mbed | 2:f0b7779b03c7 | 95 | void ioShiftOutTest(unsigned int data) |
bkc_mbed | 2:f0b7779b03c7 | 96 | { |
bkc_mbed | 2:f0b7779b03c7 | 97 | int i; |
bkc_mbed | 2:f0b7779b03c7 | 98 | int ta = 0; |
bkc_mbed | 2:f0b7779b03c7 | 99 | int tb = 0; |
bkc_mbed | 2:f0b7779b03c7 | 100 | Timer t; |
bkc_mbed | 2:f0b7779b03c7 | 101 | |
bkc_mbed | 2:f0b7779b03c7 | 102 | t.start(); |
bkc_mbed | 2:f0b7779b03c7 | 103 | |
bkc_mbed | 2:f0b7779b03c7 | 104 | for(i = 0; i < 8; i++) |
bkc_mbed | 2:f0b7779b03c7 | 105 | { |
bkc_mbed | 2:f0b7779b03c7 | 106 | /* 2ビット分のデータをそれぞれ出力 */ |
bkc_mbed | 2:f0b7779b03c7 | 107 | if (data & 0x80) |
bkc_mbed | 2:f0b7779b03c7 | 108 | CTS = 1; |
bkc_mbed | 2:f0b7779b03c7 | 109 | else |
bkc_mbed | 2:f0b7779b03c7 | 110 | CTS = 0; |
bkc_mbed | 2:f0b7779b03c7 | 111 | |
bkc_mbed | 2:f0b7779b03c7 | 112 | if (data & 0x8000) |
bkc_mbed | 2:f0b7779b03c7 | 113 | DBS = 1; |
bkc_mbed | 2:f0b7779b03c7 | 114 | else |
bkc_mbed | 2:f0b7779b03c7 | 115 | DBS = 0; |
bkc_mbed | 2:f0b7779b03c7 | 116 | |
bkc_mbed | 2:f0b7779b03c7 | 117 | data <<= 1; |
bkc_mbed | 2:f0b7779b03c7 | 118 | |
bkc_mbed | 2:f0b7779b03c7 | 119 | SCK = 1; |
bkc_mbed | 2:f0b7779b03c7 | 120 | _WAIT; |
bkc_mbed | 2:f0b7779b03c7 | 121 | SCK = 0; |
bkc_mbed | 2:f0b7779b03c7 | 122 | _WAIT; |
bkc_mbed | 2:f0b7779b03c7 | 123 | } |
bkc_mbed | 2:f0b7779b03c7 | 124 | |
bkc_mbed | 2:f0b7779b03c7 | 125 | ta = t.read_us(); |
bkc_mbed | 2:f0b7779b03c7 | 126 | |
bkc_mbed | 2:f0b7779b03c7 | 127 | RCK = 1; |
bkc_mbed | 2:f0b7779b03c7 | 128 | _WAIT; |
bkc_mbed | 2:f0b7779b03c7 | 129 | RCK = 0; |
bkc_mbed | 2:f0b7779b03c7 | 130 | _WAIT; |
bkc_mbed | 2:f0b7779b03c7 | 131 | |
bkc_mbed | 2:f0b7779b03c7 | 132 | tb = t.read_us(); |
bkc_mbed | 2:f0b7779b03c7 | 133 | |
bkc_mbed | 2:f0b7779b03c7 | 134 | t.stop(); |
bkc_mbed | 2:f0b7779b03c7 | 135 | |
bkc_mbed | 2:f0b7779b03c7 | 136 | printf("test result ta=%d tb=%d\n", ta, tb); |
bkc_mbed | 0:2053640461b5 | 137 | } |
bkc_mbed | 0:2053640461b5 | 138 | |
bkc_mbed | 0:2053640461b5 | 139 | /* 制御信号定義 */ |
bkc_mbed | 0:2053640461b5 | 140 | #define CS_PSG (1 << 1) |
bkc_mbed | 0:2053640461b5 | 141 | #define CS_FM1 (1 << 2) |
bkc_mbed | 0:2053640461b5 | 142 | #define CS_FM2 (1 << 3) |
bkc_mbed | 0:2053640461b5 | 143 | #define A0 (1 << 4) |
bkc_mbed | 0:2053640461b5 | 144 | #define WR (1 << 5) |
bkc_mbed | 0:2053640461b5 | 145 | #define ICL (1 << 6) |
bkc_mbed | 0:2053640461b5 | 146 | |
bkc_mbed | 0:2053640461b5 | 147 | /* アクティブローの制御信号 */ |
bkc_mbed | 0:2053640461b5 | 148 | #define ACTLOW (CS_PSG | CS_FM1 | CS_FM2 | WR | ICL) |
bkc_mbed | 0:2053640461b5 | 149 | |
bkc_mbed | 0:2053640461b5 | 150 | |
bkc_mbed | 0:2053640461b5 | 151 | /* 出力 */ |
bkc_mbed | 0:2053640461b5 | 152 | void regOutBase(int addr, int data,int select) |
bkc_mbed | 0:2053640461b5 | 153 | { |
bkc_mbed | 0:2053640461b5 | 154 | /* アドレスを出力 */ |
bkc_mbed | 0:2053640461b5 | 155 | /* A0をローにして待つ */ |
bkc_mbed | 0:2053640461b5 | 156 | ioShiftOut((addr << 8) | (ACTLOW)); |
bkc_mbed | 0:2053640461b5 | 157 | ioShiftOut((addr << 8) | (ACTLOW & ~(select | WR))); |
bkc_mbed | 0:2053640461b5 | 158 | ioShiftOut((addr << 8) | (ACTLOW)); |
bkc_mbed | 0:2053640461b5 | 159 | |
bkc_mbed | 0:2053640461b5 | 160 | |
bkc_mbed | 0:2053640461b5 | 161 | /* チップ側の処理を待つ */ |
bkc_mbed | 0:2053640461b5 | 162 | if (!(select & CS_PSG)) |
bkc_mbed | 1:ec416e6d5739 | 163 | wait_us(10); |
bkc_mbed | 0:2053640461b5 | 164 | |
bkc_mbed | 0:2053640461b5 | 165 | |
bkc_mbed | 0:2053640461b5 | 166 | /* データを出力 */ |
bkc_mbed | 0:2053640461b5 | 167 | /* A0をハイにして待つ */ |
bkc_mbed | 0:2053640461b5 | 168 | ioShiftOut((data << 8) | A0 | (ACTLOW)); |
bkc_mbed | 0:2053640461b5 | 169 | ioShiftOut((data << 8) | A0 | (ACTLOW & ~(select | WR))); |
bkc_mbed | 0:2053640461b5 | 170 | ioShiftOut((data << 8) | A0 | (ACTLOW)); |
bkc_mbed | 0:2053640461b5 | 171 | |
bkc_mbed | 0:2053640461b5 | 172 | /* wait if FM */ |
bkc_mbed | 0:2053640461b5 | 173 | if (!(select & CS_PSG)) |
bkc_mbed | 1:ec416e6d5739 | 174 | wait_us(10); |
bkc_mbed | 0:2053640461b5 | 175 | } |
bkc_mbed | 0:2053640461b5 | 176 | |
bkc_mbed | 0:2053640461b5 | 177 | /* PSG出力 */ |
bkc_mbed | 0:2053640461b5 | 178 | void regPSGOut(int addr, int data) |
bkc_mbed | 0:2053640461b5 | 179 | { |
bkc_mbed | 0:2053640461b5 | 180 | regOutBase(addr, data, CS_PSG); |
bkc_mbed | 0:2053640461b5 | 181 | } |
bkc_mbed | 0:2053640461b5 | 182 | |
bkc_mbed | 0:2053640461b5 | 183 | /* FM2出力 */ |
bkc_mbed | 0:2053640461b5 | 184 | void regFM2Out(int addr, int data) |
bkc_mbed | 0:2053640461b5 | 185 | { |
bkc_mbed | 0:2053640461b5 | 186 | regOutBase(addr, data, CS_FM2); |
bkc_mbed | 0:2053640461b5 | 187 | } |
bkc_mbed | 0:2053640461b5 | 188 | |
bkc_mbed | 0:2053640461b5 | 189 | /* FM音源にデータを出力 */ |
bkc_mbed | 0:2053640461b5 | 190 | void regFMOut(int addr,int data) |
bkc_mbed | 0:2053640461b5 | 191 | { |
bkc_mbed | 0:2053640461b5 | 192 | regOutBase(addr, data, CS_FM1); |
bkc_mbed | 0:2053640461b5 | 193 | } |
bkc_mbed | 0:2053640461b5 | 194 | |
bkc_mbed | 0:2053640461b5 | 195 | /* ボード消音 */ |
bkc_mbed | 0:2053640461b5 | 196 | void boardMute(void) |
bkc_mbed | 0:2053640461b5 | 197 | { |
bkc_mbed | 0:2053640461b5 | 198 | int i; |
bkc_mbed | 0:2053640461b5 | 199 | |
bkc_mbed | 0:2053640461b5 | 200 | /* PSG初期化 */ |
bkc_mbed | 0:2053640461b5 | 201 | regPSGOut(0x00,0); |
bkc_mbed | 0:2053640461b5 | 202 | regPSGOut(0x01,0); |
bkc_mbed | 0:2053640461b5 | 203 | |
bkc_mbed | 0:2053640461b5 | 204 | regPSGOut(0x06,0x00); |
bkc_mbed | 0:2053640461b5 | 205 | regPSGOut(0x07,0x3f); // ALL OFF |
bkc_mbed | 0:2053640461b5 | 206 | regPSGOut(0x08,0x00); // CH.A 0 |
bkc_mbed | 0:2053640461b5 | 207 | regPSGOut(0x09,0x00); // CH.B 0 |
bkc_mbed | 0:2053640461b5 | 208 | regPSGOut(0x0a,0x00); // CH.C 0 |
bkc_mbed | 0:2053640461b5 | 209 | |
bkc_mbed | 0:2053640461b5 | 210 | /* FM音源初期化 */ |
bkc_mbed | 0:2053640461b5 | 211 | for(i = 0x20; i < 0x28; i++) |
bkc_mbed | 0:2053640461b5 | 212 | regFMOut(i, 0x00); |
bkc_mbed | 0:2053640461b5 | 213 | |
bkc_mbed | 0:2053640461b5 | 214 | for(i = 0x20; i < 0x28; i++) |
bkc_mbed | 0:2053640461b5 | 215 | regFM2Out(i, 0x00); |
bkc_mbed | 0:2053640461b5 | 216 | } |
bkc_mbed | 0:2053640461b5 | 217 | |
bkc_mbed | 0:2053640461b5 | 218 | |
bkc_mbed | 0:2053640461b5 | 219 | /* ボード初期化 */ |
bkc_mbed | 0:2053640461b5 | 220 | void boardInit(void) |
bkc_mbed | 0:2053640461b5 | 221 | { |
bkc_mbed | 1:ec416e6d5739 | 222 | wait_ms(20); |
bkc_mbed | 0:2053640461b5 | 223 | /* ICLのみをLOW(アクティブ)にする */ |
bkc_mbed | 0:2053640461b5 | 224 | ioShiftOut(ACTLOW & ~(ICL)); |
bkc_mbed | 1:ec416e6d5739 | 225 | wait_ms(50); |
bkc_mbed | 0:2053640461b5 | 226 | |
bkc_mbed | 0:2053640461b5 | 227 | /* 元に戻す */ |
bkc_mbed | 0:2053640461b5 | 228 | ioShiftOut(ACTLOW); |
bkc_mbed | 1:ec416e6d5739 | 229 | wait_ms(10); |
bkc_mbed | 0:2053640461b5 | 230 | } |
bkc_mbed | 0:2053640461b5 | 231 | |
bkc_mbed | 0:2053640461b5 | 232 | typedef unsigned char byte; |
bkc_mbed | 0:2053640461b5 | 233 | typedef unsigned short word; |
bkc_mbed | 0:2053640461b5 | 234 | typedef unsigned long dword; |
bkc_mbed | 0:2053640461b5 | 235 | |
bkc_mbed | 0:2053640461b5 | 236 | |
bkc_mbed | 0:2053640461b5 | 237 | // 変数書き出し(WORD) |
bkc_mbed | 0:2053640461b5 | 238 | void WriteWORD(byte *p,word val) |
bkc_mbed | 0:2053640461b5 | 239 | { |
bkc_mbed | 0:2053640461b5 | 240 | p[0] = (val & 0xff); |
bkc_mbed | 0:2053640461b5 | 241 | p[1] = ((val>>8) & 0xff); |
bkc_mbed | 0:2053640461b5 | 242 | } |
bkc_mbed | 0:2053640461b5 | 243 | |
bkc_mbed | 0:2053640461b5 | 244 | // 変数書き出し(DWORD) |
bkc_mbed | 0:2053640461b5 | 245 | void WriteDWORD(byte *p,dword val) |
bkc_mbed | 0:2053640461b5 | 246 | { |
bkc_mbed | 0:2053640461b5 | 247 | p[0] = (val & 0xff); |
bkc_mbed | 0:2053640461b5 | 248 | p[1] = ((val>>8) & 0xff); |
bkc_mbed | 0:2053640461b5 | 249 | p[2] = ((val>>16) & 0xff); |
bkc_mbed | 0:2053640461b5 | 250 | p[3] = ((val>>24) & 0xff); |
bkc_mbed | 0:2053640461b5 | 251 | } |
bkc_mbed | 0:2053640461b5 | 252 | |
bkc_mbed | 0:2053640461b5 | 253 | // 変数読み出し(WORD) |
bkc_mbed | 0:2053640461b5 | 254 | word ReadWORD(byte *p) |
bkc_mbed | 0:2053640461b5 | 255 | { |
bkc_mbed | 0:2053640461b5 | 256 | return |
bkc_mbed | 0:2053640461b5 | 257 | ((word)p[0]) | |
bkc_mbed | 0:2053640461b5 | 258 | ((word)p[1])<<8; |
bkc_mbed | 0:2053640461b5 | 259 | } |
bkc_mbed | 0:2053640461b5 | 260 | |
bkc_mbed | 0:2053640461b5 | 261 | // 変数読み出し(DWORD) |
bkc_mbed | 0:2053640461b5 | 262 | dword ReadDWORD(byte *p) |
bkc_mbed | 0:2053640461b5 | 263 | { |
bkc_mbed | 0:2053640461b5 | 264 | return |
bkc_mbed | 0:2053640461b5 | 265 | ((dword)p[0]) | |
bkc_mbed | 0:2053640461b5 | 266 | ((dword)p[1])<<8 | |
bkc_mbed | 0:2053640461b5 | 267 | ((dword)p[2])<<16 | |
bkc_mbed | 0:2053640461b5 | 268 | ((dword)p[3])<<24; |
bkc_mbed | 0:2053640461b5 | 269 | } |
bkc_mbed | 0:2053640461b5 | 270 | |
bkc_mbed | 0:2053640461b5 | 271 | // NLGファイルを開く |
bkc_mbed | 0:2053640461b5 | 272 | int OpenNLG(const char *file) |
bkc_mbed | 0:2053640461b5 | 273 | { |
bkc_mbed | 1:ec416e6d5739 | 274 | byte nlg_hdr[0x80]; |
bkc_mbed | 1:ec416e6d5739 | 275 | |
bkc_mbed | 0:2053640461b5 | 276 | nlg_file = fopen(file, "rb"); |
bkc_mbed | 0:2053640461b5 | 277 | |
bkc_mbed | 0:2053640461b5 | 278 | if (!nlg_file) |
bkc_mbed | 0:2053640461b5 | 279 | { |
bkc_mbed | 0:2053640461b5 | 280 | printf("File open error:%s\n", file); |
bkc_mbed | 0:2053640461b5 | 281 | return -1; |
bkc_mbed | 0:2053640461b5 | 282 | } |
bkc_mbed | 0:2053640461b5 | 283 | |
bkc_mbed | 0:2053640461b5 | 284 | fread(nlg_hdr, 0x60, 1, nlg_file); |
bkc_mbed | 0:2053640461b5 | 285 | |
bkc_mbed | 0:2053640461b5 | 286 | if (memcmp(nlg_hdr,"NLG1",4) != 0) |
bkc_mbed | 0:2053640461b5 | 287 | { |
bkc_mbed | 0:2053640461b5 | 288 | printf("Unknown format!\n"); |
bkc_mbed | 0:2053640461b5 | 289 | fclose(nlg_file); |
bkc_mbed | 0:2053640461b5 | 290 | return -1; |
bkc_mbed | 0:2053640461b5 | 291 | } |
bkc_mbed | 0:2053640461b5 | 292 | |
bkc_mbed | 0:2053640461b5 | 293 | nlg_version = ReadWORD(nlg_hdr + 4); |
bkc_mbed | 0:2053640461b5 | 294 | |
bkc_mbed | 0:2053640461b5 | 295 | memcpy(nlg_title, nlg_hdr + 8, 64); |
bkc_mbed | 0:2053640461b5 | 296 | nlg_title[64]=0; |
bkc_mbed | 0:2053640461b5 | 297 | |
bkc_mbed | 0:2053640461b5 | 298 | nlg_baseclk = ReadDWORD(nlg_hdr + 72); |
bkc_mbed | 0:2053640461b5 | 299 | nlg_tick = ReadDWORD(nlg_hdr + 76); |
bkc_mbed | 0:2053640461b5 | 300 | |
bkc_mbed | 0:2053640461b5 | 301 | nlg_length = ReadDWORD(nlg_hdr + 88); |
bkc_mbed | 0:2053640461b5 | 302 | nlg_loop_ptr = (long)ReadDWORD(nlg_hdr + 92); |
bkc_mbed | 0:2053640461b5 | 303 | |
bkc_mbed | 0:2053640461b5 | 304 | fseek(nlg_file, 0x60, SEEK_SET); |
bkc_mbed | 0:2053640461b5 | 305 | |
bkc_mbed | 0:2053640461b5 | 306 | nlg_ctc0 = nlg_ctc3 = 0; |
bkc_mbed | 0:2053640461b5 | 307 | |
bkc_mbed | 0:2053640461b5 | 308 | return 0; |
bkc_mbed | 0:2053640461b5 | 309 | } |
bkc_mbed | 0:2053640461b5 | 310 | |
bkc_mbed | 2:f0b7779b03c7 | 311 | #if 0 |
bkc_mbed | 2:f0b7779b03c7 | 312 | |
bkc_mbed | 0:2053640461b5 | 313 | // 書き込み用NLGファイルを開く |
bkc_mbed | 0:2053640461b5 | 314 | int CreateNLG(const char *file) |
bkc_mbed | 0:2053640461b5 | 315 | { |
bkc_mbed | 0:2053640461b5 | 316 | byte hdr[0x80]; |
bkc_mbed | 0:2053640461b5 | 317 | |
bkc_mbed | 0:2053640461b5 | 318 | nlg_file = fopen(file, "wb"); |
bkc_mbed | 0:2053640461b5 | 319 | |
bkc_mbed | 0:2053640461b5 | 320 | if (!nlg_file) |
bkc_mbed | 0:2053640461b5 | 321 | { |
bkc_mbed | 0:2053640461b5 | 322 | printf("File open error:%s\n", file); |
bkc_mbed | 0:2053640461b5 | 323 | return -1; |
bkc_mbed | 0:2053640461b5 | 324 | } |
bkc_mbed | 0:2053640461b5 | 325 | |
bkc_mbed | 0:2053640461b5 | 326 | memset(hdr, 0, 0x80); |
bkc_mbed | 0:2053640461b5 | 327 | memcpy(hdr,"NLG1",4); |
bkc_mbed | 0:2053640461b5 | 328 | |
bkc_mbed | 0:2053640461b5 | 329 | WriteWORD(hdr + 4, NLG_VER); // Version |
bkc_mbed | 0:2053640461b5 | 330 | WriteDWORD(hdr + 72, NLG_BASECLK); // BaseCLK |
bkc_mbed | 0:2053640461b5 | 331 | WriteDWORD(hdr + 76, 0); // Tick |
bkc_mbed | 0:2053640461b5 | 332 | WriteDWORD(hdr + 88, 0); // Length |
bkc_mbed | 0:2053640461b5 | 333 | WriteDWORD(hdr + 92, 0); // Loop Pointer |
bkc_mbed | 0:2053640461b5 | 334 | |
bkc_mbed | 0:2053640461b5 | 335 | fwrite(hdr, 0x60, 1, nlg_file); |
bkc_mbed | 0:2053640461b5 | 336 | |
bkc_mbed | 0:2053640461b5 | 337 | nlg_ctc0 = nlg_ctc3 = 0; |
bkc_mbed | 0:2053640461b5 | 338 | |
bkc_mbed | 0:2053640461b5 | 339 | return 0; |
bkc_mbed | 0:2053640461b5 | 340 | } |
bkc_mbed | 0:2053640461b5 | 341 | |
bkc_mbed | 0:2053640461b5 | 342 | |
bkc_mbed | 0:2053640461b5 | 343 | // コマンドの書き込み |
bkc_mbed | 0:2053640461b5 | 344 | void WriteNLG_CMD(int cmd) |
bkc_mbed | 0:2053640461b5 | 345 | { |
bkc_mbed | 0:2053640461b5 | 346 | if (!nlg_file) |
bkc_mbed | 0:2053640461b5 | 347 | return; |
bkc_mbed | 0:2053640461b5 | 348 | |
bkc_mbed | 0:2053640461b5 | 349 | fputc(cmd, nlg_file); |
bkc_mbed | 0:2053640461b5 | 350 | } |
bkc_mbed | 0:2053640461b5 | 351 | |
bkc_mbed | 0:2053640461b5 | 352 | // CTC定数の書き込み |
bkc_mbed | 0:2053640461b5 | 353 | void WriteNLG_CTC(int cmd,int ctc) |
bkc_mbed | 0:2053640461b5 | 354 | { |
bkc_mbed | 0:2053640461b5 | 355 | if (!nlg_file) |
bkc_mbed | 0:2053640461b5 | 356 | return; |
bkc_mbed | 0:2053640461b5 | 357 | |
bkc_mbed | 0:2053640461b5 | 358 | fputc(cmd, nlg_file); |
bkc_mbed | 0:2053640461b5 | 359 | fputc(ctc, nlg_file); |
bkc_mbed | 0:2053640461b5 | 360 | } |
bkc_mbed | 0:2053640461b5 | 361 | |
bkc_mbed | 0:2053640461b5 | 362 | // データの書き込み |
bkc_mbed | 0:2053640461b5 | 363 | void WriteNLG_Data(int cmd,int addr,int data) |
bkc_mbed | 0:2053640461b5 | 364 | { |
bkc_mbed | 0:2053640461b5 | 365 | if (!nlg_file) |
bkc_mbed | 0:2053640461b5 | 366 | return; |
bkc_mbed | 0:2053640461b5 | 367 | |
bkc_mbed | 0:2053640461b5 | 368 | fputc(cmd, nlg_file); |
bkc_mbed | 0:2053640461b5 | 369 | fputc(addr, nlg_file); |
bkc_mbed | 0:2053640461b5 | 370 | fputc(data, nlg_file); |
bkc_mbed | 0:2053640461b5 | 371 | } |
bkc_mbed | 0:2053640461b5 | 372 | |
bkc_mbed | 2:f0b7779b03c7 | 373 | |
bkc_mbed | 2:f0b7779b03c7 | 374 | #endif |
bkc_mbed | 2:f0b7779b03c7 | 375 | |
bkc_mbed | 2:f0b7779b03c7 | 376 | // ファイルを閉じる |
bkc_mbed | 2:f0b7779b03c7 | 377 | void CloseNLG(void) |
bkc_mbed | 2:f0b7779b03c7 | 378 | { |
bkc_mbed | 2:f0b7779b03c7 | 379 | if (!nlg_file) |
bkc_mbed | 2:f0b7779b03c7 | 380 | return; |
bkc_mbed | 2:f0b7779b03c7 | 381 | |
bkc_mbed | 2:f0b7779b03c7 | 382 | fclose(nlg_file); |
bkc_mbed | 2:f0b7779b03c7 | 383 | #if defined(__MICROLIB) && defined(__ARMCC_VERSION) // with microlib and ARM compiler |
bkc_mbed | 2:f0b7779b03c7 | 384 | free(nlg_file); |
bkc_mbed | 2:f0b7779b03c7 | 385 | #endif |
bkc_mbed | 2:f0b7779b03c7 | 386 | |
bkc_mbed | 2:f0b7779b03c7 | 387 | nlg_file = NULL; |
bkc_mbed | 2:f0b7779b03c7 | 388 | } |
bkc_mbed | 2:f0b7779b03c7 | 389 | |
bkc_mbed | 0:2053640461b5 | 390 | // データの読み出し |
bkc_mbed | 0:2053640461b5 | 391 | int ReadNLG(void) |
bkc_mbed | 0:2053640461b5 | 392 | { |
bkc_mbed | 0:2053640461b5 | 393 | return fgetc(nlg_file); |
bkc_mbed | 0:2053640461b5 | 394 | } |
bkc_mbed | 0:2053640461b5 | 395 | |
bkc_mbed | 0:2053640461b5 | 396 | // ファイルポインタの位置を取得 |
bkc_mbed | 0:2053640461b5 | 397 | long TellNLG(void) |
bkc_mbed | 0:2053640461b5 | 398 | { |
bkc_mbed | 0:2053640461b5 | 399 | return ftell(nlg_file); |
bkc_mbed | 0:2053640461b5 | 400 | } |
bkc_mbed | 0:2053640461b5 | 401 | |
bkc_mbed | 0:2053640461b5 | 402 | // ファイルポインタの位置を設定 |
bkc_mbed | 0:2053640461b5 | 403 | void SeekNLG(long pos) |
bkc_mbed | 0:2053640461b5 | 404 | { |
bkc_mbed | 0:2053640461b5 | 405 | fseek(nlg_file, pos, SEEK_SET); |
bkc_mbed | 0:2053640461b5 | 406 | } |
bkc_mbed | 0:2053640461b5 | 407 | |
bkc_mbed | 0:2053640461b5 | 408 | // タイトルの取得 |
bkc_mbed | 0:2053640461b5 | 409 | char *GetTitleNLG(void) |
bkc_mbed | 0:2053640461b5 | 410 | { |
bkc_mbed | 0:2053640461b5 | 411 | return nlg_title; |
bkc_mbed | 0:2053640461b5 | 412 | } |
bkc_mbed | 0:2053640461b5 | 413 | |
bkc_mbed | 0:2053640461b5 | 414 | // ティックの取得 |
bkc_mbed | 0:2053640461b5 | 415 | int GetTickNLG(void) |
bkc_mbed | 0:2053640461b5 | 416 | { |
bkc_mbed | 0:2053640461b5 | 417 | return nlg_tick; |
bkc_mbed | 0:2053640461b5 | 418 | } |
bkc_mbed | 0:2053640461b5 | 419 | |
bkc_mbed | 0:2053640461b5 | 420 | // CTC0値の設定 |
bkc_mbed | 0:2053640461b5 | 421 | void SetCTC0_NLG(int value) |
bkc_mbed | 0:2053640461b5 | 422 | { |
bkc_mbed | 0:2053640461b5 | 423 | nlg_ctc0 = value; |
bkc_mbed | 0:2053640461b5 | 424 | nlg_tick = ((nlg_ctc0 * 256) * nlg_ctc3); |
bkc_mbed | 0:2053640461b5 | 425 | } |
bkc_mbed | 0:2053640461b5 | 426 | |
bkc_mbed | 0:2053640461b5 | 427 | // CTC3値の設定 |
bkc_mbed | 0:2053640461b5 | 428 | void SetCTC3_NLG(int value) |
bkc_mbed | 0:2053640461b5 | 429 | { |
bkc_mbed | 0:2053640461b5 | 430 | nlg_ctc3 = value; |
bkc_mbed | 0:2053640461b5 | 431 | nlg_tick = ((nlg_ctc0 * 256) * nlg_ctc3); |
bkc_mbed | 0:2053640461b5 | 432 | } |
bkc_mbed | 0:2053640461b5 | 433 | |
bkc_mbed | 0:2053640461b5 | 434 | // 曲の長さを得る |
bkc_mbed | 0:2053640461b5 | 435 | int GetLengthNLG(void) |
bkc_mbed | 0:2053640461b5 | 436 | { |
bkc_mbed | 0:2053640461b5 | 437 | return nlg_length; |
bkc_mbed | 0:2053640461b5 | 438 | } |
bkc_mbed | 0:2053640461b5 | 439 | |
bkc_mbed | 0:2053640461b5 | 440 | // ループポインタを得る |
bkc_mbed | 0:2053640461b5 | 441 | int GetLoopPtrNLG(void) |
bkc_mbed | 0:2053640461b5 | 442 | { |
bkc_mbed | 0:2053640461b5 | 443 | return nlg_loop_ptr; |
bkc_mbed | 0:2053640461b5 | 444 | } |
bkc_mbed | 0:2053640461b5 | 445 | |
bkc_mbed | 0:2053640461b5 | 446 | // ベースクロックを得る |
bkc_mbed | 0:2053640461b5 | 447 | int GetBaseClkNLG(void) |
bkc_mbed | 0:2053640461b5 | 448 | { |
bkc_mbed | 0:2053640461b5 | 449 | return nlg_baseclk; |
bkc_mbed | 0:2053640461b5 | 450 | } |
bkc_mbed | 0:2053640461b5 | 451 | |
bkc_mbed | 0:2053640461b5 | 452 | #define CMD_PSG 0x00 |
bkc_mbed | 0:2053640461b5 | 453 | #define CMD_OPM 0x01 |
bkc_mbed | 0:2053640461b5 | 454 | #define CMD_OPM2 0x02 |
bkc_mbed | 0:2053640461b5 | 455 | #define CMD_IRQ 0x80 |
bkc_mbed | 0:2053640461b5 | 456 | |
bkc_mbed | 0:2053640461b5 | 457 | #define CMD_CTC0 0x81 |
bkc_mbed | 0:2053640461b5 | 458 | #define CMD_CTC3 0x82 |
bkc_mbed | 0:2053640461b5 | 459 | |
bkc_mbed | 0:2053640461b5 | 460 | |
bkc_mbed | 0:2053640461b5 | 461 | /* 単位を扱いやすいように */ |
bkc_mbed | 0:2053640461b5 | 462 | typedef unsigned char byte; |
bkc_mbed | 0:2053640461b5 | 463 | typedef unsigned short word; |
bkc_mbed | 0:2053640461b5 | 464 | typedef unsigned long dword; |
bkc_mbed | 0:2053640461b5 | 465 | |
bkc_mbed | 0:2053640461b5 | 466 | /* NLGを処理するための構造体 */ |
bkc_mbed | 0:2053640461b5 | 467 | typedef struct |
bkc_mbed | 0:2053640461b5 | 468 | { |
bkc_mbed | 0:2053640461b5 | 469 | int base_clk; |
bkc_mbed | 0:2053640461b5 | 470 | int clk_per_sample; |
bkc_mbed | 0:2053640461b5 | 471 | |
bkc_mbed | 0:2053640461b5 | 472 | int freeze; |
bkc_mbed | 0:2053640461b5 | 473 | int total_samples; |
bkc_mbed | 0:2053640461b5 | 474 | |
bkc_mbed | 0:2053640461b5 | 475 | int total_sec; |
bkc_mbed | 0:2053640461b5 | 476 | |
bkc_mbed | 0:2053640461b5 | 477 | int current_samples; |
bkc_mbed | 0:2053640461b5 | 478 | int tick; |
bkc_mbed | 0:2053640461b5 | 479 | int tick_sec; |
bkc_mbed | 0:2053640461b5 | 480 | |
bkc_mbed | 0:2053640461b5 | 481 | int irq_count; |
bkc_mbed | 0:2053640461b5 | 482 | int irq_loop; |
bkc_mbed | 0:2053640461b5 | 483 | long loop_address; |
bkc_mbed | 2:f0b7779b03c7 | 484 | |
bkc_mbed | 1:ec416e6d5739 | 485 | int irq_counter; |
bkc_mbed | 1:ec416e6d5739 | 486 | int irq_counter2; |
bkc_mbed | 1:ec416e6d5739 | 487 | |
bkc_mbed | 0:2053640461b5 | 488 | } NLG_R; |
bkc_mbed | 0:2053640461b5 | 489 | |
bkc_mbed | 0:2053640461b5 | 490 | |
bkc_mbed | 0:2053640461b5 | 491 | /* 初期化 */ |
bkc_mbed | 0:2053640461b5 | 492 | int initNLG(NLG_R *np, const char *nlg_name) |
bkc_mbed | 0:2053640461b5 | 493 | { |
bkc_mbed | 0:2053640461b5 | 494 | if (OpenNLG(nlg_name) < 0) |
bkc_mbed | 0:2053640461b5 | 495 | return -1; |
bkc_mbed | 0:2053640461b5 | 496 | |
bkc_mbed | 0:2053640461b5 | 497 | np->base_clk = GetBaseClkNLG(); |
bkc_mbed | 0:2053640461b5 | 498 | |
bkc_mbed | 0:2053640461b5 | 499 | /* printf("Title:%s %d %d %dsec %d\n", |
bkc_mbed | 0:2053640461b5 | 500 | GetTitleNLG(), |
bkc_mbed | 0:2053640461b5 | 501 | GetBaseClkNLG(), |
bkc_mbed | 0:2053640461b5 | 502 | GetTickNLG(), |
bkc_mbed | 0:2053640461b5 | 503 | GetLengthNLG(), |
bkc_mbed | 0:2053640461b5 | 504 | GetLoopPtrNLG()); |
bkc_mbed | 0:2053640461b5 | 505 | */ |
bkc_mbed | 0:2053640461b5 | 506 | |
bkc_mbed | 0:2053640461b5 | 507 | np->total_samples = 0; |
bkc_mbed | 0:2053640461b5 | 508 | np->current_samples = 0; |
bkc_mbed | 0:2053640461b5 | 509 | |
bkc_mbed | 0:2053640461b5 | 510 | np->total_sec = 0; |
bkc_mbed | 0:2053640461b5 | 511 | |
bkc_mbed | 0:2053640461b5 | 512 | np->tick = 0; |
bkc_mbed | 0:2053640461b5 | 513 | np->tick_sec = 0; |
bkc_mbed | 0:2053640461b5 | 514 | |
bkc_mbed | 0:2053640461b5 | 515 | np->freeze = 0; |
bkc_mbed | 0:2053640461b5 | 516 | |
bkc_mbed | 0:2053640461b5 | 517 | np->irq_count = 0; |
bkc_mbed | 0:2053640461b5 | 518 | np->irq_loop = GetLoopPtrNLG(); |
bkc_mbed | 0:2053640461b5 | 519 | np->loop_address = -1; |
bkc_mbed | 2:f0b7779b03c7 | 520 | |
bkc_mbed | 1:ec416e6d5739 | 521 | np->irq_counter = 0; |
bkc_mbed | 1:ec416e6d5739 | 522 | np->irq_counter2 = 0; |
bkc_mbed | 0:2053640461b5 | 523 | |
bkc_mbed | 0:2053640461b5 | 524 | return 0; |
bkc_mbed | 0:2053640461b5 | 525 | } |
bkc_mbed | 0:2053640461b5 | 526 | |
bkc_mbed | 0:2053640461b5 | 527 | /* PSGへの出力 */ |
bkc_mbed | 0:2053640461b5 | 528 | void WritePSG(int addr,int value) |
bkc_mbed | 0:2053640461b5 | 529 | { |
bkc_mbed | 0:2053640461b5 | 530 | regPSGOut(addr, value); |
bkc_mbed | 0:2053640461b5 | 531 | } |
bkc_mbed | 0:2053640461b5 | 532 | |
bkc_mbed | 0:2053640461b5 | 533 | /* FM1への出力 */ |
bkc_mbed | 0:2053640461b5 | 534 | void WriteOPM(int addr,int value) |
bkc_mbed | 0:2053640461b5 | 535 | { |
bkc_mbed | 0:2053640461b5 | 536 | regFMOut(addr, value); |
bkc_mbed | 0:2053640461b5 | 537 | } |
bkc_mbed | 0:2053640461b5 | 538 | |
bkc_mbed | 0:2053640461b5 | 539 | /* FM2への出力 */ |
bkc_mbed | 0:2053640461b5 | 540 | void WriteOPM2(int addr,int value) |
bkc_mbed | 0:2053640461b5 | 541 | { |
bkc_mbed | 0:2053640461b5 | 542 | regFM2Out(addr, value); |
bkc_mbed | 0:2053640461b5 | 543 | } |
bkc_mbed | 0:2053640461b5 | 544 | |
bkc_mbed | 0:2053640461b5 | 545 | int g_stop = 0; |
bkc_mbed | 0:2053640461b5 | 546 | |
bkc_mbed | 0:2053640461b5 | 547 | void DispNLG(NLG_R *np) |
bkc_mbed | 0:2053640461b5 | 548 | { |
bkc_mbed | 1:ec416e6d5739 | 549 | // printf("Time %02d:%02d\r",np->total_sec / 60, np->total_sec % 60); |
bkc_mbed | 1:ec416e6d5739 | 550 | // fflush(stdout); |
bkc_mbed | 0:2053640461b5 | 551 | |
bkc_mbed | 0:2053640461b5 | 552 | char buf[16]; |
bkc_mbed | 2:f0b7779b03c7 | 553 | sprintf(buf, "%02d:%02d", |
bkc_mbed | 2:f0b7779b03c7 | 554 | np->total_sec / 60, |
bkc_mbed | 2:f0b7779b03c7 | 555 | np->total_sec % 60); |
bkc_mbed | 0:2053640461b5 | 556 | |
bkc_mbed | 2:f0b7779b03c7 | 557 | lcd_setCursor(3,1); |
bkc_mbed | 2:f0b7779b03c7 | 558 | lcd_printStr(buf); |
bkc_mbed | 0:2053640461b5 | 559 | } |
bkc_mbed | 0:2053640461b5 | 560 | |
bkc_mbed | 0:2053640461b5 | 561 | /* NLGの再生 */ |
bkc_mbed | 0:2053640461b5 | 562 | int PlayNLG(NLG_R *np, int sec) |
bkc_mbed | 0:2053640461b5 | 563 | { |
bkc_mbed | 0:2053640461b5 | 564 | int cmd; |
bkc_mbed | 0:2053640461b5 | 565 | int addr, data; |
bkc_mbed | 0:2053640461b5 | 566 | int result = 0; |
bkc_mbed | 0:2053640461b5 | 567 | |
bkc_mbed | 0:2053640461b5 | 568 | int tick; |
bkc_mbed | 0:2053640461b5 | 569 | int total_us = 0; |
bkc_mbed | 0:2053640461b5 | 570 | int us_tick = np->base_clk / 1000000; |
bkc_mbed | 0:2053640461b5 | 571 | |
bkc_mbed | 2:f0b7779b03c7 | 572 | printf("start play\n"); |
bkc_mbed | 0:2053640461b5 | 573 | Timer t; |
bkc_mbed | 0:2053640461b5 | 574 | |
bkc_mbed | 0:2053640461b5 | 575 | t.start(); |
bkc_mbed | 0:2053640461b5 | 576 | total_us = 0; |
bkc_mbed | 0:2053640461b5 | 577 | |
bkc_mbed | 0:2053640461b5 | 578 | // wait until release buttons |
bkc_mbed | 0:2053640461b5 | 579 | while(!sw_next || !sw_play); |
bkc_mbed | 0:2053640461b5 | 580 | |
bkc_mbed | 0:2053640461b5 | 581 | DispNLG(np); |
bkc_mbed | 0:2053640461b5 | 582 | |
bkc_mbed | 0:2053640461b5 | 583 | while(np->total_sec < sec && !g_stop) |
bkc_mbed | 0:2053640461b5 | 584 | { |
bkc_mbed | 0:2053640461b5 | 585 | // push next |
bkc_mbed | 0:2053640461b5 | 586 | if (!sw_next) |
bkc_mbed | 0:2053640461b5 | 587 | break; |
bkc_mbed | 0:2053640461b5 | 588 | |
bkc_mbed | 0:2053640461b5 | 589 | // push play |
bkc_mbed | 0:2053640461b5 | 590 | if (!sw_play) |
bkc_mbed | 0:2053640461b5 | 591 | { |
bkc_mbed | 0:2053640461b5 | 592 | g_stop = 1; |
bkc_mbed | 0:2053640461b5 | 593 | break; |
bkc_mbed | 0:2053640461b5 | 594 | } |
bkc_mbed | 0:2053640461b5 | 595 | |
bkc_mbed | 0:2053640461b5 | 596 | /* ウエイトの処理 */ |
bkc_mbed | 0:2053640461b5 | 597 | while (np->tick >= us_tick) |
bkc_mbed | 0:2053640461b5 | 598 | { |
bkc_mbed | 0:2053640461b5 | 599 | int us = np->tick / us_tick; |
bkc_mbed | 0:2053640461b5 | 600 | np->tick -= (us * us_tick); |
bkc_mbed | 0:2053640461b5 | 601 | |
bkc_mbed | 0:2053640461b5 | 602 | while(t.read_us() < total_us + us); |
bkc_mbed | 0:2053640461b5 | 603 | total_us += us; |
bkc_mbed | 0:2053640461b5 | 604 | |
bkc_mbed | 0:2053640461b5 | 605 | if (total_us >= 1000000) |
bkc_mbed | 0:2053640461b5 | 606 | { |
bkc_mbed | 0:2053640461b5 | 607 | total_us -= t.read_us(); |
bkc_mbed | 0:2053640461b5 | 608 | t.reset(); |
bkc_mbed | 0:2053640461b5 | 609 | } |
bkc_mbed | 0:2053640461b5 | 610 | // DELAY_NEXT(us); |
bkc_mbed | 0:2053640461b5 | 611 | |
bkc_mbed | 0:2053640461b5 | 612 | // printf("delay : %dus\n",us); |
bkc_mbed | 0:2053640461b5 | 613 | } |
bkc_mbed | 0:2053640461b5 | 614 | |
bkc_mbed | 0:2053640461b5 | 615 | /* コマンドの読み出し */ |
bkc_mbed | 0:2053640461b5 | 616 | cmd = ReadNLG(); |
bkc_mbed | 0:2053640461b5 | 617 | if (cmd == EOF) |
bkc_mbed | 0:2053640461b5 | 618 | { |
bkc_mbed | 0:2053640461b5 | 619 | if (np->loop_address >= 0) |
bkc_mbed | 0:2053640461b5 | 620 | { |
bkc_mbed | 0:2053640461b5 | 621 | SeekNLG(np->loop_address); |
bkc_mbed | 0:2053640461b5 | 622 | cmd = ReadNLG(); |
bkc_mbed | 0:2053640461b5 | 623 | } |
bkc_mbed | 0:2053640461b5 | 624 | else |
bkc_mbed | 0:2053640461b5 | 625 | { |
bkc_mbed | 0:2053640461b5 | 626 | result = EOF; |
bkc_mbed | 0:2053640461b5 | 627 | break; |
bkc_mbed | 0:2053640461b5 | 628 | } |
bkc_mbed | 0:2053640461b5 | 629 | } |
bkc_mbed | 0:2053640461b5 | 630 | |
bkc_mbed | 0:2053640461b5 | 631 | /* コマンドの処理 */ |
bkc_mbed | 0:2053640461b5 | 632 | switch (cmd) |
bkc_mbed | 0:2053640461b5 | 633 | { |
bkc_mbed | 0:2053640461b5 | 634 | case CMD_PSG: |
bkc_mbed | 0:2053640461b5 | 635 | addr = ReadNLG(); |
bkc_mbed | 0:2053640461b5 | 636 | data = ReadNLG(); |
bkc_mbed | 0:2053640461b5 | 637 | WritePSG(addr, data); |
bkc_mbed | 0:2053640461b5 | 638 | break; |
bkc_mbed | 0:2053640461b5 | 639 | case CMD_OPM: |
bkc_mbed | 0:2053640461b5 | 640 | addr = ReadNLG(); |
bkc_mbed | 0:2053640461b5 | 641 | data = ReadNLG(); |
bkc_mbed | 0:2053640461b5 | 642 | WriteOPM(addr, data); |
bkc_mbed | 0:2053640461b5 | 643 | break; |
bkc_mbed | 0:2053640461b5 | 644 | case CMD_OPM2: |
bkc_mbed | 0:2053640461b5 | 645 | addr = ReadNLG(); |
bkc_mbed | 0:2053640461b5 | 646 | data = ReadNLG(); |
bkc_mbed | 0:2053640461b5 | 647 | WriteOPM2(addr, data); |
bkc_mbed | 0:2053640461b5 | 648 | break; |
bkc_mbed | 0:2053640461b5 | 649 | case CMD_IRQ: |
bkc_mbed | 0:2053640461b5 | 650 | tick = GetTickNLG(); |
bkc_mbed | 0:2053640461b5 | 651 | np->tick_sec += tick; |
bkc_mbed | 0:2053640461b5 | 652 | np->tick += tick; |
bkc_mbed | 0:2053640461b5 | 653 | np->irq_count++; |
bkc_mbed | 0:2053640461b5 | 654 | if (np->irq_count == np->irq_loop) |
bkc_mbed | 0:2053640461b5 | 655 | { |
bkc_mbed | 0:2053640461b5 | 656 | /* ループ位置の設定 */ |
bkc_mbed | 0:2053640461b5 | 657 | np->loop_address = TellNLG(); |
bkc_mbed | 0:2053640461b5 | 658 | np->loop_address -= 1; |
bkc_mbed | 0:2053640461b5 | 659 | } |
bkc_mbed | 1:ec416e6d5739 | 660 | np->irq_counter++; |
bkc_mbed | 1:ec416e6d5739 | 661 | if (np->irq_counter >= 48) |
bkc_mbed | 1:ec416e6d5739 | 662 | { |
bkc_mbed | 1:ec416e6d5739 | 663 | np->irq_counter = 0; |
bkc_mbed | 1:ec416e6d5739 | 664 | led1 = !led1; |
bkc_mbed | 1:ec416e6d5739 | 665 | |
bkc_mbed | 1:ec416e6d5739 | 666 | np->irq_counter2++; |
bkc_mbed | 1:ec416e6d5739 | 667 | if (np->irq_counter2 >= 4) |
bkc_mbed | 1:ec416e6d5739 | 668 | { |
bkc_mbed | 1:ec416e6d5739 | 669 | np->irq_counter2 = 0; |
bkc_mbed | 1:ec416e6d5739 | 670 | led2 = !led2; |
bkc_mbed | 1:ec416e6d5739 | 671 | } |
bkc_mbed | 1:ec416e6d5739 | 672 | } |
bkc_mbed | 0:2053640461b5 | 673 | break; |
bkc_mbed | 0:2053640461b5 | 674 | case CMD_CTC0: |
bkc_mbed | 0:2053640461b5 | 675 | SetCTC0_NLG(ReadNLG()); |
bkc_mbed | 0:2053640461b5 | 676 | break; |
bkc_mbed | 0:2053640461b5 | 677 | case CMD_CTC3: |
bkc_mbed | 0:2053640461b5 | 678 | SetCTC3_NLG(ReadNLG()); |
bkc_mbed | 0:2053640461b5 | 679 | break; |
bkc_mbed | 0:2053640461b5 | 680 | |
bkc_mbed | 0:2053640461b5 | 681 | } |
bkc_mbed | 0:2053640461b5 | 682 | /* 秒情報の表示 */ |
bkc_mbed | 0:2053640461b5 | 683 | while (np->tick_sec >= np->base_clk) |
bkc_mbed | 0:2053640461b5 | 684 | { |
bkc_mbed | 0:2053640461b5 | 685 | np->tick_sec -= np->base_clk; |
bkc_mbed | 0:2053640461b5 | 686 | np->total_sec++; |
bkc_mbed | 0:2053640461b5 | 687 | |
bkc_mbed | 0:2053640461b5 | 688 | DispNLG(np); |
bkc_mbed | 0:2053640461b5 | 689 | } |
bkc_mbed | 0:2053640461b5 | 690 | } |
bkc_mbed | 0:2053640461b5 | 691 | |
bkc_mbed | 0:2053640461b5 | 692 | return result; |
bkc_mbed | 0:2053640461b5 | 693 | } |
bkc_mbed | 0:2053640461b5 | 694 | |
bkc_mbed | 0:2053640461b5 | 695 | NLG_R n; |
bkc_mbed | 0:2053640461b5 | 696 | |
bkc_mbed | 2:f0b7779b03c7 | 697 | int nlg_play(const char *nlg_file) |
bkc_mbed | 0:2053640461b5 | 698 | { |
bkc_mbed | 1:ec416e6d5739 | 699 | printf("nlg_play:%s\n",nlg_file); |
bkc_mbed | 0:2053640461b5 | 700 | |
bkc_mbed | 0:2053640461b5 | 701 | /* NLGの初期化 */ |
bkc_mbed | 0:2053640461b5 | 702 | if (initNLG(&n, nlg_file) < 0) |
bkc_mbed | 0:2053640461b5 | 703 | { |
bkc_mbed | 0:2053640461b5 | 704 | lcd_setCursor(0,1); |
bkc_mbed | 0:2053640461b5 | 705 | lcd_printStr("ERROR!!"); |
bkc_mbed | 0:2053640461b5 | 706 | |
bkc_mbed | 0:2053640461b5 | 707 | printf("Failed to init.\n"); |
bkc_mbed | 0:2053640461b5 | 708 | return -1; |
bkc_mbed | 0:2053640461b5 | 709 | } |
bkc_mbed | 2:f0b7779b03c7 | 710 | |
bkc_mbed | 2:f0b7779b03c7 | 711 | printf("Play..\n"); |
bkc_mbed | 1:ec416e6d5739 | 712 | |
bkc_mbed | 0:2053640461b5 | 713 | /* 再生する */ |
bkc_mbed | 0:2053640461b5 | 714 | PlayNLG(&n, 360); |
bkc_mbed | 0:2053640461b5 | 715 | |
bkc_mbed | 0:2053640461b5 | 716 | boardMute(); |
bkc_mbed | 0:2053640461b5 | 717 | |
bkc_mbed | 0:2053640461b5 | 718 | /* NLGファイルを閉じる */ |
bkc_mbed | 0:2053640461b5 | 719 | CloseNLG(); |
bkc_mbed | 0:2053640461b5 | 720 | |
bkc_mbed | 0:2053640461b5 | 721 | return 0; |
bkc_mbed | 0:2053640461b5 | 722 | } |
bkc_mbed | 0:2053640461b5 | 723 | |
bkc_mbed | 0:2053640461b5 | 724 | int get_nlg_file(char *dest,int index) |
bkc_mbed | 0:2053640461b5 | 725 | { |
bkc_mbed | 0:2053640461b5 | 726 | char *cwd = "/sd/"; |
bkc_mbed | 0:2053640461b5 | 727 | int count = -1; |
bkc_mbed | 0:2053640461b5 | 728 | DIR *dir = opendir(cwd); |
bkc_mbed | 0:2053640461b5 | 729 | |
bkc_mbed | 0:2053640461b5 | 730 | dest[0] = 0; |
bkc_mbed | 0:2053640461b5 | 731 | |
bkc_mbed | 0:2053640461b5 | 732 | if (dir == NULL) |
bkc_mbed | 0:2053640461b5 | 733 | { |
bkc_mbed | 0:2053640461b5 | 734 | lcd_setCursor(0, 1); |
bkc_mbed | 0:2053640461b5 | 735 | lcd_printStr("ERROR!"); |
bkc_mbed | 0:2053640461b5 | 736 | return -1; |
bkc_mbed | 0:2053640461b5 | 737 | } |
bkc_mbed | 0:2053640461b5 | 738 | struct dirent *dent; |
bkc_mbed | 0:2053640461b5 | 739 | |
bkc_mbed | 0:2053640461b5 | 740 | while(1) |
bkc_mbed | 0:2053640461b5 | 741 | { |
bkc_mbed | 0:2053640461b5 | 742 | dent = readdir(dir); |
bkc_mbed | 0:2053640461b5 | 743 | if (!dent) |
bkc_mbed | 0:2053640461b5 | 744 | break; |
bkc_mbed | 0:2053640461b5 | 745 | |
bkc_mbed | 0:2053640461b5 | 746 | // resource or hidden file |
bkc_mbed | 0:2053640461b5 | 747 | if (dent->d_name[0] == '.') |
bkc_mbed | 0:2053640461b5 | 748 | continue; |
bkc_mbed | 0:2053640461b5 | 749 | |
bkc_mbed | 0:2053640461b5 | 750 | char *ext = strrchr(dent->d_name, '.'); |
bkc_mbed | 0:2053640461b5 | 751 | if (!ext) |
bkc_mbed | 0:2053640461b5 | 752 | continue; |
bkc_mbed | 0:2053640461b5 | 753 | |
bkc_mbed | 0:2053640461b5 | 754 | if (strcasecmp(ext, ".nlg") != 0) |
bkc_mbed | 0:2053640461b5 | 755 | continue; |
bkc_mbed | 0:2053640461b5 | 756 | |
bkc_mbed | 0:2053640461b5 | 757 | if (count < 0) |
bkc_mbed | 0:2053640461b5 | 758 | count = 0; |
bkc_mbed | 0:2053640461b5 | 759 | |
bkc_mbed | 0:2053640461b5 | 760 | count++; |
bkc_mbed | 0:2053640461b5 | 761 | |
bkc_mbed | 0:2053640461b5 | 762 | if (index < 0) |
bkc_mbed | 0:2053640461b5 | 763 | continue; |
bkc_mbed | 0:2053640461b5 | 764 | |
bkc_mbed | 0:2053640461b5 | 765 | if (count <= index) |
bkc_mbed | 0:2053640461b5 | 766 | continue; |
bkc_mbed | 0:2053640461b5 | 767 | |
bkc_mbed | 0:2053640461b5 | 768 | strcpy(dest, dent->d_name); |
bkc_mbed | 0:2053640461b5 | 769 | break; |
bkc_mbed | 0:2053640461b5 | 770 | } |
bkc_mbed | 0:2053640461b5 | 771 | closedir(dir); |
bkc_mbed | 0:2053640461b5 | 772 | return count; |
bkc_mbed | 0:2053640461b5 | 773 | } |
bkc_mbed | 0:2053640461b5 | 774 | |
bkc_mbed | 0:2053640461b5 | 775 | int main() |
bkc_mbed | 0:2053640461b5 | 776 | { |
bkc_mbed | 0:2053640461b5 | 777 | char file[32]; |
bkc_mbed | 0:2053640461b5 | 778 | char path[64]; |
bkc_mbed | 0:2053640461b5 | 779 | |
bkc_mbed | 0:2053640461b5 | 780 | led1 = 0; |
bkc_mbed | 1:ec416e6d5739 | 781 | led2 = 0; |
bkc_mbed | 1:ec416e6d5739 | 782 | |
bkc_mbed | 0:2053640461b5 | 783 | lcd_init(); |
bkc_mbed | 0:2053640461b5 | 784 | |
bkc_mbed | 0:2053640461b5 | 785 | boardInit(); |
bkc_mbed | 0:2053640461b5 | 786 | |
bkc_mbed | 0:2053640461b5 | 787 | int files = 0; |
bkc_mbed | 0:2053640461b5 | 788 | int disp_mode = 0; |
bkc_mbed | 0:2053640461b5 | 789 | |
bkc_mbed | 0:2053640461b5 | 790 | if (!sw_next) |
bkc_mbed | 0:2053640461b5 | 791 | disp_mode = 1; |
bkc_mbed | 0:2053640461b5 | 792 | |
bkc_mbed | 0:2053640461b5 | 793 | files = get_nlg_file(file, -1); |
bkc_mbed | 0:2053640461b5 | 794 | |
bkc_mbed | 0:2053640461b5 | 795 | if (disp_mode) |
bkc_mbed | 0:2053640461b5 | 796 | { |
bkc_mbed | 0:2053640461b5 | 797 | char buf[16]; |
bkc_mbed | 2:f0b7779b03c7 | 798 | |
bkc_mbed | 2:f0b7779b03c7 | 799 | ioShiftOutTest(( 0x08 << 8) | (ACTLOW)); |
bkc_mbed | 2:f0b7779b03c7 | 800 | // ioShiftOutTest(( 0xff << 8) | (ACTLOW)); |
bkc_mbed | 2:f0b7779b03c7 | 801 | // ioShiftOutTest(( 0xaa << 8) | (ACTLOW)); |
bkc_mbed | 2:f0b7779b03c7 | 802 | // ioShiftOutTest(( 0x22 << 8) | (ACTLOW)); |
bkc_mbed | 2:f0b7779b03c7 | 803 | |
bkc_mbed | 2:f0b7779b03c7 | 804 | |
bkc_mbed | 1:ec416e6d5739 | 805 | printf("DATE:%s\nTIME:%s", __DATE__, __TIME__); |
bkc_mbed | 2:f0b7779b03c7 | 806 | lcd_printStr2("NBCTRL", "Ver 1.06"); |
bkc_mbed | 0:2053640461b5 | 807 | wait(3); |
bkc_mbed | 1:ec416e6d5739 | 808 | sprintf(buf, "%8s", __DATE__); |
bkc_mbed | 1:ec416e6d5739 | 809 | lcd_printStrYscr(1, buf); |
bkc_mbed | 1:ec416e6d5739 | 810 | wait(3); |
bkc_mbed | 1:ec416e6d5739 | 811 | sprintf(buf, "%8s", __TIME__); |
bkc_mbed | 1:ec416e6d5739 | 812 | lcd_printStrY(1, buf); |
bkc_mbed | 0:2053640461b5 | 813 | wait(3); |
bkc_mbed | 0:2053640461b5 | 814 | |
bkc_mbed | 0:2053640461b5 | 815 | if (files < 0) |
bkc_mbed | 1:ec416e6d5739 | 816 | lcd_printStrY(1, "NO FILES"); |
bkc_mbed | 0:2053640461b5 | 817 | else |
bkc_mbed | 0:2053640461b5 | 818 | { |
bkc_mbed | 0:2053640461b5 | 819 | char buf[16]; |
bkc_mbed | 1:ec416e6d5739 | 820 | sprintf(buf, "%3dfiles", files); |
bkc_mbed | 1:ec416e6d5739 | 821 | lcd_printStrY(1, buf); |
bkc_mbed | 0:2053640461b5 | 822 | } |
bkc_mbed | 0:2053640461b5 | 823 | wait(3); |
bkc_mbed | 0:2053640461b5 | 824 | lcd_cls(); |
bkc_mbed | 0:2053640461b5 | 825 | } |
bkc_mbed | 1:ec416e6d5739 | 826 | |
bkc_mbed | 0:2053640461b5 | 827 | int idx = 0; |
bkc_mbed | 0:2053640461b5 | 828 | while(files > 0) |
bkc_mbed | 0:2053640461b5 | 829 | { |
bkc_mbed | 2:f0b7779b03c7 | 830 | char buf[16]; |
bkc_mbed | 2:f0b7779b03c7 | 831 | |
bkc_mbed | 0:2053640461b5 | 832 | get_nlg_file(file, idx); |
bkc_mbed | 0:2053640461b5 | 833 | |
bkc_mbed | 0:2053640461b5 | 834 | sprintf(path, "/sd/%s", file); |
bkc_mbed | 0:2053640461b5 | 835 | printf("path=%s\n",path); |
bkc_mbed | 0:2053640461b5 | 836 | |
bkc_mbed | 2:f0b7779b03c7 | 837 | lcd_cls(); |
bkc_mbed | 1:ec416e6d5739 | 838 | lcd_printStrY(0, file); |
bkc_mbed | 0:2053640461b5 | 839 | |
bkc_mbed | 2:f0b7779b03c7 | 840 | sprintf(buf, "%2d ", idx); |
bkc_mbed | 2:f0b7779b03c7 | 841 | lcd_printStrY(1, buf); |
bkc_mbed | 2:f0b7779b03c7 | 842 | |
bkc_mbed | 2:f0b7779b03c7 | 843 | nlg_play(path); |
bkc_mbed | 0:2053640461b5 | 844 | |
bkc_mbed | 2:f0b7779b03c7 | 845 | // wait for chattering |
bkc_mbed | 1:ec416e6d5739 | 846 | wait(0.25); |
bkc_mbed | 0:2053640461b5 | 847 | // wait release |
bkc_mbed | 0:2053640461b5 | 848 | while(!sw_play || !sw_next); |
bkc_mbed | 0:2053640461b5 | 849 | |
bkc_mbed | 1:ec416e6d5739 | 850 | bool prev_flag = false; |
bkc_mbed | 1:ec416e6d5739 | 851 | |
bkc_mbed | 0:2053640461b5 | 852 | if (g_stop) |
bkc_mbed | 0:2053640461b5 | 853 | { |
bkc_mbed | 2:f0b7779b03c7 | 854 | lcd_printStrY(1, " STOP "); |
bkc_mbed | 1:ec416e6d5739 | 855 | |
bkc_mbed | 1:ec416e6d5739 | 856 | // wait push |
bkc_mbed | 0:2053640461b5 | 857 | while(sw_play && sw_next); |
bkc_mbed | 1:ec416e6d5739 | 858 | |
bkc_mbed | 2:f0b7779b03c7 | 859 | if (!sw_play) { |
bkc_mbed | 2:f0b7779b03c7 | 860 | lcd_printStrY(1, " PREV "); |
bkc_mbed | 1:ec416e6d5739 | 861 | prev_flag = true; |
bkc_mbed | 2:f0b7779b03c7 | 862 | } |
bkc_mbed | 2:f0b7779b03c7 | 863 | else |
bkc_mbed | 2:f0b7779b03c7 | 864 | { |
bkc_mbed | 2:f0b7779b03c7 | 865 | lcd_printStrY(1, " NEXT "); |
bkc_mbed | 2:f0b7779b03c7 | 866 | prev_flag = false; |
bkc_mbed | 2:f0b7779b03c7 | 867 | } |
bkc_mbed | 1:ec416e6d5739 | 868 | |
bkc_mbed | 1:ec416e6d5739 | 869 | // wait release |
bkc_mbed | 0:2053640461b5 | 870 | while(!sw_play || !sw_next); |
bkc_mbed | 0:2053640461b5 | 871 | g_stop = 0; |
bkc_mbed | 1:ec416e6d5739 | 872 | |
bkc_mbed | 1:ec416e6d5739 | 873 | // reset board |
bkc_mbed | 1:ec416e6d5739 | 874 | boardInit(); |
bkc_mbed | 0:2053640461b5 | 875 | } |
bkc_mbed | 1:ec416e6d5739 | 876 | if (prev_flag) |
bkc_mbed | 1:ec416e6d5739 | 877 | { |
bkc_mbed | 1:ec416e6d5739 | 878 | if (idx - 1 >= 0) |
bkc_mbed | 1:ec416e6d5739 | 879 | idx--; |
bkc_mbed | 1:ec416e6d5739 | 880 | else |
bkc_mbed | 1:ec416e6d5739 | 881 | idx = files - 1; |
bkc_mbed | 1:ec416e6d5739 | 882 | } |
bkc_mbed | 0:2053640461b5 | 883 | else |
bkc_mbed | 1:ec416e6d5739 | 884 | { |
bkc_mbed | 1:ec416e6d5739 | 885 | if (idx + 1 < files) |
bkc_mbed | 1:ec416e6d5739 | 886 | idx++; |
bkc_mbed | 1:ec416e6d5739 | 887 | else |
bkc_mbed | 1:ec416e6d5739 | 888 | idx = 0; |
bkc_mbed | 1:ec416e6d5739 | 889 | } |
bkc_mbed | 0:2053640461b5 | 890 | } |
bkc_mbed | 0:2053640461b5 | 891 | |
bkc_mbed | 1:ec416e6d5739 | 892 | /* while(1) { |
bkc_mbed | 0:2053640461b5 | 893 | led1 = 1; |
bkc_mbed | 0:2053640461b5 | 894 | wait(1); |
bkc_mbed | 0:2053640461b5 | 895 | led1 = 0; |
bkc_mbed | 0:2053640461b5 | 896 | wait(1); |
bkc_mbed | 0:2053640461b5 | 897 | } |
bkc_mbed | 1:ec416e6d5739 | 898 | */ |
bkc_mbed | 0:2053640461b5 | 899 | } |