Compare commits
50 Commits
474fce2278
...
sn76489an
Author | SHA1 | Date | |
---|---|---|---|
8f777c9ac4 | |||
aeb7aeb7f2 | |||
20c01f2efa
|
|||
40cb04bde5 | |||
a1457e6a69 | |||
0303bbdc3c | |||
162bdaefee | |||
b9fd0099a8 | |||
d09f8d240f
|
|||
ed6da383de
|
|||
9328e22425 | |||
48b9fc7578
|
|||
d4d494ae7b | |||
1ebf85cb9d | |||
5a8323bddb | |||
97dc6ede70 | |||
a4563cd393 | |||
b435396d67 | |||
38ea1a7fdb | |||
6632630303 | |||
fdb524c8d4 | |||
2c3bccd147 | |||
ee98ba12a3 | |||
33242a09c1
|
|||
2097280f2b
|
|||
70b3b25a9d | |||
5e1e9dfa92 | |||
f397d0737b
|
|||
1c2414463b | |||
2e629f12aa | |||
9989a52c38 | |||
73d2bbc730 | |||
5e2f120432 | |||
152f171c66 | |||
9ddb747f16 | |||
bd11d12620 | |||
e5c6669284 | |||
202e91bfb6 | |||
48c83f0b2d | |||
d8e34ec209 | |||
5a491140c7 | |||
aaf709b0c9 | |||
32bb08696f | |||
85d243551e | |||
a32ef8fa5b | |||
10a09e3ad3 | |||
611c56b329 | |||
5b1dfde819
|
|||
1cc4785ddb | |||
9acd56b79b |
31
display-driver/Makefile
Normal file
31
display-driver/Makefile
Normal file
@ -0,0 +1,31 @@
|
||||
TOOLCHAIN_PREFIX=/opt/msp430-gcc
|
||||
CC=$(TOOLCHAIN_PREFIX)/bin/msp430-elf-gcc
|
||||
OBJDUMP=$(TOOLCHAIN_PREFIX)/bin/msp430-elf-objdump
|
||||
|
||||
ARTIFACT=firmware
|
||||
MCU=msp430g2553
|
||||
CFLAGS=-Wall -mmcu=$(MCU) -std=gnu99 -I $(TOOLCHAIN_PREFIX)/include -O1 -g0
|
||||
|
||||
# for debugging
|
||||
#CFLAGS+= -g3 -ggdb -gdwarf-2
|
||||
|
||||
LDFLAGS=-mmcu=$(MCU) -L $(TOOLCHAIN_PREFIX)/include
|
||||
|
||||
$(ARTIFACT).elf: main.o
|
||||
$(CC) -o $@ $(LDFLAGS) $^
|
||||
$(OBJDUMP) -D $(ARTIFACT).elf > $(ARTIFACT).txt
|
||||
|
||||
.c.o:
|
||||
$(CC) $(CFLAGS) -c $<
|
||||
|
||||
|
||||
.PHONY: all
|
||||
all: $(ARTIFACT).elf
|
||||
|
||||
.PHONY: clean
|
||||
clean:
|
||||
-rm -f *.o $(ARTIFACT).elf $(ARTIFACT).txt
|
||||
|
||||
.PHONY: upload
|
||||
upload: $(ARTIFACT).elf
|
||||
mspdebug rf2500 "prog $(ARTIFACT).elf"
|
BIN
display-driver/docs/MCU-Connection and Pattern.pdf
Executable file
BIN
display-driver/docs/MCU-Connection and Pattern.pdf
Executable file
Binary file not shown.
BIN
display-driver/docs/Pinout-Display.pdf
Executable file
BIN
display-driver/docs/Pinout-Display.pdf
Executable file
Binary file not shown.
131
display-driver/main.c
Normal file
131
display-driver/main.c
Normal file
@ -0,0 +1,131 @@
|
||||
#include <msp430g2553.h>
|
||||
#include <stdint.h>
|
||||
#include <stdlib.h>
|
||||
|
||||
|
||||
const uint8_t patterns[] = {
|
||||
0b00111111, // 0
|
||||
0b00000110, // 1
|
||||
0b01011011, // 2
|
||||
0b01001111, // 3
|
||||
0b01100110, // 4
|
||||
0b01101101, // 5
|
||||
0b01111101, // 6
|
||||
0b00100111, // 7
|
||||
0b01111111, // 8
|
||||
0b01101111, // 9
|
||||
};
|
||||
|
||||
|
||||
|
||||
volatile union {
|
||||
uint16_t value;
|
||||
uint8_t receiveBuffer[2];
|
||||
} value;
|
||||
|
||||
|
||||
static void delay() {
|
||||
asm volatile (
|
||||
"push r12\n"
|
||||
"mov.w #1000, r12\n"
|
||||
"loop:\n"
|
||||
"dec.w r12\n"
|
||||
"jnz loop\n"
|
||||
"pop r12\n"
|
||||
);
|
||||
}
|
||||
|
||||
|
||||
void __attribute__ ((interrupt (USCIAB0RX_VECTOR))) receive() {
|
||||
static uint8_t octetNumber = 0;
|
||||
if (UC0IFG & UCB0RXIFG) {
|
||||
value.receiveBuffer[octetNumber] = UCB0RXBUF;
|
||||
octetNumber++;
|
||||
if (octetNumber > 1) {
|
||||
octetNumber = 0;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
// mask 0x0f: digit value
|
||||
// mask 0x10: set dp
|
||||
// mask 0x20: digit off
|
||||
static void setDigit(uint16_t bit, uint8_t value) {
|
||||
P1OUT |= (BIT0 | BIT1 | BIT2 | BIT3);
|
||||
P2OUT = ((value & 0x20) ? 0 : patterns[value & 0x0f]) | ((value & 0x10) ? 0x80 : 0x00);
|
||||
P1OUT &= ~bit;
|
||||
}
|
||||
|
||||
|
||||
int main() {
|
||||
WDTCTL = WDTPW | WDTHOLD;
|
||||
|
||||
__disable_interrupt();
|
||||
|
||||
// highest possible system clock
|
||||
DCOCTL = DCO0 | DCO1 | DCO2;
|
||||
BCSCTL1 = XT2OFF | RSEL0 | RSEL1 | RSEL2 | RSEL3;
|
||||
BCSCTL2 = 0;
|
||||
BCSCTL3 = 0;
|
||||
|
||||
// SPI slave
|
||||
// BIT4: UCB0STE
|
||||
// BIT5: UCB0CLK
|
||||
// BIT6: UCB0SOMI
|
||||
// BIT7: UCB0SIMO
|
||||
P1SEL |= BIT4 | BIT5 | BIT6 | BIT7;
|
||||
P1SEL2 |= BIT4 | BIT5 | BIT6 | BIT7;
|
||||
// most significant bit first, enable STE
|
||||
UCB0CTL0 = UCSYNC | UCMSB | UCMODE_2;
|
||||
UCB0CTL1 = 0x00;
|
||||
// enable RX interrupt
|
||||
UC0IE |= UCB0RXIE;
|
||||
|
||||
// digit driver
|
||||
P1DIR |= BIT0 | BIT1 | BIT2 | BIT3;
|
||||
P1SEL &= ~(BIT0 | BIT1 | BIT2 | BIT3);
|
||||
P1SEL2 &= ~(BIT0 | BIT1 | BIT2 | BIT3);
|
||||
|
||||
// segment driver
|
||||
P2DIR = 0xff;
|
||||
P2SEL = 0x00;
|
||||
P2SEL2 = 0x00;
|
||||
|
||||
// all digits off
|
||||
P1OUT |= (BIT0 | BIT1 | BIT2 | BIT3);
|
||||
|
||||
// all segments off
|
||||
P2OUT &= ~(BIT0 | BIT1 | BIT2 | BIT3 | BIT4 | BIT5 | BIT6 | BIT7);
|
||||
|
||||
// reset value to 0
|
||||
value.value = 0;
|
||||
|
||||
__enable_interrupt();
|
||||
|
||||
while (1) {
|
||||
__disable_interrupt();
|
||||
uint16_t shadowValue = value.value;
|
||||
__enable_interrupt();
|
||||
|
||||
uint8_t digit0 = shadowValue % 10;
|
||||
uint8_t digit1 = (shadowValue / 10) % 10;
|
||||
uint8_t digit2 = (shadowValue / 100) % 10;
|
||||
uint8_t digit3 = (shadowValue / 1000) % 10;
|
||||
|
||||
digit1 += (!((digit3 & 0x0f) | (digit2 & 0x0f) | (digit1 & 0x0f))) ? 0x20 : 0x00;
|
||||
digit2 += (!((digit3 & 0x0f) | (digit2 & 0x0f))) ? 0x20 : 0x00;
|
||||
digit3 += (!(digit3 & 0x0f)) ? 0x20 : 0x00;
|
||||
|
||||
setDigit(BIT0, digit0);
|
||||
delay();
|
||||
|
||||
setDigit(BIT1, digit1);
|
||||
delay();
|
||||
|
||||
setDigit(BIT2, digit2);
|
||||
delay();
|
||||
|
||||
setDigit(BIT3, digit3);
|
||||
delay();
|
||||
}
|
||||
}
|
Binary file not shown.
@ -11,7 +11,7 @@ CFLAGS=-Wall -mmcu=$(MCU) -std=gnu99 -I $(TOOLCHAIN_PREFIX)/include -O1 -g0
|
||||
|
||||
LDFLAGS=-mmcu=$(MCU) -L $(TOOLCHAIN_PREFIX)/include
|
||||
|
||||
$(ARTIFACT).elf: main.o led.o scheduler.o canvas.o shapes.o game.o buttons.o myrand.o
|
||||
$(ARTIFACT).elf: main.o spi.o scheduler.o canvas.o shapes.o game.o buttons.o myrand.o display.o
|
||||
$(CC) -o $@ $(LDFLAGS) $^
|
||||
$(OBJDUMP) -D $(ARTIFACT).elf > $(ARTIFACT).txt
|
||||
|
||||
|
@ -6,8 +6,6 @@
|
||||
#include "scheduler.h"
|
||||
#include "shapes.h"
|
||||
#include "canvas.h"
|
||||
#include "led.h"
|
||||
|
||||
|
||||
|
||||
static uint8_t buttonsMoveLeftPressed() {
|
||||
|
@ -4,6 +4,7 @@
|
||||
#include <msp430g2553.h>
|
||||
|
||||
#include "canvas.h"
|
||||
#include "spi.h"
|
||||
|
||||
|
||||
static uint8_t canvasStorage[CANVAS_WIDTH * CANVAS_HEIGHT];
|
||||
@ -20,17 +21,12 @@ const canvas_t miniCanvas = {
|
||||
.canvas = miniCanvasStorage
|
||||
};
|
||||
|
||||
inline static void spiSendOctet(uint8_t v) {
|
||||
// wait for TX buffer empty
|
||||
while (!(UC0IFG & UCB0TXIFG));
|
||||
// load octet into TX buffer
|
||||
UCB0TXBUF = v;
|
||||
}
|
||||
|
||||
void canvasShow() {
|
||||
// wait for signal waiting for data
|
||||
while (!(P1IN & BIT3));
|
||||
|
||||
spiSendBegin(e_SPI_CANVAS);
|
||||
|
||||
for (uint8_t i = 0; i < (CANVAS_WIDTH*CANVAS_HEIGHT); i++) {
|
||||
if ((*((canvas.canvas)+i) & 0x80) != 0) {
|
||||
*((canvas.canvas)+i) &= ~0x80;
|
||||
@ -46,35 +42,14 @@ void canvasShow() {
|
||||
}
|
||||
}
|
||||
spiSendOctet(0xfe);
|
||||
|
||||
spiSendEnd(e_SPI_CANVAS);
|
||||
}
|
||||
|
||||
void canvasInit() {
|
||||
// SPI in master mode
|
||||
UCB0CTL0 = UCMST;
|
||||
// SPI timing config
|
||||
UCB0CTL1 = UCSSEL_3;
|
||||
// Faster than 8 ends up in strange communication errors
|
||||
// between the both MCUs.
|
||||
// With 8 the transfer of a complete 110 pixel canvas takes
|
||||
// about 720us.
|
||||
// 8 was still too fast and caused problems.
|
||||
UCB0BR0 = 16;
|
||||
UCB0BR1 = 0;
|
||||
|
||||
// BIT5: UCB0CLK
|
||||
// BIT6: UCB0SOMI
|
||||
// BIT7: UCB0SIMO
|
||||
P1SEL |= BIT5 | BIT6 | BIT7;
|
||||
P1SEL2 |= BIT5 | BIT6 | BIT7;
|
||||
P1DIR |= BIT5 | BIT7;
|
||||
|
||||
// P1.3 is signal line
|
||||
P1DIR &= ~BIT3;
|
||||
|
||||
// enable SPI module
|
||||
UCB0CTL1 &= ~UCSWRST;
|
||||
|
||||
|
||||
canvasClear();
|
||||
miniCanvasClear();
|
||||
canvasShow();
|
||||
@ -108,6 +83,13 @@ void canvasWipeRow(uint8_t row) {
|
||||
memset(canvas.canvas, 0x80, canvas.width);
|
||||
}
|
||||
|
||||
void canvasFillRow(uint8_t row, uint8_t color) {
|
||||
for (uint8_t c = 0; c < canvas.width; c++) {
|
||||
canvasSetPixel(c, row, color);
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
uint8_t canvasIsRowFilled(uint8_t row) {
|
||||
uint8_t res = 1;
|
||||
for (uint8_t column = 0; column < canvas.width; column++) {
|
||||
|
@ -24,6 +24,7 @@ void canvasSetPixel(uint8_t column, uint8_t row, uint8_t color);
|
||||
void miniCanvasSetPixel(uint8_t column, uint8_t row, uint8_t color);
|
||||
uint8_t canvasIsPixelFree(uint8_t column, uint8_t row);
|
||||
void canvasWipeRow(uint8_t row);
|
||||
void canvasFillRow(uint8_t row, uint8_t color);
|
||||
uint8_t canvasIsRowFilled(uint8_t row);
|
||||
|
||||
#endif // _CANVAS_H_
|
||||
|
26
game-ctrl/display.c
Normal file
26
game-ctrl/display.c
Normal file
@ -0,0 +1,26 @@
|
||||
#include <stdint.h>
|
||||
|
||||
#include "display.h"
|
||||
#include "spi.h"
|
||||
|
||||
|
||||
|
||||
void displayInit() {
|
||||
}
|
||||
|
||||
|
||||
void displaySetValue(uint16_t v) {
|
||||
union {
|
||||
uint16_t value;
|
||||
uint8_t sendBuffer[2];
|
||||
} value;
|
||||
|
||||
value.value = v;
|
||||
|
||||
spiSendBegin(e_SPI_DISPLAY);
|
||||
|
||||
spiSendOctet(value.sendBuffer[0]);
|
||||
spiSendOctet(value.sendBuffer[1]);
|
||||
|
||||
spiSendEnd(e_SPI_DISPLAY);
|
||||
}
|
13
game-ctrl/display.h
Normal file
13
game-ctrl/display.h
Normal file
@ -0,0 +1,13 @@
|
||||
#ifndef _DISPLAY_H_
|
||||
#define _DISPLAY_H_
|
||||
|
||||
#include <stdint.h>
|
||||
|
||||
|
||||
void displayInit();
|
||||
void displaySetValue(uint16_t v);
|
||||
|
||||
|
||||
|
||||
|
||||
#endif // _DISPLAY_H_
|
118
game-ctrl/game.c
118
game-ctrl/game.c
@ -5,69 +5,125 @@
|
||||
#include "scheduler.h"
|
||||
#include "shapes.h"
|
||||
#include "canvas.h"
|
||||
#include "../rgb-driver/colors.h"
|
||||
#include "display.h"
|
||||
|
||||
|
||||
typedef enum { e_idle, e_start, e_newStone, e_down, e_gameOver, e_delay } state_t;
|
||||
#define GAME_CYCLE_TIME 100
|
||||
#define GAMEOVER_DELAY 10
|
||||
|
||||
|
||||
static uint8_t delayFactor(uint8_t level) {
|
||||
return 11 - level;
|
||||
}
|
||||
|
||||
typedef enum {
|
||||
e_Phase_Game, e_Phase_GameOver
|
||||
} phase_t;
|
||||
|
||||
typedef enum {
|
||||
e_Start, e_NewStone, e_Down, e_DownDelay, e_ClearRows,
|
||||
e_GameOver, e_GameOverFill, e_GameOverWipe, e_GameOverDelay
|
||||
} state_t;
|
||||
|
||||
void gameExec(void *handle) {
|
||||
static state_t state = e_start;
|
||||
static uint8_t delay;
|
||||
static phase_t phase;
|
||||
static state_t state = e_Start;
|
||||
static uint8_t gameOverDelay;
|
||||
static uint8_t rowIndex;
|
||||
static uint8_t proceedDelay;
|
||||
static uint8_t level;
|
||||
static uint16_t score;
|
||||
|
||||
// --- engine begin -------------------------------------------------------
|
||||
switch (state) {
|
||||
case e_idle:
|
||||
break;
|
||||
|
||||
case e_start:
|
||||
// --- phase: game --------------------------------------------------------
|
||||
case e_Start:
|
||||
canvasClear();
|
||||
state = e_newStone;
|
||||
level = 1;
|
||||
score = 0;
|
||||
displaySetValue(score);
|
||||
phase = e_Phase_Game;
|
||||
state = e_NewStone;
|
||||
break;
|
||||
|
||||
case e_newStone:
|
||||
case e_NewStone:
|
||||
stoneCreate();
|
||||
if (stoneDraw()) {
|
||||
state = e_down;
|
||||
proceedDelay = delayFactor(level);
|
||||
state = e_DownDelay;
|
||||
} else {
|
||||
state = e_gameOver;
|
||||
state = e_GameOver;
|
||||
}
|
||||
break;
|
||||
|
||||
case e_down:
|
||||
case e_DownDelay:
|
||||
proceedDelay--;
|
||||
if (proceedDelay == 0) {
|
||||
rowIndex = 0;
|
||||
state = e_ClearRows;
|
||||
}
|
||||
break;
|
||||
|
||||
case e_ClearRows:
|
||||
state = e_Down;
|
||||
break;
|
||||
|
||||
case e_Down:
|
||||
if (! stoneMoveDown()) {
|
||||
state = e_newStone;
|
||||
state = e_NewStone;
|
||||
} else {
|
||||
proceedDelay = delayFactor(level);
|
||||
state = e_DownDelay;
|
||||
}
|
||||
break;
|
||||
|
||||
case e_gameOver:
|
||||
for (uint8_t c = 0; c < CANVAS_WIDTH; c++) {
|
||||
canvasSetPixel(c, 0, 0x0d);
|
||||
canvasSetPixel(c, CANVAS_HEIGHT - 1, 0x0d);
|
||||
}
|
||||
for (uint8_t r = 0; r < CANVAS_HEIGHT; r++) {
|
||||
canvasSetPixel(0, r, 0x0d);
|
||||
canvasSetPixel(CANVAS_WIDTH - 1, r, 0x0d);
|
||||
}
|
||||
delay = 10;
|
||||
state = e_delay;
|
||||
// --- phase: game over ---------------------------------------------------
|
||||
case e_GameOver:
|
||||
rowIndex = CANVAS_HEIGHT;
|
||||
phase = e_Phase_GameOver;
|
||||
state = e_GameOverFill;
|
||||
break;
|
||||
|
||||
case e_delay:
|
||||
delay--;
|
||||
if (delay == 0) {
|
||||
state = e_start;
|
||||
case e_GameOverFill:
|
||||
rowIndex--;
|
||||
canvasFillRow(rowIndex, _red);
|
||||
if (rowIndex == 0) {
|
||||
state = e_GameOverWipe;
|
||||
}
|
||||
break;
|
||||
|
||||
case e_GameOverWipe:
|
||||
canvasWipeRow(rowIndex);
|
||||
rowIndex++;
|
||||
if (rowIndex == CANVAS_HEIGHT) {
|
||||
gameOverDelay = GAMEOVER_DELAY;
|
||||
state = e_GameOverDelay;
|
||||
}
|
||||
break;
|
||||
|
||||
case e_GameOverDelay:
|
||||
gameOverDelay--;
|
||||
if (gameOverDelay == 0) {
|
||||
state = e_Start;
|
||||
}
|
||||
break;
|
||||
}
|
||||
// --- engine end ---------------------------------------------------------
|
||||
|
||||
canvasShow();
|
||||
if (phase == e_Phase_Game) {
|
||||
for (uint8_t r = 0; r < CANVAS_HEIGHT; r++) {
|
||||
if (canvasIsRowFilled(r)) {
|
||||
score += level;
|
||||
displaySetValue(score);
|
||||
canvasWipeRow(r);
|
||||
canvasShow();
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
void gameInit() {
|
||||
schAdd(gameExec, NULL, 0, 1000);
|
||||
}
|
||||
|
||||
void gameInit() {
|
||||
schAdd(gameExec, NULL, 0, GAME_CYCLE_TIME);
|
||||
}
|
||||
|
@ -5,12 +5,13 @@
|
||||
|
||||
#include "time.h"
|
||||
#include "scheduler.h"
|
||||
#include "led.h"
|
||||
#include "canvas.h"
|
||||
#include "game.h"
|
||||
#include "buttons.h"
|
||||
#include "shapes.h"
|
||||
#include "myrand.h"
|
||||
#include "spi.h"
|
||||
#include "display.h"
|
||||
|
||||
|
||||
int main() {
|
||||
@ -26,7 +27,8 @@ int main() {
|
||||
|
||||
schInit();
|
||||
|
||||
ledInit();
|
||||
spiInit();
|
||||
displayInit();
|
||||
myRandInit();
|
||||
canvasInit();
|
||||
|
||||
|
50
game-ctrl/spi.c
Normal file
50
game-ctrl/spi.c
Normal file
@ -0,0 +1,50 @@
|
||||
#include <msp430g2553.h>
|
||||
#include "spi.h"
|
||||
|
||||
void spiInit() {
|
||||
// SPI in master mode, most significant bit first
|
||||
UCB0CTL0 = UCMST | UCMSB;
|
||||
// SPI timing config
|
||||
UCB0CTL1 = UCSSEL_3;
|
||||
// Faster than 8 ends up in strange communication errors
|
||||
// between the both MCUs.
|
||||
// With 8 the transfer of a complete 110 pixel canvas takes
|
||||
// about 720us.
|
||||
// 8 was still too fast and caused problems.
|
||||
UCB0BR0 = 16;
|
||||
UCB0BR1 = 0;
|
||||
|
||||
// BIT5: UCB0CLK
|
||||
// BIT6: UCB0SOMI
|
||||
// BIT7: UCB0SIMO
|
||||
P1SEL |= BIT5 | BIT6 | BIT7;
|
||||
P1SEL2 |= BIT5 | BIT6 | BIT7;
|
||||
P1DIR |= BIT5 | BIT7;
|
||||
|
||||
// Device Select Lines: 0: Canvas, 1: Display, 2: Sound
|
||||
P1DIR |= BIT0 | BIT1 | BIT2;
|
||||
// Disable all of them
|
||||
P1OUT |= BIT0 | BIT1 | BIT2;
|
||||
|
||||
// enable SPI module
|
||||
UCB0CTL1 &= ~UCSWRST;
|
||||
}
|
||||
|
||||
void spiSendBegin(t_SpiDeviceSelector d) {
|
||||
uint16_t bit = ((uint16_t[]){ BIT0, BIT1, BIT2 })[d];
|
||||
P1OUT &= ~bit;
|
||||
}
|
||||
|
||||
void spiSendEnd(t_SpiDeviceSelector d) {
|
||||
while (UCB0STAT & UCBUSY);
|
||||
uint16_t bit = ((uint16_t[]){ BIT0, BIT1, BIT2 })[d];
|
||||
P1OUT |= bit;
|
||||
}
|
||||
|
||||
void spiSendOctet(uint8_t v) {
|
||||
// wait for TX buffer empty
|
||||
while (!(UC0IFG & UCB0TXIFG));
|
||||
// load octet into TX buffer
|
||||
UCB0TXBUF = v;
|
||||
}
|
||||
|
16
game-ctrl/spi.h
Normal file
16
game-ctrl/spi.h
Normal file
@ -0,0 +1,16 @@
|
||||
#ifndef _SPI_H_
|
||||
#define _SPI_H_
|
||||
|
||||
#include <stdint.h>
|
||||
|
||||
|
||||
typedef enum { e_SPI_CANVAS, e_SPI_DISPLAY, e_SPI_SOUND } t_SpiDeviceSelector;
|
||||
|
||||
void spiInit();
|
||||
void spiSendBegin(t_SpiDeviceSelector d);
|
||||
void spiSendEnd(t_SpiDeviceSelector d);
|
||||
void spiSendOctet(uint8_t v);
|
||||
|
||||
|
||||
|
||||
#endif // _SPI_H_
|
@ -96,11 +96,12 @@ init:
|
||||
;; BIT3: Signal waiting for data
|
||||
mov.b #BIT0|BIT1|BIT2|BIT3, &P1DIR
|
||||
mov.b #0,&P1OUT
|
||||
;; BIT4: spi, UCB0STE
|
||||
;; BIT5: spi, UCB0CLK
|
||||
;; BIT6: spi, UCB0SOMI
|
||||
;; BIT7: spi, UCB0SIMO
|
||||
mov.b #BIT5|BIT6|BIT7, &P1SEL
|
||||
mov.b #BIT5|BIT6|BIT7, &P1SEL2
|
||||
mov.b #BIT4|BIT5|BIT6|BIT7, &P1SEL
|
||||
mov.b #BIT4|BIT5|BIT6|BIT7, &P1SEL2
|
||||
;; BIT4: long pulse
|
||||
;; BIT1: short pulse
|
||||
mov.b #BIT1|BIT4,&P2DIR
|
||||
@ -121,8 +122,8 @@ init:
|
||||
mov.w #OUTMOD_7,&TA1CCTL2
|
||||
|
||||
;; spi configuration
|
||||
;; USCI B to slave mode
|
||||
mov.b #UCSYNC, &UCB0CTL0
|
||||
;; USCI B to slave mode, enable STE and most significant bit first
|
||||
mov.b #UCSYNC|UCMODE_2|UCMSB, &UCB0CTL0
|
||||
mov.b #0x00, &UCB0CTL1
|
||||
|
||||
;; make sure the isr will not immediately start
|
||||
|
31
sound-driver/Makefile
Normal file
31
sound-driver/Makefile
Normal file
@ -0,0 +1,31 @@
|
||||
TOOLCHAIN_PREFIX=/opt/msp430-gcc
|
||||
CC=$(TOOLCHAIN_PREFIX)/bin/msp430-elf-gcc
|
||||
OBJDUMP=$(TOOLCHAIN_PREFIX)/bin/msp430-elf-objdump
|
||||
|
||||
ARTIFACT=firmware
|
||||
MCU=msp430g2553
|
||||
CFLAGS=-Wall -mmcu=$(MCU) -std=gnu99 -I $(TOOLCHAIN_PREFIX)/include -O1 -g0
|
||||
|
||||
# for debugging
|
||||
CFLAGS+= -g3 -ggdb -gdwarf-2
|
||||
|
||||
LDFLAGS=-mmcu=$(MCU) -L $(TOOLCHAIN_PREFIX)/include
|
||||
|
||||
$(ARTIFACT).elf: main.o scheduler.o spi.o sequencer.o melody.o ay_3_8913.o
|
||||
$(CC) -o $@ $(LDFLAGS) $^
|
||||
$(OBJDUMP) -D $(ARTIFACT).elf > $(ARTIFACT).txt
|
||||
|
||||
.c.o:
|
||||
$(CC) $(CFLAGS) -c $<
|
||||
|
||||
|
||||
.PHONY: all
|
||||
all: $(ARTIFACT).elf
|
||||
|
||||
.PHONY: clean
|
||||
clean:
|
||||
-rm -f *.o $(ARTIFACT).elf $(ARTIFACT).txt
|
||||
|
||||
.PHONY: upload
|
||||
upload: $(ARTIFACT).elf
|
||||
mspdebug rf2500 "prog $(ARTIFACT).elf"
|
190
sound-driver/ay_3_8913.c
Normal file
190
sound-driver/ay_3_8913.c
Normal file
@ -0,0 +1,190 @@
|
||||
#include <msp430g2553.h>
|
||||
#include <stdint.h>
|
||||
#include <stdlib.h>
|
||||
|
||||
#include "psg.h"
|
||||
#include "scheduler.h"
|
||||
|
||||
|
||||
|
||||
const uint16_t frequencyCodes[8][12] = {
|
||||
// C, Cis, D, Dis, E, F, Fis, G, Gis, A, Ais, H
|
||||
{ 06535, 06234, 05747, 05474, 05233, 05002, 04563, 04353, 04153, 03762, 03600, 03424 }, // Octave 1
|
||||
{ 03256, 03116, 02764, 02636, 02515, 02401, 02271, 02165, 02065, 01771, 01700, 01612 }, // Octave 2
|
||||
{ 01527, 01447, 01372, 01317, 01247, 01201, 01135, 01073, 01033, 00774, 00740, 00705 }, // Octave 3
|
||||
{ 00654, 00624, 00575, 00550, 00523, 00500, 00456, 00435, 00415, 00376, 00360, 00342 }, // Octave 4
|
||||
{ 00326, 00312, 00276, 00264, 00252, 00240, 00227, 00217, 00207, 00177, 00170, 00161 }, // Octave 5
|
||||
{ 00153, 00145, 00137, 00132, 00125, 00120, 00114, 00107, 00103, 00100, 00074, 00071 }, // Octave 6
|
||||
{ 00065, 00062, 00060, 00055, 00052, 00050, 00046, 00044, 00042, 00040, 00036, 00034 }, // Octave 7
|
||||
{ 00033, 00031, 00030, 00026, 00025, 00024, 00023, 00022, 00021, 00020, 00017, 00016 } // Octave 8
|
||||
};
|
||||
|
||||
|
||||
#define ADDR_DATA_REG P2OUT
|
||||
#define BUS_CTRL_REG P1OUT
|
||||
#define BC1 BIT3
|
||||
#define BDIR BIT1
|
||||
#define _CS0 BIT2
|
||||
#define _CS1 BIT0
|
||||
|
||||
#define R0 0
|
||||
#define CHANNEL_A_TONE_PERIOD_FINE_REG R0
|
||||
#define R1 1
|
||||
#define CHANNEL_A_TONE_PERIOD_COARSE_REG R1
|
||||
#define R2 2
|
||||
#define CHANNEL_B_TONE_PERIOD_FINE_REG R2
|
||||
#define R3 3
|
||||
#define CHANNEL_B_TONE_PERIOD_COARSE_REG R3
|
||||
#define R4 4
|
||||
#define CHANNEL_C_TONE_PERIOD_FINE_REG R4
|
||||
#define R5 5
|
||||
#define CHANNEL_C_TONE_PERIOD_COARSE_REG R5
|
||||
#define R6 6
|
||||
#define NOISE_PERIOD_REG R6
|
||||
#define R7 7
|
||||
#define _ENABLE_REG R7
|
||||
#define R10 010
|
||||
#define CHANNEL_A_AMPLITUDE_REG R10
|
||||
#define R11 011
|
||||
#define CHANNEL_B_AMPLITUDE_REG R11
|
||||
#define R12 012
|
||||
#define CHANNEL_C_AMPLITUDE_REG R12
|
||||
#define R13 013
|
||||
#define ENVELOPE_PERIOD_FINE_REG R13
|
||||
#define R14 014
|
||||
#define ENVELOPE_PERIOD_COARSE_REG R13
|
||||
#define R15 015
|
||||
#define ENVELOPE_SHAPE_REG R15
|
||||
|
||||
uint8_t psgShadowRegisters[14];
|
||||
|
||||
inline static void BUS_OP_NACT() {
|
||||
BUS_CTRL_REG &= ~(BDIR | BC1);
|
||||
}
|
||||
inline static void BUS_OP_INTAK() {
|
||||
BUS_CTRL_REG |= BDIR | BC1;
|
||||
}
|
||||
inline static void BUS_OP_DWS() {
|
||||
BUS_CTRL_REG |= BDIR;
|
||||
BUS_CTRL_REG &= ~BC1;
|
||||
}
|
||||
inline static void BUS_OP_CS0_ENABLE() {
|
||||
BUS_CTRL_REG &= ~_CS0;
|
||||
}
|
||||
inline static void BUS_OP_CS0_DISABLE() {
|
||||
BUS_CTRL_REG |= _CS0;
|
||||
}
|
||||
inline static void BUS_OP_CS1_ENABLE() {
|
||||
BUS_CTRL_REG &= ~_CS1;
|
||||
}
|
||||
inline static void BUS_OP_CS1_DISABLE() {
|
||||
BUS_CTRL_REG |= _CS1;
|
||||
}
|
||||
|
||||
#if 0
|
||||
static void delay() {
|
||||
asm volatile (
|
||||
"push r12\n"
|
||||
"mov.w #5, r12\n"
|
||||
"loop:\n"
|
||||
"dec.w r12\n"
|
||||
"jnz loop\n"
|
||||
"pop r12\n"
|
||||
);
|
||||
}
|
||||
#endif
|
||||
|
||||
static uint8_t psgReadShadow(uint8_t address) {
|
||||
return psgShadowRegisters[address];
|
||||
}
|
||||
|
||||
static void psgWrite(uint8_t address, uint8_t data) {
|
||||
psgShadowRegisters[address] = data;
|
||||
|
||||
// according to "State Timing" (p. 15) of datasheet
|
||||
|
||||
BUS_OP_CS1_ENABLE();
|
||||
|
||||
// put bus into inactive state
|
||||
BUS_OP_NACT();
|
||||
|
||||
// put address on bus
|
||||
ADDR_DATA_REG = address;
|
||||
|
||||
// address latch mode
|
||||
BUS_OP_INTAK();
|
||||
|
||||
// latch address
|
||||
BUS_OP_NACT();
|
||||
|
||||
// put data on bus
|
||||
ADDR_DATA_REG = data;
|
||||
|
||||
// set write to psg
|
||||
BUS_OP_DWS();
|
||||
|
||||
// set inactive again
|
||||
BUS_OP_NACT();
|
||||
|
||||
BUS_OP_CS1_DISABLE();
|
||||
}
|
||||
|
||||
static void psgWriteFrequency(uint8_t channel, uint16_t frequencyCode) {
|
||||
psgWrite(CHANNEL_A_TONE_PERIOD_FINE_REG + (channel * 2), (frequencyCode & 0x00ff));
|
||||
psgWrite(CHANNEL_A_TONE_PERIOD_COARSE_REG + (channel * 2), ((frequencyCode >> 8) & 0x000f));
|
||||
}
|
||||
|
||||
void psgPlayTone(uint8_t channel, uint8_t volume, t_octave octave, t_note note) {
|
||||
if (note == e_Pause) {
|
||||
psgWrite(_ENABLE_REG, psgReadShadow(_ENABLE_REG) | (1 << channel));
|
||||
} else {
|
||||
psgWrite(_ENABLE_REG, psgReadShadow(_ENABLE_REG) & ~(1 << channel));
|
||||
psgAmplitude(channel, volume);
|
||||
psgWriteFrequency(channel, frequencyCodes[octave][note]);
|
||||
}
|
||||
}
|
||||
|
||||
void psgAmplitude(uint8_t channel, uint8_t volume) {
|
||||
psgWrite(CHANNEL_A_AMPLITUDE_REG + channel, volume);
|
||||
}
|
||||
|
||||
void psgInit() {
|
||||
// address/data bus
|
||||
P2DIR = 0xff;
|
||||
P2SEL = 0;
|
||||
P2SEL2 = 0;
|
||||
|
||||
// sound chip reset
|
||||
// BIT2: /RST
|
||||
// P1DIR |= BIT2;
|
||||
|
||||
#if 0
|
||||
// put sound chip into reset state
|
||||
P1OUT &= ~BIT2;
|
||||
delay();
|
||||
delay();
|
||||
delay();
|
||||
#endif
|
||||
|
||||
// bus control lines
|
||||
// BIT3: BC1
|
||||
// BIT1: BDIR
|
||||
// BIT0: _CS1
|
||||
// BIT2: _CS0
|
||||
P1DIR |= BIT0 | BIT1 | BIT2 | BIT3 ;
|
||||
|
||||
// put bus into inactive state
|
||||
BUS_CTRL_REG &= ~(BDIR | BC1);
|
||||
|
||||
#if 0
|
||||
// release sound chip from reset state
|
||||
P1OUT |= BIT2;
|
||||
delay();
|
||||
delay();
|
||||
delay();
|
||||
#endif
|
||||
|
||||
// disable everything
|
||||
psgWrite(_ENABLE_REG, 0xff);
|
||||
}
|
||||
|
BIN
sound-driver/docs/Audio-Amplifier.pdf
Executable file
BIN
sound-driver/docs/Audio-Amplifier.pdf
Executable file
Binary file not shown.
BIN
sound-driver/docs/Clock-Generation.pdf
Executable file
BIN
sound-driver/docs/Clock-Generation.pdf
Executable file
Binary file not shown.
BIN
sound-driver/docs/Frequency-Codes-76489AN.xlsx
Normal file
BIN
sound-driver/docs/Frequency-Codes-76489AN.xlsx
Normal file
Binary file not shown.
BIN
sound-driver/docs/Frequency-Codes.pdf
Executable file
BIN
sound-driver/docs/Frequency-Codes.pdf
Executable file
Binary file not shown.
BIN
sound-driver/docs/Korobeiniki.svg.png
Normal file
BIN
sound-driver/docs/Korobeiniki.svg.png
Normal file
Binary file not shown.
After Width: | Height: | Size: 48 KiB |
BIN
sound-driver/docs/MCU-Connection.pdf
Executable file
BIN
sound-driver/docs/MCU-Connection.pdf
Executable file
Binary file not shown.
BIN
sound-driver/docs/Oktavskala.pdf
Executable file
BIN
sound-driver/docs/Oktavskala.pdf
Executable file
Binary file not shown.
BIN
sound-driver/docs/Registers.pdf
Executable file
BIN
sound-driver/docs/Registers.pdf
Executable file
Binary file not shown.
BIN
sound-driver/docs/TetrisThemeThreeVoices.pdf
Executable file
BIN
sound-driver/docs/TetrisThemeThreeVoices.pdf
Executable file
Binary file not shown.
BIN
sound-driver/docs/ay3-8910.pdf
Normal file
BIN
sound-driver/docs/ay3-8910.pdf
Normal file
Binary file not shown.
BIN
sound-driver/docs/lengths.xlsx
Normal file
BIN
sound-driver/docs/lengths.xlsx
Normal file
Binary file not shown.
2
sound-driver/firmware.gdb
Normal file
2
sound-driver/firmware.gdb
Normal file
@ -0,0 +1,2 @@
|
||||
target remote localhost:2000
|
||||
file firmware.elf
|
37
sound-driver/main.c
Normal file
37
sound-driver/main.c
Normal file
@ -0,0 +1,37 @@
|
||||
#include <msp430g2553.h>
|
||||
#include <stdint.h>
|
||||
#include <stdlib.h>
|
||||
|
||||
#include "spi.h"
|
||||
#include "psg.h"
|
||||
#include "scheduler.h"
|
||||
#include "sequencer.h"
|
||||
#include "melody.h"
|
||||
|
||||
int main() {
|
||||
WDTCTL = WDTPW | WDTHOLD;
|
||||
|
||||
__disable_interrupt();
|
||||
|
||||
// highest possible system clock
|
||||
DCOCTL = DCO0 | DCO1 | DCO2;
|
||||
BCSCTL1 = XT2OFF | RSEL0 | RSEL1 | RSEL2 | RSEL3;
|
||||
BCSCTL2 = 0;
|
||||
BCSCTL3 = 0;
|
||||
|
||||
|
||||
schInit();
|
||||
|
||||
// spiInit();
|
||||
psgInit();
|
||||
sequencerInit();
|
||||
|
||||
__enable_interrupt();
|
||||
|
||||
melodyInit();
|
||||
|
||||
|
||||
while (1) {
|
||||
schExec();
|
||||
}
|
||||
}
|
1051
sound-driver/melody.c
Normal file
1051
sound-driver/melody.c
Normal file
File diff suppressed because it is too large
Load Diff
8
sound-driver/melody.h
Normal file
8
sound-driver/melody.h
Normal file
@ -0,0 +1,8 @@
|
||||
#ifndef _MELODY_H_
|
||||
#define _MELODY_H_
|
||||
|
||||
|
||||
void melodyInit();
|
||||
|
||||
|
||||
#endif // _MELODY_H_
|
46
sound-driver/psg.h
Normal file
46
sound-driver/psg.h
Normal file
@ -0,0 +1,46 @@
|
||||
#ifndef _PSG_H_
|
||||
#define _PSG_H_
|
||||
|
||||
#include <stdint.h>
|
||||
|
||||
typedef enum {
|
||||
e_O_1 = 0,
|
||||
e_O_2,
|
||||
e_O_3,
|
||||
e_O_4,
|
||||
e_O_5,
|
||||
e_O_6,
|
||||
e_O_7,
|
||||
e_O_8,
|
||||
e_O_Null
|
||||
} t_octave;
|
||||
|
||||
typedef enum {
|
||||
e_C = 0,
|
||||
e_Cis,
|
||||
e_D,
|
||||
e_Dis,
|
||||
e_E,
|
||||
e_F,
|
||||
e_Fis,
|
||||
e_G,
|
||||
e_Gis,
|
||||
e_A,
|
||||
e_Ais,
|
||||
e_H,
|
||||
e_Pause,
|
||||
e_Null
|
||||
} t_note;
|
||||
|
||||
#define e_Es e_Dis
|
||||
#define e_As e_Gis
|
||||
#define e_B e_Ais
|
||||
|
||||
|
||||
void psgInit();
|
||||
|
||||
void psgPlayTone(uint8_t channel, uint8_t volume, t_octave octave, t_note note);
|
||||
void psgAmplitude(uint8_t channel, uint8_t volume);
|
||||
|
||||
|
||||
#endif // _PSG_H_
|
90
sound-driver/scheduler.c
Normal file
90
sound-driver/scheduler.c
Normal file
@ -0,0 +1,90 @@
|
||||
#include <stdlib.h>
|
||||
#include <msp430g2553.h>
|
||||
#include "scheduler.h"
|
||||
|
||||
tTask tasks[MAX_NUM_OF_TASKS];
|
||||
|
||||
|
||||
void schInit() {
|
||||
TACCR0 = 19600;
|
||||
TACCTL0 = CCIE;
|
||||
TACTL = MC_1 | ID_0 | TASSEL_2 | TACLR;
|
||||
|
||||
for (uint16_t i = 0; i < MAX_NUM_OF_TASKS; i++) {
|
||||
tasks[i].delay = 0;
|
||||
tasks[i].period = 0;
|
||||
tasks[i].run = 0;
|
||||
tasks[i].exec = NULL;
|
||||
tasks[i].handle = NULL;
|
||||
}
|
||||
}
|
||||
|
||||
void __attribute__ ((interrupt (TIMER0_A0_VECTOR))) schUpdate() {
|
||||
for (uint16_t i = 0; i < MAX_NUM_OF_TASKS; i++) {
|
||||
if (tasks[i].exec != NULL) {
|
||||
if (tasks[i].delay == 0) {
|
||||
tasks[i].delay = tasks[i].period;
|
||||
tasks[i].run++;
|
||||
} else {
|
||||
tasks[i].delay--;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
uint16_t schAdd(void (*exec)(void *), void *handle, uint32_t delay, uint32_t period) {
|
||||
uint16_t taskId = 0xffff;
|
||||
for (uint16_t i = 0; i < MAX_NUM_OF_TASKS; i++) {
|
||||
if (tasks[i].exec == NULL) {
|
||||
tasks[i].delay = delay;
|
||||
tasks[i].period = period;
|
||||
if (delay == 0 && period == 0) {
|
||||
tasks[i].run = 1;
|
||||
} else {
|
||||
tasks[i].run = 0;
|
||||
}
|
||||
tasks[i].exec = exec;
|
||||
tasks[i].handle = handle;
|
||||
taskId = i;
|
||||
break;
|
||||
}
|
||||
}
|
||||
return taskId;
|
||||
}
|
||||
|
||||
/*
|
||||
void schDel(void (*exec)(void *), void *handle) {
|
||||
for (uint16_t i = 0; i < MAX_NUM_OF_TASKS; i++) {
|
||||
if ((tasks[i].exec == exec) && (tasks[i].handle == handle)) {
|
||||
tasks[i].exec = NULL;
|
||||
break;
|
||||
}
|
||||
}
|
||||
}
|
||||
*/
|
||||
void schDel(uint16_t taskId) {
|
||||
tasks[taskId].exec = NULL;
|
||||
}
|
||||
|
||||
void schExec() {
|
||||
for (uint16_t i = 0; i < MAX_NUM_OF_TASKS; i++) {
|
||||
// synchronize access to tasks[].run
|
||||
__disable_interrupt();
|
||||
if (tasks[i].exec != NULL && tasks[i].run > 0) {
|
||||
tasks[i].run--;
|
||||
// synchronize access to tasks[].run
|
||||
// reenable interrupts before actually executing task
|
||||
__enable_interrupt();
|
||||
tasks[i].exec(tasks[i].handle);
|
||||
if (tasks[i].period == 0) {
|
||||
tasks[i].exec = NULL;
|
||||
}
|
||||
} else {
|
||||
// synchronize access to tasks[].run
|
||||
// reenable interrupts in case task is not yet executable
|
||||
__enable_interrupt();
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
|
28
sound-driver/scheduler.h
Normal file
28
sound-driver/scheduler.h
Normal file
@ -0,0 +1,28 @@
|
||||
#ifndef PONTCOOPSCHEDULER_H_
|
||||
#define PONTCOOPSCHEDULER_H_
|
||||
|
||||
|
||||
#include <stdint.h>
|
||||
|
||||
|
||||
|
||||
#define MAX_NUM_OF_TASKS 8
|
||||
|
||||
|
||||
typedef struct {
|
||||
uint16_t delay;
|
||||
uint16_t period;
|
||||
uint8_t run;
|
||||
void (*exec)(void *handle);
|
||||
void *handle;
|
||||
} tTask;
|
||||
|
||||
|
||||
void schInit();
|
||||
uint16_t schAdd(void (*exec)(void *), void *handle, uint32_t delay, uint32_t period);
|
||||
// void schDel(void (*exec)(void *), void *handle);
|
||||
void schDel(uint16_t taskId);
|
||||
void schExec();
|
||||
|
||||
|
||||
#endif /* PONTCOOPSCHEDULER_H_ */
|
99
sound-driver/sequencer.c
Normal file
99
sound-driver/sequencer.c
Normal file
@ -0,0 +1,99 @@
|
||||
#include <stdint.h>
|
||||
#include <stdbool.h>
|
||||
#include <sys/param.h>
|
||||
#include "sequencer.h"
|
||||
#include "scheduler.h"
|
||||
#include "psg.h"
|
||||
|
||||
|
||||
|
||||
void sequencerInit() {
|
||||
}
|
||||
|
||||
void sequencerExec(void *handle) {
|
||||
static uint16_t lengths[e_L_LengthEnd];
|
||||
t_melodies *melodies = (t_melodies*) handle;
|
||||
|
||||
if (melodies->firstRun) {
|
||||
melodies->firstRun = false;
|
||||
|
||||
lengths[e_L_1_4] = 60000 / melodies->pace; // duration of a 1/4 tone in ms
|
||||
lengths[e_L_1_2] = lengths[e_L_1_4] << 1;
|
||||
lengths[e_L_1] = lengths[e_L_1_4] << 2;
|
||||
lengths[e_L_1_8] = lengths[e_L_1_4] >> 1;
|
||||
lengths[e_L_1_16] = lengths[e_L_1_4] >> 2;
|
||||
lengths[e_L_1_32] = lengths[e_L_1_4] >> 4;
|
||||
|
||||
for (uint8_t i = 0; i < e_L_LengthEnd; i++) {
|
||||
lengths[i] /= SEQUENCER_PERIOD;
|
||||
}
|
||||
}
|
||||
|
||||
for (uint8_t channel = 0; channel < melodies->numOfMelodies; channel++) {
|
||||
t_melody *melody = &(melodies->melodies[channel]);
|
||||
|
||||
switch (melody->state) {
|
||||
case e_Init:
|
||||
melody->state = e_PlayTone;
|
||||
break;
|
||||
case e_PlayTone:
|
||||
if (melody->tones[melody->idx].length == e_L_SyncMark) {
|
||||
if (melodies->sync == 0) {
|
||||
melodies->sync = melodies->numOfMelodies;
|
||||
}
|
||||
melodies->sync -= 1;
|
||||
melody->state = e_Sync;
|
||||
} else {
|
||||
if (melody->tones[melody->idx].length == e_L_EndMark) {
|
||||
melody->idx = 0;
|
||||
}
|
||||
psgPlayTone(channel, melody->amplitude, melody->tones[melody->idx].octave, melody->tones[melody->idx].note);
|
||||
melody->lengthCnt = (melody->tones[melody->idx].staccato) ? (lengths[melody->tones[melody->idx].length] / 2) : lengths[melody->tones[melody->idx].length];
|
||||
melody->state = e_HoldTone;
|
||||
}
|
||||
break;
|
||||
case e_Sync:
|
||||
if (melodies->sync == 0) {
|
||||
melody->state = e_SeparateTone;
|
||||
}
|
||||
break;
|
||||
case e_HoldTone:
|
||||
melody->lengthCnt -= 1;
|
||||
if (melody->lengthCnt == 0) {
|
||||
melody->state = (melody->tones[melody->idx].staccato) ? e_StaccatoBreak : e_SeparateTone;
|
||||
}
|
||||
break;
|
||||
case e_StaccatoBreak:
|
||||
psgPlayTone(channel, 0, e_O_Null, e_Pause);
|
||||
melody->lengthCnt = lengths[melody->tones[melody->idx].length] / 2;
|
||||
melody->state = e_HoldStaccatoBreak;
|
||||
break;
|
||||
case e_HoldStaccatoBreak:
|
||||
melody->lengthCnt -= 1;
|
||||
if (melody->lengthCnt == 0) {
|
||||
melody->state = e_SeparateTone;
|
||||
}
|
||||
break;
|
||||
case e_SeparateTone:
|
||||
if (! (melody->tones[melody->idx].legato)) {
|
||||
psgPlayTone(channel, 0, e_O_Null, e_Pause);
|
||||
}
|
||||
melody->idx += 1;
|
||||
melody->state = e_PlayTone;
|
||||
break;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
uint16_t sequencerPlayMelodies(t_melodies *melodies) {
|
||||
for (uint8_t i = 0; i < NUM_OF_CHANNELS; i++) {
|
||||
melodies->melodies[i].idx = 0;
|
||||
melodies->melodies[i].lengthCnt = 0;
|
||||
melodies->melodies[i].state = e_Init;
|
||||
}
|
||||
melodies->sync = 0;
|
||||
melodies->firstRun = true;
|
||||
|
||||
return schAdd(sequencerExec, (void*) melodies, 0, SEQUENCER_PERIOD);
|
||||
}
|
||||
|
61
sound-driver/sequencer.h
Normal file
61
sound-driver/sequencer.h
Normal file
@ -0,0 +1,61 @@
|
||||
#ifndef _SEQUENCER_H_
|
||||
#define _SEQUENCER_H_
|
||||
|
||||
|
||||
#include <stdint.h>
|
||||
#include <stdbool.h>
|
||||
#include "psg.h"
|
||||
|
||||
typedef enum {
|
||||
e_L_1 = 0,
|
||||
e_L_1_2 = 1,
|
||||
e_L_1_4 = 2,
|
||||
e_L_1_8 = 3,
|
||||
e_L_1_16 = 4,
|
||||
e_L_1_32 = 5,
|
||||
e_L_LengthEnd = 6,
|
||||
e_L_EndMark = 254,
|
||||
e_L_SyncMark = 255,
|
||||
} t_noteLength;
|
||||
|
||||
typedef struct {
|
||||
t_octave octave;
|
||||
t_note note;
|
||||
t_noteLength length;
|
||||
bool legato;
|
||||
bool staccato;
|
||||
} t_tone;
|
||||
|
||||
typedef enum {
|
||||
e_Init,
|
||||
e_PlayTone,
|
||||
e_Sync,
|
||||
e_HoldTone,
|
||||
e_StaccatoBreak,
|
||||
e_HoldStaccatoBreak,
|
||||
e_SeparateTone
|
||||
} t_sequencerState;
|
||||
|
||||
typedef struct {
|
||||
uint16_t idx;
|
||||
uint16_t lengthCnt;
|
||||
t_sequencerState state;
|
||||
uint8_t amplitude;
|
||||
const t_tone *tones;
|
||||
} t_melody;
|
||||
|
||||
#define SEQUENCER_PERIOD 4 // ms
|
||||
#define NUM_OF_CHANNELS 3
|
||||
typedef struct {
|
||||
uint8_t numOfMelodies;
|
||||
bool firstRun;
|
||||
uint8_t pace; // quarter notes per minute
|
||||
uint8_t sync;
|
||||
t_melody melodies[NUM_OF_CHANNELS];
|
||||
} t_melodies;
|
||||
|
||||
void sequencerInit();
|
||||
uint16_t sequencerPlayMelodies(t_melodies *melodies);
|
||||
|
||||
|
||||
#endif // _SEQUENCER_H_
|
171
sound-driver/sn76489an.c
Normal file
171
sound-driver/sn76489an.c
Normal file
@ -0,0 +1,171 @@
|
||||
#include <msp430g2553.h>
|
||||
#include <stdint.h>
|
||||
#include <stdlib.h>
|
||||
|
||||
#include "psg.h"
|
||||
#include "scheduler.h"
|
||||
|
||||
|
||||
// generated using utils/calc-76489an.py
|
||||
const uint16_t frequencyCodes[8][12] = {
|
||||
{ 3420, 3229, 3047, 2876, 2715, 2562, 2419, 2283, 2155, 2034, 1920, 1812 },
|
||||
{ 1710, 1614, 1524, 1438, 1357, 1281, 1209, 1141, 1077, 1017, 960, 906 },
|
||||
{ 855, 807, 762, 719, 679, 641, 605, 571, 539, 508, 480, 453 },
|
||||
{ 428, 404, 381, 360, 339, 320, 302, 285, 269, 254, 240, 226 },
|
||||
{ 214, 202, 190, 180, 170, 160, 151, 143, 135, 127, 120, 113 },
|
||||
{ 107, 101, 95, 90, 85, 80, 76, 71, 67, 64, 60, 57 },
|
||||
{ 53, 50, 48, 45, 42, 40, 38, 36, 34, 32, 30, 28 },
|
||||
{ 27, 25, 24, 22, 21, 20, 19, 18, 17, 16, 15, 14 }
|
||||
};
|
||||
|
||||
|
||||
#define ADDR_DATA_REG P2OUT
|
||||
#define BUS_CTRL_REG P1OUT
|
||||
#define BUS_CTRL_IN_REG P1IN
|
||||
#define _CS0 BIT0
|
||||
#define _CS1 BIT1
|
||||
#define _WE BIT2
|
||||
#define READY BIT3
|
||||
|
||||
#define CHANNEL_A_PERIOD_ADDR 0
|
||||
#define CHANNEL_A_ATTEN_ADDR 1
|
||||
#define CHANNEL_B_PERIOD_ADDR 2
|
||||
#define CHANNEL_B_ATTEN_ADDR 3
|
||||
#define CHANNEL_C_PERIOD_ADDR 4
|
||||
#define CHANNEL_C_ATTEN_ADDR 5
|
||||
|
||||
#define IGNORE_OCTET 0xff
|
||||
|
||||
uint8_t psgAmplitudeShadowValue[3];
|
||||
|
||||
static void delay() {
|
||||
asm volatile (
|
||||
"push r12\n"
|
||||
"mov.w #5, r12\n"
|
||||
"loop:\n"
|
||||
"dec.w r12\n"
|
||||
"jnz loop\n"
|
||||
"pop r12\n"
|
||||
);
|
||||
}
|
||||
|
||||
inline static void WRITE_CYCLE(uint8_t chipNo) {
|
||||
if (chipNo == 0) {
|
||||
BUS_CTRL_REG &= ~_CS0;
|
||||
} else {
|
||||
BUS_CTRL_REG &= ~_CS1;
|
||||
}
|
||||
|
||||
BUS_CTRL_REG &= ~_WE;
|
||||
|
||||
delay();
|
||||
|
||||
while ((BUS_CTRL_IN_REG & READY) == 0);
|
||||
|
||||
BUS_CTRL_REG |= _WE;
|
||||
|
||||
if (chipNo == 0) {
|
||||
BUS_CTRL_REG |= _CS0;
|
||||
} else {
|
||||
BUS_CTRL_REG |= _CS1;
|
||||
}
|
||||
|
||||
delay();
|
||||
}
|
||||
|
||||
static void psgWrite(uint8_t chipNo, uint8_t value) {
|
||||
ADDR_DATA_REG = value;
|
||||
WRITE_CYCLE(chipNo);
|
||||
}
|
||||
|
||||
static void psgWriteFrequency(uint8_t channel, uint16_t frequencyCode) {
|
||||
uint8_t chipNo = channel / 3;
|
||||
uint8_t regAddr = (channel % 3) * 2;
|
||||
|
||||
// bit order in frequncyCode and order in octet on data bus are reversed
|
||||
// see datacheat cp. 1 and cp. 6
|
||||
uint8_t firstOctet = 0x01;
|
||||
firstOctet |= ((regAddr & 0x04) > 1);
|
||||
firstOctet |= ((regAddr & 0x02) < 1);
|
||||
firstOctet |= ((regAddr & 0x01) < 3);
|
||||
uint8_t lowerPart = frequencyCode & 0x0f;
|
||||
firstOctet |= ((lowerPart & 0x08) << 1);
|
||||
firstOctet |= ((lowerPart & 0x04) << 3);
|
||||
firstOctet |= ((lowerPart & 0x02) << 5);
|
||||
firstOctet |= ((lowerPart & 0x01) << 7);
|
||||
|
||||
uint8_t secondOctet = 0;
|
||||
uint8_t upperPart = (frequencyCode & 0x03f0) >> 4;
|
||||
secondOctet |= ((upperPart & 0x20) >> 3);
|
||||
secondOctet |= ((upperPart & 0x10) >> 1);
|
||||
secondOctet |= ((upperPart & 0x08) << 1);
|
||||
secondOctet |= ((upperPart & 0x04) << 3);
|
||||
secondOctet |= ((upperPart & 0x02) << 5);
|
||||
secondOctet |= ((upperPart & 0x01) << 7);
|
||||
|
||||
ADDR_DATA_REG = firstOctet;
|
||||
WRITE_CYCLE(chipNo);
|
||||
|
||||
ADDR_DATA_REG = secondOctet;
|
||||
WRITE_CYCLE(chipNo);
|
||||
}
|
||||
|
||||
void psgAmplitude(uint8_t channel, uint8_t volume) {
|
||||
psgAmplitudeShadowValue[channel] = volume;
|
||||
uint8_t chipNo = channel / 3;
|
||||
uint8_t regAddr = ((channel % 3) * 2) + 1;
|
||||
|
||||
uint8_t attenuation = 15 - volume;
|
||||
|
||||
uint8_t firstOctet = 0x01;
|
||||
firstOctet |= ((regAddr & 0x04) >> 1);
|
||||
firstOctet |= ((regAddr & 0x02) << 1);
|
||||
firstOctet |= ((regAddr & 0x01) << 3);
|
||||
firstOctet |= ((attenuation & 0x01) << 7);
|
||||
firstOctet |= ((attenuation & 0x02) << 5);
|
||||
firstOctet |= ((attenuation & 0x04) << 3);
|
||||
firstOctet |= ((attenuation & 0x08) << 1);
|
||||
|
||||
ADDR_DATA_REG = firstOctet;
|
||||
WRITE_CYCLE(chipNo);
|
||||
}
|
||||
|
||||
void psgPlayTone(uint8_t channel, uint8_t volume, t_octave octave, t_note note) {
|
||||
if (note == e_Pause) {
|
||||
psgAmplitude(channel, 0);
|
||||
} else {
|
||||
// if (psgAmplitudeShadowValue[channel] == 0) {
|
||||
psgAmplitude(channel, volume);
|
||||
// }
|
||||
psgWriteFrequency(channel, frequencyCodes[octave][note]);
|
||||
}
|
||||
}
|
||||
|
||||
void psgInit() {
|
||||
// address/data bus
|
||||
P2DIR = 0xff;
|
||||
P2SEL = 0;
|
||||
P2SEL2 = 0;
|
||||
|
||||
// bus control lines
|
||||
// output:
|
||||
// BIT0: /CS chip 0
|
||||
// BIT1: /CS chip 1
|
||||
// BIT2: /WE
|
||||
// input:
|
||||
// BIT3: READY
|
||||
P1DIR |= BIT0 | BIT1 | BIT2;
|
||||
P1DIR &= ~BIT3;
|
||||
// immediately disable all outputs, all are active low
|
||||
P1OUT |= BIT0 | BIT1 | BIT2;
|
||||
|
||||
// shutdown all channels including noise
|
||||
psgWrite(0, 0b11111001);
|
||||
psgWrite(0, 0b11111101);
|
||||
psgWrite(0, 0b11111011);
|
||||
psgWrite(0, 0b11111111);
|
||||
|
||||
// psgPlayTone(0, 5, e_O_3, e_A);
|
||||
psgAmplitude(0, 3);
|
||||
}
|
||||
|
29
sound-driver/spi.c
Normal file
29
sound-driver/spi.c
Normal file
@ -0,0 +1,29 @@
|
||||
#include <msp430g2553.h>
|
||||
#include "spi.h"
|
||||
|
||||
|
||||
void __attribute__ ((interrupt (USCIAB0RX_VECTOR))) receive() {
|
||||
if (UC0IFG & UCB0RXIFG) {
|
||||
// receive an octet
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
void spiInit() {
|
||||
// SPI slave
|
||||
// BIT4: UCB0STE
|
||||
// BIT5: UCB0CLK
|
||||
// BIT6: UCB0SOMI
|
||||
// BIT7: UCB0SIMO
|
||||
P1SEL |= BIT4 | BIT5 | BIT6 | BIT7;
|
||||
P1SEL2 |= BIT4 | BIT5 | BIT6 | BIT7;
|
||||
|
||||
// most significant bit first, enable STE
|
||||
UCB0CTL0 = UCSYNC | UCMSB | UCMODE_2;
|
||||
UCB0CTL1 = 0x00;
|
||||
|
||||
// enable RX interrupt
|
||||
UC0IE |= UCB0RXIE;
|
||||
}
|
||||
|
||||
|
9
sound-driver/spi.h
Normal file
9
sound-driver/spi.h
Normal file
@ -0,0 +1,9 @@
|
||||
#ifndef _SPI_H_
|
||||
#define _SPI_H_
|
||||
|
||||
|
||||
void spiInit();
|
||||
|
||||
|
||||
|
||||
#endif // _SPI_H_
|
64
sound-driver/utils/calc-76489an.py
Normal file
64
sound-driver/utils/calc-76489an.py
Normal file
@ -0,0 +1,64 @@
|
||||
N = 3579545.0
|
||||
factor = 1.0594631
|
||||
base = 440.0
|
||||
|
||||
frequencies = []
|
||||
|
||||
BEFORE_A = 46
|
||||
f = base
|
||||
for i in range (BEFORE_A):
|
||||
idx = BEFORE_A - i - 1
|
||||
print(f"{idx}: {f}")
|
||||
frequencies.append(f)
|
||||
f = base / factor
|
||||
base = f
|
||||
frequencies.reverse()
|
||||
|
||||
AFTER_A = 50
|
||||
base = 440.0
|
||||
for i in range(AFTER_A):
|
||||
idx = BEFORE_A + i
|
||||
f = base * factor
|
||||
print(f"{idx}: {f}")
|
||||
frequencies.append(f)
|
||||
base = f
|
||||
|
||||
# print(f"{frequencies}")
|
||||
|
||||
codes = []
|
||||
for i in range(len(frequencies)):
|
||||
codes.append(round(N / (32.0 * frequencies[i])))
|
||||
|
||||
|
||||
#const uint16_t frequencyCodes[8][12] = {
|
||||
# // C, Cis, D, Dis, E, F, Fis, G, Gis, A, Ais, H
|
||||
# { 06535, 06234, 05747, 05474, 05233, 05002, 04563, 04353, 04153, 03762, 03600, 03424 }, // Octave 1
|
||||
# { 03256, 03116, 02764, 02636, 02515, 02401, 02271, 02165, 02065, 01771, 01700, 01612 }, // Octave 2
|
||||
# { 01527, 01447, 01372, 01317, 01247, 01201, 01135, 01073, 01033, 00774, 00740, 00705 }, // Octave 3
|
||||
# { 00654, 00624, 00575, 00550, 00523, 00500, 00456, 00435, 00415, 00376, 00360, 00342 }, // Octave 4
|
||||
# { 00326, 00312, 00276, 00264, 00252, 00240, 00227, 00217, 00207, 00177, 00170, 00161 }, // Octave 5
|
||||
# { 00153, 00145, 00137, 00132, 00125, 00120, 00114, 00107, 00103, 00100, 00074, 00071 }, // Octave 6
|
||||
# { 00065, 00062, 00060, 00055, 00052, 00050, 00046, 00044, 00042, 00040, 00036, 00034 }, // Octave 7
|
||||
# { 00033, 00031, 00030, 00026, 00025, 00024, 00023, 00022, 00021, 00020, 00017, 00016 } // Octave 8
|
||||
#};
|
||||
|
||||
|
||||
|
||||
print("const uint16_t frequencyCodes[8][12] = {")
|
||||
step = 12
|
||||
for i in range(len(codes)):
|
||||
if (i % step == 0):
|
||||
print(" { ", end='')
|
||||
print(f"{codes[i]}", end='')
|
||||
if ((i+1) % step != 0):
|
||||
print(", ", end='')
|
||||
if ((i+1) % step == 0):
|
||||
print(" }", end='')
|
||||
if ((i+1) != len(codes)):
|
||||
print(", ")
|
||||
else:
|
||||
print()
|
||||
print("};")
|
||||
|
||||
|
||||
|
Reference in New Issue
Block a user