LAMPIRAN 2:
Listing Program Mikrokontroler pada Bel Otomatis
**************(area jek beobe cong)***(area jek beobe cong)************
/*****************************************************
This program was produced by the
CodeWizardAVR V2.04.4a Advanced
Automatic Program Generator
© Copyright 1998-2009 Pavel Haiduc, HP InfoTech s.r.l.
http://www.hpinfotech.comProject :
Version :
Date : 12/08/2010
Author : NeVaDa
Company : te
Comments:
Chip type : ATmega8535
Program type : Application
AVR Core Clock frequency: 12,000000 MHz
Memory model : Small
External RAM size : 0
Data Stack size : 128
*****************************************************/
#include <mega8535.h>
#include <stdio.h>
#include <delay.h>
// I2C Bus functions
#asm
.equ __i2c_port=0x1B ;PORTA
.equ __sda_bit=1
.equ __scl_bit=0
#endasm
#include <i2c.h>
// DS1307 Real Time Clock functions
#include <ds1307.h>
// Alphanumeric LCD Module functions
#asm
.equ __lcd_port=0x15 ;PORTC
#endasm
#include <lcd.h>
#define RTC_ADDR 0xD0
unsigned char h,m,s,d,mo,y,time[33],cursor;
// External Interrupt 0 service routine
interrupt [EXT_INT0] void ext_int0_isr(void)
{
// #asm ("cli")
delay_ms(100);
cursor++;
// #asm ("sei")
}// External Interrupt 1 service routine
interrupt [EXT_INT1] void ext_int1_isr(void)
{
// #asm ("cli")
delay_ms(100);
if(cursor==1 || cursor==3)
{
m++;
rtc_set_time(h,m,s);
delay_ms(100);
}
else if(cursor==2 || cursor==4)
{
h++;
rtc_set_time(h,m,s);
delay_ms(100);
cursor=0;
}
// #asm ("sei")
}
unsigned char day_rtc(void)
{
unsigned char data;
i2c_start();
i2c_write(RTC_ADDR);
i2c_write(0x03);
i2c_start();
i2c_write(RTC_ADDR | 1);
data=i2c_read(0);
i2c_stop();
return data;
}
void main(void)
{
// Declare your local variables here
unsigned char a, x, z;
char *day[7]={"Sen","Sel","Rab","Kam","Jum","Sab","Min"};
// Input/Output Ports initialization
// Port A initialization
// Func7=In Func6=In Func5=In Func4=In Func3=In Func2=In Func1=In Func0=In // State7=T State6=T State5=T State4=T State3=T State2=T State1=T State0=T
PORTA=0x00;
DDRA=0x00;
// Port B initialization
// Func7=In Func6=In Func5=In Func4=In Func3=In Func2=In Func1=In Func0=In
// State7=T State6=T State5=T State4=T State3=T State2=T State1=T State0=T
PORTB=0x00;
DDRB=0x01;
// Port C initialization
// Func7=In Func6=In Func5=In Func4=In Func3=In Func2=In Func1=In Func0=In
// State7=T State6=T State5=T State4=T State3=T State2=T State1=T State0=T
PORTC=0x00;
DDRC=0x00;
// Port D initialization
// Func7=In Func6=In Func5=In Func4=In Func3=In Func2=In Func1=In Func0=In
// State7=T State6=T State5=T State4=T State3=T State2=T State1=T State0=T
PORTD=0x00;
DDRD=0x00;
// Timer/Counter 0 initialization
// Clock source: System Clock
// Clock value: Timer 0 Stopped
// Mode: Normal top=FFh
// OC0 output: DisconnectedTCCR0=0x00;
TCNT0=0x00;
OCR0=0x00;
// Timer/Counter 1 initialization
// Clock source: System Clock
// Clock value: Timer1 Stopped
// Mode: Normal top=FFFFh
// OC1A output: Discon.
// OC1B output: Discon.
// Noise Canceler: Off
// Input Capture on Falling Edge
// Timer1 Overflow Interrupt: Off
// Input Capture Interrupt: Off
// Compare A Match Interrupt: Off
// Compare B Match Interrupt: Off
TCCR1A=0x00;
TCCR1B=0x00;
TCNT1H=0x00;
TCNT1L=0x00;
ICR1H=0x00;
ICR1L=0x00;
OCR1AH=0x00;
OCR1AL=0x00;
OCR1BH=0x00;
OCR1BL=0x00;
// Timer/Counter 2 initialization
// Clock source: System Clock
// Clock value: Timer2 Stopped
// Mode: Normal top=FFh
// OC2 output: Disconnected
ASSR=0x00;
TCCR2=0x00;
TCNT2=0x00;
OCR2=0x00;
// External Interrupt(s) initialization
// INT0: On
// INT0 Mode: Rising Edge
// INT1: On
// INT1 Mode: Rising Edge
// INT2: Off
GICR|=0xC0;
MCUCR=0x0F;
MCUCSR=0x00;
GIFR=0xC0;
// Timer(s)/Counter(s) Interrupt(s) initialization
TIMSK=0x00;
// Analog Comparator initialization
// Analog Comparator: Off
// Analog Comparator Input Capture by Timer/Counter 1: Off
ACSR=0x80;
SFIOR=0x00;
// I2C Bus initialization
i2c_init();
// DS1307 Real Time Clock initialization
// Square wave output on pin SQW/OUT: Off
// SQW/OUT pin state: 0
rtc_init(0,0,0);
// LCD module initialization
lcd_init(16);
//rtc_set_time(20,12,45);
//rtc_set_date(9,1,11);
//rtc_write(0x03,0x07);
while (1)
{
lcd_clear();
rtc_get_time(&h,&m,&s);
rtc_get_date(&d,&mo,&y);
a=day_rtc();
a-=1;
sprintf(time,"Jam %02d:%02d:%02d",h,m,s);
lcd_gotoxy(2,0);
lcd_puts(time);
sprintf(time,"%02d/%02d/%02d",d,mo,y);
lcd_gotoxy(6,1);
lcd_puts(time);
lcd_gotoxy(2,1);
lcd_puts(day[a]);
delay_ms(1000); if(h==6 && m==30 && s==0 && a==0) //masuk hari senin
{
for(z=0;z<3;z++)
{
PORTB.0=1;
lcd_clear();
lcd_gotoxy(2,0);
lcd_putsf("Waktu Masuk");
lcd_gotoxy(0,1);
lcd_putsf("UPACARA BENDERA");
delay_ms(1500);
PORTB.0=0;
delay_ms(1500);
}
}
if(h==6 && m==30 && s==0 && a==4) //masuk hari jumat
{
for(z=0;z<3;z++)
{
PORTB.0=1;
lcd_clear();
lcd_gotoxy(2,0);
lcd_putsf("Waktu Masuk");
lcd_gotoxy(1,1);
lcd_putsf("BERSIH-BERSIH");
delay_ms(1500);
PORTB.0=0;
delay_ms(1500);
}
}
else if(h==7 && m==0 && s==0 && a!=6) // masuk pelajaran senin sampai sabtu
{
for(z=0;z<3;z++)
{
PORTB.0=1;
lcd_clear();
lcd_gotoxy(2,0);
lcd_putsf("Waktu Masuk");
lcd_gotoxy(2,1);
lcd_putsf("pelajaran 1");
delay_ms(1500);
PORTB.0=0; delay_ms(1500);
}
}
else if(h==8 && m==0 && s==0 && a!=6) // ganti pelajaran pertama senin-sabtu
{
PORTB.0=1;
lcd_clear();
lcd_gotoxy(0,0);
lcd_putsf("ganti pelajaran 2");
delay_ms(1500);
PORTB.0=0;
delay_ms(1500);
}
else if(h==9 && m==0 && s==0 && a!=6) // istirahat I hari senin- sabtu
{
for(z=0;z<2;z++)
{
PORTB.0=1;
lcd_clear();
lcd_gotoxy(0,0);
lcd_putsf("Waktu Istirahat");
delay_ms(1500);
PORTB.0=0;
delay_ms(1500);
}
}
else if(h==9 && m==15 && s==0 && a!=6) // masuk istirahat I senin- sabtu / masuk pelajaran ketiga
{
for(z=0;z<3;z++)
{
PORTB.0=1;
lcd_clear();
lcd_gotoxy(0,0);
lcd_putsf("Waktu Masuk IST");
lcd_gotoxy(2,1);
lcd_putsf("pelajaran 3");
delay_ms(1500);
PORTB.0=0;
delay_ms(1500);
} }
else if(h==10 && m==0 && s==0 && a!=6) // ganti pelajaran kempat senin-sabtu
{
PORTB.0=1;
lcd_clear();
lcd_gotoxy(0,0);
lcd_putsf("ganti pelajaran 4");
delay_ms(1500);
PORTB.0=0;
delay_ms(1500);
}
else if(h==10 && m==45 && s==0 && a!=6 && a!=4) // ganti pelajaran kelima senin-sabtu
{
PORTB.0=1;
lcd_clear();
lcd_gotoxy(0,0);
lcd_putsf("ganti pelajaran 5");
delay_ms(1500);
PORTB.0=0;
delay_ms(1500);
}
else if(h==10 && m==45 && s==0 && a!=6 && a==4) // pulang jumat
{
PORTB.0=1;
lcd_clear();
lcd_gotoxy(0,0);
lcd_putsf("Waktu Pulang");
delay_ms(10000);
PORTB.0=0;
}
else if(h==11 && m==30 && s==0 && a!=6) // ganti pelajaran keenam senin-sabtu
{
PORTB.0=1;
lcd_clear();
lcd_gotoxy(0,0);
lcd_putsf("ganti pelajaran 6");
delay_ms(1500);
PORTB.0=0; delay_ms(1500);
}
else if(h==12 && m==15 && s==0 && a!=6) // istirahat II hari senin- Kamis
{
for(z=0;z<2;z++)
{
PORTB.0=1;
lcd_clear();
lcd_gotoxy(0,0);
lcd_putsf("Waktu Istirahat");
delay_ms(1500);
PORTB.0=0;
delay_ms(1500);
}
}
else if(h==12 && m==30 && s==0 && a!=6) // masuk istirahat II senin-sabtu / masuk pelajaran ketujuh
{
for(z=0;z<3;z++)
{
PORTB.0=1;
lcd_clear();
lcd_gotoxy(0,0);
lcd_putsf("Waktu Masuk IST");
lcd_gotoxy(2,1);
lcd_putsf("pelajaran 7");
delay_ms(1500);
PORTB.0=0;
delay_ms(1500);
}
}
else if(h==13 && m==15 && s==0 && a!=6) // pulang hari senin- kamis dan sabtu
{
PORTB.0=1;
lcd_clear();
lcd_gotoxy(2,0);
lcd_putsf("Waktu Pulang");
delay_ms(10000);
PORTB.0=0;
} if(PIND.4==0)
{
PORTB.0=1;
for(x=5; x>0; x--)
{
lcd_clear();
lcd_gotoxy(0,0);
lcd_putsf("EMERGENCY I");
sprintf(time,"timer:%d",x);
lcd_gotoxy(0,1);
lcd_puts(time);
delay_ms(1000);
}
PORTB.0=0;
}
else if(PIND.5==0)
{
PORTB.0=1;
for(x=10; x>0; x--)
{
lcd_clear();
lcd_gotoxy(0,0);
lcd_putsf("EMERGENCY II");
sprintf(time,"timer:%d",x);
lcd_gotoxy(0,1);
lcd_puts(time);
delay_ms(1000);
}
PORTB.0=0;
}
else if(PIND.6==0)
{
PORTB.0=1;
for(x=15; x>0; x--)
{
lcd_clear();
lcd_gotoxy(0,0);
lcd_putsf("EMERGENCY III");
sprintf(time,"timer:%d",x);
lcd_gotoxy(0,1);
lcd_puts(time);
delay_ms(1000);
} PORTB.0=0;
}
else if(PIND.7==0)
{
PORTB.0=1;
for(x=20; x>0; x--)
{
lcd_clear();
lcd_gotoxy(0,0);
lcd_putsf("EMERGENCY IV");
sprintf(time,"timer:%d",x);
lcd_gotoxy(0,1);
lcd_puts(time);
delay_ms(1000);
}
PORTB.0=0;
}
};
}
Tidak ada komentar:
Posting Komentar