/***********************************************************************
Truth Table Generating function
It takes the type of Family Type and number of inputs as input
***********************************************************************/
void LogicProcessor::ShowTruthTable(LogicType aLogicType, int aNumInputs){
Logic* pLogic = CreateLogic(aLogicType, aNumInputs);
bool** inputTable = GenerateInputTable(aNumInputs);
int rowSize = int(pow(2, aNumInputs));
int i=0;
//For each combination of input
for (;i<rowSize;i++) {
//Display all input in this combination
for (int j=0; j<aNumInputs; j++) {
DisplayValue(inputTable[i][j]);
}
//Process these inputs for this Logic
bool output = pLogic->Process(inputTable[i]);
cout<<"--> ";
//Display output
DisplayValue(output);
cout<<endl;
}
delete pLogic;
//Destruct the Input Table
for (i=0;i<rowSize;i++){
delete []inputTable[i];
}
}
LRESULT C_SpinButton::OnTextChange(WORD wNotifyCode, WORD wID, HWND hWndCtl, BOOL& bHandled)
{
C_STLException::install();
try {
TCHAR t[32];
m_ed.SendMessage(WM_GETTEXT, 1023, reinterpret_cast<LPARAM>(t));
String s(t);
StringPtr ptr = s.Find(_T('-'));
if (ptr.isValid()) {
if (ptr.Index() > 0) {
s = s.Left(ptr.Index());
m_ed.SendMessage(WM_SETTEXT, s.GetLength(), reinterpret_cast<LPARAM>(s.toLPCTSTR()));
m_ed.SendMessage(EM_SETSEL, s.GetLength(), s.GetLength());
return S_OK;
}
}
float f = static_cast<float>(s.toDouble());
if (m_fValue != f) {
if (m_fMinValue == m_fMaxValue || (f >= m_fMinValue && f <= m_fMaxValue)) {
InternalSetValue(f);
FireChangeMessage();
}
else {
MessageBeep(0xFFFFFFFF);
DisplayValue();
return S_OK;
}
}
if (0 == s.GetLength()) {
DisplayValue();
}
}
catch (C_STLNonStackException const &exception) {
exception.Log(_T("Exception in C_SpinButton::"));
}
return S_OK;
}
void Show_Special(void)
{
/*
* Mapping for Semi structure:
* A - Gate pin
* B - Anode/MT2 pin
* C - Cathode/MT1 pin
* U_1 - V_GT (mV)
*/
/* display component type any pinout */
if (Check.Found == COMP_THYRISTOR) /* SCR */
{
LCD_EEString(Thyristor_str); /* display: thyristor */
LCD_NextLine(); /* move to line #2 */
Show_SemiPinout('G', 'A', 'C'); /* display pinout */
}
else /* Triac */
{
LCD_EEString(Triac_str); /* display: triac */
LCD_NextLine(); /* move to line #2 */
Show_SemiPinout('G', '2', '1'); /* display pinout */
}
/* show V_GT (gate trigger voltage) */
if (Semi.U_1 > 0) /* show if not zero */
{
LCD_NextLine_EEString_Space(V_GT_str); /* display: V_GT */
DisplayValue(Semi.U_1, -3, 'V'); /* display V_GT in mV */
}
}
void mVAusgabe(uint8_t nn) {
if (nn < 3) {
// Output in mV units
DisplayValue(diodes.Voltage[nn],-3,'V',3);
lcd_space();
}
}
void Show_Capacitor(void)
{
Capacitor_Type *MaxCap; /* pointer to largest cap */
Capacitor_Type *Cap; /* pointer to cap */
#ifdef SW_ESR
uint16_t ESR; /* ESR (in 0.01 Ohms) */
#endif
uint8_t Counter; /* loop counter */
/* find largest cap */
MaxCap = &Caps[0]; /* pointer to first cap */
Cap = MaxCap;
for (Counter = 1; Counter <= 2; Counter++)
{
Cap++; /* next cap */
if (CmpValue(Cap->Value, Cap->Scale, MaxCap->Value, MaxCap->Scale) == 1)
{
MaxCap = Cap;
}
}
/* display pinout */
LCD_ProbeNumber(MaxCap->A); /* display pin #1 */
LCD_EEString(Cap_str); /* display capacitor symbol */
LCD_ProbeNumber(MaxCap->B); /* display pin #2 */
/* show capacitance */
LCD_NextLine(); /* move to next line */
DisplayValue(MaxCap->Value, MaxCap->Scale, 'F');
#ifdef SW_ESR
/* show ESR */
ESR = MeasureESR(MaxCap); /* measure ESR */
if (ESR > 0) /* if successfull */
{
// LCD_NextLine_EEString_Space(ESR_str); /* display: ESR */
LCD_Space();
DisplayValue(ESR, -2, LCD_CHAR_OMEGA); /* display ESR */
}
#endif
}
LRESULT C_SpinButton::OnNegative(UINT uMsg, WPARAM wParam, LPARAM lParam, BOOL& bHandled)
{
try {
unsigned int len = SendMessage(m_hWnd, WM_GETTEXTLENGTH, 0, 0);
DWORD dwStart;
DWORD dwEnd;
SendMessage(m_ed.m_hWnd, EM_GETSEL, reinterpret_cast<WPARAM>(&dwStart), reinterpret_cast<WPARAM>(&dwEnd));
if (0 == dwStart && 0 == dwEnd && m_fValue > 0) {
float value = -m_fValue;
if (m_fMinValue == m_fMaxValue) {
InternalSetValue(value);
}
else if (value <= m_fMaxValue && value >= m_fMinValue) {
InternalSetValue(value);
}
else {
return S_OK;
}
}
else if (m_fMinValue == m_fMaxValue) {
InternalSetValue(-1);
}
else if (-1 <= m_fMaxValue && -1 >= m_fMinValue) {
InternalSetValue(-1);
}
else {
MessageBeep(0xFFFFFFFF);
return S_OK;
}
DisplayValue();
TCHAR t[1024];
SendMessage(m_ed.m_hWnd, WM_GETTEXT, 1023, reinterpret_cast<long>(t));
String s(t);
SendMessage(m_ed.m_hWnd, EM_SETSEL, 1, s.GetLength());
FireChangeMessage();
}
catch (C_STLNonStackException const &exception) {
exception.Log(_T("Exception in C_SpinButton::OnNegative"));
}
return S_OK;
}
void Show_Diode_Cap(Diode_Type *Diode)
{
/* sanity check */
if (Diode == NULL) return;
/* get capacitance (opposite of flow direction) */
MeasureCap(Diode->C, Diode->A, 0);
/* and show capacitance */
DisplayValue(Caps[0].Value, Caps[0].Scale, 'F');
}
/* ****************************************************************** */
void show_C_ESR() {
uint8_t key_pressed;
message_key_released(C_ESR_str);
#ifdef POWER_OFF
uint8_t times;
for (times=0;times<250;times++)
#else
while (1) /* wait endless without the POWER_OFF option */
#endif
{
PartFound = PART_NONE;
ReadBigCap(TP3,TP1);
if (PartFound == PART_CAPACITOR) {
lcd_line1(); // clear old capacity value
lcd_clear_line();
lcd_line1();
lcd_data('C');
lcd_data('=');
DisplayValue(cap.cval_max,cap.cpre_max,'F',3);
cap.esr = GetESR(cap.cb,cap.ca);
lcd_line2(); // clear old ESR value
lcd_clear_line();
lcd_line2();
lcd_MEM_string(&ESR_str[1]);
if (cap.esr < 65530) {
DisplayValue(cap.esr,-2,LCD_CHAR_OMEGA,2);
} else {
lcd_data('?'); // too big
}
} else {
lcd_clear();
lcd_MEM2_string(C_ESR_str);
}
key_pressed = wait_for_key_ms(1000);
#ifdef WITH_ROTARY_SWITCH
if ((key_pressed != 0) || (rotary.incre > 3)) break;
#else
if (key_pressed != 0) break;
#endif
} /* end for times */
} /* end show_C_ESR() */
void ShowAdjust(void)
{
LCD_NextLine_Mode(MODE_KEY); /* set next line mode */
/* display RiL and RiH */
LCD_Clear();
LCD_EEString_Space(RiLow_str); /* display: Ri- */
DisplayValue(NV.RiL, -1, LCD_CHAR_OMEGA);
LCD_NextLine_EEString_Space(RiHigh_str); /* display: Ri+ */
DisplayValue(NV.RiH, -1, LCD_CHAR_OMEGA);
/* display C-Zero */
LCD_NextLine_EEString_Space(CapOffset_str); /* display: C0 */
DisplayValue(NV.CapZero, -12, 'F'); /* display C0 offset */
/* display R-Zero */
LCD_NextLine_EEString_Space(ROffset_str); /* display: R0 */
DisplayValue(NV.RZero, -2, LCD_CHAR_OMEGA); /* display R0 */
/* display internal bandgap reference */
LCD_NextLine_EEString_Space(URef_str); /* display: Vref */
DisplayValue(Config.Bandgap, -3, 'V'); /* display bandgap ref */
/* display Vcc */
LCD_NextLine_EEString_Space(Vcc_str); /* display: Vcc */
DisplayValue(Config.Vcc, -3, 'V'); /* display Vcc */
/* display offset of analog comparator */
LCD_NextLine_EEString_Space(CompOffset_str); /* display: AComp */
DisplaySignedValue(NV.CompOffset, -3, 'V');
WaitKey(); /* let the user read */
}
void Show_Error()
{
if (Check.Type == TYPE_DISCHARGE) /* discharge failed */
{
LCD_EEString(DischargeFailed_str); /* display: Battery? */
/* display probe number and remaining voltage */
LCD_NextLine();
LCD_ProbeNumber(Check.Probe);
LCD_Char(':');
LCD_Space();
DisplayValue(Check.U, -3, 'V');
}
}
void Show_SingleResistor(uint8_t ID1, uint8_t ID2)
{
Resistor_Type *Resistor; /* pointer to resistor */
Resistor = &Resistors[0]; /* pointer to first resistor */
/* show pinout */
LCD_Char(ID1);
LCD_EEString(Resistor_str);
LCD_Char(ID2);
/* show resistance value */
LCD_Space();
DisplayValue(Resistor->Value, Resistor->Scale, LCD_CHAR_OMEGA);
}
void set_contrast(void) {
uint8_t key_pressed;
uint8_t contrast;
// set the contrast value
message_key_released(CONTRAST_str); // display Contrast and wait for key released
contrast = eeprom_read_byte(&EE_Volume_Value);
#ifdef POWER_OFF
uint8_t times;
for (times=0;times<240;times++)
#else
while (1) /* wait endless without option POWER_OFF */
#endif
{
lcd_command(CMD_SET_VOLUME_FIRST); // 0x81 set volume command
lcd_command(contrast); // value from 1 to 63 (0x3f) */
lcd_line2();
lcd_clear_line();
lcd_line2();
DisplayValue(contrast,0,' ',4);
key_pressed = wait_for_key_ms(1600);
#ifdef POWER_OFF
#ifdef WITH_ROTARY_SWITCH
if ((key_pressed != 0) || (rotary.incre > 0)) times = 0; // reset counter, operator is active
#else
if (key_pressed != 0) times = 0; // reset counter, operator is active
#endif
#endif
if(key_pressed >= 130) break; // more than 1.3 seconds
#ifdef WITH_ROTARY_SWITCH
if (rotary.incre > FAST_ROTATION) break; // fast rotation ends setting of contrast
if (rotary.count >= 0) {
contrast += rotary.count; // increase the contrast by rotary.count
} else {
contrast += (MAX_CONTRAST + 1 + rotary.count); // decrease the contrast by rotary.count
}
#endif
if (key_pressed > 0) {
if (key_pressed > 40) {
contrast++; // longer key press select higher contrast value
} else {
contrast += MAX_CONTRAST; // decrease the contrast
}
}
contrast &= MAX_CONTRAST;
} /* end for times */
eeprom_write_byte((uint8_t *)(&EE_Volume_Value), (int8_t)contrast); // save contrast value
}
void C_SpinButton::SetValue(float f)
{
C_STLException::install();
try {
m_bIsLoaded = FALSE;
InternalSetValue(f);
DisplayValue();
m_ed.EnableWindow(TRUE);
m_bIsLoaded = TRUE;
}
catch (C_STLNonStackException const &exception) {
exception.Log(_T("Exception in C_SpinButton::"));
}
}
LRESULT C_SpinButton::OnDec(WORD wNotifyCode, WORD wID, HWND hWndCtl, BOOL& bHandled)
{
C_STLException::install();
try {
if (m_fMinValue == m_fMaxValue || m_fValue > m_fMinValue) {
m_fValue -= m_fIncrement;
DisplayValue();
FireChangeMessage();
}
}
catch (C_STLNonStackException const &exception) {
exception.Log(_T("Exception in C_SpinButton::OnDec"));
}
// TODO: Disbale button on min
return S_OK;
}
void Show_FET_Extras(void)
{
/* show instrinsic/freewheeling diode */
if (Check.Diodes > 0) /* diode found */
{
Show_FlybackDiode(); /* show diode */
}
/* skip remaining stuff for depletion-mode FETs/IGBTs */
if (Check.Type & TYPE_DEPLETION) return;
/* gate threshold voltage */
if (Semi.U_2 != 0)
{
LCD_NextLine_EEString_Space(Vth_str); /* display: Vth */
DisplaySignedValue(Semi.U_2, -3, 'V'); /* display V_th in mV */
}
/* display gate-source capacitance */
LCD_NextLine_EEString_Space(GateCap_str); /* display: Cgs */
MeasureCap(Semi.A, Semi.C, 0); /* measure capacitance */
/* display value and unit */
DisplayValue(Caps[0].Value, Caps[0].Scale, 'F');
}
/* *************************************************** */
void switch_frequency(uint8_t freq_num) {
if (freq_num > MAX_FREQ_NR) freq_num -= (MAX_FREQ_NR + 1);
if (freq_num == 19) {
// 2 MHz
#undef F_TIM1
#define F_TIM1 (F_CPU)
#define DIVIDER ((F_TIM1+2000000) / (2*2000000UL))
TCCR1B = (0<<WGM13) | (1<<WGM12) | (0<<CS12) | (0<<CS11) | (1<<CS10); // no clock divide
OCR1A = DIVIDER - 1;
DisplayValue((((unsigned long long)F_TIM1 * 500UL) + (DIVIDER / 2)) / DIVIDER,-3,'H',7);
}
// 1333.333kHz
if (freq_num == 18) {
// 1 MHz
#undef F_TIM1
#define F_TIM1 (F_CPU)
#undef DIVIDER
#define DIVIDER ((F_TIM1+1000000) / (2*1000000UL))
TCCR1B = (0<<WGM13) | (1<<WGM12) | (0<<CS12) | (0<<CS11) | (1<<CS10); // no clock divide
OCR1A = DIVIDER - 1;
DisplayValue((((unsigned long long)F_TIM1 * 500UL) + (DIVIDER / 2)) / DIVIDER,-3,'H',7);
}
// 800kHz, 666.666kHz
if (freq_num == 17) {
// 500 kHz
#undef F_TIM1
#define F_TIM1 (F_CPU)
#undef DIVIDER
#define DIVIDER ((F_TIM1+500000) / (2*500000UL))
TCCR1B = (0<<WGM13) | (1<<WGM12) | (0<<CS12) | (0<<CS11) | (1<<CS10); // no clock divide
OCR1A = DIVIDER - 1;
DisplayValue((((unsigned long long)F_TIM1 * 500UL) + (DIVIDER / 2)) / DIVIDER,-3,'H',7);
}
// 444.444kHz, 400kHz, 362.636kHz, 333.333kHz, 307.692kHz 285.714kHz
if (freq_num == 16) {
// 250 kHz
#undef F_TIM1
#define F_TIM1 (F_CPU)
#undef DIVIDER
#define DIVIDER ((F_TIM1+250000) / (2*250000UL))
TCCR1B = (0<<WGM13) | (1<<WGM12) | (0<<CS12) | (0<<CS11) | (1<<CS10); // no clock divide
OCR1A = DIVIDER - 1;
DisplayValue((((unsigned long long)F_TIM1 * 500UL) + (DIVIDER / 2)) / DIVIDER,-3,'H',7);
}
// 235.294kHz, 222.222kHz, 210.526kHz, 200kHz, 190.476kHz, 181.818kHz, 173.913kHz, 166.666kHz
// 160kHz, 153.846kHz, 148.148kHz, 142.857kHz, 137.931kHz, 133.333kHz, 129.032kHz, 125kHz,
// (33) 121.212kHz, 117.647kHz, 114.285kHz, 111.111kHz, 108.108kHz, 105.263kHz , 102.564kHz
if (freq_num == 15) {
// 153.6 kHz (Baud rate clock for 9600 baud)
#undef F_TIM1
#define F_TIM1 (F_CPU)
#undef DIVIDER
#define DIVIDER ((F_TIM1+153600) / (2*153600UL))
TCCR1B = (0<<WGM13) | (1<<WGM12) | (0<<CS12) | (0<<CS11) | (1<<CS10); // no clock divide
OCR1A = DIVIDER - 1;
DisplayValue((((unsigned long long)F_TIM1 * 500UL) + (DIVIDER / 2)) / DIVIDER,-3,'H',7);
}
if (freq_num == 14) {
// 100 kHz
#undef DIVIDER
#define DIVIDER ((F_TIM1+100000) / (2*100000UL))
TCCR1B = (0<<WGM13) | (1<<WGM12) | (0<<CS12) | (0<<CS11) | (1<<CS10); // no clock divide
OCR1A = DIVIDER - 1;
DisplayValue((((unsigned long long)F_TIM1 * 500UL) + (DIVIDER / 2)) / DIVIDER,-3,'H',7);
}
if (freq_num == 13) {
// 50 kHz
#undef DIVIDER
#define DIVIDER ((F_TIM1+50000) / (2*50000UL))
TCCR1B = (0<<WGM13) | (1<<WGM12) | (0<<CS12) | (0<<CS11) | (1<<CS10); // no clock divide
OCR1A = DIVIDER - 1;
DisplayValue((((unsigned long long)F_TIM1 * 5000UL) + (DIVIDER / 2)) / DIVIDER,-4,'H',7);
}
if (freq_num == 12) {
// 25 kHz
#undef DIVIDER
#define DIVIDER ((F_TIM1+25000) / (2*25000UL))
TCCR1B = (0<<WGM13) | (1<<WGM12) | (0<<CS12) | (0<<CS11) | (1<<CS10); // no clock divide
OCR1A = DIVIDER - 1;
DisplayValue((((unsigned long long)F_TIM1 * 5000UL) + (DIVIDER / 2)) / DIVIDER,-4,'H',7);
}
if (freq_num == 11) {
// 10 kHz
#undef DIVIDER
#define DIVIDER ((F_TIM1+10000) / (2*10000UL))
TCCR1B = (0<<WGM13) | (1<<WGM12) | (0<<CS12) | (0<<CS11) | (1<<CS10); // no clock divide
OCR1A = DIVIDER - 1;
DisplayValue((((unsigned long long)F_TIM1 * 5000UL) + (DIVIDER / 2)) / DIVIDER,-4,'H',7);
}
if (freq_num == 10) {
// 5 kHz
#undef DIVIDER
#define DIVIDER ((F_TIM1+5000) / (2*5000UL))
TCCR1B = (0<<WGM13) | (1<<WGM12) | (0<<CS12) | (0<<CS11) | (1<<CS10); // no clock divide
OCR1A = DIVIDER - 1;
DisplayValue((((unsigned long long)F_TIM1 * 50000UL) + (DIVIDER / 2)) / DIVIDER,-5,'H',7);
}
if (freq_num == 9) {
// 2500 Hz
#undef DIVIDER
#define DIVIDER ((F_TIM1+2500) / (2*2500UL))
TCCR1B = (0<<WGM13) | (1<<WGM12) | (0<<CS12) | (0<<CS11) | (1<<CS10); // no clock divide
OCR1A = DIVIDER - 1;
DisplayValue((((unsigned long long)F_TIM1 * 50000UL) + (DIVIDER / 2)) / DIVIDER,-5,'H',7);
}
if (freq_num == 8) {
// 1000 Hz
#undef DIVIDER
#define DIVIDER ((F_TIM1+1000) / (2*1000UL))
TCCR1B = (0<<WGM13) | (1<<WGM12) | (0<<CS12) | (0<<CS11) | (1<<CS10); // no clock divide
OCR1A = DIVIDER - 1;
DisplayValue((((unsigned long long)F_TIM1 * 50000UL) + (DIVIDER / 2)) / DIVIDER,-5,'H',7);
}
if (freq_num == 7) {
// 443 Hz
#undef DIVIDER
#define DIVIDER ((F_TIM1+443) / (2*443UL))
TCCR1B = (0<<WGM13) | (1<<WGM12) | (0<<CS12) | (0<<CS11) | (1<<CS10); // no clock divide
OCR1A = (DIVIDER - 1);
DisplayValue((((unsigned long long)F_TIM1 * 50000UL) + (DIVIDER / 2)) / DIVIDER,-5,'H',7);
}
if (freq_num == 6) {
// 442 Hz
#undef DIVIDER
#define DIVIDER ((F_TIM1+442) / (2*442UL))
TCCR1B = (0<<WGM13) | (1<<WGM12) | (0<<CS12) | (0<<CS11) | (1<<CS10); // no clock divide
OCR1A = DIVIDER - 1;
DisplayValue((((unsigned long long)F_TIM1 * 50000UL) + (DIVIDER / 2)) / DIVIDER,-5,'H',7);
}
if (freq_num == 5) {
// 440 Hz
#undef DIVIDER
#define DIVIDER ((F_TIM1+440) / (2*440UL))
TCCR1B = (0<<WGM13) | (1<<WGM12) | (0<<CS12) | (0<<CS11) | (1<<CS10); // no clock divide
OCR1A = DIVIDER - 1;
DisplayValue((((unsigned long long)F_TIM1 * 50000UL) + (DIVIDER / 2)) / DIVIDER,-5,'H',7);
}
if (freq_num == 4) {
// 250 Hz
#undef F_TIM1
#define F_TIM1 (F_CPU)
#undef DIVIDER
#define DIVIDER ((F_TIM1+250) / (2*250UL))
TCCR1B = (0<<WGM13) | (1<<WGM12) | (0<<CS12) | (0<<CS11) | (1<<CS10); // no clock divide
OCR1A = DIVIDER - 1;
DisplayValue((((unsigned long long)F_TIM1 * 50000UL) + (DIVIDER / 2)) / DIVIDER,-5,'H',7);
}
// please use clock divider to build frequencies lower than 250 Hz (DIVIDER=64000 with 16MHz clock)
if (freq_num == 3) {
// 100 Hz
#undef F_TIM1
#define F_TIM1 (F_CPU/64)
#undef DIVIDER
#define DIVIDER ((F_TIM1+100) / (2*100UL))
TCCR1B = (0<<WGM13) | (1<<WGM12) | (0<<CS12) | (1<<CS11) | (1<<CS10); // divide clock by 64
OCR1A = DIVIDER - 1;
DisplayValue((((unsigned long long)F_TIM1 * 500000UL) + (DIVIDER / 2)) / DIVIDER,-6,'H',7);
}
if (freq_num == 2) {
// 50 Hz
#undef DIVIDER
#define DIVIDER ((F_TIM1+50) / (2*50UL))
// TCCR1B = (0<<WGM13) | (1<<WGM12) | (0<<CS12) | (1<<CS11) | (1<<CS10); // divide clock by 64
OCR1A = DIVIDER - 1;
DisplayValue((((unsigned long long)F_TIM1 * 500000UL) + (DIVIDER / 2)) / DIVIDER,-6,'H',7);
}
if (freq_num == 1) {
// 10 Hz
#undef F_TIM1
#define F_TIM1 (F_CPU/64)
#undef DIVIDER
#define DIVIDER ((F_TIM1+10) / (2*10UL))
TCCR1B = (0<<WGM13) | (1<<WGM12) | (0<<CS12) | (1<<CS11) | (1<<CS10); // divide clock by 64
OCR1A = DIVIDER - 1;
DisplayValue((((unsigned long long)F_TIM1 * 500000UL) + (DIVIDER / 2)) / DIVIDER,-6,'H',7);
}
if (freq_num == 0) {
// 1 Hz
#undef F_TIM1
#define F_TIM1 (F_CPU/256)
#undef DIVIDER
#define DIVIDER (F_TIM1 / (2*1UL))
TCCR1B = (0<<WGM13) | (1<<WGM12) | (1<<CS12) | (0<<CS11) | (0<<CS10); // divide clock by 256
OCR1A = DIVIDER - 1;
DisplayValue((((unsigned long long)F_TIM1 * 500000UL) + (DIVIDER / 2)) / DIVIDER,-6,'H',7);
}
lcd_data('z'); // append the z to get Hz unit
} /* end switch_frequency */
/* *************************************************** */
void show_vext() {
#ifdef WITH_VEXT
uint8_t key_pressed;
uint8_t key_long_pressed;
unsigned int Vext;
// show the external voltage
message_key_released(VOLTAGE_str);
key_long_pressed = 0;
#ifdef POWER_OFF
uint8_t times;
for (times=0;times<240;times++)
#else
while (1) /* wait endless without option POWER_OFF */
#endif
{
#ifdef TPex2
lcd_line1(); // 2 Vext measurements
lcd_clear_line();
lcd_line1();
#else
lcd_line2(); // only one measurement use line 2
lcd_clear_line();
lcd_line2();
#endif /* TPex2 */
#ifdef WITH_UART
uart_newline(); // start of new measurement
uart_newline(); // start of new measurement
#endif
lcd_MEM_string(Vext_str); // Vext=
Vext = W5msReadADC(TPext); // read external voltage
// ADC_DDR = TXD_MSK; //activate Software-UART
#if EXT_NUMERATOR <= (0xffff/U_VCC)
DisplayValue(Vext*EXT_NUMERATOR/EXT_DENOMINATOR,-3,'V',3); // Display 3 Digits of this mV units
#else
DisplayValue((unsigned long)Vext*EXT_NUMERATOR/EXT_DENOMINATOR,-3,'V',3); // Display 3 Digits of this mV units
#endif
#ifdef TPex2
lcd_line2();
lcd_clear_line();
lcd_line2();
#ifdef WITH_UART
uart_newline(); // start of new measurement
#endif
lcd_MEM_string(Vext_str); // Vext=
Vext = W5msReadADC(TPext); // read external voltage
#if EXT_NUMERATOR <= (0xffff/U_VCC)
DisplayValue(Vext*EXT_NUMERATOR/EXT_DENOMINATOR,-3,'V',3); // Display 3 Digits of this mV units
#else
DisplayValue((unsigned long)Vext*EXT_NUMERATOR/EXT_DENOMINATOR,-3,'V',3); // Display 3 Digits of this mV units
#endif
#endif /* TPex2 */
key_pressed = wait_for_key_ms(1000);
#ifdef POWER_OFF
#ifdef WITH_ROTARY_SWITCH
if ((key_pressed > 0) || (rotary.incre > 0)) times = 0; // reset the loop counter, operator is active
if (rotary.incre > 5) break; // fast rotation ends voltage measurement
#else
if (key_pressed > 0) times = 0; //reset the loop counter, operator is active
#endif
#endif
if (key_pressed > ((1000/10)-6)) {
key_long_pressed++; // count the long key press
}
if (key_pressed == 0) key_long_pressed = 0; //reset the key long pressed counter
if (key_long_pressed > 4) break; // five seconds end the loop
} /* end for times */
#endif /* WITH_VEXT */
} /* end show_vext() */
void Show_Diode(void)
{
Diode_Type *D1; /* pointer to diode #1 */
Diode_Type *D2 = NULL; /* pointer to diode #2 */
uint8_t CapFlag = 1; /* flag for capacitance output */
uint8_t A = 5; /* ID of common anode */
uint8_t C = 5; /* ID of common cothode */
uint8_t R_Pin1 = 5; /* B_E resistor's pin #1 */
uint8_t R_Pin2 = 5; /* B_E resistor's pin #2 */
uint16_t I_leak; /* leakage current */
D1 = &Diodes[0]; /* pointer to first diode */
/*
* figure out which diodes to display
*/
if (Check.Diodes == 1) /* single diode */
{
C = D1->C; /* make anode first pin */
}
else if (Check.Diodes == 2) /* two diodes */
{
D2 = D1;
D2++; /* pointer to second diode */
if (D1->A == D2->A) /* common anode */
{
A = D1->A; /* save common anode */
/* possible PNP BJT with low value B-E resistor and flyback diode */
R_Pin1 = D1->C;
R_Pin2 = D2->C;
}
else if (D1->C == D2->C) /* common cathode */
{
C = D1->C; /* save common cathode */
/* possible NPN BJT with low value B-E resistor and flyback diode */
R_Pin1 = D1->A;
R_Pin2 = D2->A;
}
else if ((D1->A == D2->C) && (D1->C == D2->A)) /* anti-parallel */
{
A = D1->A; /* anode and cathode */
C = A; /* are the same */
CapFlag = 0; /* skip capacitance */
}
}
else if (Check.Diodes == 3) /* three diodes */
{
uint8_t n;
uint8_t m;
/*
* Two diodes in series are additionally detected as third big diode:
* - Check for any possible way of 2 diodes be connected in series.
* - Only once the cathode of diode #1 matches the anode of diode #2.
*/
for (n = 0; n <= 2; n++) /* loop for first diode */
{
D1 = &Diodes[n]; /* get pointer of first diode */
for (m = 0; m <= 2; m++) /* loop for second diode */
{
D2 = &Diodes[m]; /* get pointer of second diode */
if (n != m) /* don't check same diode :-) */
{
if (D1->C == D2->A) /* got match */
{
n = 5; /* end loops */
m = 5;
}
}
}
}
if (n < 5) D2 = NULL; /* no match found */
C = D1->C; /* cathode of first diode */
A = 3; /* in series mode */
}
else /* to much diodes */
{
D1 = NULL; /* don't display any diode */
Show_Fail(); /* and tell user */
return;
}
/*
* display pins
*/
/* first Diode */
if (A < 3) LCD_ProbeNumber(D1->C); /* common anode */
else LCD_ProbeNumber(D1->A); /* common cathode */
if (A < 3) LCD_EEString(Diode_CA_str); /* common anode */
else LCD_EEString(Diode_AC_str); /* common cathode */
if (A < 3) LCD_ProbeNumber(A); /* common anode */
else LCD_ProbeNumber(C); /* common cathode */
if (D2) /* second diode */
{
if (A <= 3) LCD_EEString(Diode_AC_str); /* common anode or in series */
else LCD_EEString(Diode_CA_str); /* common cathode */
if (A == C) LCD_ProbeNumber(D2->A); /* anti parallel */
else if (A <= 3) LCD_ProbeNumber(D2->C); /* common anode or in series */
else LCD_ProbeNumber(D2->A); /* common cathode */
}
/* check for B-E resistor for possible BJT */
if (R_Pin1 < 5) /* possible BJT */
{
if (CheckSingleResistor(R_Pin1, R_Pin2) == 1) /* found B-E resistor */
{
/* show: PNP/NPN? */
LCD_Space();
if (A < 3) LCD_EEString(PNP_str);
else LCD_EEString(NPN_str);
LCD_Char('?');
LCD_NextLine(); /* go to line #2 */
R_Pin1 += '1'; /* convert to character */
R_Pin2 += '1';
Show_SingleResistor(R_Pin1, R_Pin2); /* show resistor */
CapFlag = 0; /* skip capacitance */
}
}
/*
* display:
* - Uf (forward voltage)
* - reverse leakage current (for single diodes)
* - capacitance (not for anti-parallel diodes)
*/
/* display Uf */
LCD_NextLine_EEString_Space(Vf_str); /* display: Vf */
/* first diode */
DisplayValue(D1->V_f, -3, 'V');
LCD_Space();
/* display low current Uf and reverse leakage current for a single diode */
if (D2 == NULL) /* single diode */
{
/* display low current Uf if it's quite low (Ge/Schottky diode) */
if (D1->V_f2 < 250)
{
LCD_Char('(');
DisplayValue(D1->V_f2, 0, 0);
LCD_Char(')');
}
/* reverse leakage current */
UpdateProbes(D1->C, D1->A, 0); /* reverse diode */
I_leak = GetLeakageCurrent(); /* get current (in µA) */
if (I_leak > 0) /* show if not zero */
{
LCD_NextLine_EEString_Space(I_R_str); /* display: I_R */
DisplayValue(I_leak, -6, 'A'); /* display current */
}
}
else /* two diodes */
{
/* show Uf of second diode */
DisplayValue(D2->V_f, -3, 'V');
}
/* display capacitance */
if (CapFlag == 1) /* if requested */
{
LCD_NextLine_EEString_Space(DiodeCap_str); /* display: C */
Show_Diode_Cap(D1); /* first diode */
LCD_Space();
Show_Diode_Cap(D2); /* second diode (optional) */
}
}
//begin of transistortester program
int main(void) {
uint8_t ii;
unsigned int max_time;
#ifdef SEARCH_PARASITIC
unsigned long n_cval; // capacitor value of NPN B-E diode, for deselecting the parasitic Transistor
int8_t n_cpre; // capacitor prefix of NPN B-E diode
#endif
#ifdef WITH_GRAPHICS
unsigned char options;
#endif
uint8_t vak_diode_nr; // number of the protection diode of BJT
union {
uint16_t pw;
uint8_t pb[2];
} rpins;
uint8_t x, y, z;
//switch on
ON_DDR = (1<<ON_PIN); // switch to output
ON_PORT = (1<<ON_PIN); // switch power on
#ifndef PULLUP_DISABLE
RST_PORT |= (1<<RST_PIN); // enable internal Pullup for Start-Pin
#endif
uint8_t tmp;
//ADC-Init
ADCSRA = (1<<ADEN) | AUTO_CLOCK_DIV; //prescaler=8 or 64 (if 8Mhz clock)
#ifdef __AVR_ATmega8__
// #define WDRF_HOME MCU_STATUS_REG
#define WDRF_HOME MCUCSR
#else
#define WDRF_HOME MCUSR
#if FLASHEND > 0x3fff
// probably was a bootloader active, disable the UART
UCSR0B = 0; // disable UART, if started with bootloader
#endif
#endif
wait500ms();
#if (PROCESSOR_TYP == 644) || (PROCESSOR_TYP == 1280)
#define BAUD_RATE 9600
// UBRR0H = (F_CPU / 16 / BAUD_RATE - 1) >> 8;
// UBRR0L = (F_CPU / 16 / BAUD_RATE - 1) & 0xff;
// UCSR0B = (1<<TXEN0);
// UCSR0C = (1<<USBS0) | (3<<UCSZ00); // 2 stop bits, 8-bit
// while (!(UCSR0A & (1<<UDRE0))) { }; // wait for send data port ready
#ifdef SWUART_INVERT
SERIAL_PORT &= ~(1<<SERIAL_BIT);
#else
SERIAL_PORT |= (1<<SERIAL_BIT);
#endif
SERIAL_DDR |= (1<<SERIAL_BIT);
#endif
tmp = (WDRF_HOME & ((1<<WDRF))); // save Watch Dog Flag
WDRF_HOME &= ~(1<<WDRF); //reset Watch Dog flag
wdt_disable(); // disable Watch Dog
#ifndef INHIBIT_SLEEP_MODE
// switch off unused Parts
#if PROCESSOR_TYP == 644
#ifdef PRUSART1
PRR0 = (1<<PRTWI) | (1<<PRSPI) | (1<<PRUSART1);
#else
PRR0 = (1<<PRTWI) | (1<<PRSPI) ;
#endif
// PRR1 = (1<<PRTIM3) ;
#elif PROCESSOR_TYP == 1280
PRR0 = (1<<PRTWI) | (1<<PRSPI) | (1<<PRUSART1);
PRR1 = (1<<PRTIM5) | (1<<PRTIM4) | (1<<PRTIM3) | (1<<PRUSART3) | (1<<PRUSART2) | (1<<PRUSART3);
#else
PRR = (1<<PRTWI) | (1<<PRSPI) | (1<<PRUSART0);
#endif
// disable digital inputs of Analog pins, but TP1-3 digital inputs must be left enabled for VGS measurement
DIDR0 = ((1<<ADC5D) | (1<<ADC4D) | (1<<ADC3D) | (1<<ADC2D) | (1<<ADC1D) | (1<<ADC0D)) & ~((1<<TP3) | (1<<TP2) | (1<<TP1));
TCCR2A = (0<<WGM21) | (0<<WGM20); // Counter 2 normal mode
TCCR2B = CNTR2_PRESCALER; //prescaler set in autoconf
#endif /* INHIBIT_SLEEP_MODE */
sei(); // enable interrupts
lcd_init(); //initialize LCD
// ADC_PORT = TXD_VAL;
// ADC_DDR = TXD_MSK;
if(tmp) {
// check if Watchdog-Event
// this happens, if the Watchdog is not reset for 2s
// can happen, if any loop in the Program doen't finish.
lcd_line1();
lcd_MEM_string(TestTimedOut); //Output Timeout
wait_about3s(); // time to read the Timeout message
switch_tester_off();
return 0;
}
#ifdef PULLUP_DISABLE
#ifdef __AVR_ATmega8__
SFIOR = (1<<PUD); // disable Pull-Up Resistors mega8
#else
MCUCR = (1<<PUD); // disable Pull-Up Resistors mega168 family
#endif
#endif
//#if POWER_OFF+0 > 1
// tester display time selection
#ifndef USE_EEPROM
EE_check_init(); // init EEprom, if unset
#endif
#ifdef WITH_ROTARY_SWITCH
// rotary_switch_present = eeprom_read_byte(&EE_RotarySwitch);
rotary.ind = ROT_MSK+1; //initilize state history with next call of check_rotary()
#endif
#ifdef WITH_HARDWARE_SERIAL
// ii = 60;
ii = 30;
#else
#if 1
for (ii=0; ii<60; ii++) {
if (RST_PIN_REG & (1 << RST_PIN))
break; // button is released
wait_about10ms();
}
#else
ii = 0;
if (!(RST_PIN_REG & (1<<RST_PIN))) {
// key is still pressed
ii = wait_for_key_ms(700);
}
#endif
display_time = OFF_WAIT_TIME; // LONG_WAIT_TIME for single mode, else SHORT_WAIT_TIME
if (ii > 30) {
display_time = LONG_WAIT_TIME; // ... set long time display anyway
}
#endif // WITH_HARDWARE_SERIAL
#if POWER_OFF+0 > 1
empty_count = 0;
mess_count = 0;
#endif
ADCconfig.RefFlag = 0;
Calibrate_UR(); // get Ref Voltages and Pin resistance
#ifdef WDT_enabled
wdt_enable(WDTO_2S); //Watchdog on
#endif
#ifdef WITH_MENU
if (ii >= 60) {
while(function_menu()); // selection of function
}
#endif
//*****************************************************************
//Entry: if start key is pressed before shut down
loop_start:
#if ((LCD_ST_TYPE == 7565) || (LCD_ST_TYPE == 1306))
lcd_command(CMD_DISPLAY_ON);
lcd_command(CMD_SET_ALLPTS_NORMAL); // 0xa4
#endif
lcd_clear(); // clear the LCD
ADC_DDR = TXD_MSK; // activate Software-UART
init_parts(); // reset parts info to nothing found
Calibrate_UR(); // get Ref Voltages and Pin resistance
lcd_line1(); // Cursor to 1. row, column 1
#ifdef BAT_CHECK
// Battery check is selected
Battery_check();
#else
lcd_MEM_string(VERSION_str); // if no Battery check, Version .. in row 1
#endif /* BAT_CHECK */
// begin tests
#if FLASHEND > 0x1fff
if (WithReference) {
/* 2.5V precision reference is checked OK */
#if POWER_OFF+0 > 1
if ((mess_count == 0) && (empty_count == 0))
#endif
{
/* display VCC= only first time */
lcd_line2();
lcd_MEM_string(VCC_str); // VCC=
Display_mV(ADCconfig.U_AVCC,3); // Display 3 Digits of this mV units
lcd_refresh(); // write the pixels to display, ST7920 only
wait_about1s(); // time to read the VCC= message
}
}
#endif
#ifdef WITH_VEXT
unsigned int Vext;
// show the external voltage
while (!(RST_PIN_REG & (1<<RST_PIN))) {
lcd_clear_line2();
lcd_MEM_string(Vext_str); // Vext=
ADC_DDR = 0; //deactivate Software-UART
Vext = W5msReadADC(TPext); // read external voltage
// ADC_DDR = TXD_MSK; //activate Software-UART
uart_newline(); // MAURO replaced uart_putc(' ') by uart_newline(), 'Z'
#if EXT_NUMERATOR <= (0xffff/U_VCC)
Display_mV(Vext*EXT_NUMERATOR/EXT_DENOMINATOR,3); // Display 3 Digits of this mV units
#else
DisplayValue((unsigned long)Vext*EXT_NUMERATOR/EXT_DENOMINATOR,-3,'V',3); // Display 3 Digits of this mV units
#endif
lcd_refresh(); // write the pixels to display, ST7920 only
wait_about300ms(); // delay to read the Vext= message
}
#endif /* WITH_VEXT */
#ifndef DebugOut
lcd_line2(); //LCD position row 2, column 1
#endif
EntladePins(); // discharge all capacitors!
if(PartFound == PART_CELL) {
lcd_clear();
lcd_MEM_string(Cell_str); // display "Cell!"
#if FLASHEND > 0x3fff
lcd_line2(); // use LCD line 2
Display_mV(cell_mv[0],3);
lcd_space();
Display_mV(cell_mv[1],3);
lcd_space();
Display_mV(cell_mv[2],3);
#endif
#ifdef WITH_SELFTEST
lcd_refresh(); // write the pixels to display, ST7920 only
wait_about2s();
AutoCheck(0x11); // full Selftest with "Short probes" message
#endif
goto tt_end;
}
#ifdef WITH_SELFTEST
#ifdef AUTO_CAL
lcd_cursor_off();
UnCalibrated = (eeprom_read_byte(&c_zero_tab[3]) - eeprom_read_byte(&c_zero_tab[0]));
if (UnCalibrated != 0) {
// if calibrated, both c_zero_tab values are identical! c_zero_tab[3] is not used otherwise
lcd_cursor_on();
}
#endif
#ifdef WITH_MENU
AutoCheck(0x00); //check, if selftest should be done, only calibration
#else
AutoCheck(0x01); //check, if selftest should be done, full selftest without MENU
#endif
#endif
#if FLASHEND > 0x1fff
lcd_clear_line2(); //LCD position row2, column 1
#else
lcd_line2(); //LCD position row2, column 1
#endif
lcd_MEM_string(TestRunning); //String: testing...
lcd_refresh(); // write the pixels to display, ST7920 only
#ifdef WITH_UART
uart_putc(0x03); // ETX, start of new measurement
uart_newline(); // MAURO Added
#endif
//
// check all 6 combinations for the 3 pins
// High Low Tri
CheckPins(TP1, TP2, TP3);
CheckPins(TP2, TP1, TP3);
CheckPins(TP1, TP3, TP2);
CheckPins(TP3, TP1, TP2);
CheckPins(TP2, TP3, TP1);
CheckPins(TP3, TP2, TP1);
// Capacity measurement is only possible correctly with two Pins connected.
// A third connected pin will increase the capacity value!
// if(((PartFound == PART_NONE) || (PartFound == PART_RESISTOR) || (PartFound == PART_DIODE)) ) {
if(PartFound == PART_NONE) {
// If no part is found yet, check separate if is is a capacitor
#ifdef DebugOut
lcd_data('C');
#endif
EntladePins(); // discharge capacities
//measurement of capacities in all 3 combinations
ReadCapacity(TP3, TP1);
#ifdef DebugOut
lcd_data('K');
#endif
#if DebugOut != 10
ReadCapacity(TP3, TP2);
#ifdef DebugOut
lcd_data('K');
#endif
ReadCapacity(TP2, TP1);
#ifdef DebugOut
lcd_data('K');
#endif
#endif
}
#ifdef WITH_UJT
// check for UJT
if (PartFound==PART_DIODE
&& NumOfDiodes==2 // UJT is detected as 2 diodes E-B1 and E-B2...
// && ResistorsFound==1 // ...and a resistor B1-B2
&& diodes.Anode[0]==diodes.Anode[1] // check diodes have common anode
// && (unsigned char)(ResistorList[0]+diodes.Anode[0])==2 // and resistor is between cathodes
)
// note: there also exist CUJTs (complementary UJTs); they seem to be (even) rarer than UJTs, and are not supported for now
{
CheckUJT();
}
#endif /* defined WITH_UJT */
#ifdef WITH_XTAL
if (PartFound==PART_NONE || ((PartFound==PART_CAPACITOR) && (cap.cpre_max == -12))) {
// still not recognized anything? then check for ceramic resonator or crystal
// these tests are time-consuming, so we do them last, and only on TP1/TP3
sampling_test_xtal();
}
#endif
//All checks are done, output result to display
#ifdef DebugOut
// only clear two lines of LCD
lcd_clear_line1();
#else
lcd_clear(); // clear total display
#endif
_trans = &ntrans; // default transistor structure to show
if (PartFound == PART_THYRISTOR) {
#ifdef WITH_GRAPHICS
lcd_big_icon(THYRISTOR|LCD_UPPER_LEFT);
lcd_draw_trans_pins(-8, 16);
lcd_set_cursor(0,TEXT_RIGHT_TO_ICON); // position behind the icon, Line 1
lcd_MEM_string(Thyristor); //"Thyristor"
#else
lcd_MEM_string(Thyristor); //"Thyristor"
PinLayout(Cathode_char,'G','A'); // CGA= or 123=...
#endif
goto TyUfAusgabe;
}
if (PartFound == PART_TRIAC) {
#ifdef WITH_GRAPHICS
lcd_big_icon(TRIAC|LCD_UPPER_LEFT);
lcd_draw_trans_pins(-8, 16);
lcd_set_cursor(0,TEXT_RIGHT_TO_ICON); // position behind the icon, Line 1
lcd_MEM_string(Triac); //"Triac"
#else
lcd_MEM_string(Triac); //"Triac"
PinLayout('1','G','2'); // CGA= or 123=...
#endif
goto TyUfAusgabe;
}
#ifdef WITH_PUT
if (PartFound == PART_PUT) {
static const unsigned char PUT_str[] MEM_TEXT = "PUT";
lcd_MEM_string(PUT_str);
_trans=&ptrans;
PinLayout('A','G',Cathode_char);
goto TyUfAusgabe;
}
#endif
#ifdef WITH_UJT
if (PartFound == PART_UJT) {
static const unsigned char UJT_str[] MEM_TEXT = "UJT";
lcd_MEM_string(UJT_str);
PinLayout('1','E','2');
#ifdef SamplingADC
static const unsigned char eta_str[] MEM_TEXT = " eta=";
lcd_next_line(0);
ResistorChecked[ntrans.e - TP_MIN + ntrans.c - TP_MIN - 1] = 0; // forget last resistance measurement
GetResistance(ntrans.c, ntrans.e); // resistor value is in ResistorVal[resnum]
DisplayValue(ResistorVal[ntrans.e - TP_MIN + ntrans.c - TP_MIN - 1],-1,LCD_CHAR_OMEGA,2);
lcd_MEM_string(eta_str); //"eta="
DisplayValue(ntrans.gthvoltage,0,'%',3);
#else /* ! SamplingADC */
static const unsigned char R12_str[] MEM_TEXT = "R12=";
lcd_next_line(0);
lcd_MEM_string(R12_str); //"R12="
DisplayValue(ResistorVal[ntrans.e - TP_MIN + ntrans.c - TP_MIN - 1],-1,LCD_CHAR_OMEGA,2);
lcd_data(',');
DisplayValue(((RR680PL * (unsigned long)(ADCconfig.U_AVCC - ntrans.uBE)) / ntrans.uBE)-RRpinPL,-1,LCD_CHAR_OMEGA,3);
#endif /* SamplingADC */
goto tt_end;
}
#endif /* WITH_UJT */
if (PartFound == PART_CAPACITOR) {
#if FLASHEND > 0x3fff
if ((cap.ca + cap.cb) == (TP1 + TP3)) {
show_Cap13(); // repeated capacity measurement
goto shut_off; // key was pressed or timeout
}
show_cap(0); // show capacity in normal way and measure additional parameters
#else
show_cap_simple(); // show capacity in normal way and measure additional parameters
#endif
goto tt_end;
} /* end PartFound == PART_CAPACITOR */
#ifdef WITH_XTAL
if (PartFound == PART_CERAMICRESONATOR) {
// static const unsigned char cerres_str[] MEM_TEXT = "Cer.resonator ";
lcd_MEM_string(cerres_str);
if (sampling_measure_xtal()) goto loop_start;
goto tt_end;
}
if (PartFound == PART_XTAL) {
// static const unsigned char xtal_str[] MEM_TEXT = "Crystal ";
lcd_MEM_string(xtal_str);
if (sampling_measure_xtal()) goto loop_start;
goto tt_end;
}
#endif
// ========================================
if(PartFound == PART_DIODE) {
// ========================================
if(NumOfDiodes == 1) { //single Diode
// lcd_MEM_string(Diode); //"Diode: "
#if FLASHEND > 0x1fff
// enough memory (>8k) to sort the pins and additional Ir=
DiodeSymbol_withPins(0);
GetIr(diodes.Cathode[0],diodes.Anode[0]); // measure and output Ir=x.xuA
#else
// too less memory to sort the pins
DiodeSymbol_withPins(0);
#endif
UfAusgabe(0x70); // mark for additional resistor and output Uf= in line 2
#ifndef SamplingADC
/* load current of capacity is (5V-1.1V)/(470000 Ohm) = 8298nA */
ReadCapacity(diodes.Cathode[0],diodes.Anode[0]); // Capacity opposite flow direction
if (cap.cpre < -3) { /* capacity is measured */
#if (LCD_LINES > 2)
lcd_line3(); // output Capacity in line 3
#endif
lcd_MEM_string(Cap_str); //"C="
#if LCD_LINE_LENGTH > 16
DisplayValue(cap.cval,cap.cpre,'F',3);
#else
DisplayValue(cap.cval,cap.cpre,'F',2);
#endif
}
#else // SamplingADC
showdiodecap:
cap.cval=sampling_cap(diodes.Cathode[0],diodes.Anode[0],0); // at low voltage
lcd_next_line_wait(0); // next line, wait 5s and clear line 2
DisplayValue(cap.cval,sampling_cap_pre,'F',2);
#ifdef PULLUP_DISABLE
lcd_data('-');
cap.cval=sampling_cap(diodes.Cathode[0],diodes.Anode[0],1); // at high voltage
if (cap.cval < 0) cap.cval = 0; // don't show negativ value
DisplayValue(cap.cval,sampling_cap_pre,'F',2);
#if LCD_LINE_LENGTH > 16
lcd_MEM_string(AT05volt); // " @0-5V"
#else
lcd_MEM_string(AT05volt+1); // "@0-5V"
#endif
uart_newline(); // MAURO Diode ('A')
#else
#warning Capacity measurement from high to low not possible for diodes without PULLUP_DISABLE option!
#endif /* PULLUP_DISABLE */
#endif
goto end3;
} else if(NumOfDiodes == 2) { // double diode
lcd_data('2');
lcd_MEM_string(Dioden); //"diodes "
if(diodes.Anode[0] == diodes.Anode[1]) { //Common Anode
DiodeSymbol_CpinApin(0); // 1-|<-2
DiodeSymbol_ACpin(1); // ->|-3
UfAusgabe(0x01);
#ifdef SamplingADC
goto showdiodecap; // double diodes are often varicap; measure capacitance of one of them
#else
goto end3;
#endif
}
if(diodes.Cathode[0] == diodes.Cathode[1]) { //Common Cathode
DiodeSymbol_ApinCpin(0); // 1->|-2
DiodeSymbol_CApin(1); // -|<-3
UfAusgabe(0x01);
#ifdef SamplingADC
goto showdiodecap; // double diodes are often varicap; measure capacitance of one of them
#else
goto end3;
#endif
// else if ((diodes.Cathode[0] == diodes.Anode[1]) && (diodes.Cathode[1] == diodes.Anode[0]))
}
if (diodes.Cathode[0] == diodes.Anode[1]) {
// normaly two serial diodes are detected as three diodes, but if the threshold is high
// for both diodes, the third diode is not detected.
// can also be Antiparallel
diode_sequence = 0x01; // 0 1
SerienDiodenAusgabe();
goto end3;
}
if (diodes.Cathode[1] == diodes.Anode[0]) {
diode_sequence = 0x10; // 1 0
SerienDiodenAusgabe();
goto end3;
}
} else if(NumOfDiodes == 3) {
//Serial of 2 Diodes; was detected as 3 Diodes
diode_sequence = 0x33; // 3 3
/* Check for any constellation of 2 serial diodes:
Only once the pin No of anyone Cathode is identical of another anode.
two diodes in series is additionally detected as third big diode.
*/
if (diodes.Cathode[0] == diodes.Anode[1]) {
diode_sequence = 0x01; // 0 1
}
if (diodes.Anode[0] == diodes.Cathode[1]) {
diode_sequence = 0x10; // 1 0
}
if (diodes.Cathode[0] == diodes.Anode[2]) {
diode_sequence = 0x02; // 0 2
}
if (diodes.Anode[0] == diodes.Cathode[2]) {
diode_sequence = 0x20; // 2 0
}
if (diodes.Cathode[1] == diodes.Anode[2]) {
diode_sequence = 0x12; // 1 2
}
if (diodes.Anode[1] == diodes.Cathode[2]) {
diode_sequence = 0x21; // 2 1
}
// if((ptrans.b<3) && (ptrans.c<3))
if(diode_sequence < 0x22) {
lcd_data('3');
lcd_MEM_string(Dioden); //"Diodes "
SerienDiodenAusgabe();
goto end3;
}
} // end (NumOfDiodes == 3)
lcd_MEM_string(Bauteil); //"Bauteil"
lcd_MEM_string(Unknown); //" unbek."
lcd_line2(); //2. row
lcd_data(NumOfDiodes + '0');
lcd_data('*');
lcd_MEM_string(AnKat_str); //"->|-"
lcd_MEM_string(Detected); //" detected"
goto not_known;
// end (PartFound == PART_DIODE)
// ========================================
} else if (PartFound == PART_TRANSISTOR) {
// ========================================
#ifdef SEARCH_PARASITIC
if ((ptrans.count != 0) && (ntrans.count !=0)) {
// Special Handling of NPNp and PNPn Transistor.
// If a protection diode is built on the same structur as the NPN-Transistor,
// a parasitic PNP-Transistor will be detected.
ReadCapacity(ntrans.e, ntrans.b); // read capacity of NPN base-emitter
n_cval = cap.cval; // save the found capacity value
n_cpre = cap.cpre; // and dimension
ReadCapacity(ptrans.b, ptrans.e); // read capacity of PNP base-emitter
// check if one hfe is very low. If yes, simulate a very low BE capacity
if ((ntrans.hfe < 500) && (ptrans.hfe >= 500)) n_cpre = -16; // set NPN BE capacity to low value
if ((ptrans.hfe < 500) && (ntrans.hfe >= 500)) cap.cpre = -16; // set PNP BE capacity to low value
if (((n_cpre == cap.cpre) && (cap.cval > n_cval))
|| (cap.cpre > n_cpre)) {
// the capacity value or dimension of the PNP B-E is greater than the NPN B-E
PartMode = PART_MODE_PNP;
} else {
PartMode = PART_MODE_NPN;
}
} /* end ((ptrans.count != 0) && (ntrans.count !=0)) */
#endif
// not possible for mega8, change Pin sequence instead.
if ((ptrans.count != 0) && (ntrans.count != 0)
&& (!(RST_PIN_REG & (1 << RST_PIN)))) {
// if the Start key is still pressed, use the other Transistor
#if 0
if (PartMode == PART_MODE_NPN) {
PartMode = PART_MODE_PNP; // switch to parasitic transistor
} else {
PartMode = PART_MODE_NPN; // switch to parasitic transistor
}
#else
PartMode ^= (PART_MODE_PNP - PART_MODE_NPN);
#endif
}
#ifdef WITH_GRAPHICS
lcd_set_cursor(0,TEXT_RIGHT_TO_ICON); // position behind the icon, Line 1
lcd_big_icon(BJT_NPN|LCD_UPPER_LEFT); // show the NPN Icon at lower left corner
if(PartMode == PART_MODE_NPN) {
// _trans = &ntrans; is allready selected a default
lcd_MEM_string(NPN_str); //"NPN "
if (ptrans.count != 0) {
lcd_data('p'); // mark for parasitic PNp
}
} else {
_trans = &ptrans; // change transistor structure
lcd_update_icon(bmp_pnp); // update for PNP
lcd_MEM_string(PNP_str); //"PNP "
if (ntrans.count != 0) {
lcd_data('n'); // mark for parasitic NPn
}
}
#else /* only character display */
if(PartMode == PART_MODE_NPN) {
// _trans = &ntrans; is allready selected a default
lcd_MEM_string(NPN_str); //"NPN "
if (ptrans.count != 0) {
lcd_data('p'); // mark for parasitic PNp
}
} else {
_trans = &ptrans; // change transistor structure
lcd_MEM_string(PNP_str); //"PNP "
if (ntrans.count != 0) {
lcd_data('n'); // mark for parasitic NPn
}
}
lcd_space();
#endif
// show the protection diode of the BJT
vak_diode_nr = search_vak_diode();
if (vak_diode_nr < 5) {
// no side of the diode is connected to the base, this must be the protection diode
#ifdef WITH_GRAPHICS
options = 0;
if (_trans->c != diodes.Anode[vak_diode_nr])
options |= OPT_VREVERSE;
lcd_update_icon_opt(bmp_vakdiode,options); // show the protection diode right to the Icon
#else /* only character display, show the diode in correct direction */
char an_cat; // diode is anode-cathode type
an_cat = 0;
#ifdef EBC_STYLE
#if EBC_STYLE == 321
// Layout with 321= style
an_cat = (((PartMode == PART_MODE_NPN) && (ntrans.c < ntrans.e)) ||
((PartMode != PART_MODE_NPN) && (ptrans.c > ptrans.e)));
#else
// Layout with EBC= style
an_cat = (PartMode == PART_MODE_NPN);
#endif
#else
// Layout with 123= style
an_cat = (((PartMode == PART_MODE_NPN) && (ntrans.c > ntrans.e))
|| ((PartMode != PART_MODE_NPN) && (ptrans.c < ptrans.e)));
#endif
if (an_cat) {
lcd_MEM_string(AnKat_str); //"->|-"
} else {
lcd_MEM_string(KatAn_str); //"-|<-"
}
#endif /* !WITH_GRAPHICS */
} /* endif vak_diode_nr < 6 */
#ifdef WITH_GRAPHICS
lcd_draw_trans_pins(-7, 16); // show the pin numbers
lcd_next_line(TEXT_RIGHT_TO_ICON); // position behind the icon, Line 2
lcd_MEM_string(hfe_str); //"B=" (hFE)
DisplayValue(_trans->hfe,-2,0,3);
lcd_next_line(TEXT_RIGHT_TO_ICON+1-LOW_H_SPACE); // position behind the icon+1, Line 3
lcd_data('I');
if (_trans->current >= 10000) {
lcd_data('e'); // emitter current has 10mA offset
_trans->current -= 10000;
} else {
lcd_data('c');
}
lcd_equal(); // lcd_data('=');
DisplayValue16(_trans->current,-6,'A',2); // display Ic or Ie current
lcd_next_line(TEXT_RIGHT_TO_ICON); // position behind the icon, Line 4
lcd_MEM_string(Ube_str); //"Ube="
Display_mV(_trans->uBE,3-LOW_H_SPACE);
last_line_used = 1;
#ifdef SHOW_ICE
if (_trans->ice0 > 0) {
lcd_next_line_wait(TEXT_RIGHT_TO_ICON-1-LOW_H_SPACE); // position behind the icon, Line 4 & wait and clear last line
lcd_MEM2_string(ICE0_str); // "ICE0="
DisplayValue16(_trans->ice0,-6,'A',2); // display ICEO
}
if (_trans->ices > 0) {
lcd_next_line_wait(TEXT_RIGHT_TO_ICON-1-LOW_H_SPACE); // position behind the icon, Line 4 & wait and clear last line
lcd_MEM2_string(ICEs_str); // "ICEs="
DisplayValue16(_trans->ices,-6,'A',2); // display ICEs
}
#endif
#else /* character display */
PinLayout('E','B','C'); // EBC= or 123=...
lcd_line2(); //2. row
lcd_MEM_string(hfe_str); //"B=" (hFE)
DisplayValue(_trans->hfe,-2,0,3);
#if FLASHEND > 0x1fff
lcd_space();
lcd_data('I');
if (_trans->current >= 10000) {
lcd_data('e'); // emitter current has 10mA offset
_trans->current -= 10000;
} else {
lcd_data('c');
}
lcd_equal(); // lcd_data('=');
DisplayValue16(_trans->current,-6,'A',2); // display Ic or Ie current
#endif
#if defined(SHOW_ICE)
lcd_next_line_wait(0); // next line, wait 5s and clear line 2
lcd_MEM_string(Ube_str); //"Ube="
Display_mV(_trans->uBE,3);
if (_trans->ice0 > 0) {
lcd_next_line_wait(0); // next line, wait 5s and clear line 2
lcd_MEM2_string(ICE0_str); // "ICE0="
DisplayValue16(_trans->ice0,-6,'A',3);
}
if (_trans->ices > 0) {
lcd_next_line_wait(0); // next line, wait 5s and clear line 2
lcd_MEM2_string(ICEs_str); // "ICEs="
DisplayValue16(_trans->ices,-6,'A',3);
}
#endif
#endif /* WITH_GRAPHICS */
#ifdef SHOW_VAKDIODE
if (vak_diode_nr < 5) {
lcd_next_line_wait(0); // next line, wait 5s and clear line 2/4
DiodeSymbol_withPins(vak_diode_nr);
lcd_MEM_string(Uf_str); //"Uf="
mVAusgabe(vak_diode_nr);
uart_newline(); // MAURO not verified ('D')
} /* end if (vak_diode_nr < 5) */
#endif
#ifdef WITH_GRAPHICS
PinLayoutLine('E','B','C'); // Pin 1=E ...
uart_newline(); // MAURO OK BJT ('E')
#endif
goto tt_end;
// end (PartFound == PART_TRANSISTOR)
// ========================================
} else if (PartFound == PART_FET) { /* JFET or MOSFET */
// ========================================
#ifdef WITH_GRAPHICS
unsigned char fetidx = 0;
lcd_set_cursor(0,TEXT_RIGHT_TO_ICON); // position behind the icon, Line 1
#endif
if((PartMode&P_CHANNEL) == P_CHANNEL) {
lcd_data('P'); //P-channel
_trans = &ptrans;
#ifdef WITH_GRAPHICS
fetidx = 2;
#endif
} else {
lcd_data('N'); //N-channel
// _trans = &ntrans; is allready selected as default
}
lcd_data('-'); // minus is used for JFET, D-MOS, E-MOS ...
uint8_t part_code;
part_code = PartMode&0x0f;
#ifdef WITH_GRAPHICS
if (part_code == PART_MODE_JFET) {
lcd_MEM_string(jfet_str); //"JFET"
lcd_big_icon(N_JFET|LCD_UPPER_LEFT);
if (fetidx != 0) {
lcd_update_icon(bmp_p_jfet); // update the n_jfet bitmap to p_jfet
}
} else { // no JFET
if ((PartMode&D_MODE) == D_MODE) {
lcd_data('D'); // N-D or P-D
fetidx += 1;
} else {
lcd_data('E'); // N-E or P-E
}
if (part_code == (PART_MODE_IGBT)) {
lcd_MEM_string(igbt_str); //"-IGBT"
lcd_big_icon(N_E_IGBT|LCD_UPPER_LEFT);
if (fetidx == 1) lcd_update_icon(bmp_n_d_igbt);
if (fetidx == 2) lcd_update_icon(bmp_p_e_igbt);
if (fetidx == 3) lcd_update_icon(bmp_p_d_igbt);
} else {
lcd_MEM_string(mosfet_str); //"-MOS "
lcd_big_icon(N_E_MOS|LCD_UPPER_LEFT);
if (fetidx == 1) lcd_update_icon(bmp_n_d_mos);
if (fetidx == 2) lcd_update_icon(bmp_p_e_mos);
if (fetidx == 3) lcd_update_icon(bmp_p_d_mos);
}
} /* end PART_MODE_JFET */
#else /* normal character display */
if (part_code == PART_MODE_JFET) {
lcd_MEM_string(jfet_str); //"-JFET"
} else { // no JFET
if ((PartMode&D_MODE) == D_MODE) {
lcd_data('D'); // N-D or P-D
} else {
lcd_data('E'); // N-E or P-E
}
if (part_code == (PART_MODE_IGBT)) {
lcd_MEM_string(igbt_str); //"-IGBT"
} else {
lcd_MEM_string(mosfet_str); //"-MOS "
}
} /* end PART_MODE_JFET */
if (part_code == PART_MODE_IGBT) {
PinLayout('E','G','C'); // SGD= or 123=...
} else if (part_code == PART_MODE_JFET) {
PinLayout('?','G','?'); // ?G?= or 123=...
} else {
PinLayout('S','G','D'); // SGD= or 123=...
}
#endif /* WITH_GRAPHICS */
vak_diode_nr = search_vak_diode();
if(vak_diode_nr < 5) {
//MOSFET with protection diode; only with enhancement-FETs
#ifndef WITH_GRAPHICS
#if FLASHEND <= 0x1fff
char an_cat; // diode is anode-cathode type
an_cat = 0;
#ifdef EBC_STYLE
#if EBC_STYLE == 321
// layout with 321= style
an_cat = (((PartMode&P_CHANNEL) && (ptrans.c > ptrans.e)) || ((!(PartMode&P_CHANNEL)) && (ntrans.c < ntrans.e)));
#else
// Layout with SGD= style
an_cat = (PartMode&P_CHANNEL); /* N or P MOS */
#endif
#else /* EBC_STYLE not defined */
// layout with 123= style
an_cat = (((PartMode & P_CHANNEL) && (ptrans.c < ptrans.e))
|| ((!(PartMode & P_CHANNEL)) && (ntrans.c > ntrans.e)));
#endif /* end ifdef EBC_STYLE */
// show diode symbol in right direction (short form for less flash memory)
if (an_cat) {
lcd_data(LCD_CHAR_DIODE1); //show Diode symbol >|
} else {
lcd_data(LCD_CHAR_DIODE2); //show Diode symbol |<
}
#endif
#endif /* not WITH_GRAPHICS */
#ifdef WITH_GRAPHICS
options = 0;
if (_trans->c != diodes.Anode[vak_diode_nr])
options |= OPT_VREVERSE;
lcd_update_icon_opt(bmp_vakdiode,options); // update Icon with protection diode
#endif
} /* end if NumOfDiodes == 1 */
#ifdef WITH_GRAPHICS
lcd_draw_trans_pins(-7, 16); // update of pin numbers must be done after diode update
lcd_next_line(TEXT_RIGHT_TO_ICON); // position text behind the icon, Line 2
#if LCD_LINES > 6
lcd_next_line(TEXT_RIGHT_TO_ICON); // double line
#endif
if((PartMode&D_MODE) != D_MODE) { //enhancement-MOSFET
lcd_MEM_string(vt_str+1); // "Vt="
Display_mV(_trans->gthvoltage,2); //Gate-threshold voltage
//Gate capacity
ReadCapacity(_trans->b,_trans->e); //measure capacity
lcd_next_line(TEXT_RIGHT_TO_ICON); // position text behind the icon, Line 3
lcd_show_Cg(); // show Cg=xxxpF
#ifdef SHOW_R_DS
lcd_show_rds(TEXT_RIGHT_TO_ICON-1); // show RDS at column behind the icon -1
#endif
} else { /* depletion mode */
if ((PartMode&0x0f) != PART_MODE_JFET) { /* kein JFET */
ReadCapacity(_trans->b,_trans->e); //measure capacity
lcd_show_Cg(); // show Cg=xxxpF
#ifdef FET_Idss
} else { // it is a JFET
// display the I_DSS, if measured
if (_trans->uBE!=0) {
static const unsigned char str_Idss[] MEM_TEXT = "Idss=";
lcd_MEM_string(str_Idss);
DisplayValue16(_trans->uBE,-6,'A',2);
}
#endif
}
// set cursor below the icon
#define LINE_BELOW_ICON ((ICON_HEIGHT/8)/((FONT_HEIGHT+7)/8))
#if LCD_LINES > 6
lcd_set_cursor((LINE_BELOW_ICON + 1) * PAGES_PER_LINE,0);
#else
lcd_set_cursor(LINE_BELOW_ICON * PAGES_PER_LINE,0);
#endif
lcd_data('I');
#if (LCD_LINE_LENGTH > 17)
lcd_data('d');
#endif
lcd_equal(); // lcd_data('=');
DisplayValue16(_trans->current,-6,'A',2);
lcd_MEM_string(Vgs_str); // "@Vg="
Display_mV(_trans->gthvoltage,2); //Gate-threshold voltage
#ifdef SHOW_ICE
// Display also the cutoff gate voltage, idea from Pieter-Tjerk
if (_trans->ice0<4800) { // can't trust cutoff voltage if close to 5V supply voltage, since then the transistor may not have been cut off at all
lcd_next_line_wait(0);
lcd_data('I');
#if (LCD_LINE_LENGTH > 17)
lcd_data('d');
#endif
lcd_equal(); // lcd_data('=');
DisplayValue16(0,-5,'A',2);
lcd_MEM_string(Vgs_str); // "@Vg="
Display_mV(_trans->ice0,2); // cutoff Gate voltage
#endif
}
#ifdef SHOW_R_DS
lcd_show_rds(0); // show Drain-Source resistance RDS at column 0
#endif
} /* end of enhancement or depletion mode WITH_GRAPHICS */
#else /* character display */
if((PartMode&D_MODE) != D_MODE) { //enhancement-MOSFET
//Gate capacity
lcd_line2(); // line 2
ReadCapacity(_trans->b,_trans->e); //measure capacity
lcd_show_Cg(); // show Cg=xxxpF
lcd_MEM_string(vt_str); // " Vt="
Display_mV(_trans->gthvoltage,2); //Gate-threshold voltage
#ifdef SHOW_R_DS
lcd_show_rds(0); // show Drain-Source resistance RDS at column 0
#endif
} else {
// depletion
#if FLASHEND > 0x1fff
if ((PartMode&0x0f) != PART_MODE_JFET) { /* kein JFET */
lcd_next_line(0); // line 2
ReadCapacity(_trans->b,_trans->e); //measure capacity
lcd_show_Cg(); // show Cg=xxxpF
#ifdef FET_Idss
} else { // it is a JFET
// display the I_DSS, if measured
if (_trans->uBE!=0) {
lcd_next_line(0);
static const unsigned char str_Idss[] MEM_TEXT = "Idss=";
lcd_MEM_string(str_Idss);
DisplayValue16(_trans->uBE,-6,'A',2);
}
#endif
}
lcd_next_line_wait(0); // line 2 or 3, if possible & wait and clear last line
#endif
lcd_data('I'); // show I=xmA@Vg=y.yV at line 2 or 3
#if (LCD_LINE_LENGTH > 17)
lcd_data('d');
#endif
lcd_equal(); // lcd_data('=');
DisplayValue16(_trans->current,-6,'A',2);
lcd_MEM_string(Vgs_str); // "@Vg="
Display_mV(_trans->gthvoltage,2); //Gate-threshold voltage
#ifdef SHOW_ICE
// Display also the cutoff gate voltage, idea from Pieter-Tjerk
if (_trans->ice0<4800) { // can't trust cutoff voltage if close to 5V supply voltage, since then the transistor may not have been cut off at all
lcd_next_line_wait(0);
lcd_data('I');
#if (LCD_LINE_LENGTH > 17)
lcd_data('d');
#endif
lcd_equal(); // lcd_data('=');
DisplayValue16(0,-5,'A',2);
lcd_MEM_string(Vgs_str); // "@Vg="
Display_mV(_trans->ice0,2); // cutoff Gate voltage
}
#endif
#ifdef SHOW_R_DS
lcd_show_rds(0); // show Drain-Source resistance RDS at column 0
#endif
} /* end of enhancement or depletion mode */
/* *************************************************** */
void do_10bit_PWM() {
uint8_t key_pressed;
uint8_t percent; // requestet duty-cycle in %
uint8_t old_perc; // old duty-cycle in %
unsigned int pwm_flip; // value for counter to flip the state
message_key_released(PWM_10bit_str); // display PWM-Generator and wait for key released
// OC1B is connected with 680 Ohm resistor to TP2 (middle test pin)
TCCR1A = (1<<COM1B1) | (0<<COM1B0) | (1<<WGM11) | (1<<WGM10); // fast PWM mode, mode 7: count to 10 bit
TIMSK1 = 0; // no interrupt used
OCR1B = 0xff; // toggle OC1B at this count
TIFR1 = (1<<OCF1A) | (1<<OCF1A) | (1<<TOV1); // reset interrupt flags
TCCR1C = 0;
R_PORT = 0; // set all resistor port outputs to GND
#if PROCESSOR_TYP == 644
R_DDR = (1<<PIN_RL1) | (1<<PIN_RL2) | (1<<PIN_RL3); // set TP1, DDD4(TP2) and TP3 to output
#else
R_DDR = (1<<PIN_RL1) | (1<<PIN_RL3); // set TP1 and TP3 to output
#endif
ADC_PORT = TXD_VAL;
ADC_DDR = (1<<TP1) | TXD_MSK; //connect TP1 to GND
#if PROCESSOR_TYP == 1280
DDRB |= (1<<DDB6); // set output enable for OC1B
#else
DDRB |= (1<<DDB2); // set output enable
#endif
#ifdef PWM_SERVO
TCCR1B = (1<<WGM13) | (1<<WGM12) | SERVO_START; // mode 15, clock divide by 8 or 64
OCR1A = PWM_MAX_COUNT - 1; // clock tics for 20 ms
#else
OCR1A = 1; // highest frequency
TCCR1B = (0<<WGM13) | (1<<WGM12) | (0<<CS12) | (0<<CS11) | (1<<CS10); // mode 7, no clock divide
#endif
key_pressed = 0;
old_perc = 0;
percent = (SERVO_MAX + SERVO_MIN) / 2; // set to middle
#ifdef POWER_OFF
uint8_t times; // time limit
for (times=0; times<240; )
#else
while (1) /* wait endless without option POWER_OFF */
#endif
{
if (percent != old_perc) {
// new duty cycle is requested
if (percent >= SERVO_MAX) {
percent -= (SERVO_MAX - SERVO_MIN); // reset near to mininum value
}
#ifdef PWM_SERVO
pwm_flip = (((unsigned long)PWM_MAX_COUNT * percent) + 500) / 1000;
#else
pwm_flip = (((unsigned long)PWM_MAX_COUNT * percent) + 50) / 100;
#endif
OCR1B = pwm_flip; // new percentage
lcd_line2(); // goto line 2
#ifdef PWM_SERVO
DisplayValue(((unsigned long)pwm_flip * SERVO_DIV)/MHZ_CPU ,-6,'s',3);
lcd_space();
lcd_data('/');
lcd_space();
DisplayValue16(((unsigned long)PWM_MAX_COUNT * SERVO_DIV)/MHZ_CPU, -6,'s',3);
#else
DisplayValue16((((unsigned long)pwm_flip * 1000) + (PWM_MAX_COUNT/2)) / PWM_MAX_COUNT,-1,'%',5);
#endif
lcd_clear_line();
old_perc = percent; // update the old duty cycle
if (key_pressed > 40) {
wait_about300ms(); // wait some time to release the button
}
} /* end if percent != old_perc */
key_pressed = wait_for_key_ms(1600);
if(key_pressed > 130) break; // more than 1.3 seconds
#ifdef WITH_ROTARY_SWITCH
if (rotary.incre > FAST_ROTATION) break; // fast rotation ends voltage measurement
if (rotary.count >= 0) {
percent += rotary.count; // increase the duty cycle by rotary.count
} else {
percent += ((SERVO_MAX-SERVO_MIN) + rotary.count); // decrease the duty cycle by rotary.count
}
#endif
if (key_pressed > 50) {
percent += 10; // duty cycle will be increased with 10
} else {
if (key_pressed > 0) percent += 1; // duty cycle will be increased with 1
}
#ifdef POWER_OFF
#ifdef WITH_ROTARY_SWITCH
if ((key_pressed > 0) || (rotary.incre > 0)) times = 0; // reset the loop counter, operator is active
#else
if (key_pressed > 0) times = 0; //reset the loop counter, operator is active
#endif
#endif
#ifdef POWER_OFF
times = Pwr_mode_check(times); // no time limit with DC_Pwr_mode
#endif
} /* end for times */
ADC_DDR = TXD_MSK; // disconnect TP1
TCCR1B = 0; // stop counter
TCCR1A = 0; // stop counter
R_DDR = 0; // switch resistor ports to Input
#if PROCESSOR_TYP == 1280
DDRB &= ~(1<<DDB6); // disable output
#else
DDRB &= ~(1<<DDB2); // disable output
#endif
} /* end do_10bit_PWM */
/* ****************************************************************** */
void show_C_ESR() {
uint8_t key_pressed;
message_key_released(C_ESR_str);
#ifdef POWER_OFF
uint8_t times;
for (times=0;times<250;)
#else
while (1) /* wait endless without the POWER_OFF option */
#endif
{
PartFound = PART_NONE;
ReadBigCap(TP3,TP1);
if (PartFound == PART_CAPACITOR) {
#if LCD_LINES > 2
lcd_line2(); // set to line2
#else
lcd_line1(); // set to line1
#endif
lcd_data('C');
lcd_equal(); // lcd_data('=');
DisplayValue(cap.cval_max,cap.cpre_max,'F',3);
lcd_clear_line(); // clear to end of line 1
cap.esr = GetESR(cap.cb,cap.ca);
#if LCD_LINES > 2
lcd_line3(); // use line 3
#else
lcd_line2(); // use line 2
#endif
lcd_MEM_string(&ESR_str[1]);
if (cap.esr < 65530) {
DisplayValue16(cap.esr,-2,LCD_CHAR_OMEGA,2);
} else {
lcd_data('?'); // too big
}
lcd_clear_line(); // clear to end of line
} else { // no cap found
#if LCD_LINES > 2
lcd_clear_line2(); // clear C value
lcd_line3();
lcd_clear_line(); // clear old ESR value
#else
lcd_line1(); //
lcd_MEM2_string(C_ESR_str);
lcd_clear_line();
lcd_clear_line2(); // clear old ESR value
#endif
}
#if defined(POWER_OFF) && defined(BAT_CHECK)
Bat_update(times);
#endif
key_pressed = wait_for_key_ms(1000);
#ifdef WITH_ROTARY_SWITCH
if ((key_pressed != 0) || (rotary.incre > 3)) break;
#else
if (key_pressed != 0) break;
#endif
#ifdef POWER_OFF
times = Pwr_mode_check(times); // no time limit with DC_Pwr_mode
#endif
} /* end for times */
} /* end show_C_ESR() */
void show_cap_simple(void)
#endif
{
// lcd_MEM_string(Capacitor);
lcd_line1();
lcd_testpin(cap.ca); //Pin number 1
lcd_MEM_string(CapZeich); // capacitor sign
#if FLASHEND > 0x1fff
uint8_t present_res; // true, if resistor symbol is shown in Row 1
uint8_t present_esr;
uint8_t present_vloss;
GetVloss();
cap.esr = GetESR(cap.cb, cap.ca); // get ESR of capacitor
present_esr = (cap.esr < 65530);
present_vloss = (cap.v_loss != 0);
#if (LCD_LINES > 2)
present_res = present_esr; // show every time a well ESR value is detected, Vloss extra line
#else
#if FLASHEND > 0x3fff
present_res = (present_esr && (!present_vloss || how));
#else
present_res = (present_esr && (!present_vloss));
#endif
// show Vloss additionally in line 2 , or no Vloss
#endif
if (present_res)
{
lcd_MEM_string(Resistor_str+1); // [=]-
}
#endif /* FLASHEND > 0x1fff */
lcd_testpin(cap.cb); //Pin number 2
#if FLASHEND > 0x1fff
#if FLASHEND > 0x3fff
if (how) {
// Vloss is allways shown in separate line
lcd_spaces(LCD_LINE_LENGTH - 3 - _lcd_column);
lcd_MEM2_string(CMETER_13_str); // "[C]" at the end of line 1
} else {
#endif /* FLASHENF > 0x3fff */
#if (LCD_LINES <= 2) /* Vloss in line 1 */
if (cap.v_loss != 0) {
lcd_MEM_string(VLOSS_str); // " Vloss="
DisplayValue16(cap.v_loss,-1,'%',2);
}
#endif
lcd_clear_line(); // clear to end of line
#if FLASHEND > 0x3fff
} /* end of if (how) */
#endif
#else
lcd_clear_line(); // clear to end of line
#endif /* FLASHEND > 0x1fff */
// - - - - - - - - - - - - - - - - - - - - - -
lcd_line2(); //2. row
DisplayValue(cap.cval_max,cap.cpre_max,'F',4);
#if FLASHEND > 0x1fff
if (present_esr) {
lcd_MEM_string(ESR_str); // " ESR="
DisplayValue16(cap.esr,-2,LCD_CHAR_OMEGA,2);
}
lcd_clear_line();
// - - - - - - - - - - - - - - - - - - - - - -
#if LCD_LINES > 2
lcd_line3();
if (present_vloss ) {
lcd_MEM_string(&VLOSS_str[1]); // "Vloss="
DisplayValue16(cap.v_loss,-1,'%',2);
}
lcd_clear_line();
#else /* only two lines */
#if FLASHEND > 0x3fff
if (how && present_vloss)
#else
if (present_vloss)
#endif
{
lcd_next_line_wait(0); // show vloss after waiting
lcd_MEM_string(&VLOSS_str[1]); // "Vloss="
DisplayValue16(cap.v_loss,-1,'%',2);
lcd_clear_line(); // clear to end of line
}
#endif
#else
lcd_clear_line();
#endif /* FLASHEND > 0x1fff */
} /* end show_cap or show_cap_simple */
void Show_BJT(void)
{
Diode_Type *Diode; /* pointer to diode */
unsigned char *String; /* display string pointer */
uint8_t Counter; /* counter */
uint8_t A_Pin; /* pin acting as anode */
uint8_t C_Pin; /* pin acting as cathode */
uint16_t V_BE; /* V_BE */
int16_t Slope; /* slope of forward voltage */
/*
* Mapping for Semi structure:
* A - Base pin
* B - Collector pin
* C - Emitter pin
* U_1 - U_BE (mV)
* I_1 - I_CE0 (µA)
* F_1 - hFE
*/
/* preset stuff based on BJT type */
if (Check.Type & TYPE_NPN) /* NPN */
{
String = (unsigned char *)NPN_str; /* "NPN" */
/* direction of B-E diode: B -> E */
A_Pin = Semi.A; /* anode at base */
C_Pin = Semi.C; /* cathode at emitter */
}
else /* PNP */
{
String = (unsigned char *)PNP_str; /* "PNP" */
/* direction of B-E diode: E -> B */
A_Pin = Semi.C; /* anode at emitter */
C_Pin = Semi.A; /* cathode at base */
}
/* display type */
LCD_EEString_Space(BJT_str); /* display: BJT */
LCD_EEString(String); /* display: NPN / PNP */
/* parasitic BJT (freewheeling diode on same substrate) */
if (Check.Type & TYPE_PARASITIC)
{
LCD_Char('+');
}
LCD_NextLine(); /* move to line #2 */
/* display pinout */
Show_SemiPinout('B', 'C', 'E');
/* optional freewheeling diode */
if (Check.Diodes > 2) /* transistor is a set of two diodes :-) */
{
Show_FlybackDiode(); /* show diode */
}
LCD_NextLine(); /* next line */
/* display either optional B-E resistor or hFE & V_BE */
if (CheckSingleResistor(C_Pin, A_Pin) == 1) /* found B-E resistor */
{
Show_SingleResistor('B', 'E');
}
else /* no B-E resistor found */
{
/* hFE and V_BE */
/* display hFE */
LCD_EEString_Space(hFE_str); /* display: h_FE */
DisplayValue(Semi.F_1, 0, 0);
/* display V_BE (taken from diode forward voltage) */
Diode = &Diodes[0]; /* get pointer of first diode */
Counter = 0;
while (Counter < Check.Diodes) /* check all diodes */
{
/* if the diode matches the transistor's B-E diode */
if ((Diode->A == A_Pin) && (Diode->C == C_Pin))
{
LCD_NextLine_EEString_Space(V_BE_str); /* display: V_BE */
/*
* Vf is quite linear for a logarithmicly scaled I_b.
* So we may interpolate the Vf values of low and high test current
* measurements for a virtual test current. Low test current is 10µA
* and high test current is 7mA. That's a logarithmic scale of
* 3 decades.
*/
/* calculate slope for one decade */
Slope = Diode->V_f - Diode->V_f2;
Slope /= 3;
/* select V_BE based on hFE */
if (Semi.F_1 < 100) /* low hFE */
{
/*
* BJTs with low hFE are power transistors and need a large I_b
* to drive the load. So we simply take Vf of the high test current
* measurement (7mA).
*/
V_BE = Diode->V_f;
}
else if (Semi.F_1 < 250) /* mid-range hFE */
{
/*
* BJTs with a mid-range hFE are signal transistors and need
* a small I_b to drive the load. So we interpolate Vf for
* a virtual test current of about 1mA.
*/
V_BE = Diode->V_f - Slope;
}
else /* high hFE */
{
/*
* BJTs with a high hFE are small signal transistors and need
* only a very small I_b to drive the load. So we interpolate Vf
* for a virtual test current of about 0.1mA.
*/
V_BE = Diode->V_f2 + Slope;
}
DisplayValue(V_BE, -3, 'V');
Counter = 10; /* end loop */
}
else /* diode doesn't match */
{
Counter++; /* increase counter */
Diode++; /* next one */
}
}
}
/* I_CEO: collector emitter cutoff current (leakage) */
if (Semi.I_1 > 0) /* show if not zero */
{
LCD_NextLine_EEString_Space(I_CEO_str); /* display: I_CE0 */
DisplayValue(Semi.I_1, -6, 'A'); /* display current */
}
}
LRESULT C_SpinButton::OnCommand(UINT nMessage, WPARAM wParam, LPARAM lParam, BOOL& bHandled)
{
C_STLException::install();
try {
if (reinterpret_cast<HWND>(lParam) == m_btnUp.m_hWnd) {
OnInc(0, 0, 0, bHandled);
}
else if (reinterpret_cast<HWND>(lParam) == m_btnDown.m_hWnd) {
OnDec(0, 0, 0, bHandled);
}
else {
float value = m_fValue;
switch (wParam) {
case IDR_MNU_MINUS_2: {
value -= 2;
}
break;
case IDR_MNU_MINUS_5: {
value -= 5;
}
break;
case IDR_MNU_MINUS_10: {
value -= 10;
}
break;
case IDR_MNU_MINUS_15: {
value -= 15;
}
break;
case IDR_MNU_MINUS_20: {
value -= 20;
}
break;
case IDR_MNU_MINUS_50: {
value -= 50;
}
break;
case IDR_MNU_PLUS_2: {
value += 2;
}
break;
case IDR_MNU_PLUS_5: {
value += 5;
}
break;
case IDR_MNU_PLUS_10: {
value += 10;
}
break;
case IDR_MNU_PLUS_15: {
value += 15;
}
break;
case IDR_MNU_PLUS_20: {
value += 20;
}
break;
case IDR_MNU_PLUS_50: {
value += 50;
}
break;
case IDC_BTN_INC: {
value++;
}
break;
case IDC_BTN_DEC: {
value--;
}
break;
default:
return DefWindowProc();
}
if (m_fMinValue == m_fMaxValue) {
InternalSetValue(value);
}
else {
if (value <= m_fMaxValue && value >= m_fMinValue) {
InternalSetValue(value);
}
else if (value > m_fMaxValue) {
InternalSetValue(m_fMaxValue);
}
else if (value < m_fMinValue) {
InternalSetValue(m_fMinValue);
}
}
DisplayValue();
FireChangeMessage();
}
return DefWindowProc();
}
catch (C_STLNonStackException const &exception) {
exception.Log(_T("Exception in C_SpinButton::OnCommand"));
}
return S_OK;
}
int main(void)
{
uint16_t U_Bat; /* voltage of power supply */
uint8_t Test; /* test value */
/*
* init
*/
/* switch on power to keep me alive */
CONTROL_DDR = (1 << POWER_CTRL); /* set pin as output */
CONTROL_PORT = (1 << POWER_CTRL); /* set pin to drive power management transistor */
/* setup MCU */
MCUCR = (1 << PUD); /* disable pull-up resistors globally */
ADCSRA = (1 << ADEN) | ADC_CLOCK_DIV; /* enable ADC and set clock divider */
#ifdef HW_RELAY
/* init relay (safe mode) */
/* ADC_PORT should be 0 */
ADC_DDR = (1 << TP_REF); /* short circuit probes */
#endif
/* catch watchdog */
Test = (MCUSR & (1 << WDRF)); /* save watchdog flag */
MCUSR &= ~(1 << WDRF); /* reset watchdog flag */
wdt_disable(); /* disable watchdog */
/* init LCD module */
LCD_BusSetup(); /* setup bus */
LCD_Init(); /* initialize LCD */
LCD_NextLine_Mode(MODE_NONE); /* reset line mode */
/*
* watchdog was triggered (timeout 2s)
* - This is after the MCU done a reset driven by the watchdog.
* - Does only work if the capacitor at the base of the power management
* transistor is large enough to survive a MCU reset. Otherwise the
* tester simply loses power.
*/
if (Test)
{
LCD_Clear(); /* display was initialized before */
LCD_EEString(Timeout_str); /* display: timeout */
LCD_NextLine_EEString(Error_str); /* display: error */
MilliSleep(2000); /* give user some time to read */
CONTROL_PORT = 0; /* power off myself */
return 0; /* exit program */
}
/*
* operation mode selection
*/
Config.SleepMode = SLEEP_MODE_PWR_SAVE; /* default: power save */
UI.TesterMode = MODE_CONTINOUS; /* set default mode: continous */
Test = 0; /* key press */
/* catch long key press */
if (!(CONTROL_PIN & (1 << TEST_BUTTON))) /* if test button is pressed */
{
RunsMissed = 0;
while (Test == 0)
{
MilliSleep(20);
if (!(CONTROL_PIN & (1 << TEST_BUTTON))) /* if button is still pressed */
{
RunsMissed++;
if (RunsMissed > 100) Test = 3; /* >2000ms */
}
else /* button released */
{
Test = 1; /* <300ms */
if (RunsMissed > 15) Test = 2; /* >300ms */
}
}
}
/* key press >300ms sets autohold mode */
if (Test > 1) UI.TesterMode = MODE_AUTOHOLD;
/*
* load saved offsets and values
*/
if (Test == 3) /* key press >2s resets to defaults */
{
SetAdjustDefaults(); /* set default values */
}
else /* normal mode */
{
LoadAdjust(); /* load adjustment values */
}
/* set extra stuff */
#ifdef SW_CONTRAST
LCD_Contrast(NV.Contrast); /* set LCD contrast */
#endif
/*
* welcome user
*/
LCD_EEString(Tester_str); /* display: Component Tester */
LCD_NextLine_EEString_Space(Edition_str); /* display firmware edition */
LCD_EEString(Version_str); /* display firmware version */
MilliSleep(1500); /* let the user read the display */
/*
* init variables
*/
/* cycling */
RunsMissed = 0;
RunsPassed = 0;
/* default offsets and values */
Config.Samples = ADC_SAMPLES; /* number of ADC samples */
Config.AutoScale = 1; /* enable ADC auto scaling */
Config.RefFlag = 1; /* no ADC reference set yet */
Config.Vcc = UREF_VCC; /* voltage of Vcc */
wdt_enable(WDTO_2S); /* enable watchdog (timeout 2s) */
/*
* main processing cycle
*/
start:
/* reset variabels */
Check.Found = COMP_NONE;
Check.Type = 0;
Check.Done = 0;
Check.Diodes = 0;
Check.Resistors = 0;
Semi.U_1 = 0;
Semi.I_1 = 0;
Semi.F_1 = 0;
/* reset hardware */
ADC_DDR = 0; /* set all pins of ADC port as input */
/* also remove short circuit by relay */
LCD_NextLine_Mode(MODE_KEEP); /* line mode: keep first line */
LCD_Clear(); /* clear LCD */
/*
* voltage reference
*/
#ifdef HW_REF25
/* external 2.5V reference */
Config.Samples = 200; /* do a lot of samples for high accuracy */
U_Bat = ReadU(TP_REF); /* read voltage of reference (mV) */
Config.Samples = ADC_SAMPLES; /* set samples back to default */
if ((U_Bat > 2250) && (U_Bat < 2750)) /* check for valid reference */
{
uint32_t Temp;
/* adjust Vcc (assuming 2.495V typically) */
Temp = ((uint32_t)Config.Vcc * UREF_25) / U_Bat;
Config.Vcc = (uint16_t)Temp;
}
#endif
/* internal bandgap reference */
Config.Bandgap = ReadU(0x0e); /* dummy read for bandgap stabilization */
Config.Samples = 200; /* do a lot of samples for high accuracy */
Config.Bandgap = ReadU(0x0e); /* get voltage of bandgap reference (mV) */
Config.Samples = ADC_SAMPLES; /* set samples back to default */
Config.Bandgap += NV.RefOffset; /* add voltage offset */
/*
* battery check
*/
/*
* ADC pin is connected to a voltage divider Rh = 10k and Rl = 3k3.
* Ul = (Uin / (Rh + Rl)) * Rl -> Uin = (Ul * (Rh + Rl)) / Rl
* Uin = (Ul * (10k + 3k3)) / 3k3 = 4 * Ul
*/
/* get current voltage */
U_Bat = ReadU(TP_BAT); /* read voltage (mV) */
U_Bat *= 4; /* calculate U_bat (mV) */
U_Bat += BAT_OFFSET; /* add offset for voltage drop */
/* display battery voltage */
LCD_EEString_Space(Battery_str); /* display: Bat. */
DisplayValue(U_Bat / 10, -2, 'V'); /* display battery voltage */
LCD_Space();
/* check limits */
if (U_Bat < BAT_POOR) /* low level reached */
{
LCD_EEString(Low_str); /* display: low */
MilliSleep(2000); /* let user read info */
goto power_off; /* power off */
}
else if (U_Bat < BAT_POOR + 1000) /* warning level reached */
{
LCD_EEString(Weak_str); /* display: weak */
}
else /* ok */
{
LCD_EEString(OK_str); /* display: ok */
}
/*
* probing
*/
/* display start of probing */
LCD_NextLine_EEString(Running_str); /* display: probing... */
/* try to discharge any connected component */
DischargeProbes();
if (Check.Found == COMP_ERROR) /* discharge failed */
{
goto result; /* skip all other checks */
}
/* enter main menu if requested by short-circuiting all probes */
if (AllProbesShorted() == 3)
{
MainMenu(); /* enter mainmenu */;
goto end; /* new cycle after job is is done */
}
/* check all 6 combinations of the 3 probes */
CheckProbes(TP1, TP2, TP3);
CheckProbes(TP2, TP1, TP3);
CheckProbes(TP1, TP3, TP2);
CheckProbes(TP3, TP1, TP2);
CheckProbes(TP2, TP3, TP1);
CheckProbes(TP3, TP2, TP1);
/* if component might be a capacitor */
if ((Check.Found == COMP_NONE) ||
(Check.Found == COMP_RESISTOR))
{
/* tell user to be patient with large caps :-) */
LCD_Space();
LCD_Char('C');
/* check all possible combinations */
MeasureCap(TP3, TP1, 0);
MeasureCap(TP3, TP2, 1);
MeasureCap(TP2, TP1, 2);
}
/*
* output test results
*/
result:
LCD_Clear(); /* clear LCD */
LCD_NextLine_Mode(MODE_KEEP | MODE_KEY);
/* call output function based on component type */
switch (Check.Found)
{
case COMP_ERROR:
Show_Error();
goto end;
break;
case COMP_DIODE:
Show_Diode();
break;
case COMP_BJT:
Show_BJT();
break;
case COMP_FET:
Show_FET();
break;
case COMP_IGBT:
Show_IGBT();
break;
case COMP_THYRISTOR:
Show_Special();
break;
case COMP_TRIAC:
Show_Special();
break;
case COMP_RESISTOR:
Show_Resistor();
break;
case COMP_CAPACITOR:
Show_Capacitor();
break;
default: /* no component found */
Show_Fail();
goto end;
}
/* component was found */
RunsMissed = 0; /* reset counter */
RunsPassed++; /* increase counter */
/*
* take care about cycling and power-off
*/
end:
#ifdef HW_RELAY
ADC_DDR = (1<<TP_REF); /* short circuit probes */
#endif
LCD_NextLine_Mode(MODE_NONE); /* reset next line mode */
/* get key press or timeout */
Test = TestKey((uint16_t)CYCLE_DELAY, 12);
if (Test == 0) /* timeout (no key press) */
{
/* check if we reached the maximum number of rounds (continious mode only) */
if ((RunsMissed >= CYCLE_MAX) || (RunsPassed >= CYCLE_MAX * 2))
{
goto power_off; /* -> power off */
}
}
else if (Test == 1) /* short key press */
{
/* a second key press triggers extra functions */
MilliSleep(50);
Test = TestKey(300, 0);
if (Test > 0) /* short or long key press */
{
#ifdef HW_RELAY
ADC_DDR = 0; /* remove short circuit */
#endif
MainMenu(); /* enter main menu */
goto end; /* re-run cycle control */
}
}
else if (Test == 2) /* long key press */
{
goto power_off; /* -> power off */
}
#ifdef HW_ENCODER
else if (Test == 4) /* rotary encoder: left turn */
{
MainMenu(); /* enter main menu */
goto end; /* re-run cycle control */
}
#endif
/* default action (also for rotary encoder) */
goto start; /* -> next round */
power_off:
/* display feedback (otherwise the user will wait :-) */
LCD_Clear();
LCD_EEString(Bye_str);
wdt_disable(); /* disable watchdog */
CONTROL_PORT &= ~(1 << POWER_CTRL); /* power off myself */
return 0;
}
void show_resis(byte pin1, byte pin2, byte how)
// can be invoked both from main() and from show_Resis13()
// pin1 and pin2 are resistor's pin numbers, but ResistorList[0] should also be correctly filled
// assumes resistance has already been measured, but will do inductance measurements as appropriate
// "how" flag tells how to show the results: if set [R] or [RL] will be shown in top right corner
{
#ifdef RMETER_WITH_L
lcd_testpin(pin1);
lcd_MEM_string(Resistor_str); // -[==]-
lcd_refresh();
ReadInductance(); // measure inductance, possible only with R<2.1k
#ifdef SamplingADC
sampling_lc(pin1,pin2); // measure inductance using resonance method
// draw first line: the pin numbers, RR and possibly LL symbol, and possibly [R] or [RL]
byte lclx0=(lc_lx==0);
if (inductor_lpre < 0 || !lclx0)
#else
if (inductor_lpre < 0)
#endif
{
lcd_MEM_string(Inductor_str+1); // "LL-"
}
lcd_testpin(pin2);
// second line: measured R value (but that goes on first line if lc_lx!=0), and measured inductance, if applicable
#ifdef SamplingADC
if (!lclx0) { /* inductance measured by sampling method */
lcd_space();
RvalOut(ResistorList[0]); // show Resistance, probably ESR, still on first line
}
#endif
#if FLASHEND > 0x3fff
if (how) {
// still need to write "[RL]" or "[R]" at the end of first line, if it fits
if (_lcd_column<=LCD_LINE_LENGTH-4) {
lcd_MEM_string(RL_METER_str+(_lcd_column-6)); // " [R]" or "[RL]"
}
}
#else
lcd_clear_line();
#endif
lcd_line2();
#ifdef SamplingADC
if (!lclx0) { /* Frequency found */
// lcd_next_line(0);
DisplayValue(lc_lx,lc_lpre,'H',3); // output inductance
lcd_MEM2_string(iF_str); // " if "
uint16_t lc_cpar; // value of parallel capacitor used for calculating inductance, in pF
lc_cpar=eeprom_read_word((uint16_t *)&lc_cpar_ee);
#if (LCD_LINES<3) && (LCD_LINE_LENGTH<17)
DisplayValue16(lc_cpar,-12,'F',2); // on 2-line dispaly show parallel capacitance with only 2 digits to make room for the '+' sign at the end of the line
#else
DisplayValue16(lc_cpar,-12,'F',3); // show parallel capacitance
#endif
} else
#endif
{
// lcd_next_line_wait(0);
RvalOut(ResistorList[0]); // show Resistance, probably ESR
if (inductor_lpre < -2) {
// resistor has also inductance
lcd_MEM_string(Lis_str); // "L="
DisplayValue(inductor_lx,inductor_lpre,'H',3); // output classic inductance
}
}
// third line: measured resonance frequency and Q, if applicable
#ifdef SamplingADC
if (lc_fx) {
lcd_next_line_wait(0);
DisplayValue(lc_fx,lc_fpre,'H',4);
lcd_MEM2_string(zQ_str); // "z Q="
DisplayValue16(lc_qx, lc_qpre,' ',3);
lcd_clear_line();
} else {
// #if LCD_LINES>2
// // make sure we clean the third line, but only if the display actually has a 3rd line
// lcd_next_line(0);
// #endif
lcd_next_line(0);
if (last_line_used == 0) {
lcd_clear_line();
}
}
#endif
#else /* without Inductance measurement, only show resistance */
lcd_line2();
inductor_lpre = -1; // prevent ESR measurement because Inductance is not tested
RvalOut(ResistorList[0]); // show Resistance, no ESR
#endif
}
/* *************************************************** */
void do_10bit_PWM() {
uint8_t key_pressed;
uint8_t percent; // requestet duty-cycle in %
uint8_t old_perc; // old duty-cycle in %
unsigned int pwm_flip; // value for counter to flip the state
message_key_released(PWM_10bit_str); // display PWM-Generator and wait for key released
// OC1B is connected with 680 Ohm resistor to TP2 (middle test pin)
TCCR1A = (1<<COM1B1) | (0<<COM1B0) | (1<<WGM11) | (1<<WGM10); // fast PWM mode, count to 10 bit
TIMSK1 = 0; // no interrupt used
OCR1A = 1; // highest frequency
OCR1B = 0xff; // toggle OC1B at this count
TIFR1 = (1<<OCF1A) | (1<<OCF1A) | (1<<TOV1); // reset interrupt flags
TCCR1C = 0;
R_PORT = 0; // set all resistor port outputs to GND
#if PROCESSOR_TYP == 644
R_DDR = (1<<PIN_RL1) | (1<<PIN_RL2) | (1<<PIN_RL3); // set TP1, DDD4(TP2) and TP3 to output
#else
R_DDR = (1<<PIN_RL1) | (1<<PIN_RL3); // set TP1 and TP3 to output
#endif
ADC_PORT = TXD_VAL;
ADC_DDR = (1<<TP1) | TXD_MSK; //connect TP1 to GND
DDRB |= (1<<DDB2); // set output enable
TCCR1B = (0<<WGM13) | (1<<WGM12) | (0<<CS12) | (0<<CS11) | (1<<CS10); // no clock divide
key_pressed = 0;
old_perc = 0;
percent = 10;
#ifdef POWER_OFF
uint8_t times; // time limit
for (times=0; times<240; times++)
#else
while (1) /* wait endless without option POWER_OFF */
#endif
{
if (percent != old_perc) {
// new duty cycle is requested
if (percent >= 100) {
percent -= 100; //reset to 0 percent or higher
}
pwm_flip = (((unsigned long)0x3ff * percent) + 50) / 100;
OCR1B = pwm_flip; // new percentage
lcd_line2(); // set cursor to begin of line 2
lcd_clear_line(); // clear line 2
lcd_line2(); // set cursor to row 1 of line 2
DisplayValue((((unsigned long)pwm_flip * 1000) + 0x1ff) / 0x3ff,-1,'%',5);
#if 0
lcd_space();
if (rotary.count >= 0) { // actual count for debugging
lcd_data('+');
lcd_data('0'+rotary.count);
} else {
lcd_data('-');
lcd_data('0'-rotary.count);
}
lcd_line3();
uint8_t kk;
kk = (rotary.ind + 1) & ROT_MSK;
do {
lcd_data('0'+rotary.state[kk]); // debugging output of rotary state
kk = (kk + 1) & ROT_MSK;
} while (kk != rotary.ind);
#endif
old_perc = percent; // update the old duty cycle
if (key_pressed > 40) {
wait_about300ms(); // wait some time to release the button
}
} /* end if percent != old_perc */
key_pressed = wait_for_key_ms(1600);
if(key_pressed > 130) break; // more than 1.3 seconds
#ifdef WITH_ROTARY_SWITCH
if (rotary.incre > FAST_ROTATION) break; // fast rotation ends voltage measurement
if (rotary.count >= 0) {
percent += rotary.count; // increase the duty cycle by rotary.count
} else {
percent += (100 + rotary.count); // decrease the duty cycle by rotary.count
}
#endif
if (key_pressed > 50) {
percent += 10; // duty cycle will be increased with 10
} else {
if (key_pressed > 0) percent += 1; // duty cycle will be increased with 1
}
#ifdef POWER_OFF
#ifdef WITH_ROTARY_SWITCH
if ((key_pressed > 0) || (rotary.incre > 0)) times = 0; // reset the loop counter, operator is active
#else
if (key_pressed > 0) times = 0; //reset the loop counter, operator is active
#endif
#endif
} /* end for times */
ADC_DDR = TXD_MSK; // disconnect TP1
TCCR1B = 0; // stop counter
TCCR1A = 0; // stop counter
R_DDR = 0; // switch resistor ports to Input
DDRB &= ~(1<<DDB2); // disable output
} /* end do_10bit_PWM */
//=================================================================
void ReadInductance(void) {
#if FLASHEND > 0x1fff
// check if inductor and measure the inductance value
unsigned int tmpint;
unsigned int umax;
unsigned int total_r; // total resistance of current loop
unsigned int mess_r; // value of resistor used for current measurement
unsigned long inductance[4]; // four inductance values for different measurements
union t_combi{
unsigned long dw; // time_constant
uint16_t w[2];
} timeconstant;
uint16_t per_ref1,per_ref2; // percentage
uint8_t LoPinR_L; // Mask for switching R_L resistor of low pin
uint8_t HiADC; // Mask for switching the high pin direct to VCC
uint8_t ii;
uint8_t count; // counter for the different measurements
uint8_t cnt_diff; // resistance dependent offset
uint8_t LowPin; // number of pin with low voltage
uint8_t HighPin; // number of pin with high voltage
int8_t ukorr; // correction of comparator voltage
uint8_t nr_pol1; // number of successfull inductance measurement with polarity 1
uint8_t nr_pol2; // number of successfull inductance measurement with polarity 2
inductor_lpre = 0; // H units, mark inductor as 0
if(PartFound != PART_RESISTOR) {
return; //We have found no resistor
}
if (ResistorsFound != 1) {
return; // do not search for inductance, more than 1 resistor
}
if (resis[0].rx > 21000) return;
// we can check for Inductance, if resistance is below 2100 Ohm
for (count=0;count<4;count++) {
// Try four times (different direction and with delayed counter start)
if (count < 2) {
// first and second pass, direction 1
LowPin = resis[0].ra;
HighPin = resis[0].rb;
} else {
// third and fourth pass, direction 2
LowPin = resis[0].rb;
HighPin = resis[0].ra;
}
HiADC = pgm_read_byte(&PinADCtab[HighPin]); // Table of ADC Pins including | TXD_VAL
LoPinR_L = pgm_read_byte(&PinRLtab[LowPin]); //R_L mask for HighPin R_L load
//==================================================================================
// Measurement of Inductance values
R_PORT = 0; // switch R port to GND
ADC_PORT = TXD_VAL; // switch ADC-Port to GND
if ((resis[0].rx < 240) && ((count & 0x01) == 0)) {
// we can use PinR_L for measurement
mess_r = RR680MI - R_L_VAL; // use only pin output resistance
ADC_DDR = HiADC | (1<<LowPin) | TXD_MSK; // switch HiADC and Low Pin to GND,
} else {
R_DDR = LoPinR_L; // switch R_L resistor port for LowPin to output (GND)
ADC_DDR = HiADC | TXD_MSK; // switch HiADC Pin to GND
mess_r = RR680MI; // use 680 Ohm and PinR_L for current measurement
}
// Look, if we can detect any current
for (ii=0;ii<20;ii++) {
// wait for current is near zero
umax = W10msReadADC(LowPin);
total_r = ReadADC(HighPin);
if ((umax < 2) && (total_r < 2)) break; // low current detected
}
// setup Analog Comparator
ADC_COMP_CONTROL = (1<<ACME); //enable Analog Comparator Multiplexer
ACSR = (1<<ACBG) | (1<<ACI) | (1<<ACIC); // enable, 1.3V, no Interrupt, Connect to Timer1
ADMUX = (1<<REFS0) | LowPin; // switch Mux to Low-Pin
ADCSRA = (1<<ADIF) | AUTO_CLOCK_DIV; //disable ADC
// setup Counter1
timeconstant.w[1] = 0; // set ov counter to 0
TCCR1A = 0; // set Counter1 to normal Mode
TCNT1 = 0; //set Counter to 0
TI1_INT_FLAGS = (1<<ICF1) | (1<<OCF1B) | (1<<OCF1A) | (1<<TOV1); // reset TIFR or TIFR1
// HiADC |= TXD_VAL;
wait200us(); // wait for bandgap to start up
if ((count & 0x01) == 0 ) {
//first start counter, then start current
TCCR1B = (1<<ICNC1) | (0<<ICES1) | (1<<CS10); //start counter 1MHz or 8MHz
ADC_PORT = HiADC; // switch ADC-Port to VCC
} else {
//first start current, then start counter with delay
//parasitic capacity of coil can cause high current at the beginning
ADC_PORT = HiADC; // switch ADC-Port to VCC
#if F_CPU >= 8000000UL
wait3us(); // ignore current peak from capacity
#else
wdt_reset(); // delay
wdt_reset(); // delay
#endif
TI1_INT_FLAGS = (1<<ICF1); // Reset Input Capture
TCCR1B = (1<<ICNC1) | (0<<ICES1) | (1<<CS10); //start counter 1MHz or 8MHz
}
//******************************
while(1) {
// Wait, until Input Capture is set
ii = TI1_INT_FLAGS; //read Timer flags
if (ii & (1<<ICF1)) {
break;
}
if((ii & (1<<TOV1))) { // counter overflow, 65.536 ms @ 1MHz, 8.192ms @ 8MHz
TI1_INT_FLAGS = (1<<TOV1); // Reset OV Flag
wdt_reset();
timeconstant.w[1]++; // count one OV
if(timeconstant.w[1] == (F_CPU/100000UL)) {
break; //Timeout for Charging, above 0.13 s
}
}
}
TCCR1B = (0<<ICNC1) | (0<<ICES1) | (0<<CS10); // stop counter
TI1_INT_FLAGS = (1<<ICF1); // Reset Input Capture
timeconstant.w[0] = ICR1; // get previous Input Capture Counter flag
// check actual counter, if an additional overflow must be added
if((TCNT1 > timeconstant.w[0]) && (ii & (1<<TOV1))) {
// this OV was not counted, but was before the Input Capture
TI1_INT_FLAGS = (1<<TOV1); // Reset OV Flag
timeconstant.w[1]++; // count one additional OV
}
ADC_PORT = TXD_VAL; // switch ADC-Port to GND
ADCSRA = (1<<ADEN) | (1<<ADIF) | AUTO_CLOCK_DIV; //enable ADC
for (ii=0;ii<20;ii++) {
// wait for current is near zero
umax = W10msReadADC(LowPin);
total_r = ReadADC(HighPin);
if ((umax < 2) && (total_r < 2)) break; // low current detected
}
#define CNT_ZERO_42 6
#define CNT_ZERO_720 7
//#if F_CPU == 16000000UL
// #undef CNT_ZERO_42
// #undef CNT_ZERO_720
// #define CNT_ZERO_42 7
// #define CNT_ZERO_720 10
//#endif
total_r = (mess_r + resis[0].rx + RRpinMI);
// cnt_diff = 0;
// if (total_r > 7000) cnt_diff = 1;
// if (total_r > 14000) cnt_diff = 2;
cnt_diff = total_r / ((14000UL * 8) / (F_CPU/1000000UL));
tmpint = ref_mv_offs; // corrected reference voltage (for C)
if (mess_r < R_L_VAL) {
// measurement without 680 Ohm
cnt_diff = CNT_ZERO_42;
if (timeconstant.dw < 225) {
ukorr = (timeconstant.w[0] / 5) - 20;
} else {
ukorr = 25;
}
tmpint -= (((REF_L_KORR * 10) / 10) + ukorr);
} else {
// measurement with 680 Ohm resistor
// if 680 Ohm resistor is used, use REF_L_KORR for correction
cnt_diff += CNT_ZERO_720;
tmpint += REF_L_KORR;
}
if (timeconstant.dw > cnt_diff) timeconstant.dw -= cnt_diff;
else timeconstant.dw = 0;
if ((count&0x01) == 1) {
// second pass with delayed counter start
timeconstant.dw += (3 * (F_CPU/1000000UL))+10;
}
if (timeconstant.w[1] >= (F_CPU/100000UL)) timeconstant.dw = 0; // no transition found
if (timeconstant.dw > 10) {
timeconstant.dw -= 1;
}
// compute the maximum Voltage umax with the Resistor of the coil
umax = ((unsigned long)mess_r * (unsigned long)ADCconfig.U_AVCC) / total_r;
per_ref1 = ((unsigned long)tmpint * 1000) / umax;
// per_ref2 = (uint8_t)MEM2_read_byte(&LogTab[per_ref1]); // -log(1 - per_ref1/100)
per_ref2 = get_log(per_ref1); // -log(1 - per_ref1/1000)
/* ********************************************************* */
#if 0
if (count == 0) {
lcd_line3();
DisplayValue(count,0,' ',4);
DisplayValue(timeconstant.dw,0,'+',4);
DisplayValue(cnt_diff,0,' ',4);
DisplayValue(total_r,-1,'r',4);
lcd_space();
DisplayValue(per_ref1,-1,'%',4);
lcd_line4();
DisplayValue(tmpint,-3,'V',4);
lcd_space();
DisplayValue(umax,-3,'V',4);
lcd_space();
DisplayValue(per_ref2,-1,'%',4);
wait_about4s();
wait_about2s();
}
#endif
/* ********************************************************* */
// inductor_lx in 0.01mH units, L = Tau * R
per_ref1 = ((per_ref2 * (F_CPU/1000000UL)) + 5) / 10;
inductance[count] = (timeconstant.dw * total_r ) / per_ref1;
if (((count&0x01) == 0) && (timeconstant.dw > ((F_CPU/1000000UL)+3))) {
// transition is found, measurement with delayed counter start is not necessary
inductance[count+1] = inductance[count]; // set delayed measurement to same value
count++; // skip the delayed measurement
}
wdt_reset();
} //end for count
ADC_PORT = TXD_VAL; // switch ADC Port to GND
wait_about20ms();
nr_pol1 = 0;
if (inductance[1] > inductance[0]) { nr_pol1 = 1; }
nr_pol2 = 2;
if (inductance[3] > inductance[2]) { nr_pol2 = 3; }
if (inductance[nr_pol2] < inductance[nr_pol1]) nr_pol1 = nr_pol2;
inductor_lx = inductance[nr_pol1];
inductor_lpre = -5; // 10 uH units
if (((nr_pol1 & 1) == 1) || (resis[0].rx >= 240)) {
// with 680 Ohm resistor total_r is more than 7460
inductor_lpre = -4; // 100 uH units
inductor_lx = (inductor_lx + 5) / 10;
}
if (inductor_lx == 0) inductor_lpre = 0; //mark as zero
// switch all ports to input
ADC_DDR = TXD_MSK; // switch all ADC ports to input
R_DDR = 0; // switch all resistor ports to input
#endif
return;
} // end ReadInductance()
void GetFrequency(uint8_t range) {
unsigned char taste; // set if key is pressed during measurement
#if PROCESSOR_TYP == 644
unsigned long freq_count; // the counted pulses in 1 second
#endif
unsigned long long ext_period;
unsigned long freq_from_per;
uint8_t ii;
uint8_t mm;
/* range has set the lowest bit to use the 16:1 frequency divider permanently. */
/* The upper bits of range specifies the input selection. */
/* 0 = external input, 2 = channel 2, 4 = HF Quartz, 6 = LF Quartz */
#if PROCESSOR_TYP == 644
FDIV_DDR |= (1<<FDIV_PIN); //switch to output
if ((range & 0x01) == 0) {
FDIV_PORT &= ~(1<<FDIV_PIN); // switch off the 16:1 divider
} else {
FDIV_PORT |= (1<<FDIV_PIN); // use frequency divider for next measurement
}
FINP_DDR |= (1<<FINP_P0) | (1<<FINP_P1); // switch both pins to output
FINP_PORT &= ~(1<<FINP_P0); // clear lower bit of input selection
FINP_PORT &= ~(1<<FINP_P1); // clear higher bit of input selection
if (range == 0) {
message_key_released(FREQ_str); // Frequency: in line 1
} else if (range == 1) {
message_key_released(HFREQ_str); // High Frequency: in line 1
} else if (range < 4) { /* 2+3 */
FINP_PORT |= (1<<FINP_P0); // set lower bit of input selection
FINP_PORT &= ~(1<<FINP_P1); // clear higher bit of input selection
} else if (range < 6) { /* 4+5 */
FINP_PORT &= ~(1<<FINP_P0); // clear lower bit of input selection
FINP_PORT |= (1<<FINP_P1); // set higher bit of input selection
message_key_released(H_CRYSTAL_str); // HF Quarz: in line 1
} else { /* 6+7 */
FINP_PORT |= (1<<FINP_P0); // set lower bit of input selection
FINP_PORT |= (1<<FINP_P1); // set higher bit of input selection
message_key_released(L_CRYSTAL_str); // LF Quarz: in line 1
}
#else
message_key_released(FREQ_str); // Frequency: in line 1
#endif
taste = 0; // reset flag for key pressed
for (mm=0;mm<240;mm++) {
// *************************************************************************
// *********** straight frequency measurement by counting 1 second *********
// *************************************************************************
//set up Counter 0
// Counter 0 is used to count the external signal connected to T0 (PD4 or PB0)
FREQINP_DDR &= ~(1<<FREQINP_PIN); // switch frequency pin to input
wait1ms(); // let capacitor time to load to 2.4V input
#if PROCESSOR_TYP == 1280
TCCR3A = 0; // normal operation, no output
TCNT3 = 0; // set counter 3 to zero
ext_freq.dw = 0; // set external frequency to zero
TIFR3 = (1<<TOV3); // clear OV interrupt of timer 3
TIMSK3 = (1<<TOIE3); // enable OV interrupt of timer 3
#else
TCCR0A = 0; // normal operation, no output
TCNT0 = 0; // set counter to zero
ext_freq.dw = 0; // set external frequency to zero
TIFR0 = (1<<TOV0); // clear OV interrupt of timer 0
TIMSK0 = (1<<TOIE0); // enable OV interrupt of timer 0
#endif
// start counter after starting second counter timer 1
// set up counter 1 to measure one second
TCCR1A = 0; // normal operation
#define CNT1_END_VAL ((F_CPU / 256UL) + 1)
#define CNT1_DIVIDER (1<<CS12)
#if CNT1_END_VAL > 0xffff
#undef CNT1_END_VAL
#undef CNT1_DIVIDER
#define CNT1_END_VAL ((F_CPU / 1024UL) + 1)
#define CNT1_DIVIDER ((1<<CS12) | (1<<CS10))
#if F_CPU != ((F_CPU / 1024UL) * 1024UL)
#warning F_CPU can not be divided by 1024, measured frequency is wrong!
#endif
#else
#if F_CPU != ((F_CPU / 256UL) * 256UL)
#warning F_CPU can not be divided by 256, measured frequency is wrong!
#endif
#endif
OCR1B = CNT1_END_VAL; // set to 1 second (counter 0 is started with 1)
OCR1A = 1; // start counter 0 with first count
TCNT1 = 0; // set counter to zero
GTCCR |= (1<<PSRSYNC); // reset clock precounter
TIFR1 = (1<<OCF1B) | (1<<OCF1A); // clear Output compare match
TIMSK1 = (1<<OCIE1B) | (1<<OCIE1A); // enable the Compare A match and Compare B match interrupt
sei(); // set interrupt enable
TCCR1B = CNT1_DIVIDER; // divide CPU clock by 256, start counter
// both counter are running now, wait for counter 1 reach OCR1A
for (ii=0;ii<50;ii++) {
wait20ms(); // first count of counter 1 (<32us) has started the counter 0
wdt_reset();
if (!(RST_PIN_REG & (1<<RST_PIN))) taste = 1; // user request stop of operation
#if PROCESSOR_TYP == 1280
if (TCCR3B == 0) break; // timer 3 is stopped by interrupt
#else
if (TCCR0B == 0) break; // timer 0 is stopped by interrupt
#endif
}
// one second is counted
#if PROCESSOR_TYP == 1280
TCCR3B = 0; // stop timer 3, if not stopped by timer 1 compare interrupt
ext_freq.w[0] = TCNT3; // add lower 16 bit to get total counts
#else
TCCR0B = 0; // stop timer 0, if not stopped by timer 1 compare interrupt
ext_freq.b[0] = TCNT0; // add lower 8 bit to get total counts
#endif
#if PROCESSOR_TYP == 644
freq_count = ext_freq.dw; // save the frequency counter
#endif
#if (LCD_LINES > 3)
lcd_line3();
lcd_clear_line();
lcd_line4();
lcd_clear_line();
lcd_clear_line2();
#else
lcd_clear(); // clear total display
#endif
lcd_data('f');
lcd_equal(); // lcd_data('=');
#if PROCESSOR_TYP == 644
if ((FDIV_PORT&(1<<FDIV_PIN)) == 0) {
Display_Hz(ext_freq.dw, 7);
} else {
// frequency divider is activ
Display_Hz(ext_freq.dw*FREQ_DIV, 7);
}
#else
Display_Hz(ext_freq.dw, 7);
#endif
#if PROCESSOR_TYP == 644
lcd_space();
if ((FDIV_PORT&(1<<FDIV_PIN)) != 0) {
lcd_data('/'); // Frequency divider is activ
} else {
lcd_space(); // Frequency divider is not activ
}
#endif
FREQINP_DDR &= ~(1<<FREQINP_PIN); // switch frequency pin to input
if (TCCR1B != 0) {
// Exact 1000ms period is only with "end of period" from timer1 interrupt.
// When stopped with the for loop, the time is too long because wait call does not
// respect CPU time used for interrupts and loop itself.
// For this case show ? behind the Hz.
lcd_data('?');
}
TCCR1B = 0; // stop timer 1
TIMSK1 = 0; // disable all timer 1 interrupts
if ((ext_freq.dw < FMAX_PERIOD) && (ext_freq.dw > 0)) {
// *************************************************************************
// ******** Period measurement by counting some periods ********************
// *************************************************************************
pinchange_max = ((10 * (unsigned long)ext_freq.dw) + MHZ_CPU) / MHZ_CPU; // about 10000000 clock tics
pinchange_max += pinchange_max; // * 2 for up and down change
FREQINP_DDR &= ~(1<<FREQINP_PIN); // switch frequency pin to input
wait1ms(); // let capacitor time to load to 2.4V input
#if PROCESSOR_TYP == 1280
TCNT3 = 0; // set counter 3 to zero
ext_freq.dw = 0; // reset counter to zero
TIFR3 = (1<<TOV3); // clear OV interrupt
TIMSK3 = (1<<TOIE3); // enable OV interrupt
// counter 3 ist started with first pin change interrupt
pinchange_count = 0;
EICRB = (0<<ISC61) | (1<<ISC60); // set int6 pin change
EIFR |= (1<<INTF6); // clear interrupt 6 flag
PCMSK_FREQ |= (1<<PCINT_FREQ); // enable int6
#else
TCNT0 = 0; // set counter 0 to zero
ext_freq.dw = 0; // reset counter to zero
TIFR0 = (1<<TOV0); // clear OV interrupt
TIMSK0 = (1<<TOIE0); // enable OV interrupt
// counter 0 ist started with first pin change interrupt
pinchange_count = 0;
PCIFR = (1<<PCI_CLEAR_BIT); // clear Pin Change Status
PCICR |= (1<<PCI_ENABLE_BIT); // enable pin change interrupt
#endif
sei();
PCMSK_FREQ |= (1<<PCINT_FREQ); // monitor PD4 PCINT20 or PB0 PCINT8 pin change
for (ii=0;ii<250;ii++) {
wait20ms();
wdt_reset();
if (!(RST_PIN_REG & (1<<RST_PIN))) taste = 1; // user request stop of operation
if ((PCMSK_FREQ & (1<<PCINT_FREQ)) == 0) break; // monitoring is disabled by interrupt
} /* end for ii */
#if PROCESSOR_TYP == 1280
TCCR3B = 0; // stop counter 3
PCMSK_FREQ &= ~(1<<PCINT_FREQ); // disable int6
ext_freq.w[0] = TCNT3; // add lower 16 bit to get total counts
#else
TCCR0B = 0; // stop counter 0
PCMSK_FREQ &= ~(1<<PCINT_FREQ); // stop monitor PD4 PCINT20 or PB0 PCINT8 pin change
PCICR &= ~(1<<PCI_ENABLE_BIT); // disable the interrupt
ext_freq.b[0] = TCNT0; // add lower 8 bit to get total counts
#endif
// lcd_clear_line2();
// wait50ms(); // let LCD flicker to
#if (LCD_LINES > 3)
lcd_line3(); // use line3 to report the period with 4-line LCD
#else
lcd_line2(); // report period on line 2 of 2-line LCD
#endif
lcd_data('T');
lcd_equal(); // lcd_data('=');
ext_period = ((unsigned long long)ext_freq.dw * (200000/MHZ_CPU)) / pinchange_max;
#if PROCESSOR_TYP == 644
if ((FDIV_PORT&(1<<FDIV_PIN)) != 0) {
// frequency divider is activ, period is measured too long
ext_period = ext_period / FREQ_DIV;
}
#endif
if (pinchange_max > 127) {
DisplayValue(ext_period,-11,'s',7); // show period converted to 0.01ns units
} else {
//prevent overflow of 32-Bit
DisplayValue((unsigned long)(ext_period/100),-9,'s',7); // show period converted to 1ns units
}
if (ii == 250) {
lcd_data('?'); // wait loop has regular finished
} else {
if (ext_period > 249500) {
#if (LCD_LINES > 3)
lcd_line4(); // use line 4 of 4-line LCD to report the computed frequency
#else
lcd_line1(); // overwrite line 1 of 2-line LCD to report the computed frequency
#endif
lcd_data('f');
lcd_equal(); // lcd_data('=');
if (ext_period > 1000000000) {
// frequency in 0.000001Hz (1e11*1e6)/(0.01ns count)
freq_from_per = (unsigned long long)(100000000000000000) / ext_period;
DisplayValue(freq_from_per,-6,'H',7); // display with 0.000001 Hz resolution
} else {
// prevent unsigned long overflow, scale to 0.0001 Hz
// frequency in 0.0001Hz (1e11*1e4)/(0.01ns count)
freq_from_per = (unsigned long long)(1000000000000000) / ext_period;
DisplayValue(freq_from_per,-4,'H',7); // display with 0.0001 Hz resolution
}
lcd_data('z');
FREQINP_DDR &= ~(1<<FREQINP_PIN); // switch frequency pin to input
}
}
} /* end if 1 < ext_freq < FMAX_PERIOD */
#if PROCESSOR_TYP == 644
if ((FDIV_PORT & (1<<FDIV_PIN)) == 0) {
// frequency divider is not activ
if ( ((freq_count >= FMAX_PERIOD) && (freq_count < ((unsigned long)FMAX_PERIOD*FREQ_DIV))) ||
(freq_count > FMAX_INPUT) ){
FDIV_PORT |= (1<<FDIV_PIN); // use frequency divider for next measurement
}
} else {
// frequency divider is activ
if ((freq_count < (FMAX_PERIOD/FREQ_DIV)) && ((range & 0x01) == 0)) {
FDIV_PORT &= ~(1<<FDIV_PIN); // switch off the 16:1 divider
}
}
#endif
// taste += wait_for_key_ms(SHORT_WAIT_TIME/2);
TIMSK0 = 0; // disable all timer 0 interrupts
taste += wait_for_key_ms(2000);
#ifdef WITH_ROTARY_SWITCH
if ((taste != 0) || (rotary.incre > 2)) break;
#else
if (taste != 0) break;
#endif
} /* end for mm */
return;
} // end GetFrequency()
void AutoCheck(uint8_t test_mode) {
/* (test_mode & 0x0f) == 0 , only calibration without T1-T7 */
/* (test_mode & 0x0f) == 1 , calibration and additional T1-T7 */
/* (test_mode & 0xf0) == 0 , check for shorted probes, if unshorted, return */
/* (test_mode & 0xf0) == 0x10 , ask for shorted probes */
uint8_t ww; // counter for repeating the tests
int adcmv[7];
#ifdef EXTENDED_TESTS
uint16_t u680; // 3 * (Voltage at 680 Ohm)
uint8_t taste; // ist key pressed? 0 = no
#else
#ifndef NO_TEST_T1_T7
#warning "Selftest without extended tests T1 to T7!"
#endif
#endif
#if defined(EXTENDED_TESTS) || defined(WITH_MENU)
uint8_t tt; // number of running test
#endif
#ifdef FREQUENCY_50HZ
uint8_t ff50; // loop counter for 2s
#endif
// define the maximum count of repetitions MAX_REP
#define MAX_REP 4
#ifdef AUTO_CAL
uint8_t cap_found; // counter for found capacitor
#ifdef AUTOSCALE_ADC
int8_t udiff; // difference between ADC Voltage with VCC or Bandgap reference
int8_t udiff2;
#endif
#endif
PartFound = PART_NONE; // no part found before
if ((test_mode & 0xf0) == 0) {
// probed should be shorted already to begin selftest
if (AllProbesShorted() != 3) return;
lcd_clear();
lcd_MEM_string(SELFTEST); // "Selftest mode.."
lcd_line2();
lcd_data('?'); // wait for key pressed for confirmation
if (wait_for_key_ms(2000) > 10) goto begin_selftest; // key is pressed again
#ifdef WITH_MENU
} else {
// report to user, that probes should be shorted
ww = 0;
for (tt=0;tt<150;tt++) { /* wait about 30 seconds for shorted probes */
lcd_clear();
lcd_MEM2_string(SHORT_PROBES_str); // message "Short probes!" to LCD
if (AllProbesShorted() == 3) {
ww++; // all probes now shorted
} else {
ww = 0; // connection not stable, retry
}
if (ww > 3) break; // connection seems to be stable
lcd_refresh(); // write the pixels to display, ST7920 only
wait_about200ms(); // wait 200ms and try again
} /* end for (tt...) */
if (tt < 150) goto begin_selftest; // is shorted before time limit
goto no_zero_resistance; // skip measuring of the zero resistance
#endif
}
// no key pressed for 2s
lcd_clear();
lcd_MEM_string(VERSION_str); //"Version ..."
return;
begin_selftest:
lcd_line2();
lcd_MEM2_string(R0_str); // "R0="
eeprom_write_byte((uint8_t *)(&EE_ESR_ZEROtab[2]), (uint8_t)0); // clear zero offset
eeprom_write_byte((uint8_t *)(&EE_ESR_ZEROtab[3]), (uint8_t)0); // clear zero offset
eeprom_write_byte((uint8_t *)(&EE_ESR_ZEROtab[1]), (uint8_t)0); // clear zero offset
adcmv[0] = GetESR(TP3, TP1);
adcmv[1] = GetESR(TP3, TP2);
adcmv[2] = GetESR(TP2, TP1);
DisplayValue16(adcmv[0],-2,' ',3);
DisplayValue16(adcmv[1],-2,' ',3);
DisplayValue16(adcmv[2],-2,LCD_CHAR_OMEGA,3);
if (adcmv[0] >= 90) {
adcmv[0] = ESR_ZERO; // set back to default value
}
eeprom_write_byte((uint8_t *)(&EE_ESR_ZEROtab[2]), (uint8_t)adcmv[0]); // fix zero offset
if (adcmv[1] >= 90) {
adcmv[1] = ESR_ZERO; // set back to default value
}
eeprom_write_byte((uint8_t *)(&EE_ESR_ZEROtab[3]), (uint8_t)adcmv[1]); // fix zero offset
if (adcmv[2] >= 90) {
adcmv[2] = ESR_ZERO; // set back to default value
}
eeprom_write_byte((uint8_t *)(&EE_ESR_ZEROtab[1]), (uint8_t)adcmv[2]); // fix zero offset
last_line_used = 2;
wait_for_key_5s_line2(); // wait up to 5 seconds and clear line 2
#ifdef WITH_MENU
no_zero_resistance:
#endif
#ifdef EXTENDED_TESTS
#define TEST_COUNT 8
if((test_mode & 0x0f) == 1) { /* full test requested */
for(tt=1;tt<TEST_COUNT;tt++) { // loop for all Tests
for(ww=0;ww<MAX_REP;ww++) { // repeat the test MAX_REP times
lcd_clear_line2(); // clear total line 2
lcd_clear_line1(); // clear total line 1
lcd_data('T'); //output the Testmode "T"
u2lcd(tt); //lcd_string(utoa(tt, outval, 10)); //output Test number
lcd_space();
//############################################
if (tt == 1) { // output of reference voltage and factors for capacity measurement
lcd_MEM2_string(URef_str); //"URef="
Calibrate_UR(); // get Reference voltage, Pin resistance
Display_mV(ref_mv,4);
lcd_line2(); //Cursor to column 1, row 2
lcd_MEM2_string(RHfakt_str); //"RHf="
u2lcd(RHmultip); //lcd_string(utoa(RHmultip, outval, 10));
ADCconfig.Samples = R_ANZ_MESS; // set number of ADC reads near to maximum
}
//############################################
if (tt == 2) { // how equal are the RL resistors?
u680 = ((long)ADCconfig.U_AVCC * (PIN_RM + R_L_VAL) / (PIN_RM + R_L_VAL + R_L_VAL + PIN_RP));
R_PORT = 1<<PIN_RL1; //RL1 to VCC
R_DDR = (1<<PIN_RL1) | (1<<PIN_RL2); //RL2 to -
adcmv[0] = W20msReadADC(TP1);
adcmv[0] -= u680;
R_DDR = (1<<PIN_RL1) | (1<<PIN_RL3); //RL3 to -
adcmv[1] = W20msReadADC(TP1);
adcmv[1] -= u680;
R_PORT = 1<<PIN_RL2; //RL2 to VCC
R_DDR = (1<<PIN_RL2) | (1<<PIN_RL3); //RL3 to -
adcmv[2] = W20msReadADC(TP2);
adcmv[2] -= u680;
lcd_MEM_string(RLRL_str); // "RLRL"
}
//############################################
if (tt == 3) { // how equal are the RH resistors
R_PORT = 1<<PIN_RH1; //RH1 to VCC
R_DDR = (1<<PIN_RH1) | (1<<PIN_RH2); //RH2 to -
adcmv[0] = W20msReadADC(TP1);
adcmv[3] = ADCconfig.U_AVCC / 2;
adcmv[0] -= adcmv[3];
R_DDR = (1<<PIN_RH1) | (1<<PIN_RH3); //RH3 to -
adcmv[1] = W20msReadADC(TP1);
adcmv[1] -= adcmv[3];
R_PORT = 1<<PIN_RH2; //RH2 to VCC
R_DDR = (1<<PIN_RH2) | (1<<PIN_RH3); //RH3 to -
adcmv[2] = W20msReadADC(TP2);
adcmv[2] -= adcmv[3];
lcd_MEM_string(RHRH_str); // "RHRH"
}
//############################################
if (tt == 4) { // Text release probes
lcd_MEM_string(RELPROBE); // "Release Probes"
if (AllProbesShorted() != 0) ww = MAX_REP-2;
}
//############################################
if (tt == 5) { // can we switch the ADC pins to GND across R_H resistor?
R_PORT = 0;
R_DDR = 1<<PIN_RH1; //Pin 1 over R_H to GND
adcmv[0] = W20msReadADC(TP1);
R_DDR = 1<<PIN_RH2; //Pin 2 over R_H to GND
adcmv[1] = W20msReadADC(TP2);
R_DDR = 1<<PIN_RH3; //Pin 3 over R_H to GND
adcmv[2] = W20msReadADC(TP3);
lcd_MEM_string(RH1L_str); // "RH_Lo="
}
//############################################
if (tt == 6) { // can we switch the ADC pins to VCC across the R_H resistor?
R_DDR = 1<<PIN_RH1; //Pin 1 over R_H to VCC
R_PORT = 1<<PIN_RH1;
adcmv[0] = W20msReadADC(TP1) - ADCconfig.U_AVCC;
R_DDR = 1<<PIN_RH2; //Pin 2 over R_H to VCC
R_PORT = 1<<PIN_RH2;
adcmv[1] = W20msReadADC(TP2) - ADCconfig.U_AVCC;
R_DDR = 1<<PIN_RH3; //Pin 3 over R_H to VCC
R_PORT = 1<<PIN_RH3;
adcmv[2] = W20msReadADC(TP3) - ADCconfig.U_AVCC;
lcd_MEM_string(RH1H_str); // "RH_Hi="
}
if (tt == 7) { // is the voltage of all R_H / R_L dividers correct?
u680 = ((long)ADCconfig.U_AVCC * (PIN_RM + R_L_VAL) / (PIN_RM + R_L_VAL + (unsigned long)R_H_VAL*100));
R_PORT = 1<<PIN_RH1; //RH1 to VCC
R_DDR = (1<<PIN_RH1) | (1<<PIN_RL1); //RH1 to +, RL1 to -
adcmv[0] = W20msReadADC(TP1);
adcmv[0] -= u680;
R_PORT = 1<<PIN_RH2; //RH2 to VCC
R_DDR = (1<<PIN_RH2) | (1<<PIN_RL2); //RH2 to +, RL2 to -
adcmv[1] = W20msReadADC(TP2);
adcmv[1] -= u680;
R_PORT = 1<<PIN_RH3; //RH3 to VCC
R_DDR = (1<<PIN_RH3) | (1<<PIN_RL3); //RH3 to +, RL3 to -
adcmv[2] = W20msReadADC(TP3);
adcmv[2] -= u680;
lcd_MEM_string(RHRL_str); // "RH/RL"
}
//############################################
if (tt > 1) { // output 3 voltages
lcd_line2(); //Cursor to column 1, row 2
i2lcd(adcmv[0]); // lcd_string(itoa(adcmv[0], outval, 10)); //output voltage 1
lcd_space();
i2lcd(adcmv[1]); // lcd_string(itoa(adcmv[1], outval, 10)); //output voltage 2
lcd_space();
i2lcd(adcmv[2]); // lcd_string(itoa(adcmv[2], outval, 10)); //output voltage 3
}
ADC_DDR = TXD_MSK; // all-Pins to Input
ADC_PORT = TXD_VAL; // all ADC-Ports to GND
R_DDR = 0; // all R-Ports to Input
R_PORT = 0;
taste = wait_for_key_ms(1000); // wait up to 1 second or key is pressed
if ((tt != 4) && (taste > 10)) {
// don't finish repetition for T4 with pressed key
break; // if key is pressed, don't repeat
}
} //end for ww
wait_for_key_ms(1000); // wait up to 1 second or key is pressed
} //end for tt
#if PROCESSOR_TYP == 1280
lcd_clear();
lcd_testpin(TP1);
lcd_data('L');
lcd_equal(); // lcd_data('=');
ADC_PORT = TXD_VAL;
ADC_DDR = (1<<TP1) | TXD_MSK;
R_PORT = (1<<PIN_RL1);
R_DDR = (1<<PIN_RL1);
adcmv[0] = W5msReadADC(TP1);
ADCSRB = (1<<MUX5); // switch to upper 8 MUX inputs
adcmv[1] = ReadADC(PIN_RL1);
ADCSRB = 0; // switch back to lower 8 MUX inputs
ResistorVal[0] = (adcmv[0] * (unsigned long)R_L_VAL) / (adcmv[1] - adcmv[0]);
DisplayValue(ResistorVal[0],-1,LCD_CHAR_OMEGA,3);
lcd_space();
lcd_data('H');
lcd_equal(); // lcd_data('=');
ResistorVal[1] = ((ADCconfig.U_AVCC - adcmv[1]) * (unsigned long)R_L_VAL) / (adcmv[1] - adcmv[0]);
DisplayValue(ResistorVal[1],-1,LCD_CHAR_OMEGA,3);
lcd_line2();
lcd_testpin(TP1);
lcd_space();
lcd_data('H');
lcd_equal(); // lcd_data('=');
ADC_PORT = (1<<TP1) | TXD_VAL;
R_PORT = 0;
adcmv[0] = W5msReadADC(TP1);
ADCSRB = (1<<MUX5); // switch to upper 8 MUX inputs
adcmv[1] = ReadADC(PIN_RL1);
ADCSRB = 0; // switch back to lower 8 MUX inputs
ResistorVal[1] = ((ADCconfig.U_AVCC - adcmv[0]) * (unsigned long)R_L_VAL) / (adcmv[0] - adcmv[1]);
DisplayValue(ResistorVal[1],-1,LCD_CHAR_OMEGA,3);
lcd_space();
lcd_data('L');
lcd_equal(); // lcd_data('=');
ResistorVal[0] = (adcmv[1] * (unsigned long)R_L_VAL) / (adcmv[0] - adcmv[1]);
DisplayValue(ResistorVal[0],-1,LCD_CHAR_OMEGA,3);
wait_about1s(); // only for mega1280
last_line_used = 2;
wait_for_key_5s_line2(); // wait up to 5 seconds and clear line 2
//
lcd_clear();
lcd_testpin(TP2);
lcd_data('L');
lcd_equal(); // lcd_data('=');
ADC_PORT = TXD_VAL;
ADC_DDR = (1<<TP2) | TXD_MSK;
R_PORT = (1<<PIN_RL2);
R_DDR = (1<<PIN_RL2);
adcmv[0] = W5msReadADC(TP2);
ADCSRB = (1<<MUX5); // switch to upper 8 MUX inputs
adcmv[1] = ReadADC(PIN_RL2);
ADCSRB = 0; // switch back to lower 8 MUX inputs
ResistorVal[0] = (adcmv[0] * (unsigned long)R_L_VAL) / (adcmv[1] - adcmv[0]);
DisplayValue(ResistorVal[0],-1,LCD_CHAR_OMEGA,3);
lcd_space();
lcd_data('H');
lcd_equal(); // lcd_data('=');
ResistorVal[1] = ((ADCconfig.U_AVCC - adcmv[1]) * (unsigned long)R_L_VAL) / (adcmv[1] - adcmv[0]);
DisplayValue(ResistorVal[1],-1,LCD_CHAR_OMEGA,3);
lcd_line2();
lcd_testpin(TP2);
lcd_data('H');
lcd_equal(); // lcd_data('=');
ADC_PORT = (1<<TP2) | TXD_VAL;
R_PORT = 0;
adcmv[0] = W5msReadADC(TP2);
ADCSRB = (1<<MUX5); // switch to upper 8 MUX inputs
adcmv[1] = ReadADC(PIN_RL2);
ADCSRB = 0; // switch back to lower 8 MUX inputs
ResistorVal[1] = ((ADCconfig.U_AVCC - adcmv[0]) * (unsigned long)R_L_VAL) / (adcmv[0] - adcmv[1]);
DisplayValue(ResistorVal[1],-1,LCD_CHAR_OMEGA,3);
lcd_space();
lcd_data('L');
lcd_equal(); // lcd_data('=');
ResistorVal[0] = (adcmv[1] * (unsigned long)R_L_VAL) / (adcmv[0] - adcmv[1]);
DisplayValue(ResistorVal[0],-1,LCD_CHAR_OMEGA,3);
wait_about1s(); // only for mega1280
last_line_used = 2;
wait_for_key_5s_line2(); // wait up to 5 seconds and clear line 2
//
lcd_clear();
lcd_testpin(TP3);
lcd_data('L');
lcd_equal(); // lcd_data('=');
ADC_DDR = (1<<TP3) | TXD_MSK;
R_PORT = (1<<PIN_RL3);
R_DDR = (1<<PIN_RL3);
adcmv[0] = W5msReadADC(TP3);
ADCSRB = (1<<MUX5); // switch to upper 8 MUX inputs
adcmv[1] = ReadADC(PIN_RL3);
ADCSRB = 0;
ResistorVal[0] = (adcmv[0] * (unsigned long)R_L_VAL) / (adcmv[1] - adcmv[0]);
DisplayValue(ResistorVal[0],-1,LCD_CHAR_OMEGA,3);
lcd_space();
lcd_data('H');
lcd_equal(); // lcd_data('=');
ResistorVal[1] = ((ADCconfig.U_AVCC - adcmv[1]) * (unsigned long)R_L_VAL) / (adcmv[1] - adcmv[0]);
DisplayValue(ResistorVal[1],-1,LCD_CHAR_OMEGA,3);
lcd_line2();
lcd_testpin(TP3);
lcd_data('H');
lcd_equal(); // lcd_data('=');
ADC_PORT = (1<<TP3) | TXD_VAL;
R_PORT = 0;
adcmv[0] = W5msReadADC(TP3);
ADCSRB = (1<<MUX5); // switch to upper 8 MUX inputs
adcmv[1] = ReadADC(PIN_RL3);
ADCSRB = 0; // switch back to lower 8 MUX inputs
ResistorVal[1] = ((ADCconfig.U_AVCC - adcmv[0]) * (unsigned long)R_L_VAL) / (adcmv[0] - adcmv[1]);
DisplayValue(ResistorVal[1],-1,LCD_CHAR_OMEGA,3);
lcd_space();
lcd_data('L');
lcd_equal(); // lcd_data('=');
ResistorVal[0] = (adcmv[1] * (unsigned long)R_L_VAL) / (adcmv[0] - adcmv[1]);
DisplayValue(ResistorVal[0],-1,LCD_CHAR_OMEGA,3);
wait_about1s(); // only for mega1280
last_line_used = 2;
wait_for_key_5s_line2(); // wait up to 5 seconds and clear line 2
#endif /* PROCESSOR_TYP == 1280 */
} /* end if((test_mode & 0x0f) == 1) */
#endif /* end EXTENDED_TESTS */
for (ww=0;ww<120;ww++) {
// wait up to 1 minute for releasing the probes
if (AllProbesShorted() == 0) break;
lcd_clear_line2(); // clear total line2
lcd_MEM_string(RELPROBE); // "Release Probes"
lcd_refresh(); // write the pixels to display, ST7920 only
wait_about500ms();
}
lcd_clear();
lcd_MEM_string(RIHI_str); // "RiHi="
DisplayValue16(RRpinPL,-1,LCD_CHAR_OMEGA,3);
lcd_line2();
lcd_MEM_string(RILO_str); // "RiLo="
DisplayValue16(RRpinMI,-1,LCD_CHAR_OMEGA,3);
last_line_used = 2;
wait_for_key_5s_line2(); // wait up to 5 seconds and clear line 2
//measure Zero offset for Capacity measurement
PartFound = PART_NONE;
lcd_clear();
lcd_MEM_string(C0_str); //output "C0 "
ReadCapacity(TP3, TP1);
adcmv[5] = (unsigned int) cap.cval_uncorrected.dw; //save capacity value of empty Pin 1:3
ReadCapacity(TP3, TP2);
adcmv[6] = (unsigned int) cap.cval_uncorrected.dw; //save capacity value of empty Pin 2:3
ReadCapacity(TP2, TP1);
adcmv[2] = (unsigned int) cap.cval_uncorrected.dw; //save capacity value of empty Pin 1:2
ReadCapacity(TP1, TP3);
adcmv[1] = (unsigned int) cap.cval_uncorrected.dw; //save capacity value of empty Pin 3:1
ReadCapacity(TP2, TP3);
adcmv[4] = (unsigned int) cap.cval_uncorrected.dw; //save capacity value of empty Pin 3:2
ReadCapacity(TP1, TP2);
adcmv[0] = (unsigned int) cap.cval_uncorrected.dw; //save capacity value of empty Pin 2:1
#ifdef WITH_MENU
if (((test_mode & 0x0f) == 1) || (UnCalibrated == 2))
#else
if (UnCalibrated == 2)
#endif
{
adcmv[3] = adcmv[0] + 2; // mark as uncalibrated until Cap > 100nF has success
} else {
adcmv[3] = adcmv[0]; // mark as calibrated, short calibration is finished
UnCalibrated = 0; // clear the UnCalibrated Flag
lcd_cursor_off(); // switch cursor off
}
u2lcd_space(adcmv[5]); //DisplayValue(adcmv[5],0,' ',3); //output cap0 1:3
u2lcd_space(adcmv[6]); //DisplayValue(adcmv[6],0,' ',3); //output cap0 2:3
DisplayValue(adcmv[2],-12,'F',3); //output cap0 1:2
#ifdef AUTO_CAL
for (ww=0;ww<7;ww++) { //checking loop
if ((adcmv[ww] > 190) || (adcmv[ww] < 10)) goto no_c0save;
}
for (ww=0;ww<7;ww++) {
// write all zero offsets to the EEprom
(void) eeprom_write_byte((uint8_t *)(&c_zero_tab[ww]),adcmv[ww]+(COMP_SLEW1 / (CC0 + CABLE_CAP + COMP_SLEW2)));
}
lcd_line2();
lcd_MEM_string(OK_str); // output "OK"
no_c0save:
#endif
last_line_used = 2;
wait_for_key_5s_line2(); // wait up to 5 seconds and clear line 2
#ifdef SamplingADC
sampling_cap_calibrate(); // measure zero capacity for samplingADC
#endif
#ifdef AUTO_CAL
#ifdef WITH_MENU
if (((test_mode & 0x0f) == 1) || (UnCalibrated == 2))
#endif
// without menu function the capacitor is requested every time,
// because there is no way to request recaltbration again
// With menu function the capacitor is only requested for first time
// calibration (UnCalibrated = 2) or for the full selftest call (test_mode = 1)
// of the menu function, not with the automatically call (test_mode = 1).
{
// for full test or first time calibration, use external capacitor
// Message C > 100nF at TP1 and TP3
cap_found = 0;
for (ww=0;ww<64;ww++) {
init_parts();
#if (TPCAP >= 0)
CalibrationCap(); // measure with internal calibration capacitor
#else
lcd_clear();
lcd_testpin(TP1);
lcd_MEM_string(CapZeich); // "-||-"
lcd_testpin(TP3);
lcd_MEM2_string(MinCap_str); // " >100nF!"
PartFound = PART_NONE;
ReadCapacity(TP3, TP1); // look for capacitor > 100nF
#endif
while (cap.cpre < -9) {
cap.cpre++;
cap.cval /= 10;
}
if ((cap.cpre == -9) && (cap.cval > 95) && (cap.cval < 22000) &&
(load_diff > -150) && (load_diff < 150)) {
cap_found++;
} else {
cap_found = 0; // wait for stable connection
}
if (cap_found > 4) {
// value of capacitor is correct
(void) eeprom_write_word((uint16_t *)(&ref_offset), load_diff); // hold zero offset + slew rate dependend offset
lcd_clear();
lcd_MEM2_string(REF_C_str); // "REF_C="
i2lcd(load_diff); // lcd_string(itoa(load_diff, outval, 10)); //output REF_C_KORR
RefVoltage(); // new ref_mv_offs and RHmultip
#if 0
//#######################################
// Test for switching level of the digital input of port TP3
for (tt=0;tt<8;tt++) {
ADC_PORT = TXD_VAL; //ADC-Port 1 to GND
ADC_DDR = 1<<TP1 | TXD_MSK; //ADC-Pin 1 to output 0V
R_PORT = 1<<PIN_RH3; //Pin 3 over R_H to VCC
R_DDR = 1<<PIN_RH3; //Pin 3 over R_H to VCC
while (1) {
wdt_reset();
if ((ADC_PIN&(1<<TP3)) == (1<<TP3)) break;
}
R_DDR = 0; //Pin 3 without current
R_PORT = 0;
adcmv[0] = ReadADC(TP3);
lcd_line3();
Display_mV(adcmv[0],4);
R_DDR = 1<<PIN_RH3; //Pin 3 over R_H to GND
while (1) {
wdt_reset();
if ((ADC_PIN&(1<<TP3)) != (1<<TP3)) break;
}
R_DDR = 0; //Pin 3 without current
lcd_line4();
adcmv[0] = ReadADC(TP3);
Display_mV(adcmv[0],4);
last_line_used = 2;
wait_for_key_5s_line2(); // wait up to 5 seconds and clear line 2
}
//#######################################
#endif
#ifdef AUTOSCALE_ADC
#if (TPCAP >= 0)
#define CAP_ADC TPCAP /* Cap >100nF is integrated at TPCAP */
TCAP_PORT &= ~(1<<TCAP_RH); // 470k resistor to GND
TCAP_DDR |= (1<<TCAP_RH); // enable output
#else
#define CAP_ADC TP3 /* Cap >100nF at TP3 */
ADC_PORT = TXD_VAL; //ADC-Port 1 to GND
ADC_DDR = 1<<TP1 | TXD_MSK; //ADC-Pin 1 to output 0V
R_DDR = 1<<PIN_RH3; //Pin 3 over R_H to GND
#endif
do {
adcmv[0] = ReadADC(CAP_ADC);
} while (adcmv[0] > 980);
#if (TPCAP >= 0)
TCAP_DDR &= ~(1<<TCAP_RH); // 470k resistor port to input mode
#else
R_DDR = 0; //all Pins to input
#endif
ADCconfig.U_Bandgap = 0; // do not use internal Ref
adcmv[0] = ReadADC(CAP_ADC); // get cap voltage with VCC reference
ADCconfig.U_Bandgap = adc_internal_reference;
adcmv[1] = ReadADC(CAP_ADC); // get cap voltage with internal reference
adcmv[1] += adcmv[1]; // double the value
ADCconfig.U_Bandgap = 0; // do not use internal Ref
adcmv[2] = ReadADC(CAP_ADC); // get cap voltage with VCC reference
ADCconfig.U_Bandgap = adc_internal_reference;
udiff = (int8_t)(((signed long)(adcmv[0] + adcmv[2] - adcmv[1])) * adc_internal_reference / adcmv[1])+REF_R_KORR;
lcd_line2();
lcd_MEM2_string(REF_R_str); // "REF_R="
udiff2 = udiff + (int8_t)eeprom_read_byte((uint8_t *)(&RefDiff));
(void) eeprom_write_byte((uint8_t *)(&RefDiff), (uint8_t)udiff2); // hold offset for true reference Voltage
i2lcd(udiff2); // output correction voltage
RefVoltage(); // set new ADCconfig.U_Bandgap
#endif /* end AUTOSCALE_ADC */
last_line_used = 2;
wait_for_key_5s_line2(); // wait up to 5 seconds and clear line 2
UnCalibrated = 0; // clear the UnCalibrated Flag
lcd_cursor_off(); // switch cursor off
cap_found = eeprom_read_byte((uint8_t *)&c_zero_tab[0]); // read first capacity zero offset
eeprom_write_byte((uint8_t *)&c_zero_tab[3], cap_found); // mark as calibrated permanent
break; // leave the ww for loop
} /* end if (cap_found > 4) */
lcd_line2();
DisplayValue(cap.cval,cap.cpre,'F',4);
lcd_refresh(); // write the pixels to display, ST7920 only
wait_about200ms(); // wait additional time
} // end for ww
} /* end if((test_mode & 0x0f) == 1) */
#endif /* end AUTO_CAL */
ADCconfig.Samples = ANZ_MESS; // set to configured number of ADC samples
#ifdef SamplingADC
sampling_lc_calibrate(); // Cap for L-meas
#endif
#ifdef FREQUENCY_50HZ
//#define TEST_SLEEP_MODE /* only select for checking the sleep delay */
lcd_clear();
lcd_MEM_string(T50HZ); //" 50Hz"
lcd_refresh(); // write the pixels to display, ST7920 only
ADC_PORT = TXD_VAL;
ADC_DDR = 1<<TP1 | TXD_MSK; // Pin 1 to GND
R_DDR = (1<<PIN_RL3) | (1<<PIN_RL2);
for(ww=0;ww<30;ww++) { // repeat the signal up to 30 times (1 minute)
for (ff50=0;ff50<100;ff50++) { // for 2 s generate 50 Hz
R_PORT = (1<<PIN_RL2); // Pin 2 over R_L to VCC, Pin 3 over R_L to GND
#ifdef TEST_SLEEP_MODE
sleep_5ms(2); // test of timing of sleep mode call
#else
wait10ms(); // normal delay
#endif
R_PORT = (1<<PIN_RL3); // Pin 3 over R_L to VCC, Pin 2 over R_L to GND
#ifdef TEST_SLEEP_MODE
sleep_5ms(2); // test of timing of sleep mode call
#else
wait10ms(); // normal delay
#endif
wdt_reset();
} /* end for ff50 */
if (!(RST_PIN_REG & (1<<RST_PIN))) {
// if key is pressed, don't repeat
break;
}
} /* end for ww */
#endif /* end FREQUENCY_50HZ */
lcd_clear();
lcd_MEM_string(VERSION_str); //"Version ..."
lcd_line2();
lcd_MEM_string(ATE); //"Selftest End"
PartFound = PART_NONE;
last_line_used = 2;
wait_for_key_5s_line2(); // wait up to 5 seconds and clear line 2
} /* end AutoCheck */
