sound effects, not yet working

display-driver/main.c

@@ -76,7 +76,7 @@ int main() {
   P1SEL |= BIT4 | BIT5 | BIT6 | BIT7;
   P1SEL2 |= BIT4 | BIT5 | BIT6 | BIT7;
   // most significant bit first, enable STE
-  UCB0CTL0 = UCCKPH | UCSYNC | UCMSB | UCMODE_2;
+  UCB0CTL0 = UCSYNC | UCMSB | UCMODE_2;
   UCB0CTL1 = 0x00;
   // enable RX interrupt
   UC0IE |= UCB0RXIE;

game-ctrl/Makefile

@@ -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 spi.o scheduler.o canvas.o shapes.o game.o buttons.o myrand.o display.o sound.o eeprom.o
+$(ARTIFACT).elf:	main.o spi.o scheduler.o canvas.o shapes.o game.o buttons.o myrand.o display.o sound.o
 	$(CC) -o $@ $(LDFLAGS) $^
 	$(OBJDUMP) -D $(ARTIFACT).elf > $(ARTIFACT).txt
 

game-ctrl/buttons.c

@@ -10,8 +10,6 @@
 #include "sound.h"
 
 
-bool mutedFlag = true;
-
 static uint8_t buttonsMoveLeftPressed() {
   static uint8_t last = 0;
   uint8_t current = (P2IN & BIT4);
@@ -51,6 +49,7 @@ static uint8_t buttonsMoveDownPressed() {
 void buttonsExec(void *handle) {
   static uint32_t unmuteTimestamp;
   uint32_t currentTimestamp = getSeconds();
+  static bool unmuteFlag = true;
 
 
   if (! stoneIsValid()) {
@@ -89,16 +88,16 @@ void buttonsExec(void *handle) {
   if (buttonPressed == 1) {
     canvasShow();
 
-    if (mutedFlag) {
+    if (! unmuteFlag) {
       soundCtrl(SOUND_UNMUTE);
-      mutedFlag = false;
+      unmuteFlag = true;
     }
     unmuteTimestamp = currentTimestamp;
   }
 
-  if ((! mutedFlag) && (unmuteTimestamp + MUTE_DELAY < currentTimestamp)) {
+  if (unmuteFlag && (unmuteTimestamp + MUTE_DELAY < currentTimestamp)) {
     soundCtrl(SOUND_MUTE);
-    mutedFlag = true;
+    unmuteFlag = false;
   }
 }
 
@@ -108,7 +107,3 @@ void buttonsInit() {
   schAdd(buttonsExec, NULL, 0, 25);
 }
 
-bool isGameActive() {
-  return ! mutedFlag;
-}
-

game-ctrl/buttons.h

@@ -1,10 +1,7 @@
 #ifndef _BUTTONS_H_
 #define _BUTTONS_H_
 
-#include <stdbool.h>
-
 void buttonsInit();
-bool isGameActive();
 
 
 #endif // _BUTTONS_H_

game-ctrl/eeprom.c

@@ -1,75 +0,0 @@
-#include <stdint.h>
-#include "eeprom.h"
-#include "spi.h"
-
-
-#define MAGIC 0xaffe
-#define HIGHSCORE_ADDR 0x00
-#define DUMMY 0x00
-#define CMD_READ  0b00000011
-#define CMD_WRITE 0b00000010
-#define CMD_WRDI  0b00000100
-#define CMD_WREN  0b00000110
-
-
-typedef union {
-  uint8_t buffer[4];
-  struct {
-    uint16_t magic;
-    uint16_t highScore;
-  } v;
-} eepromBuf_t;
-
-eepromBuf_t buf;
-
-static void writeBuf() {
-  spiSendBegin(e_SPI_EEPROM);
-  spiSendOctet(CMD_WREN);
-  spiSendEnd(e_SPI_EEPROM);
-
-  spiSendBegin(e_SPI_EEPROM);
-  spiSendOctet(CMD_WRITE);
-  spiSendOctet(HIGHSCORE_ADDR);
-  spiSendOctet(buf.buffer[0]);
-  spiSendOctet(buf.buffer[1]);
-  spiSendOctet(buf.buffer[2]);
-  spiSendOctet(buf.buffer[3]);
-  spiSendEnd(e_SPI_EEPROM);
-}
-
-static void readBuf() {
-  spiSendBegin(e_SPI_EEPROM);
-  spiSendOctet(CMD_READ);
-  spiReceiveOctet();
-  spiSendOctet(HIGHSCORE_ADDR);
-  spiReceiveOctet();
-  spiSendOctet(DUMMY);
-  buf.buffer[0] = spiReceiveOctet();
-  spiSendOctet(DUMMY);
-  buf.buffer[1] = spiReceiveOctet();
-  spiSendOctet(DUMMY);
-  buf.buffer[2] = spiReceiveOctet();
-  spiSendOctet(DUMMY);
-  buf.buffer[3] = spiReceiveOctet();
-  spiSendEnd(e_SPI_EEPROM);
-}
-
-void eepromInit() {
-  readBuf();
-
-  if (buf.v.magic != MAGIC) {
-    buf.v.magic = MAGIC;
-    buf.v.highScore = 0;
-    writeBuf();
-  }
-}
-
-uint16_t eepromReadHighScore() {
-  return buf.v.highScore;
-}
-
-void eepromWriteHighScore(uint16_t v) {
-  buf.v.highScore = v;
-  writeBuf();
-}
-

game-ctrl/eeprom.h

@@ -1,13 +0,0 @@
-#ifndef _EEPROM_H_
-#define _EEPROM_H_
-
-#include <stdint.h>
-
-
-void eepromInit();
-uint16_t eepromReadHighScore();
-void eepromWriteHighScore(uint16_t v);
-
-
-
-#endif // _EEPROM_H_

game-ctrl/game.c

@@ -8,17 +8,14 @@
 #include "../rgb-driver/colors.h"
 #include "display.h"
 #include "sound.h"
-#include "eeprom.h"
-#include "buttons.h"
 
 
-#define GAME_CYCLE_TIME 50
+#define GAME_CYCLE_TIME 100
 #define GAMEOVER_DELAY 10
-#define MAX_LEVEL 20
 
 
 static uint8_t delayFactor(uint8_t level) {
-  return MAX_LEVEL + 1 - level;
+  return 11 - level;
 }
 
 typedef enum {
@@ -37,9 +34,7 @@ void gameExec(void *handle) {
   static uint8_t rowIndex;
   static uint8_t proceedDelay;
   static uint8_t level;
-  static uint16_t filledLines;
   static uint16_t score;
-  static bool newHighScoreAchieved;
 
 // --- engine begin -------------------------------------------------------
   switch (state) {
@@ -48,9 +43,8 @@ void gameExec(void *handle) {
       canvasClear();
       soundCtrl(SOUND_START);
       level = 1;
-      filledLines = 0;
       score = 0;
-      newHighScoreAchieved = false;
+      displaySetValue(score);
       phase = e_Phase_Game;
       state = e_NewStone;
       break;
@@ -97,7 +91,7 @@ void gameExec(void *handle) {
 
     case e_GameOverFill:
       rowIndex--;
-      canvasFillRow(rowIndex, newHighScoreAchieved ? _green : _red);
+      canvasFillRow(rowIndex, _red);
       if (rowIndex == 0) {
         state = e_GameOverWipe;
       }
@@ -121,41 +115,21 @@ void gameExec(void *handle) {
   }
 // --- engine end ---------------------------------------------------------
 
-  bool wipedLines = false;
   canvasShow();
   if (phase == e_Phase_Game) {
+    uint8_t wipeCnt = 0;
     for (uint8_t r = 0; r < CANVAS_HEIGHT; r++) {
       if (canvasIsRowFilled(r)) {
         score += level;
-        if (score > eepromReadHighScore()) {
-          newHighScoreAchieved = true;
-          eepromWriteHighScore(score);
-        }
         displaySetValue(score);
         canvasWipeRow(r);
         canvasShow();
-        wipedLines = true;
-        filledLines += 1;
+        wipeCnt += 1;
       }
     }
-  }
-
-  if (wipedLines) {
-    soundCtrl(SOUND_PLING);
-  }
-
-  if (wipedLines && (filledLines > 0) && ((filledLines % 10) == 0)) {
-    if (level < MAX_LEVEL) {
-      level += 1;
-    }
+    if (wipeCnt != 0) {
       soundCtrl(SOUND_FANFARE); 
     }
-
-
-  if (isGameActive()) {
-    displaySetValue(score);
-  } else {
-    displaySetValue(eepromReadHighScore());
   }
 }
 

game-ctrl/main.c

@@ -12,7 +12,6 @@
 #include "myrand.h"
 #include "spi.h"
 #include "display.h"
-#include "eeprom.h"
 
 
 int main() {
@@ -29,7 +28,6 @@ int main() {
     schInit();
 
     spiInit();
-    eepromInit();
     displayInit();
     myRandInit();
     canvasInit();

game-ctrl/spi.c

@@ -3,7 +3,7 @@
 
 void spiInit() {
   // SPI in master mode, most significant bit first
-  UCB0CTL0 = UCCKPH | UCMST | UCMSB;
+  UCB0CTL0 = UCMST | UCMSB;
   // SPI timing config
   UCB0CTL1 = UCSSEL_3;
   // Faster than 8 ends up in strange communication errors
@@ -19,25 +19,25 @@ void spiInit() {
   // BIT7: UCB0SIMO
   P1SEL |= BIT5 | BIT6 | BIT7;
   P1SEL2 |= BIT5 | BIT6 | BIT7;
-  // P1DIR |= BIT5 | BIT7;
+  P1DIR |= BIT5 | BIT7;
 
-  // Device Select Lines: 0: Canvas, 1: Display, 2: Sound, 4: EEPROM
-  P1DIR |= BIT0 | BIT1 | BIT2 | BIT4;
+  // Device Select Lines: 0: Canvas, 1: Display, 2: Sound
+  P1DIR |= BIT0 | BIT1 | BIT2;
   // Disable all of them
-  P1OUT |= BIT0 | BIT1 | BIT2 | BIT4;
+  P1OUT |= BIT0 | BIT1 | BIT2;
 
   // enable SPI module
   UCB0CTL1 &= ~UCSWRST;
 }
 
 void spiSendBegin(t_SpiDeviceSelector d) {
-  uint16_t bit = ((uint16_t[]){ BIT0, BIT1, BIT2, BIT4 })[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, BIT4 })[d];
+  uint16_t bit = ((uint16_t[]){ BIT0, BIT1, BIT2 })[d];
   P1OUT |= bit;
 }
 
@@ -48,9 +48,3 @@ void spiSendOctet(uint8_t v) {
   UCB0TXBUF = v;
 }
 
-uint8_t spiReceiveOctet() {
-  while (!(UC0IFG & UCB0RXIFG));
-  uint8_t v = UCB0RXBUF;
-  return v;
-}
-

game-ctrl/spi.h

@@ -4,13 +4,12 @@
 #include <stdint.h>
 
 
-typedef enum { e_SPI_CANVAS, e_SPI_DISPLAY, e_SPI_SOUND, e_SPI_EEPROM } t_SpiDeviceSelector;
+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); 
-uint8_t spiReceiveOctet();
 
 
 

readme.md

@@ -1,60 +0,0 @@
-# Tetris - Hardware and Software
-
-![](./docs/IMG_4936.jpg)
-
-This Tetris implementation consists of a hardware and a software (running on that hardware).
-
-The hardware utilizes four MSP430 microcontrollers for 1.) the game play, 2.) the play ground canvas, 3.) the score display and 4.) the sound effects.
-
-Further documentation including calculations and drawing can be found in the `docs` subdirs of the four main subdirs.
-
-## Game Play
-
-Code is in subdir `game-ctrl` (https://gitea.hottis.de/wn/tetris/src/branch/main/game-ctrl).
-
-In the firmware for this MSP430 microcontroller the whole game mechanics, reading the buttons, reading and writing the highscore EEPROM  and the control of the peripherial microcontrollers are implemented.
-
-The buttons are debounced using RC circuitry and Schmitt triggers and connected to GPIOs of the microcontroller.
-
-The peripherial microcontrollers and the EEPROM are connected via SPI including individual chip select lines.
-
-![](./docs/game-ctrl.jpg)
-
-
-## Play Ground Canvas
-
-Code is in subdir `rgb-driver` (https://gitea.hottis.de/wn/tetris/src/branch/main/rgb-driver).
-
-The play ground is implemented using a 10 * 20 matrix of PL9823 RGB LEDs which are controlled by another MSP430 microcontroller. The firmware for this microcontroller is implemented for performance and real time requirements in assembly code. Through some discret logic the signals for PL9823 LEDs are generated. Major challenge was to generated the signals according the datasheet of all 200 (including a mini canvas for the stone preview: 212) LEDs in real time without interrupts.
-
-The communcation with the game play controller is implemented as a sequences of tuples of LED address (0 to 211) and color code. A single octet of 253 where the LED address is expected is taken as the end-of-telegram mark. Readiness to receive a telegram is signaled to the game play controller via a single line connected to a GPIO of the game play controller.
-
-![](./docs/rgb-driver.jpg)
-
-
-## Score Display
-
-Code is in subdir `display-driver` (https://gitea.hottis.de/wn/tetris/src/branch/main/display-driver).
-
-In the first place, a MAX7221 was meant to be used for connecting a multiple digit seven-segment display. However, it appears, that the MAX7221 requires 3.5V as minimum voltage for the high-level, which caan't be provided by the MSP430 (which runs on 3.3V) and level-shifters haven't been around. Thus, the minimal required amount of functionality of the MAX7221 has been implemented in C on an MSP430. Just four digits are supported. 
-
-Communication with the game play controller is just a 16 bit number to be displayed.
-
-![](./docs/display-driver.jpg)
-
-
-## Sound Effects
-
-Code is in subdir `sound-driver` (https://gitea.hottis.de/wn/tetris/src/branch/main/sound-driver).
-
-An MSP430 microcontroller and two mediaeval AY-3-8913 sound chips are deployed. The sound chips themselve run on 5V, their 8-bit-address/data bus is connected to the port 2 (bit 0 to 7) of the microcontroller. The bus control signal `_CS`, `BC1` and `BDIR` are generated in software and provided via GPIOs.
-
-An amplifier following the proposal of the AY-3-8913 datasheet is implemented using a LM386 chip. A MOSFET BS108 controlled via a GPIO is use the shortcut the input of the amplifier to ground to mute sound effects.
-
-The clock generator proposed by the AY-3-8913 does not work reliably, so an alternative design from "The Art of Electronics" has been used.
-
-![](./docs/sound-driver-1.jpg) 
-![](./docs/sound-driver-2.jpg) 
-![](./docs/sound-driver-3.jpg) 
-![](./docs/sound-driver-4.jpg) 
-

rgb-driver/main.S

@@ -123,7 +123,7 @@ init:
 
   ;; spi configuration
   ;;  USCI B to slave mode, enable STE and most significant bit first
-  mov.b   #UCCKPH|UCSYNC|UCMODE_2|UCMSB, &UCB0CTL0
+  mov.b   #UCSYNC|UCMODE_2|UCMSB, &UCB0CTL0
   mov.b   #0x00, &UCB0CTL1
 
   ;; make sure the isr will not immediately start

sound-driver/Makefile

@@ -4,15 +4,16 @@ OBJDUMP=$(TOOLCHAIN_PREFIX)/bin/msp430-elf-objdump
 
 ARTIFACT=firmware
 MCU=msp430g2553
-DEBUGFLAGS=
-# DEBUGFLAGS+= -g3 -ggdb -gdwarf-2
-COMMONFLAGS=-Wall -mmcu=$(MCU) -I $(TOOLCHAIN_PREFIX)/include -O0 -g0 $(DEBUGFLAGS)
+COMMONFLAGS=-Wall -mmcu=$(MCU) -I $(TOOLCHAIN_PREFIX)/include -O0 -g0
 CFLAGS=$(COMMONFLAGS) -std=gnu99 
 ASFLAGS=$(COMMONFLAGS) -D__ASSEMBLER__
 
+# for debugging
+CFLAGS+= -g3 -ggdb -gdwarf-2
+
 LDFLAGS=-mmcu=$(MCU) -L $(TOOLCHAIN_PREFIX)/include
 
-$(ARTIFACT).elf:	main.o scheduler.o spi.o spi_init.o sequencer.o melody_tetris.o melody_tusch1.o psg.o mute.o melody_pling.o
+$(ARTIFACT).elf:	main.o scheduler.o spi.o spi_init.o sequencer.o melody_tetris.o melody_tusch1.o ay_3_8913.o mute.o effects.o
 	$(CC) -o $@ $(LDFLAGS) $^
 	$(OBJDUMP) -D $(ARTIFACT).elf > $(ARTIFACT).txt
 

sound-driver/ay_3_8913.c

@@ -27,35 +27,6 @@ const uint16_t frequencyCodes[8][12] = {
 #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[2][14];
 
 inline static void BUS_OP_NACT() {
@@ -81,11 +52,24 @@ inline static void BUS_OP_CS1_DISABLE() {
   BUS_CTRL_REG |= _CS1;
 }
 
-static uint8_t psgReadShadow(uint8_t chip, uint8_t address) {
+#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
+
+uint8_t psgReadShadow(uint8_t chip, uint8_t address) {
   return psgShadowRegisters[chip][address];
 }
 
-static void psgWrite(uint8_t chip, uint8_t address, uint8_t data) {
+void psgWrite(uint8_t chip, uint8_t address, uint8_t data) {
   psgShadowRegisters[chip][address] = data;
 
   // according to "State Timing" (p. 15) of datasheet

sound-driver/effects.c

@@ -0,0 +1,18 @@
+#include "effects.h"
+#include "psg.h"
+
+
+void effectsInit() {
+
+}
+
+
+void playEffect1() {
+  psgWrite(1, NOISE_PERIOD_REG, 0);
+  psgWrite(1, _ENABLE_REG, psgReadShadow(1, _ENABLE_REG) & ~0b00111000);
+  psgWrite(1, CHANNEL_A_AMPLITUDE_REG, 020);
+  psgWrite(1, CHANNEL_B_AMPLITUDE_REG, 020);
+  psgWrite(1, CHANNEL_C_AMPLITUDE_REG, 020);
+  psgWrite(1, ENVELOPE_PERIOD_COARSE_REG, 070);
+  psgWrite(1, ENVELOPE_SHAPE_REG, 0);
+}

sound-driver/effects.h

@@ -0,0 +1,9 @@
+#ifndef _EFFECTS_H_
+#define _EFFECTS_H_
+
+
+void effectsInit();
+
+
+
+#endif // _EFFECTS_H_

sound-driver/main.c

@@ -9,6 +9,7 @@
 #include "melody_tetris.h"
 #include "melody_tusch1.h"
 #include "mute.h"
+#include "effects.h"
 
 int main() {
   WDTCTL = WDTPW | WDTHOLD;
@@ -28,10 +29,10 @@ int main() {
   psgInit();
   muteInit();
   sequencerInit();
+  effectsInit();
 
   __enable_interrupt();
 
-
   while (1) {
     schExec();
   }

sound-driver/melody_pling.c

@@ -1,56 +0,0 @@
-#include <stdbool.h>
-#include <stddef.h>
-#include "psg.h"
-#include "sequencer.h"
-#include "scheduler.h"
-
-const t_tone plingVoice1[] = {
-  { .octave = e_O_5,    .note = e_C,     .length = e_L_1_16,    .legato = false, .staccato = false },
-  { .octave = e_O_5,    .note = e_Cis,   .length = e_L_1_16,    .legato = false, .staccato = false },
-  { .octave = e_O_5,    .note = e_D,     .length = e_L_1_16,    .legato = false, .staccato = false },
-  { .octave = e_O_5,    .note = e_Dis,   .length = e_L_1_16,    .legato = false, .staccato = false },
-  { .octave = e_O_5,    .note = e_E,     .length = e_L_1_4,     .legato = false, .staccato = false },
-
-  { .octave = e_O_Null, .note = e_Null,  .length = e_L_SyncMark,.legato = false, .staccato = false },
-  { .octave = e_O_Null, .note = e_Null,  .length = e_L_StopMark,.legato = false, .staccato = false },
-
-  { .octave = e_O_Null, .note = e_Null,  .length = e_L_EndMark, .legato = false, .staccato = false },
-};
-const t_tone plingVoice2[] = {
-  { .octave = e_O_Null, .note = e_Pause, .length = e_L_1_16,    .legato = false, .staccato = false },
-  { .octave = e_O_Null, .note = e_Pause, .length = e_L_1_16,    .legato = false, .staccato = false },
-  { .octave = e_O_Null, .note = e_Pause, .length = e_L_1_16,    .legato = false, .staccato = false },
-  { .octave = e_O_Null, .note = e_Pause, .length = e_L_1_16,    .legato = false, .staccato = false },
-  { .octave = e_O_5,    .note = e_Gis,   .length = e_L_1_4,     .legato = false, .staccato = false },
-
-  { .octave = e_O_Null, .note = e_Null,  .length = e_L_SyncMark,.legato = false, .staccato = false },
-  { .octave = e_O_Null, .note = e_Null,  .length = e_L_HoldMark,.legato = false, .staccato = false },
-
-  { .octave = e_O_Null, .note = e_Null,  .length = e_L_EndMark, .legato = false, .staccato = false },
-};
-const t_tone plingVoice3[] = {
-  { .octave = e_O_Null, .note = e_Pause, .length = e_L_1_16,    .legato = false, .staccato = false },
-  { .octave = e_O_Null, .note = e_Pause, .length = e_L_1_16,    .legato = false, .staccato = false },
-  { .octave = e_O_Null, .note = e_Pause, .length = e_L_1_16,    .legato = false, .staccato = false },
-  { .octave = e_O_Null, .note = e_Pause, .length = e_L_1_16,    .legato = false, .staccato = false },
-  { .octave = e_O_5,    .note = e_H,     .length = e_L_1_4,     .legato = false, .staccato = false },
-
-  { .octave = e_O_Null, .note = e_Null,  .length = e_L_SyncMark,.legato = false, .staccato = false },
-  { .octave = e_O_Null, .note = e_Null,  .length = e_L_HoldMark,.legato = false, .staccato = false },
-
-  { .octave = e_O_Null, .note = e_Null,  .length = e_L_EndMark, .legato = false, .staccato = false },
-};
-
-t_melodies pling = {
-  .melodies = { { .amplitude = 12, .tones = plingVoice1 }, { .amplitude = 12, .tones = plingVoice2 }, { .amplitude = 12, .tones = plingVoice3 } },
-  .numOfMelodies = 3,
-  .pace = 200,
-  .chip = 1
-};
-
-void playPling() {
-  sequencerPlayMelodies(&pling);
-}
-
-
-

sound-driver/melody_pling.h

@@ -1,8 +0,0 @@
-#ifndef _MELODY_PLING_H_
-#define _MELODY_PLING_H_
-
-
-void playPling();
-
-
-#endif // _MELODY_PLING_H_

sound-driver/melody_tetris.c

@@ -922,27 +922,19 @@ const t_tone voice3[] = {
   { .octave = e_O_Null, .note = e_Null,  .length = e_L_EndMark, .legato = false, .staccato = false },
 };
 
-#define INITIAL_PACE 160
 t_melodies tetrisTheme = {
-  .melodies = { { .amplitude = 8, .tones = voice1 }, { .amplitude = 8, .tones = voice2 }, { .amplitude = 8, .tones = voice3 } },
+  .melodies = { { .chip = 0, .amplitude = 8, .tones = voice1 }, { .chip = 0, .amplitude = 8, .tones = voice2 }, { .chip = 0, .amplitude = 8, .tones = voice3 } },
   .numOfMelodies = 3,
-  .pace = INITIAL_PACE,
-  .chip = 0
+  .pace = 160,
+  .slotMask = 0x01
 };
 
 void playMelodyTetris() {
-  tetrisTheme.pace = INITIAL_PACE; // reset to start value each time
   sequencerPlayMelodies(&tetrisTheme);
 }
 
-void playMelodyTetrisFaster() {
-  tetrisTheme.pace += 15;
-  sequencerChangePace(&tetrisTheme);
-}
-
 void stopMelodyTetris() {
   sequencerStopMelodies(&tetrisTheme);
 }
 
 
-

sound-driver/melody_tetris.h

@@ -4,6 +4,6 @@
 
 void playMelodyTetris();
 void stopMelodyTetris();
-void playMelodyTetrisFaster();
+
 
 #endif // _MELODY_TETRIS_H_

sound-driver/melody_tusch1.c

@@ -3,7 +3,6 @@
 #include "psg.h"
 #include "sequencer.h"
 #include "scheduler.h"
-#include "melody_tetris.h"
 
 const t_tone tusch1voice1[] = {
   { .octave = e_O_5,    .note = e_C,     .length = e_L_1_4,     .legato = false, .staccato = true  },
@@ -72,15 +71,14 @@ const t_tone tusch1voice3[] = {
 };
 
 t_melodies tusch1 = {
-  .melodies = { { .amplitude = 12, .tones = tusch1voice1 }, { .amplitude = 12, .tones = tusch1voice2 }, { .amplitude = 12, .tones = tusch1voice3 } },
+  .melodies = { { .chip = 1, .amplitude = 12, .tones = tusch1voice1 }, { .chip = 1, .amplitude = 12, .tones = tusch1voice2 }, { .chip = 1, .amplitude = 12, .tones = tusch1voice3 } },
   .numOfMelodies = 3,
   .pace = 200,
-  .chip = 1
+  .slotMask = 0x02
 };
 
 void playTusch1() {
   sequencerPlayMelodies(&tusch1);
-//  playMelodyTetrisFaster();
 }
 
 

sound-driver/mute.c

@@ -6,9 +6,7 @@
 void muteInit() {
   // BIT6: MuteCtrl
   P1DIR |= BIT6;
-
-  // initially, mute
-  P1OUT |= BIT6;
+  P1OUT &= ~BIT6;
 }
 
 void mute() {

sound-driver/psg.h

@@ -36,11 +36,41 @@ typedef enum {
 #define e_As e_Gis
 #define e_B e_Ais
 
+#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
+
 
 void psgInit();
 
 void psgPlayTone(uint8_t chip, uint8_t channel, uint8_t volume, t_octave octave, t_note note);
 void psgAmplitude(uint8_t chip, uint8_t channel, uint8_t volume);
-
+uint8_t psgReadShadow(uint8_t chip, uint8_t address);
+void psgWrite(uint8_t chip, uint8_t address, uint8_t data);
 
 #endif // _PSG_H_

sound-driver/scheduler.c

@@ -52,6 +52,16 @@ uint16_t schAdd(void (*exec)(void *), void *handle, uint32_t delay, uint32_t per
   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;
 }

sound-driver/sequencer.c

@@ -59,7 +59,7 @@ void sequencerExec(void *handle) {
           if (melody->tones[melody->idx].length == e_L_EndMark) {
             melody->idx = 0;
           }
-          psgPlayTone(melodies->chip, channel, melody->amplitude, melody->tones[melody->idx].octave, melody->tones[melody->idx].note);
+          psgPlayTone(melody->chip, channel, melody->amplitude, melody->tones[melody->idx].octave, melody->tones[melody->idx].note);
           melody->lengthCnt = (melody->tones[melody->idx].staccato) ? 
             (calcLength(melodies, melody->tones[melody->idx].length) / 2) : 
             calcLength(melodies, melody->tones[melody->idx].length);
@@ -78,7 +78,7 @@ void sequencerExec(void *handle) {
         }
         break;
       case e_StaccatoBreak:
-        psgPlayTone(melodies->chip, channel, 0, e_O_Null, e_Pause);
+        psgPlayTone(melody->chip, channel, 0, e_O_Null, e_Pause);
         melody->lengthCnt = calcLength(melodies, melody->tones[melody->idx].length) / 2;
         melody->state = e_HoldStaccatoBreak;
         break;
@@ -90,7 +90,7 @@ void sequencerExec(void *handle) {
         break;
       case e_SeparateTone:
         if (! (melody->tones[melody->idx].legato)) {
-          psgPlayTone(melodies->chip, channel, 0, e_O_Null, e_Pause);
+          psgPlayTone(melody->chip, channel, 0, e_O_Null, e_Pause);
         }
         melody->idx += 1;
         melody->state = e_PlayTone;
@@ -106,8 +106,6 @@ void sequencerExec(void *handle) {
 }
 
 void sequencerPlayMelodies(t_melodies *melodies) {
-  melodies->slotMask = (1 << melodies->chip);
-
   if ((slots & melodies->slotMask) != 0) {
     return;
   }
@@ -125,14 +123,7 @@ void sequencerPlayMelodies(t_melodies *melodies) {
 }
 
 void sequencerStopMelodies(t_melodies *melodies) {
-  schDel(melodies->taskId);
   slots &= ~(melodies->slotMask);
-  for (uint8_t channel = 0; channel < melodies->numOfMelodies; channel++) {
-    psgPlayTone(melodies->chip, channel, 0, e_O_Null, e_Pause);
-  }
-}
-
-void sequencerChangePace(t_melodies *melodies) {
-  melodies->quarterLength = 60000 / melodies->pace / SEQUENCER_PERIOD; // duration of a 1/4 tone in ms
+  schDel(melodies->taskId);
 }
 

sound-driver/sequencer.h

@@ -42,6 +42,7 @@ typedef enum {
 
 typedef struct {
   uint16_t idx;
+  uint8_t chip;
   uint16_t lengthCnt;
   t_sequencerState state;
   uint8_t amplitude;
@@ -52,11 +53,10 @@ typedef struct {
 #define NUM_OF_CHANNELS 3
 typedef struct {
   uint8_t slotMask;
-  uint8_t chip;
   uint8_t taskId;
   uint16_t quarterLength;
   uint8_t numOfMelodies;
-  uint16_t pace; // quarter notes per minute
+  uint8_t pace; // quarter notes per minute
   uint8_t sync;
   t_melody melodies[NUM_OF_CHANNELS];
 } t_melodies;
@@ -64,6 +64,5 @@ typedef struct {
 void sequencerInit();
 void sequencerPlayMelodies(t_melodies *melodies);
 void sequencerStopMelodies(t_melodies *melodies);
-void sequencerChangePace(t_melodies *melodies); 
 
 #endif // _SEQUENCER_H_

sound-driver/sn76489an.c

@@ -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);
+}
+

sound-driver/soundCodes.h

@@ -9,6 +9,6 @@
 #define SOUND_FANFARE 0x10
 #define SOUND_LOCK 0x20
 #define SOUND_MOTION 0x40
-#define SOUND_PLING 0x80
+#define SOUND_SPEED_UP 0x80
 
 #endif // _SOUND_CODES_H_

sound-driver/spi.S

@@ -1,6 +1,10 @@
 #include <msp430g2553.h>
 #include "soundCodes.h"
 
+  .section ".data"
+  .global cmd
+cmd:
+  .byte   
 
   .section ".text","ax",@progbits
 receive_isr:
@@ -30,17 +34,17 @@ spiCmdHandler_3:
 spiCmdHandler_4:
   bit     #SOUND_GAMEOVER, &cmd
   jz      spiCmdHandler_5
-  call    #stopMelodyTetris
+  ;; insert a call here
   bic     #SOUND_GAMEOVER, &cmd
 spiCmdHandler_5:
   bit     #SOUND_FANFARE, &cmd
   jz      spiCmdHandler_6
-  call    #playMelodyTetrisFaster
   call    #playTusch1
   bic     #SOUND_FANFARE, &cmd
 spiCmdHandler_6:
   bit     #SOUND_LOCK, &cmd
   jz      spiCmdHandler_7
+  call    #playEffect1
   ;; insert a call here
   bic     #SOUND_LOCK, &cmd
 spiCmdHandler_7:
@@ -49,14 +53,17 @@ spiCmdHandler_7:
   ;; insert a call here
   bic     #SOUND_MOTION, &cmd
 spiCmdHandler_8:
-  bit     #SOUND_PLING, &cmd
+  bit     #SOUND_SPEED_UP, &cmd
   jz      spiCmdHandler_end
-  call    #playPling
-  bic     #SOUND_PLING, &cmd
+  ;; insert a call here
+  bic     #SOUND_SPEED_UP, &cmd
 spiCmdHandler_end:
   ret
 
  
+
+
+
   .section "__interrupt_vector_8","ax",@progbits
   .word   receive_isr
 

sound-driver/spi_init.c

@@ -6,7 +6,7 @@
 #include "soundCodes.h"
 
 
-uint8_t cmd;
+extern uint8_t cmd;
 
 void spiInit() {
   // SPI slave
@@ -18,7 +18,7 @@ void spiInit() {
   P1SEL2 |= BIT4 | BIT5 | BIT7;
 
   // most significant bit first, enable STE
-  UCB0CTL0 = UCCKPH | UCSYNC | UCMSB | UCMODE_2;
+  UCB0CTL0 = UCSYNC | UCMSB | UCMODE_2;
   UCB0CTL1 = 0x00;
 
   // enable RX interrupt