/Designs/Measuring_instruments/GM_counter/SW/counter/main.c
1,90 → 1,194
#include ".\main.h"
//#include <LCD.C>
 
#define LED1 PIN_C6 //CHANGE PIN_XX TO YOUR LED PIN NUMBER, EX: PIN_A5
#define LED2 PIN_C5 //CHANGE PIN_XX TO YOUR LED PIN NUMBER, EX: PIN_A5
#define LED3 PIN_C4 //CHANGE PIN_XX TO YOUR LED PIN NUMBER, EX: PIN_A5
#define LED4 PIN_D3 //CHANGE PIN_XX TO YOUR LED PIN NUMBER, EX: PIN_A5
#define LED3 PIN_C4 //CHANGE PIN_XX TO YOUR LED PIN NUMBER
#define LED4 PIN_D3 //CHANGE PIN_XX TO YOUR LED PIN NUMBER
 
#define S1 PIN_C2 //CHANGE PIN_XX TO YOUR LED PIN NUMBER, EX: PIN_A5
#define S2 PIN_C3 //CHANGE PIN_XX TO YOUR LED PIN NUMBER, EX: PIN_A5
#define S3 PIN_D0 //CHANGE PIN_XX TO YOUR LED PIN NUMBER
#define S4 PIN_D1 //CHANGE PIN_XX TO YOUR LED PIN NUMBER
 
#int_EXT
void EXT_isr(void)
#define BEEP PIN_D2 //piezo beeper
 
#define LCD_ENABLE_PIN PIN_E0 ////
#define LCD_RS_PIN PIN_E1 ////
#define LCD_RW_PIN PIN_E2 ////
#define LCD_DATA4 PIN_D4 ////
#define LCD_DATA5 PIN_D5 ////
#define LCD_DATA6 PIN_D6 ////
#define LCD_DATA7 PIN_D7
#include <lcd.c>
 
 
unsigned int32 pulse_count=0;
unsigned int16 overflow_count=0;
unsigned int16 time_overflow_count=0;
 
 
#int_RTCC
void RTCC_isr(void)
{
time_overflow_count++;
}
 
#int_TIMER1
void TIMER1_isr(void)
{
overflow_count++;
output_toggle(LED3);
output_toggle(BEEP);
}
 
//#define LCD_TYPE 1
//#include <lcd.c>
void sound_beep( unsigned int lenght, int16 frequency)
{
unsigned int i;
for(i=0;i<=lenght;i++)
{
output_toggle(BEEP);
delay_us(1/frequency);
}
}
 
void main()
{
unsigned int setpoint;
unsigned int napeti;
unsigned int16 plneni=0;
unsigned int16 integration_time=60;
unsigned int16 time;
unsigned int16 last_timer; // promena pro praskani
unsigned int1 button_press; // semafor pro cteni tlacitek
unsigned int16 measurement_number=0;
 
/* lcd_init();
 
lcd_putc("\fReady...\n");
 
while (TRUE) {
k=kbd_getc();
if(k!=0)
if(k=='*')
lcd_putc('\f');
else
lcd_putc(k);
}
*/
 
setup_adc_ports(sAN0|VSS_VDD);
setup_adc(ADC_CLOCK_DIV_32);
setup_spi(SPI_SS_DISABLED);
setup_timer_0(RTCC_EXT_L_TO_H|RTCC_DIV_1);
setup_timer_1(T1_DISABLED);
setup_timer_2(T2_DIV_BY_1,255,1);
setup_timer_0(RTCC_INTERNAL|RTCC_DIV_256);
setup_timer_1(T1_EXTERNAL|T1_DIV_BY_1);
setup_timer_2(T2_DISABLED,0,1);
setup_ccp1(CCP_PWM);
setup_ccp2(CCP_PWM);
setup_comparator(NC_NC_NC_NC);// This device COMP currently not supported by the PICWizard
setup_oscillator(OSC_8MHZ);
 
set_pwm1_duty(0);
set_pwm2_duty(0);
 
 
output_high(LED1);
output_high(LED2);
output_high(LED3);
output_high(LED4);
output_low(BEEP);
 
ext_int_edge( L_TO_H ); // Sets up EXT
enable_interrupts(INT_EXT);
setup_comparator(CP2_A0_VREF|CP2_OUT_ON_A5); // sets two comparators(A1 and VR and A2 as the output)
setup_vref(VREF_HIGH|6); //sets 3.6(vdd *value/32 +vdd/4) if vdd is 5.0V
enable_interrupts(INT_COMP); //enables the comparator interrupt
enable_interrupts(INT_RTCC);
enable_interrupts(INT_TIMER1);
enable_interrupts(INT_TIMER2);
enable_interrupts(GLOBAL);
lcd_init();
 
// lcd_init();
lcd_putc("\fGM counter V1.0 \n 2013 MLAB");
printf("Geiger-Muller Counter V1.0 \r\n");
printf("(c) 2013 MLAB and UST.cz \r\n");
Delay_ms(1000);
setpoint = 43;
lcd_putc("\f");
printf("\r\n");
set_timer1(0);
while(true)
{
set_adc_channel(1);
delay_us(100);
napeti = read_adc();
 
if (napeti <= setpoint)
pulse_count = get_timer1() + (0xffff * overflow_count);
time = integration_time + 1 - (time_overflow_count * 0.0327) ;
if(get_timer1() != last_timer)
{
if (plneni < 300) plneni++;
output_low(LED2);
output_toggle(BEEP);
last_timer=get_timer1();
}
else
lcd_gotoxy(1,1);
printf(lcd_putc,"Count:%lu ",pulse_count);
lcd_gotoxy(1,2);
printf(lcd_putc,"T:%lu ",time);
lcd_gotoxy(9,2);
printf(lcd_putc,"I:%lu ", integration_time);
 
if(time == 0)
{
if (plneni > 0) plneni--;
output_high(LED2);
set_timer0(0);
time_overflow_count=0;
sound_beep(1000,700);
printf("$GMC1.0 %lu %lu %lu \r\n", measurement_number, integration_time, pulse_count);
set_timer1(0);
overflow_count=0;
measurement_number++;
}
 
set_pwm1_duty(plneni);
set_pwm2_duty(1023-plneni);
if(button_press==false ) // tlacitka se ctou znovu pouze pokud v redchozim cyklu nebyla zmacknuta.
{
if(!input(S1))
{
delay_ms(20);
if(!input(S1))
{
button_press=true;
sound_beep(100,700);
if(integration_time < 0xfffa ) integration_time+=5;
}
}
 
output_toggle(LED1);
delay_ms(10);
}
if(!input(S2))
{
delay_ms(20);
if(!input(S2))
{
button_press=true;
sound_beep(100,600);
if(integration_time < 0xfffa ) integration_time-=5;
 
set_timer0(0); // vynulovani pocitadel, kdyz uzivatel sahne na tlacitka
time_overflow_count=0;
set_timer1(0);
overflow_count=0;
}
}
 
if(!input(S3))
{
delay_ms(20);
if(!input(S3))
{
button_press=true;
sound_beep(100,500);
if(integration_time < 0xffff ) integration_time++;
}
}
 
if(!input(S4))
{
delay_ms(20);
if(!input(S4))
{
button_press=true;
sound_beep(100,400);
if(integration_time < 0xffff ) integration_time--;
 
set_timer0(0); // vynulovani pocitadel, kdyz uzivatel sahne na tlacitka
time_overflow_count=0;
set_timer1(0);
overflow_count=0;
}
}
}
if ( input(S1) && input(S2) && input(S3) && input(S4) )
{
button_press=false;
}
}
 
}