charles young / Mbed 2 deprecated GEO_COUNTER_L432KC

Charles Young's development fork. Going forward I only want to push mature code to main repository.

Dependencies:   mbed

Fork of GEO_COUNTER_L432KC by Geo Electronics "Geo Counter"

main.cpp@16:b2e77eb76ab4, 2018-09-03 (annotated)

Committer:
Charles David Young
Date:
Mon Sep 03 10:12:02 2018 -0700
Revision:
16:b2e77eb76ab4
Parent:
15:808e98afe32b
Child:
17:6eed17197004
Implement wheel state machine

Who changed what in which revision?

UserRevisionLine numberNew contents of line
walter76 2:ac0ed3d84d44 1 // GEO COUNTER V1 firmware
walter76 2:ac0ed3d84d44 2 // This FW provides a basic operation of GEO-COUNTER
walter76 2:ac0ed3d84d44 3 //
walter76 2:ac0ed3d84d44 4 // Latest review: August 27, 2018 - Walter Trovo
walter76 1:75827d765e34 5 //
walter76 1:75827d765e34 6 // Feb 14, 2018: initial release aimed to test the counters, the serial port
walter76 1:75827d765e34 7 // the PWM output and the MAX7219 operation.
walter76 1:75827d765e34 8 // Feb 15, 2018: Removed MAX7219 libray (replaced with custom routine).
walter76 1:75827d765e34 9 // Added 74HC595 routine. Added beep. Added Gate_write
walter76 1:75827d765e34 10 //
walter76 2:ac0ed3d84d44 11
walter76 1:75827d765e34 12
walter76 1:75827d765e34 13 // this block includes key libraries
walter76 1:75827d765e34 14 #include "mbed.h" // global Mbed library (always needed)
walter76 1:75827d765e34 15 #include <string> // strings management
walter76 1:75827d765e34 16 #include "QEI.h" // Quadrature Encoder functions
walter76 1:75827d765e34 17
walter76 1:75827d765e34 18 // definitions of fixed parameters
walter76 0:6d1742703713 19
walter76 1:75827d765e34 20 #define DEC_MODE 0x09FF // BCD decoding on all digits
walter76 1:75827d765e34 21 #define BRIGHTNESS 0x0A0F // max brightness
walter76 1:75827d765e34 22 #define SCAN_LIM 0x0B07 // use all 8 digits
walter76 1:75827d765e34 23 #define TURN_ON 0x0C01 // no shutdown (operating)
walter76 1:75827d765e34 24 #define SHUTDOWN 0x0C00 // shutdown
walter76 1:75827d765e34 25 #define TEST 0x0F00 // no test
walter76 1:75827d765e34 26
walter76 1:75827d765e34 27 #define DT 1 // delay time in us for SPI emulation
walter76 1:75827d765e34 28
walter76 1:75827d765e34 29 #define TGATE 10 // gate time (currently fixed for testing purpose)
walter76 1:75827d765e34 30 #define MAX_VAL 999999 // Max value managed by the 6-digits display
walter76 0:6d1742703713 31
walter76 1:75827d765e34 32
walter76 1:75827d765e34 33 #define CPM 0x01
walter76 1:75827d765e34 34 #define CPS 0x02
walter76 1:75827d765e34 35 #define PLS 0x04
walter76 1:75827d765e34 36 #define VOLTS 0x08
walter76 1:75827d765e34 37 #define CNT1 0x10
walter76 1:75827d765e34 38 #define CNT2 0x20
walter76 1:75827d765e34 39 #define HV 0x40
walter76 1:75827d765e34 40 #define MENU 0x80
charlesdavidyoung 13:0e7b06af9a2a 41 uint8_t LED_statuses[] = {CPM, CPS, PLS, VOLTS, CNT1, CNT2, HV, MENU};
Charles David Young 7:9f975e00600c 42 uint8_t LED_status = CPM;
Charles David Young 7:9f975e00600c 43 uint8_t LED_status_index = 0;
walter76 1:75827d765e34 44
walter76 1:75827d765e34 45 // definitions of the input/outputs (pins)
walter76 1:75827d765e34 46 DigitalOut AUX (D2); // AUX control for GPS module
walter76 0:6d1742703713 47 InterruptIn TRIG1 (D3); // Counter 1 trigger
walter76 0:6d1742703713 48 InterruptIn TRIG2 (D6); // Counter 2 trigger
charlesdavidyoung 15:808e98afe32b 49 DigitalIn QEPB (D9); // Quadrature encoder pushbutton
walter76 0:6d1742703713 50 PwmOut PWM (D10); // PWM output
walter76 1:75827d765e34 51 DigitalOut BUZZ (D13); // Buzzer
walter76 0:6d1742703713 52
walter76 1:75827d765e34 53 AnalogIn AIN0 (A0); // ADC input 0 (High Voltage)
walter76 1:75827d765e34 54 AnalogIn AIN1 (A1); // ADC input 1 (aux)
walter76 1:75827d765e34 55 DigitalOut CS2 (A2); // 74HC595 RCLK (pin 12)
walter76 1:75827d765e34 56 DigitalOut CS1 (A3); // MAX7219 CS (pin 12)
walter76 1:75827d765e34 57 DigitalOut SCK (A4); // 74HC595 SRCLK (pin 11) & MAX7219 SCK (pin 13)
walter76 1:75827d765e34 58 AnalogIn KEYB (A5); // Keyboard input (SW2 & SW3)
walter76 1:75827d765e34 59 DigitalOut MOSI (A6); // 74HC595 SER (pin 14) & MAX7219 DIN (pin 1)
walter76 1:75827d765e34 60 DigitalIn UN (A7); // Unused (in V1 PCB A5 and A7 must be connected)
walter76 1:75827d765e34 61
charlesdavidyoung 5:4f90b458dbdf 62 // LED on processor board
charlesdavidyoung 5:4f90b458dbdf 63 DigitalOut led1(LED1);
walter76 1:75827d765e34 64
walter76 1:75827d765e34 65 // definitions of peripherals and devices
Charles David Young 7:9f975e00600c 66
Charles David Young 7:9f975e00600c 67 // QEI class supports the mode wheel. In its most basic function it will tell
Charles David Young 7:9f975e00600c 68 // us which direction the wheel is moving (right or left) so that we can
Charles David Young 7:9f975e00600c 69 // use it to select the current mode.
walter76 1:75827d765e34 70 QEI Wheel(D12, D11, NC, 16); // Quadrature encoder
Charles David Young 7:9f975e00600c 71 int WheelCurrent = 0;
Charles David Young 7:9f975e00600c 72 int WheelPrevious = 0;
Charles David Young 16:b2e77eb76ab4 73 bool QEPBpressed = false; // only react to button when pressed
Charles David Young 16:b2e77eb76ab4 74 enum WheelState {
Charles David Young 16:b2e77eb76ab4 75 WHEEL_INACTIVE = 0,
Charles David Young 16:b2e77eb76ab4 76 WHEEL_MODE_SELECT = 1,
Charles David Young 16:b2e77eb76ab4 77 WHEEL_SUBMODE_SELECT = 2
Charles David Young 16:b2e77eb76ab4 78 };
Charles David Young 16:b2e77eb76ab4 79 enum WheelStateEvent {
Charles David Young 16:b2e77eb76ab4 80 WHEEL_Pressed = 0,
Charles David Young 16:b2e77eb76ab4 81 WHEEL_Timeout = 1
Charles David Young 16:b2e77eb76ab4 82 };
Charles David Young 16:b2e77eb76ab4 83 WheelState currentWheelState;
Charles David Young 7:9f975e00600c 84
walter76 1:75827d765e34 85 I2C i2c(D4, D5); // I2C port
walter76 1:75827d765e34 86 Ticker Sec_Beat; // 1 second ticker
walter76 1:75827d765e34 87 Serial PC(USBTX, USBRX); // Virtual COM via USB (PC connection)
walter76 1:75827d765e34 88 Serial GPS(D1, D0); // Serial port for GPS module
walter76 0:6d1742703713 89
walter76 0:6d1742703713 90 // Global variables
walter76 1:75827d765e34 91 uint8_t Disp_Digit[8]; // used to manage 8-digits through MAX7219
walter76 1:75827d765e34 92 uint16_t Stream; // used to stream out serial data to MAX7219
walter76 1:75827d765e34 93 time_t seconds; // Real-Time Clock (RTC) timestamp
walter76 1:75827d765e34 94 unsigned int value = 0; // displayed value on the 6-digits of the display
walter76 1:75827d765e34 95 uint8_t gate = TGATE; // displayed value on the 2-digits display
walter76 1:75827d765e34 96 uint32_t Count1, Count2; // pulse counters (32-bit)
walter76 1:75827d765e34 97 char Text[40]=""; // used to send messages over the serial port
walter76 1:75827d765e34 98 uint8_t Disp_mode = 0x01, Disp_unit = 0xA0; // status of 1st row and 2nd rows of LEDs
kd5byb 4:b17c6556cf1f 99 bool Stopped = 0; // status of counting activity
charlesdavidyoung 5:4f90b458dbdf 100 bool StartStopPressed = 0;// status of counting activity
walter76 1:75827d765e34 101 double ADC_val; // used to read ADC value
walter76 0:6d1742703713 102
walter76 1:75827d765e34 103 // ----- Prototypes of routines (defined below the main) -------------------
Charles David Young 16:b2e77eb76ab4 104 void UpdateInput(void); // periodically called by the ticker
Charles David Young 16:b2e77eb76ab4 105 void UpdateOutput(void); // periodically called by the ticker
walter76 1:75827d765e34 106 void Count1_up(void); // called every time an edge is detected on TRIG1 pin
walter76 1:75827d765e34 107 void Count2_up(void); // called every time an edge is detected on TRIG2 pin
walter76 1:75827d765e34 108 void Beep(void); // used to generate a short beep (buzzer)
walter76 1:75827d765e34 109 void LEDs_write(unsigned short); // write to 74HC595 (8x LEDs)
walter76 1:75827d765e34 110 void Display_init(void); // initialize MAX7219
walter76 1:75827d765e34 111 void Display_6D_write(uint8_t); // write to MAX7219 (Main 6-digits display)
walter76 1:75827d765e34 112 void Display_2D_write(unsigned short); // write to MAX7219 (Gate 2-digits display)
walter76 0:6d1742703713 113
walter76 0:6d1742703713 114 //==============================================================================
walter76 0:6d1742703713 115 //==============================================================================
walter76 0:6d1742703713 116
walter76 0:6d1742703713 117 int main()
walter76 0:6d1742703713 118 {
walter76 0:6d1742703713 119
walter76 1:75827d765e34 120 PC.baud(115200); // set baud-rate of virtual COM port (PC connection)
charlesdavidyoung 5:4f90b458dbdf 121 PC.printf("\nGEO COUNTER V1 2108");
walter76 1:75827d765e34 122 PC.printf(__DATE__);
walter76 1:75827d765e34 123 PC.printf(" ");
walter76 1:75827d765e34 124 PC.printf(__TIME__);
walter76 1:75827d765e34 125
walter76 2:ac0ed3d84d44 126 GPS.baud(9600); // set the baud-rate of the serial port dedicated to the GPS
walter76 0:6d1742703713 127
walter76 1:75827d765e34 128 CS1 = 1; // presets CS of MAX7219
walter76 1:75827d765e34 129 CS2 = 1; // preset CS of 74HC595
walter76 1:75827d765e34 130
charlesdavidyoung 13:0e7b06af9a2a 131 Display_6D_write(0x543210);
walter76 1:75827d765e34 132 Display_2D_write(TGATE);
walter76 1:75827d765e34 133 Display_init(); // initialize MAX7219
walter76 0:6d1742703713 134
walter76 1:75827d765e34 135 // RTC is supposed to be loose time at power down (no backup battery)
walter76 1:75827d765e34 136 // An initialization is performed anyway
walter76 1:75827d765e34 137 set_time(0); // Set time
walter76 0:6d1742703713 138
walter76 1:75827d765e34 139 Wheel.reset(); // clear the variable associated to the encoder
walter76 1:75827d765e34 140
walter76 1:75827d765e34 141 PWM.period_ms(3); // set the PWM period
walter76 1:75827d765e34 142 PWM.write(0.8); // set the PWM duty-cycle
walter76 1:75827d765e34 143
walter76 1:75827d765e34 144 LEDs_write(0x00); // initialize LEDs (CPM and CNT1 on)
walter76 1:75827d765e34 145 Beep(); // initial beep
walter76 1:75827d765e34 146
walter76 1:75827d765e34 147 // set the 1 sec ticker to periodically call the Update() routine
walter76 1:75827d765e34 148 // NOTE: this is also the 1-sec time base for counters. A better approach
walter76 1:75827d765e34 149 // would replace the ticker with an interrupt from the RTC (to be implemented)
Charles David Young 16:b2e77eb76ab4 150 Sec_Beat.attach_us(&UpdateInput, 100000);
Charles David Young 16:b2e77eb76ab4 151 Sec_Beat.attach_us(&UpdateOutput, 1000000);
walter76 0:6d1742703713 152 //RTC::attach(&Update, RTC::Second);
walter76 1:75827d765e34 153 //RTC::detach(RTC::Second);
walter76 1:75827d765e34 154
walter76 1:75827d765e34 155 // main loop does nothing as all activities are interrupt driven
walter76 0:6d1742703713 156 while(1)
walter76 0:6d1742703713 157 {
walter76 2:ac0ed3d84d44 158 // dance (or drink a beer)
walter76 0:6d1742703713 159 }
walter76 0:6d1742703713 160 }
walter76 0:6d1742703713 161
walter76 0:6d1742703713 162
walter76 1:75827d765e34 163 //-------- END OF MAIN --------------
walter76 0:6d1742703713 164 //==============================================================================
walter76 0:6d1742703713 165
walter76 1:75827d765e34 166 // Definition of routines
walter76 1:75827d765e34 167
walter76 1:75827d765e34 168 //---------------------------------------------------------------------------
walter76 1:75827d765e34 169 // Update values to be displayed
Charles David Young 10:f48cc6be5ae8 170 void logToPC()
Charles David Young 10:f48cc6be5ae8 171 {
Charles David Young 10:f48cc6be5ae8 172 PC.printf("\nADC: %.02f", ADC_val);
Charles David Young 10:f48cc6be5ae8 173 PC.printf(Stopped ? " stopped" : " started");
Charles David Young 10:f48cc6be5ae8 174 // Timestamp to PC (debug)
Charles David Young 10:f48cc6be5ae8 175 seconds = time(NULL); // get current time
Charles David Young 10:f48cc6be5ae8 176 strftime(Text, 50, "%H:%M:%S", localtime(&seconds));
Charles David Young 10:f48cc6be5ae8 177 PC.printf(" RTC: %s, CNT1: %7d CNT2: %7d",Text, Count1, Count2);
charlesdavidyoung 15:808e98afe32b 178 PC.printf(" wheel %d %d", WheelCurrent, QEPB.read());
Charles David Young 10:f48cc6be5ae8 179 }
walter76 1:75827d765e34 180
Charles David Young 16:b2e77eb76ab4 181 void UpdateOutput()
walter76 1:75827d765e34 182 {
Charles David Young 16:b2e77eb76ab4 183 if(Stopped)
Charles David Young 16:b2e77eb76ab4 184 {
Charles David Young 16:b2e77eb76ab4 185 // disable interrupts on TRIG1 and TRIG2
Charles David Young 16:b2e77eb76ab4 186
Charles David Young 16:b2e77eb76ab4 187 TRIG1.rise(NULL);
Charles David Young 16:b2e77eb76ab4 188 TRIG2.rise(NULL);
Charles David Young 16:b2e77eb76ab4 189
Charles David Young 16:b2e77eb76ab4 190 // show zero gate time
Charles David Young 16:b2e77eb76ab4 191 gate = 0;
Charles David Young 16:b2e77eb76ab4 192 Display_2D_write(gate);
Charles David Young 16:b2e77eb76ab4 193
Charles David Young 16:b2e77eb76ab4 194 // show selected content on main display
Charles David Young 16:b2e77eb76ab4 195 value = (int)(Count1/TGATE);
Charles David Young 16:b2e77eb76ab4 196 Display_6D_write(value); // refresh the main display
Charles David Young 16:b2e77eb76ab4 197 }
Charles David Young 16:b2e77eb76ab4 198
Charles David Young 16:b2e77eb76ab4 199 else
Charles David Young 16:b2e77eb76ab4 200 {
Charles David Young 16:b2e77eb76ab4 201 // Enable interrupts on rising edge of digital inputs TRIG1 & TRIG2
Charles David Young 16:b2e77eb76ab4 202 TRIG1.rise(&Count1_up);
Charles David Young 16:b2e77eb76ab4 203 TRIG2.rise(&Count2_up);
Charles David Young 16:b2e77eb76ab4 204
Charles David Young 16:b2e77eb76ab4 205 if(gate==0) // show the counter value at the end of the gate time
Charles David Young 16:b2e77eb76ab4 206 {
Charles David Young 16:b2e77eb76ab4 207 value = (int)(Count1/TGATE);
Charles David Young 16:b2e77eb76ab4 208
Charles David Young 16:b2e77eb76ab4 209 Display_6D_write(value); // refresh the main display
Charles David Young 7:9f975e00600c 210
Charles David Young 16:b2e77eb76ab4 211 Count1 = 0; // clear both counters
Charles David Young 16:b2e77eb76ab4 212 Count2 = 0;
Charles David Young 16:b2e77eb76ab4 213 gate = TGATE;// and reload the gate time
Charles David Young 16:b2e77eb76ab4 214
Charles David Young 16:b2e77eb76ab4 215 }
Charles David Young 16:b2e77eb76ab4 216
Charles David Young 16:b2e77eb76ab4 217 Display_2D_write(gate); // show gate time countdown
Charles David Young 16:b2e77eb76ab4 218 gate--;
Charles David Young 16:b2e77eb76ab4 219 }
Charles David Young 16:b2e77eb76ab4 220 }
Charles David Young 16:b2e77eb76ab4 221
Charles David Young 16:b2e77eb76ab4 222 void UpdateInput()
Charles David Young 16:b2e77eb76ab4 223 {
Charles David Young 16:b2e77eb76ab4 224 LEDs_write(LED_statuses[LED_status_index]);
Charles David Young 16:b2e77eb76ab4 225
Charles David Young 16:b2e77eb76ab4 226 ADC_val = KEYB.read(); // read voltage from keyboard
Charles David Young 16:b2e77eb76ab4 227 if ( (ADC_val<0.1) // START/STOP pushbutton pressed
Charles David Young 16:b2e77eb76ab4 228 && (!StartStopPressed))
Charles David Young 16:b2e77eb76ab4 229 {
Charles David Young 16:b2e77eb76ab4 230 StartStopPressed = true;
Charles David Young 16:b2e77eb76ab4 231 Stopped=!Stopped; // toggle status
Charles David Young 16:b2e77eb76ab4 232 }
Charles David Young 16:b2e77eb76ab4 233 else
Charles David Young 16:b2e77eb76ab4 234 StartStopPressed = false;
charlesdavidyoung 5:4f90b458dbdf 235
Charles David Young 16:b2e77eb76ab4 236 if((ADC_val>0.6)&&(ADC_val<0.7)) // CLEAR pushbutton pressed
Charles David Young 16:b2e77eb76ab4 237 {
Charles David Young 16:b2e77eb76ab4 238 Count1 = 0; // clear counters
Charles David Young 16:b2e77eb76ab4 239 Count2 = 0;
charlesdavidyoung 5:4f90b458dbdf 240 }
charlesdavidyoung 5:4f90b458dbdf 241
Charles David Young 16:b2e77eb76ab4 242 if ( (WHEEL_MODE_SELECT == currentWheelState)
Charles David Young 16:b2e77eb76ab4 243 || (WHEEL_SUBMODE_SELECT == currentWheelState))
Charles David Young 16:b2e77eb76ab4 244 {
Charles David Young 16:b2e77eb76ab4 245 WheelCurrent = int(Wheel.getPulses());
Charles David Young 16:b2e77eb76ab4 246 if (WheelCurrent > WheelPrevious)
Charles David Young 16:b2e77eb76ab4 247 LED_status_index = ++LED_status_index % sizeof(LED_statuses);
Charles David Young 16:b2e77eb76ab4 248 else
Charles David Young 16:b2e77eb76ab4 249 if (WheelCurrent < WheelPrevious)
Charles David Young 16:b2e77eb76ab4 250 LED_status_index = --LED_status_index % sizeof(LED_statuses);
Charles David Young 16:b2e77eb76ab4 251 WheelPrevious = WheelCurrent;
Charles David Young 16:b2e77eb76ab4 252 }
Charles David Young 16:b2e77eb76ab4 253
Charles David Young 16:b2e77eb76ab4 254 // detect when wheel button is pressed but wait until it is released
Charles David Young 16:b2e77eb76ab4 255 // before doing anything
Charles David Young 16:b2e77eb76ab4 256 bool QEPBbutton = QEPB.read();
Charles David Young 16:b2e77eb76ab4 257 if ( (QEPBbutton)
Charles David Young 16:b2e77eb76ab4 258 && (!QEPBpressed))
Charles David Young 16:b2e77eb76ab4 259 {
Charles David Young 16:b2e77eb76ab4 260 QEPBpressed = true;
Charles David Young 16:b2e77eb76ab4 261 }
Charles David Young 16:b2e77eb76ab4 262 else
Charles David Young 16:b2e77eb76ab4 263 if ( (!QEPBbutton)
Charles David Young 16:b2e77eb76ab4 264 && (QEPBpressed))
Charles David Young 16:b2e77eb76ab4 265 {
Charles David Young 16:b2e77eb76ab4 266 QEPBpressed = false;
Charles David Young 16:b2e77eb76ab4 267 WheelStateMachine(WHEEL_Pressed);
Charles David Young 16:b2e77eb76ab4 268 }
walter76 0:6d1742703713 269
Charles David Young 16:b2e77eb76ab4 270 logToPC();
Charles David Young 16:b2e77eb76ab4 271 return;
Charles David Young 16:b2e77eb76ab4 272 }
walter76 1:75827d765e34 273
Charles David Young 16:b2e77eb76ab4 274 void WheelStateMachine(WheelStateEvent event)
Charles David Young 16:b2e77eb76ab4 275 {
Charles David Young 16:b2e77eb76ab4 276 switch currentWheelState
Charles David Young 16:b2e77eb76ab4 277 {
Charles David Young 16:b2e77eb76ab4 278 WHEEL_INACTIVE:
Charles David Young 16:b2e77eb76ab4 279 if (WHEEL_Pressed == event)
Charles David Young 16:b2e77eb76ab4 280 currentWheelState = WHEEL_MODE_SELECT;
Charles David Young 16:b2e77eb76ab4 281 break;
Charles David Young 16:b2e77eb76ab4 282 WHEEL_MODE_SELECT:
Charles David Young 16:b2e77eb76ab4 283 if (WHEEL_Pressed == event)
Charles David Young 16:b2e77eb76ab4 284 currentWheelState = WHEEL_SUBMODE_SELECT;
Charles David Young 16:b2e77eb76ab4 285 else
Charles David Young 16:b2e77eb76ab4 286 if (WHEEL_Timeout == event)
Charles David Young 16:b2e77eb76ab4 287 currentWheelState = WHEEL_INACTIVE;
Charles David Young 16:b2e77eb76ab4 288 break;
Charles David Young 16:b2e77eb76ab4 289 WHEEL_SUBMODE_SELECT:
Charles David Young 16:b2e77eb76ab4 290 if (WHEEL_Pressed == event)
Charles David Young 16:b2e77eb76ab4 291 currentWheelState = WHEEL_MODE_SELECT;
Charles David Young 16:b2e77eb76ab4 292 else
Charles David Young 16:b2e77eb76ab4 293 if (WHEEL_Timeout == event)
Charles David Young 16:b2e77eb76ab4 294 currentWheelState = WHEEL_INACTIVE;
Charles David Young 16:b2e77eb76ab4 295 break;
Charles David Young 16:b2e77eb76ab4 296 default:
Charles David Young 16:b2e77eb76ab4 297 }
walter76 0:6d1742703713 298 }
walter76 0:6d1742703713 299
walter76 0:6d1742703713 300 //---------------------------------------------------------------------------
walter76 1:75827d765e34 301 // Increment CNT1 every time a rising edge is detected on TRIG1 (interrupt)
walter76 1:75827d765e34 302
walter76 1:75827d765e34 303 void Count1_up(void)
walter76 1:75827d765e34 304 {
walter76 1:75827d765e34 305 Count1++;
walter76 1:75827d765e34 306 return;
walter76 1:75827d765e34 307 }
walter76 1:75827d765e34 308
walter76 1:75827d765e34 309
walter76 1:75827d765e34 310 //---------------------------------------------------------------------------
walter76 1:75827d765e34 311 // Increment CNT1 every time a rising edge is detected on TRIG2 (interrupt)
walter76 1:75827d765e34 312
walter76 1:75827d765e34 313 void Count2_up(void)
walter76 1:75827d765e34 314 {
walter76 1:75827d765e34 315 Count2++;
walter76 1:75827d765e34 316 return;
walter76 1:75827d765e34 317 }
walter76 1:75827d765e34 318
walter76 1:75827d765e34 319
walter76 1:75827d765e34 320 //---------------------------------------------------------------------------
walter76 1:75827d765e34 321 //Generates a short beep via BUZZ
walter76 1:75827d765e34 322
walter76 1:75827d765e34 323 void Beep(void)
walter76 1:75827d765e34 324 {
walter76 1:75827d765e34 325 BUZZ = 1; // turn-on the buzzer
walter76 1:75827d765e34 326 wait(0.3); // wait
walter76 1:75827d765e34 327 BUZZ = 0; // turn-off the buzzer
walter76 0:6d1742703713 328 return;
walter76 0:6d1742703713 329 }
walter76 0:6d1742703713 330
walter76 0:6d1742703713 331
walter76 0:6d1742703713 332 //---------------------------------------------------------------------------
walter76 1:75827d765e34 333 //Write to 74HC595 (LEDs) - Take care to avoid conflict with MAX7219
walter76 1:75827d765e34 334
walter76 1:75827d765e34 335 void LEDs_write(unsigned short data_val)
walter76 1:75827d765e34 336 {
walter76 1:75827d765e34 337 // Update 74HC595 shift registers
walter76 1:75827d765e34 338 unsigned short mask;
walter76 1:75827d765e34 339
walter76 1:75827d765e34 340 SCK = 0;
walter76 1:75827d765e34 341 wait_us(DT);
walter76 1:75827d765e34 342 CS2 = 0;
walter76 1:75827d765e34 343
walter76 1:75827d765e34 344 for(mask = 0x80; mask!= 0; mask>>= 1)
walter76 1:75827d765e34 345 {
walter76 1:75827d765e34 346 wait_us(DT);
walter76 1:75827d765e34 347 SCK = 0;
walter76 1:75827d765e34 348 if(mask & data_val)
walter76 1:75827d765e34 349 MOSI = 0;
walter76 1:75827d765e34 350 else
walter76 1:75827d765e34 351 MOSI = 1;
walter76 1:75827d765e34 352 wait_us(DT);
walter76 1:75827d765e34 353 SCK = 1;
walter76 1:75827d765e34 354 }
walter76 1:75827d765e34 355
walter76 1:75827d765e34 356 SCK = 0;
walter76 1:75827d765e34 357 wait_us(DT);
walter76 1:75827d765e34 358 CS2 = 1;
walter76 1:75827d765e34 359
walter76 0:6d1742703713 360 return;
walter76 0:6d1742703713 361 }
walter76 0:6d1742703713 362
walter76 0:6d1742703713 363
walter76 1:75827d765e34 364 //---------------------------------------------------------------------------
walter76 1:75827d765e34 365 // Initialize the MAX7219
walter76 1:75827d765e34 366
walter76 1:75827d765e34 367 void Display_init(void)
walter76 1:75827d765e34 368 {
walter76 1:75827d765e34 369 uint8_t i;
walter76 1:75827d765e34 370 uint16_t mask;
walter76 1:75827d765e34 371 uint16_t data_to_send[6] = {SHUTDOWN, TURN_ON, DEC_MODE, BRIGHTNESS, SCAN_LIM, TEST};
walter76 1:75827d765e34 372 //{SHUTDOWN, TURN_ON, DEC_MODE, BRIGHTNESS, SCAN_LIM, TEST};
walter76 1:75827d765e34 373 for(i = 0; i <6; i++)
walter76 1:75827d765e34 374 {
walter76 1:75827d765e34 375 CS1 = 0;
walter76 1:75827d765e34 376
walter76 1:75827d765e34 377 for(mask = 0x8000; mask!= 0; mask>>= 1)
walter76 1:75827d765e34 378 {
walter76 1:75827d765e34 379 wait_us(DT);
walter76 1:75827d765e34 380 SCK = 0;
walter76 1:75827d765e34 381 if(mask & data_to_send[i])
walter76 1:75827d765e34 382 MOSI = 1;
walter76 1:75827d765e34 383 else
walter76 1:75827d765e34 384 MOSI = 0;
walter76 1:75827d765e34 385 wait_us(DT);
walter76 1:75827d765e34 386 SCK = 1;
walter76 1:75827d765e34 387 }
walter76 1:75827d765e34 388
walter76 1:75827d765e34 389 wait_us(DT);
walter76 1:75827d765e34 390 SCK = 0;
walter76 1:75827d765e34 391 wait_us(DT);
walter76 1:75827d765e34 392 CS1 = 1;
walter76 1:75827d765e34 393 }
walter76 1:75827d765e34 394
walter76 1:75827d765e34 395 return;
walter76 1:75827d765e34 396 }
walter76 1:75827d765e34 397
walter76 1:75827d765e34 398
walter76 1:75827d765e34 399 //---------------------------------------------------------------------------
walter76 1:75827d765e34 400 // Refresh the 6 digits of the main display
walter76 1:75827d765e34 401
walter76 1:75827d765e34 402 void Display_6D_write(uint8_t value)
walter76 1:75827d765e34 403 {
walter76 1:75827d765e34 404
walter76 1:75827d765e34 405 uint8_t digit;
walter76 1:75827d765e34 406 uint16_t mask, data_to_send;
walter76 1:75827d765e34 407 char TextString[6];
walter76 1:75827d765e34 408
walter76 1:75827d765e34 409 // int to string, then string to digits
walter76 1:75827d765e34 410
walter76 1:75827d765e34 411 sprintf(TextString, "%6d", value); // int to string
walter76 1:75827d765e34 412
walter76 1:75827d765e34 413 for(uint8_t i=0; i<6; i++)
walter76 1:75827d765e34 414 {
walter76 1:75827d765e34 415 if(TextString[i] == ' ') // blank empty digits
walter76 1:75827d765e34 416 Disp_Digit[i] = 0xFF;
walter76 1:75827d765e34 417 else
walter76 1:75827d765e34 418 Disp_Digit[i] = TextString[i]-'0';
walter76 1:75827d765e34 419 }
walter76 1:75827d765e34 420
walter76 1:75827d765e34 421 // write to chip
walter76 1:75827d765e34 422
walter76 1:75827d765e34 423 SCK = 0;
walter76 1:75827d765e34 424 wait_us(DT);
walter76 1:75827d765e34 425
walter76 1:75827d765e34 426 for(digit = 1; digit <7; digit++)
walter76 1:75827d765e34 427 {
walter76 1:75827d765e34 428 // each stream consists of digit address and data to show
Charles David Young 6:05201ecabb95 429 data_to_send = 7 - digit;
walter76 1:75827d765e34 430 data_to_send<<=8;
walter76 1:75827d765e34 431 data_to_send = data_to_send | Disp_Digit[digit-1];
walter76 1:75827d765e34 432
walter76 1:75827d765e34 433 CS1 = 0;
walter76 1:75827d765e34 434
walter76 1:75827d765e34 435 for(mask = 0x8000; mask!= 0; mask>>= 1)
walter76 1:75827d765e34 436 {
walter76 1:75827d765e34 437 wait_us(DT);
walter76 1:75827d765e34 438 SCK = 0;
walter76 1:75827d765e34 439 if(mask & data_to_send)
walter76 1:75827d765e34 440 MOSI = 1;
walter76 1:75827d765e34 441 else
walter76 1:75827d765e34 442 MOSI = 0;
walter76 1:75827d765e34 443
walter76 1:75827d765e34 444 wait_us(DT);
walter76 1:75827d765e34 445 SCK = 1;
walter76 1:75827d765e34 446 }
walter76 1:75827d765e34 447
walter76 1:75827d765e34 448 wait_us(DT);
walter76 1:75827d765e34 449 SCK = 0;
walter76 1:75827d765e34 450 wait_us(DT);
walter76 1:75827d765e34 451 CS1 = 1;
walter76 1:75827d765e34 452 }
walter76 1:75827d765e34 453
walter76 1:75827d765e34 454 return;
walter76 1:75827d765e34 455 }
walter76 1:75827d765e34 456
walter76 1:75827d765e34 457
walter76 1:75827d765e34 458 //---------------------------------------------------------------------------
walter76 1:75827d765e34 459 // Refresh the 2 digits of the gate display
walter76 1:75827d765e34 460
walter76 1:75827d765e34 461 void Display_2D_write(unsigned short value)
walter76 1:75827d765e34 462 {
walter76 1:75827d765e34 463
walter76 1:75827d765e34 464 uint8_t digit;
walter76 1:75827d765e34 465 uint16_t mask, data_to_send;
walter76 1:75827d765e34 466 char TextString[2];
walter76 1:75827d765e34 467
walter76 1:75827d765e34 468 // int to string, then string to digits
walter76 1:75827d765e34 469
walter76 1:75827d765e34 470 sprintf(TextString, "%2d", value); // int to string
walter76 1:75827d765e34 471
walter76 1:75827d765e34 472 if(TextString[0] == ' ') // blank empty digits
walter76 1:75827d765e34 473 Disp_Digit[7] = 0xFF;
walter76 1:75827d765e34 474 else
walter76 1:75827d765e34 475 Disp_Digit[7] = TextString[0] - '0';
walter76 1:75827d765e34 476
walter76 1:75827d765e34 477 Disp_Digit[6] = TextString[1] - '0';
walter76 1:75827d765e34 478
walter76 1:75827d765e34 479 // write to chip
walter76 1:75827d765e34 480
walter76 1:75827d765e34 481 SCK = 0;
walter76 1:75827d765e34 482 wait_us(DT);
walter76 1:75827d765e34 483
walter76 1:75827d765e34 484 for(digit = 7; digit <9; digit++)
walter76 1:75827d765e34 485 {
walter76 1:75827d765e34 486 // each stream consists of digit address and data to show
walter76 1:75827d765e34 487 data_to_send = digit;
walter76 1:75827d765e34 488 data_to_send<<=8;
walter76 1:75827d765e34 489 data_to_send = data_to_send | Disp_Digit[digit-1];
walter76 1:75827d765e34 490
walter76 1:75827d765e34 491 CS1 = 0;
walter76 1:75827d765e34 492
walter76 1:75827d765e34 493 for(mask = 0x8000; mask!= 0; mask>>= 1)
walter76 1:75827d765e34 494 {
walter76 1:75827d765e34 495 wait_us(DT);
walter76 1:75827d765e34 496 SCK = 0;
walter76 1:75827d765e34 497
walter76 1:75827d765e34 498 if(mask & data_to_send)
walter76 1:75827d765e34 499 MOSI = 1;
walter76 1:75827d765e34 500 else
walter76 1:75827d765e34 501 MOSI = 0;
walter76 1:75827d765e34 502
walter76 1:75827d765e34 503 wait_us(DT);
walter76 1:75827d765e34 504 SCK = 1;
walter76 1:75827d765e34 505 }
walter76 1:75827d765e34 506
walter76 1:75827d765e34 507 wait_us(DT);
walter76 1:75827d765e34 508 SCK = 0;
walter76 1:75827d765e34 509 wait_us(DT);
walter76 1:75827d765e34 510 CS1 = 1;
walter76 1:75827d765e34 511 }
walter76 1:75827d765e34 512
walter76 1:75827d765e34 513 return;
walter76 1:75827d765e34 514 }
walter76 1:75827d765e34 515
walter76 1:75827d765e34 516 //-------- END OF FILE --------------
walter76 1:75827d765e34 517 //==============================================================================
walter76 1:75827d765e34 518
walter76 1:75827d765e34 519
walter76 1:75827d765e34 520