static int32_t OneWire_Work(void) {
static uint8_t mystate = 0;
uint8_t scratch[9];
int32_t retval = 0;
if (mystate == 0) {
uint32_t save = VIC_DisableIRQ();
if (resetbus()) {
xferbyte(OW_SKIP_ROM); // All devices on the bus are addressed here
xferbyte(OW_CONVERT_T);
setpin1();
//retval = TICKS_MS(94); // For 9-bit resolution
retval = TICKS_MS(100); // TC interface needs max 100ms to be ready
mystate++;
}
VIC_RestoreIRQ( save );
} else if (mystate == 1) {
for (int i = 0; i < numowdevices; i++) {
uint32_t save = VIC_DisableIRQ();
selectdevbyidx(i);
xferbyte(OW_READ_SCRATCHPAD);
for (uint32_t iter = 0; iter < 4; iter++) { // Read four bytes
scratch[iter] = xferbyte(0xff);
}
VIC_RestoreIRQ(save);
int16_t tmp = scratch[1]<<8 | scratch[0];
devreadout[i] = tmp;
tmp = scratch[3]<<8 | scratch[2];
extrareadout[i] = tmp;
}
mystate = 0;
} else {
retval = -1;
}
return retval;
}
int main(void) {
char buf[22];
int len;
PLLCFG = (1<<5) | (4<<0); //PLL MSEL=0x4 (+1), PSEL=0x1 (/2) so 11.0592*5 = 55.296MHz, Fcco = (2x55.296)*2 = 221MHz which is within 156 to 320MHz
PLLCON = 0x01;
PLLFEED = 0xaa;
PLLFEED = 0x55; // Feed complete
while(!(PLLSTAT & (1<<10))); // Wait for PLL to lock
PLLCON = 0x03;
PLLFEED = 0xaa;
PLLFEED = 0x55; // Feed complete
VPBDIV = 0x01; // APB runs at the same frequency as the CPU (55.296MHz)
MAMTIM = 0x03; // 3 cycles flash access recommended >40MHz
MAMCR = 0x02; // Fully enable memory accelerator
Sched_Init();
IO_Init();
Set_Heater(0);
Set_Fan(0);
Serial_Init();
I2C_Init();
EEPROM_Init();
NV_Init();
if( NV_GetConfig(REFLOW_BEEP_DONE_LEN) == 255 ) {
NV_SetConfig(REFLOW_BEEP_DONE_LEN, 10); // Default 1 second beep length
}
printf("\nInitializing improved reflow oven...");
LCD_Init();
LCD_BMPDisplay(logobmp,0,0);
// Setup watchdog
WDTC = PCLKFREQ / 3; // Some margin (PCLKFREQ/4 would be exactly the period the WD is fed by sleep_work)
WDMOD = 0x03; // Enable
WDFEED = 0xaa;
WDFEED = 0x55;
uint8_t resetreason = RSIR;
RSIR = 0x0f; // Clear it out
printf("\nReset reason(s): %s%s%s%s", (resetreason&(1<<0))?"[POR]":"", (resetreason&(1<<1))?"[EXTR]":"",
(resetreason&(1<<2))?"[WDTR]":"", (resetreason&(1<<3))?"[BODR]":"");
// Request part number
command[0] = IAP_READ_PART;
iap_entry(command, result);
const char* partstrptr = NULL;
for(int i=0; i<NUM_PARTS; i++) {
if(result[1] == partmap[i].id) {
partstrptr = partmap[i].name;
break;
}
}
// Read part revision
partrev=*(uint8_t*)PART_REV_ADDR;
if(partrev==0 || partrev > 0x1a) {
partrev = '-';
} else {
partrev += 'A' - 1;
}
len = snprintf(buf,sizeof(buf),"%s rev %c",partstrptr,partrev);
LCD_disp_str((uint8_t*)buf, len, 0, 64-6, FONT6X6);
printf("\nRunning on an %s", buf);
LCD_FB_Update();
Keypad_Init();
Buzzer_Init();
ADC_Init();
RTC_Init();
OneWire_Init();
Reflow_Init();
Sched_SetWorkfunc( MAIN_WORK, Main_Work );
Sched_SetState( MAIN_WORK, 1, TICKS_SECS( 2 ) ); // Enable in 2 seconds
Buzzer_Beep( BUZZ_1KHZ, 255, TICKS_MS(100) );
while(1) {
int32_t sleeptime;
sleeptime=Sched_Do( 0 ); // No fast-forward support
//printf("\n%d ticks 'til next activity"),sleeptime);
}
return 0;
}
static int32_t Main_Work( void ) {
static uint32_t mode=0;
static uint32_t setpoint=30;
static uint8_t curidx=0;
int32_t retval=TICKS_MS(500);
char buf[22];
int len;
uint32_t keyspressed=Keypad_Get();
// Sort out this "state machine"
if(mode==5) { // Run reflow
uint32_t ticks=RTC_Read();
//len = snprintf(buf,sizeof(buf),"seconds:%d",ticks);
//LCD_disp_str((uint8_t*)buf, len, 13, 0, FONT6X6);
len = snprintf(buf,sizeof(buf),"%03u",Reflow_GetSetpoint());
LCD_disp_str((uint8_t*)"SET", 3, 110, 7, FONT6X6);
LCD_disp_str((uint8_t*)buf, len, 110, 13, FONT6X6);
len = snprintf(buf,sizeof(buf),"%03u",Reflow_GetActualTemp());
LCD_disp_str((uint8_t*)"ACT", 3, 110, 20, FONT6X6);
LCD_disp_str((uint8_t*)buf, len, 110, 26, FONT6X6);
len = snprintf(buf,sizeof(buf),"%03u",ticks);
LCD_disp_str((uint8_t*)"RUN", 3, 110, 33, FONT6X6);
LCD_disp_str((uint8_t*)buf, len, 110, 39, FONT6X6);
if(Reflow_IsDone() || keyspressed & KEY_S) { // Abort reflow
if( Reflow_IsDone() ) Buzzer_Beep( BUZZ_1KHZ, 255, TICKS_MS(100) * NV_GetConfig(REFLOW_BEEP_DONE_LEN) );
mode=0;
Reflow_SetMode(REFLOW_STANDBY);
retval = 0; // Force immediate refresh
}
} else if(mode==4) { // Select profile
int curprofile = Reflow_GetProfileIdx();
LCD_FB_Clear();
if(keyspressed & KEY_F1) { // Prev profile
curprofile--;
}
if(keyspressed & KEY_F2) { // Next profile
curprofile++;
}
Reflow_SelectProfileIdx(curprofile);
Reflow_PlotProfile(-1);
LCD_BMPDisplay(selectbmp,127-17,0);
len = snprintf(buf,sizeof(buf),"%s",Reflow_GetProfileName());
LCD_disp_str((uint8_t*)buf, len, 13, 0, FONT6X6);
if(keyspressed & KEY_S) { // Select current profile
mode=0;
retval = 0; // Force immediate refresh
}
} else if(mode==3) { // Bake
LCD_FB_Clear();
LCD_disp_str((uint8_t*)"MANUAL/BAKE MODE", 16, 0, 0, FONT6X6);
int keyrepeataccel = keyspressed >> 17; // Divide the value by 2
if( keyrepeataccel < 1) keyrepeataccel = 1;
if( keyrepeataccel > 30) keyrepeataccel = 30;
if(keyspressed & KEY_F1) { // Setpoint-
setpoint -= keyrepeataccel;
if(setpoint<30) setpoint = 30;
}
if(keyspressed & KEY_F2) { // Setpoint+
setpoint += keyrepeataccel;
if(setpoint>300) setpoint = 300;
}
len = snprintf(buf,sizeof(buf),"- SETPOINT %uC +",setpoint);
LCD_disp_str((uint8_t*)buf, len, 64-(len*3), 10, FONT6X6);
LCD_disp_str((uint8_t*)"F1", 2, 0, 10, FONT6X6 | INVERT);
LCD_disp_str((uint8_t*)"F2", 2, 127-12, 10, FONT6X6 | INVERT);
len = snprintf(buf,sizeof(buf),"ACTUAL %.1fC",Reflow_GetTempSensor(TC_AVERAGE));
LCD_disp_str((uint8_t*)buf, len, 64-(len*3), 18, FONT6X6);
len = snprintf(buf,sizeof(buf),"L %.1fC",Reflow_GetTempSensor(TC_LEFT));
LCD_disp_str((uint8_t*)buf, len, 32-(len*3), 26, FONT6X6);
len = snprintf(buf,sizeof(buf),"R %.1fC",Reflow_GetTempSensor(TC_RIGHT));
LCD_disp_str((uint8_t*)buf, len, 96-(len*3), 26, FONT6X6);
if( Reflow_IsTempSensorValid(TC_EXTRA1) ) {
len = snprintf(buf,sizeof(buf),"X1 %.1fC",Reflow_GetTempSensor(TC_EXTRA1));
LCD_disp_str((uint8_t*)buf, len, 32-(len*3), 34, FONT6X6);
}
if( Reflow_IsTempSensorValid(TC_EXTRA2) ) {
len = snprintf(buf,sizeof(buf),"X2 %.1fC",Reflow_GetTempSensor(TC_EXTRA2));
LCD_disp_str((uint8_t*)buf, len, 96-(len*3), 34, FONT6X6);
}
if( Reflow_IsTempSensorValid(TC_COLD_JUNCTION) ) {
len = snprintf(buf,sizeof(buf),"COLD-JUNCTION %.1fC",Reflow_GetTempSensor(TC_COLD_JUNCTION));
} else {
len = snprintf(buf,sizeof(buf),"NO COLD-JUNCTION TS!");
}
LCD_disp_str((uint8_t*)buf, len, 64-(len*3), 42, FONT6X6);
LCD_BMPDisplay(stopbmp,127-17,0);
// len = snprintf(buf,sizeof(buf),"heat=0x%02x fan=0x%02x",heat,fan);
// LCD_disp_str((uint8_t*)buf, len, 0, 63-5, FONT6X6);
// Add timer for bake at some point
Reflow_SetSetpoint(setpoint);
if(keyspressed & KEY_S) { // Abort bake
mode=0;
Reflow_SetMode(REFLOW_STANDBY);
retval = 0; // Force immediate refresh
}
} else if(mode==2 || mode==1) { // Edit ee1 or 2