LSVคลังสมองออนไลน์ "ปีที่21"

;//****************************//;
;//* Program: LED flash       *//;
;//* Assembler: ASEM-51	      *//;
;//* Author: Somlak Mangnimit *//;
;//* Date: 24/07/2009         *//;
;//****************************//;

;//****MACRO INCLUDE FILE****//;
$IC (SETPORT.INC)
$IC (INITIAL.INC)
$IC (DELAYMS.INC)
;//**************************//;

		;//CPU RESET JUMP TO ORG 0030H
		ORG	0000H
		JMP	0030H

		;//MAIN PROGRAM
		ORG	0030H
		
		;//MACRO INITIAL
		INITIAL
		
		;//START LOOP
		LOOP:

		PORT1	(10101010B)	;//SET PORT MACRO
		DELAYMS	(200)		;//MACRO DELAY  200MS
		PORT1	(01010101B)	;//SET PORT MACRO
		DELAYMS	(200)		;//MACROD ELAY 200MS

		;//END LOOP
		JMP	LOOP

		;//END OF PROGRAM
		END
		

;//*******************************************************************//;
;//* PROGRAM		: DS1820 THAI LANG
;//* DEVICE		: AT89C2051
;//* X-TAL		: 11.0592MHZ
;//* AUTHOR		: SOMLAK MANGNIMIT
;//* DATE		: 19/09/2553
;//* VERSION		: 1.0BETA
;//* NOTE		: THIS PROGRAM IS FREE AND ALL NOT WARRANTY.
;//*******************************************************************//;

DQ	BIT	P1.0

DSEG
ORG	020H
TIM1:	DS	1
TIM2:	DS	1
TIM3:	DS	1

TEMP_L:	DS	1
TEMP_H:	DS	1

TX_DATA:	DS	1
RX_DATA:	DS	1

N1:	DS	1
N2:	DS	1
N3:	DS	1
POINT:	DS	1

CSEG
		ORG	0000H
		SJMP	INIT

		ORG	0023H		;--->>> SERIAL
		PUSH	ACC
		JBC	RI,SER_RX
SER_TX:		CLR	TI
		MOV	SBUF,TX_DATA
SER_TX_WAIT:	JBC	TI,SER_EXIT
		AJMP	SER_TX_WAIT
SER_RX:		MOV	RX_DATA,SBUF
SER_EXIT:	;SETB	RX_OK
		POP	ACC
		RETI

TABLE_THAI:
CGRAM_ADDR00: 	DB   00EH,011H,001H,019H,011H,00EH,003H,001H
CGRAM_ADDR01: 	DB   00DH,015H,015H,015H,017H,019H,000H,000H
CGRAM_ADDR02:	DB   01BH,01BH,00AH,00DH,009H,009H,000H,000H
CGRAM_ADDR03:	DB   00EH,011H,009H,009H,019H,019H,005H,007H
CGRAM_ADDR04:	DB   019H,019H,009H,009H,01FH,019H,000H,000H
CGRAM_ADDR05:	DB   000H,000H,000H,000H,000H,000H,00EH,01FH
CGRAM_ADDR06:	DB   001H,002H,015H,00DH,005H,005H,002H,000H
CGRAM_ADDR07:  	DB   001H,001H,019H,009H,015H,015H,01BH,000H

;//*******************//;
;//* INITIAL DEVIECE *//;
;//*******************//;
INIT:		MOV	P1,#0FFH
		MOV	P3,#0FFH
		MOV	SP,#050H
		MOV	R0,#07FH
		CLR	A
		MOV	@R0,A
		DJNZ	R0,$-1
		
		CLR	TR1
		MOV	SCON,#052H
		MOV	TMOD,#022H
		MOV	TH1,#0FDH
		MOV	IE,#00010000B
		SETB	TR1
		SETB	EA
		
		ACALL	DELAY1S
		
WRITE_THAI:	MOV	A,#0FEH				; SEND SLCD COMMAND PREFIX
		MOV	TX_DATA,A
		SETB	TI
		NOP
		MOV	A,#040H				; WRITE CGRAM COMMAND (WRITE THAI LETTERS) 
		MOV	TX_DATA,A
		SETB	TI
		NOP
		MOV	A,#000H
		MOV	DPTR,#TABLE_THAI		; TABLE ADDRESS = 0
		MOV	B,#8*8				; WRITE BITMAP 64 LETTERS
		
WRITE_CGRAM1:	CLR	A
		MOVC	A,@A+DPTR			; LOOK-UP TABLE (FOR THAI LETTERS)
		MOV	TX_DATA,A
		SETB	TI
		NOP
		INC	DPTR
		DJNZ	B,WRITE_CGRAM1			; SKIP IF COMPLETED
		
		MOV	TX_DATA,#254
		SETB	TI
		NOP
		MOV	TX_DATA,#001H
		SETB	TI
		NOP
		
		ACALL	RDTEMP				; REMOVE INITIAL START UP RESULT 85.C
		
		ACALL	DELAY1S
		
;//****************//;
;//* MAIN PROGRAM *//;
;//****************//;
MAIN:		ACALL	RDTEMP
		ACALL	T_CELCIUS
		ACALL	SHOW_THAI
		AJMP	MAIN
		
;//**********************//;
;//* SHOW TEMP ON RS232 *//;
;//**********************//;
SHOW_THAI:	MOV	TX_DATA,#0FEH
		SETB	TI
		NOP
		MOV	TX_DATA,#084H	; DDRAM ADDR. 0X84 (LINE1/5)
		SETB	TI
		NOP
		MOV	TX_DATA,#005H
		SETB	TI
		NOP
		MOV	TX_DATA,#0FEH
		SETB	TI
		NOP
		MOV	TX_DATA,#0C0H	; DDRAM ADDR. 0XC0 (LINE2/1)
		SETB	TI
		NOP
		MOV	TX_DATA,#000H
		SETB	TI
		NOP
		MOV	TX_DATA,#001H
		SETB	TI
		NOP
		MOV	TX_DATA,#002H
		SETB	TI
		NOP
		MOV	TX_DATA,#003H
		SETB	TI
		NOP
		MOV	TX_DATA,#004H
		SETB	TI
		NOP
		MOV	TX_DATA,#" "
		SETB	TI
		NOP
		MOV	TX_DATA,#"="
		SETB	TI
		NOP
		MOV	TX_DATA,#" "
		SETB	TI
		NOP
		MOV	TX_DATA,N1	; SHOW HUNDRED
		SETB	TI
		NOP
		MOV	TX_DATA,N2	; SHOW TEN
		SETB	TI
		NOP
		MOV	TX_DATA,N3	; SHOW UNIT
		SETB	TI
		NOP
		MOV	TX_DATA,#"."	; SHOW .
		SETB	TI
		NOP
		MOV	TX_DATA,POINT	; SHOW DECIMAL
		SETB	TI
		NOP
		MOV	TX_DATA,#0DFH	; FOR HD44780 OR COMPATIBLE ONLY <DEGREE SYMBOL>
		SETB	TI
		NOP
		MOV	TX_DATA,#006H	; WRITE ?
		SETB	TI
		NOP
		RET

;//********************//;
;//* TEMP CALCULATION *//;
;//********************//;
;DATA IN TEMP_L REG.
;DATA RETURN N1,N2,N3,DP REG.
T_CELCIUS:	MOV	A,TEMP_L
		CLR	C
		RRC	A			;--->>> TEMP_RD/2
		MOV	POINT,#"0"		;--->>> SHOW .0 DEGREE
		JNC	CONVERT1		;--->>> JUMP IF CARRY = 0
		MOV	POINT,#"5"		;--->>> SHOW .5 DEGREE
CONVERT1:	
		MOV	B,#100
		DIV	AB
		ADD	A,#030H			;--->>> CONVERT BINARY TO BCD
		MOV	N1,A			;--->>> R0 = HUNDRED UNIT
		MOV	A,B
		MOV	B,#10
		DIV	AB
		ADD	A,#030H
		MOV	N2,A			;--->>> R1 = TEN DIGIT
		MOV	A,B
		ADD	A,#030H
		MOV	N3,A			;--->>> R2 = UNIT DEGREE
		
		MOV	A,N1
		SUBB	A,#030H
		JNZ	CONVERT2		;--->>> JUMP IF W <> 0
		MOV	N1,#" "			;--->>> SHOW WHITE SPACE IF TEMP <100 C
CONVERT2:	
		MOV	A,N2
		SUBB	A,#030H
		JNZ	CONVERT3		;--->>> JUMP IF W <> 0
		MOV	N2,#" "			;--->>> SHOW WHITE SPACEHOW IF TEMP < 10 C
CONVERT3:
		RET

;//************************//;
;//* DS1820 PROGRAM GROUP *//;
;//************************//;
RDTEMP:		ACALL	PRES_DS1820
		MOV	A,#0CCH			;--->>> SKIP ROM
		ACALL	WR_DS1820
		MOV	A,#044H			;--->>> TEMP CONVERT
		ACALL	WR_DS1820
		
		ACALL	DELAY500M
		
		ACALL	PRES_DS1820
		MOV	A,#0CCH			;--->>> SKIP ROM
		ACALL	WR_DS1820
		MOV	A,#0BEH			;--->>> READ SCRATCHPAD
		ACALL	WR_DS1820
		
		ACALL	RD_DS1820
		MOV	TEMP_L,A
		ACALL	RD_DS1820
		MOV	TEMP_H,A
		RET

;//*****WRITE DEVICE*****//;
WR_DS1820:	MOV	B,#8
WR_LOOP:	CLR	DQ
		ACALL	DELAY15US
		RRC	A
		MOV	DQ,C
		ACALL	DELAY45US
		SETB	DQ
		DJNZ	B,WR_LOOP
		RET

;//*****READ DEVICE*****//;
RD_DS1820:	MOV	B,#8
RD_LOOP:	CLR	DQ
		ACALL	DELAY15US
		SETB	DQ
		MOV	C,DQ
		RRC	A
		ACALL	DELAY45US
		SETB	DQ
		DJNZ	B,RD_LOOP
		RET

;//*****PRESENCE PLUSE*****//;
PRES_DS1820:	CLR	DQ
		ACALL	DELAY600US
		SETB	DQ
		ACALL	DELAY60US
		JNB	DQ,DEVICE_PRES
		ACALL	DELAY600US
		SJMP	PRES_DS1820
		
DEVICE_PRES:	ACALL	DELAY600US
		RET

;//*****************//;
;//* DELAY ROUTINE *//;
;//*****************//;
;1.085 X 6 = 6.51
;1.085 X 2 = 2.17
	
;***** [(1.085 X 6)-(15)]/(1.085 X 2) = 3.9 *****;
DELAY15US:	MOV	TIM1,#3
		DJNZ	TIM1,$
		RET

;***** [(1.085 X 6)-(45)]/(1.085 X 2) = 17.7 *****;
DELAY45US:	MOV	TIM1,#17
		DJNZ	TIM1,$
		RET

;***** [(1.085 X 6)-(60)]/(1.085 X 2) = 24.6 *****;
DELAY60US:	MOV	TIM1,#24
		DJNZ	TIM1,$
		RET

;***** [(1.085 X 6)-(600)]/(1.085 X 2) = 182.3 *****;
DELAY600US:	MOV	TIM1,#182
		NOP
		DJNZ	TIM1,$-1
		RET

DELAY1S:	MOV	TIM1,#10
		SJMP	DELAY

DELAY500M:	MOV	TIM1,#5
		SJMP	DELAY

DELAY:		MOV	TIM2,#100
DELAY01:	MOV	TIM3,#230
DELAY02:	NOP
		NOP
		DJNZ	TIM3,DELAY02
		DJNZ	TIM2,DELAY01
		DJNZ	TIM1,DELAY
		RET

		END

;//*******************************************************************//;
;//* PROGRAM		: DS1820 THAI LANG
;//* DEVICE		: AT89C2051
;//* X-TAL		: 11.0592MHZ
;//* AUTHOR		: SOMLAK MANGNIMIT
;//* DATE		: 19/09/2553
;//* VERSION		: 1.0BETA
;//* NOTE		: THIS PROGRAM IS FREE AND ALL NOT WARRANTY.
;//*******************************************************************//;

DQ	BIT	P1.0
LED_R	BIT	P1.1
LED_G	BIT	P1.2
FAN	BIT	P1.3

DSEG
ORG	020H
TIM1:	DS	1
TIM2:	DS	1
TIM3:	DS	1

TEMP_L:	DS	1
TEMP_H:	DS	1

TX_DATA:	DS	1
RX_DATA:	DS	1

N1:	DS	1
N2:	DS	1
N3:	DS	1
POINT:	DS	1

HITEMP_SET	EQU	33
LOWTEMP_SET	EQU	30

CSEG
		ORG	0000H
		SJMP	INIT

		ORG	0023H		;--->>> SERIAL
		PUSH	ACC
		JBC	RI,SER_RX
SER_TX:		CLR	TI
		MOV	SBUF,TX_DATA
SER_TX_WAIT:	JBC	TI,SER_EXIT
		AJMP	SER_TX_WAIT
SER_RX:		MOV	RX_DATA,SBUF
SER_EXIT:	;SETB	RX_OK
		POP	ACC
		RETI

TABLE_THAI:
CGRAM_ADDR00: 	DB   00EH,011H,001H,019H,011H,00EH,003H,001H
CGRAM_ADDR01: 	DB   00DH,015H,015H,015H,017H,019H,000H,000H
CGRAM_ADDR02:	DB   01BH,01BH,00AH,00DH,009H,009H,000H,000H
CGRAM_ADDR03:	DB   00EH,011H,009H,009H,019H,019H,005H,007H
CGRAM_ADDR04:	DB   019H,019H,009H,009H,01FH,019H,000H,000H
CGRAM_ADDR05:	DB   000H,000H,000H,000H,000H,000H,00EH,01FH
CGRAM_ADDR06:	DB   001H,002H,015H,00DH,005H,005H,002H,000H
CGRAM_ADDR07:  	DB   001H,001H,019H,009H,015H,015H,01BH,000H

;//*******************//;
;//* INITIAL DEVIECE *//;
;//*******************//;
INIT:		MOV	P1,#0FFH
		MOV	P3,#0FFH
		MOV	SP,#050H
		MOV	R0,#07FH
		CLR	A
		MOV	@R0,A
		DJNZ	R0,$-1
		
		CLR	TR1
		MOV	SCON,#052H
		MOV	TMOD,#022H
		MOV	TH1,#0FDH
		MOV	IE,#00010000B
		SETB	TR1
		SETB	EA
		
		ACALL	DELAY1S
		
WRITE_THAI:	MOV	A,#0FEH				; SEND SLCD COMMAND PREFIX
		MOV	TX_DATA,A
		SETB	TI
		NOP
		MOV	A,#040H				; WRITE CGRAM COMMAND (WRITE THAI LETTERS) 
		MOV	TX_DATA,A
		SETB	TI
		NOP
		MOV	A,#000H
		MOV	DPTR,#TABLE_THAI		; TABLE ADDRESS = 0
		MOV	B,#8*8				; WRITE BITMAP 64 LETTERS
		
WRITE_CGRAM1:	CLR	A
		MOVC	A,@A+DPTR			; LOOK-UP TABLE (FOR THAI LETTERS)
		MOV	TX_DATA,A
		SETB	TI
		NOP
		INC	DPTR
		DJNZ	B,WRITE_CGRAM1			; SKIP IF COMPLETED
		
		MOV	TX_DATA,#254
		SETB	TI
		NOP
		MOV	TX_DATA,#001H
		SETB	TI
		NOP
		
		ACALL	RDTEMP				; REMOVE INITIAL START UP RESULT 85.C
		
		ACALL	DELAY1S
		
;//****************//;
;//* MAIN PROGRAM *//;
;//****************//;
MAIN:		ACALL	RDTEMP
		ACALL	T_CELCIUS
		ACALL	SHOW_THAI
		ACALL	TEMP_COMP
		AJMP	MAIN
		
		
TEMP_COMP:	MOV	A,TEMP_L
		CLR	ACC.0
		RR	A
		CLR	C
		SUBB	A,#HITEMP_SET
		JNC	TOO_HI
		SETB	LED_R
		CLR	LED_G
		CLR	FAN
		RET
		
TOO_HI:		CPL	LED_R
		SETB	LED_G
		SETB	FAN
		RET
		
;//**********************//;
;//* SHOW TEMP ON RS232 *//;
;//**********************//;
SHOW_THAI:	MOV	TX_DATA,#0FEH
		SETB	TI
		NOP
		MOV	TX_DATA,#084H	; DDRAM ADDR. 0X84 (LINE1/5)
		SETB	TI
		NOP
		MOV	TX_DATA,#005H
		SETB	TI
		NOP
		MOV	TX_DATA,#0FEH
		SETB	TI
		NOP
		MOV	TX_DATA,#0C0H	; DDRAM ADDR. 0XC0 (LINE2/1)
		SETB	TI
		NOP
		MOV	TX_DATA,#000H
		SETB	TI
		NOP
		MOV	TX_DATA,#001H
		SETB	TI
		NOP
		MOV	TX_DATA,#002H
		SETB	TI
		NOP
		MOV	TX_DATA,#003H
		SETB	TI
		NOP
		MOV	TX_DATA,#004H
		SETB	TI
		NOP
		MOV	TX_DATA,#" "
		SETB	TI
		NOP
		MOV	TX_DATA,#"="
		SETB	TI
		NOP
		MOV	TX_DATA,#" "
		SETB	TI
		NOP
		MOV	TX_DATA,N1	; SHOW HUNDRED
		SETB	TI
		NOP
		MOV	TX_DATA,N2	; SHOW TEN
		SETB	TI
		NOP
		MOV	TX_DATA,N3	; SHOW UNIT
		SETB	TI
		NOP
		MOV	TX_DATA,#"."	; SHOW .
		SETB	TI
		NOP
		MOV	TX_DATA,POINT	; SHOW DECIMAL
		SETB	TI
		NOP
		MOV	TX_DATA,#0DFH	; FOR HD44780 OR COMPATIBLE ONLY <DEGREE SYMBOL>
		SETB	TI
		NOP
		MOV	TX_DATA,#006H	; WRITE ?
		SETB	TI
		NOP
		RET

;//********************//;
;//* TEMP CALCULATION *//;
;//********************//;
;DATA IN TEMP_L REG.
;DATA RETURN N1,N2,N3,DP REG.
T_CELCIUS:	MOV	A,TEMP_L
		CLR	C
		RRC	A			;--->>> TEMP_RD/2
		MOV	POINT,#"0"		;--->>> SHOW .0 DEGREE
		JNC	CONVERT1		;--->>> JUMP IF CARRY = 0
		MOV	POINT,#"5"		;--->>> SHOW .5 DEGREE
CONVERT1:	
		MOV	B,#100
		DIV	AB
		ADD	A,#030H			;--->>> CONVERT BINARY TO BCD
		MOV	N1,A			;--->>> R0 = HUNDRED UNIT
		MOV	A,B
		MOV	B,#10
		DIV	AB
		ADD	A,#030H
		MOV	N2,A			;--->>> R1 = TEN DIGIT
		MOV	A,B
		ADD	A,#030H
		MOV	N3,A			;--->>> R2 = UNIT DEGREE
		
		MOV	A,N1
		SUBB	A,#030H
		JNZ	CONVERT2		;--->>> JUMP IF W <> 0
		MOV	N1,#" "			;--->>> SHOW WHITE SPACE IF TEMP <100 C
CONVERT2:	
		MOV	A,N2
		SUBB	A,#030H
		JNZ	CONVERT3		;--->>> JUMP IF W <> 0
		MOV	N2,#" "			;--->>> SHOW WHITE SPACEHOW IF TEMP < 10 C
CONVERT3:
		RET

;//************************//;
;//* DS1820 PROGRAM GROUP *//;
;//************************//;
RDTEMP:		ACALL	PRES_DS1820
		MOV	A,#0CCH			;--->>> SKIP ROM
		ACALL	WR_DS1820
		MOV	A,#044H			;--->>> TEMP CONVERT
		ACALL	WR_DS1820
		
		ACALL	DELAY500M
		
		ACALL	PRES_DS1820
		MOV	A,#0CCH			;--->>> SKIP ROM
		ACALL	WR_DS1820
		MOV	A,#0BEH			;--->>> READ SCRATCHPAD
		ACALL	WR_DS1820
		
		ACALL	RD_DS1820
		MOV	TEMP_L,A
		ACALL	RD_DS1820
		MOV	TEMP_H,A
		RET

;//*****WRITE DEVICE*****//;
WR_DS1820:	MOV	B,#8
WR_LOOP:	CLR	DQ
		ACALL	DELAY15US
		RRC	A
		MOV	DQ,C
		ACALL	DELAY45US
		SETB	DQ
		DJNZ	B,WR_LOOP
		RET

;//*****READ DEVICE*****//;
RD_DS1820:	MOV	B,#8
RD_LOOP:	CLR	DQ
		ACALL	DELAY15US
		SETB	DQ
		MOV	C,DQ
		RRC	A
		ACALL	DELAY45US
		SETB	DQ
		DJNZ	B,RD_LOOP
		RET

;//*****PRESENCE PLUSE*****//;
PRES_DS1820:	CLR	DQ
		ACALL	DELAY600US
		SETB	DQ
		ACALL	DELAY60US
		JNB	DQ,DEVICE_PRES
		ACALL	DELAY600US
		SJMP	PRES_DS1820
		
DEVICE_PRES:	ACALL	DELAY600US
		RET

;//*****************//;
;//* DELAY ROUTINE *//;
;//*****************//;
;1.085 X 6 = 6.51
;1.085 X 2 = 2.17
	
;***** [(1.085 X 6)-(15)]/(1.085 X 2) = 3.9 *****;
DELAY15US:	MOV	TIM1,#3
		DJNZ	TIM1,$
		RET

;***** [(1.085 X 6)-(45)]/(1.085 X 2) = 17.7 *****;
DELAY45US:	MOV	TIM1,#17
		DJNZ	TIM1,$
		RET

;***** [(1.085 X 6)-(60)]/(1.085 X 2) = 24.6 *****;
DELAY60US:	MOV	TIM1,#24
		DJNZ	TIM1,$
		RET

;***** [(1.085 X 6)-(600)]/(1.085 X 2) = 182.3 *****;
DELAY600US:	MOV	TIM1,#182
		NOP
		DJNZ	TIM1,$-1
		RET

DELAY1S:	MOV	TIM1,#10
		SJMP	DELAY

DELAY500M:	MOV	TIM1,#5
		SJMP	DELAY

DELAY:		MOV	TIM2,#100
DELAY01:	MOV	TIM3,#230
DELAY02:	NOP
		NOP
		DJNZ	TIM3,DELAY02
		DJNZ	TIM2,DELAY01
		DJNZ	TIM1,DELAY
		RET

		END

//--------------------------------------------------
//Program	:IR Decode (NEC Protocol)
//Author	:Somlak Mangnimit
//Date		:27/09/2012
//Mcu		:ATmega8A
//Xtal		:16Mhz
//Compiler	:WinAVR 20100110
//Version   :1.0
//Note  	:-
//--------------------------------------------------
#define		F_CPU 16000000UL
#include	<util/delay.h>
#include	<avr/io.h>
#include	<avr/interrupt.h>
#include	<stdio.h>
#define		BAUD_RATE 9600

static int usart_putc(char c, FILE *stream);
static FILE mystdout = FDEV_SETUP_STREAM(usart_putc, NULL,_FDEV_SETUP_WRITE);
volatile unsigned char buffer[4],ir_state,bit_flag,bit_cnt,byte_cnt,ndat;
volatile unsigned long BIT_BUF;
enum{rem_state1,rem_state2,rem_state3,rem_state4};

#define ICCR_RISING()       TCCR1B |= (1<<ICES1);
#define ICCR_FALLING()      TCCR1B &= ~(1<<ICES1);

#define ICCR_ENABLE()       TIMSK |= (1<<TICIE1);
#define ICCR_DISABLE()      TIMSK &= ~(1<<TICIE1);

#define LED_ON()            PORTB |= (1<<PB5);
#define LED_OFF()           PORTB &= ~(1<<PB5);

#define Adr                 buffer[0]
#define AdrInv              buffer[1]
#define Cmd                 buffer[2]
#define CmdInv              buffer[3]

//timer
void initial(void){
TCCR1B |= (1<<CS12);            //prescaler clk/256
TIMSK |= (1<<TICIE1);           //input capture interrupt enable
sei();                          //global interrupt enable
}

//put usart
static int usart_putc(char c , FILE *stream){
    if(c == '\n')
    usart_putc('\r', stream);
    loop_until_bit_is_set(UCSRA, UDRE);
    UDR = c;
    return 0;
}

//usart initial
void usart_initial(void){
    DDRD |= (1<<PD1);
    UBRRH = (((F_CPU/BAUD_RATE)/16)-1)>>8;			// set baud rate
    UBRRL = (((F_CPU/BAUD_RATE)/16)-1);
    UCSRB = (1<<RXEN)|(1<<TXEN);					// enable Rx & Tx
    UCSRC = (1<<URSEL)|(1<<UCSZ1)|(1<<UCSZ0);		// config USART; 8N1
    stdout = &mystdout;
}

//test logical inverse
unsigned char log_inv(unsigned char a,unsigned char b){
    a ^= a;
    if(a==b){return 0;}
    else{return 1;}
}

//main
int main(void){
DDRB |= (1<<PB5)|(1<<PB3);
DDRC |= (1<<PC3)|(1<<PC2)|(1<<PC1)|(1<<PC0);
initial();
usart_initial();
    LED_ON();
    _delay_ms(300);
    LED_OFF();

    for(;;){
        ndat = 0;
        while(!ndat);
        if(log_inv(Adr,AdrInv)&&log_inv(Cmd,CmdInv)){
            switch(Cmd){
                case 12:
                    PORTC ^= (1<<PC0);
                break;

                case 6:
                    PORTC ^= (1<<PC1);
                break;

                case 5:
                    PORTC ^= (1<<PC2);
                break;

                case 79:
                    PORTC ^= (1<<PC3);
                break;

                case 1:
                    PORTC &= ~(1<<PC3)&(1<<PC2)&(1<<PC1)&(1<<PC0);
                //end case
            }
        }
        printf("Address = %d\nLogical Inverse Address = %d\nCommand = %d\nLogical Inverse Command = %d\n\n",
        buffer[0],buffer[1],buffer[2],buffer[3]);
    }

}

//reset ir state
void RESET_IR(void){
    ir_state = rem_state1;
    bit_flag = 0;
    byte_cnt = 0;
    bit_cnt = 0;
    ICCR_FALLING();
    LED_OFF();
}

//isr input capture
ISR(TIMER1_CAPT_vect){
LED_ON();
    switch(ir_state){
        case rem_state1:
            ir_state = rem_state2;
            ICCR_RISING();
            TCNT1 = 0;
        break;

        case rem_state2:
            BIT_BUF = ICR1;
            BIT_BUF = BIT_BUF*10000/625;
            if(BIT_BUF>9000-200&&BIT_BUF<9000+200){
            ir_state = rem_state3;}
            else{RESET_IR();break;}
            ICCR_FALLING();
            TCNT1 = 0;
        break;

        case rem_state3:
            BIT_BUF = ICR1;
            BIT_BUF = BIT_BUF*10000/625;
            if(BIT_BUF>4400-200&&BIT_BUF<4400+200){
            ir_state = rem_state4;}
            else{RESET_IR();break;}
            ICCR_RISING();
        break;

        case rem_state4:
            if(!bit_flag){
                bit_flag = 1;
                ICCR_FALLING();
                TCNT1 = 0;
            }else{
                bit_flag = 0;
                BIT_BUF = ICR1;
                BIT_BUF = BIT_BUF*10000/625;
                buffer[byte_cnt] >>= 1;         //LSB
                if(BIT_BUF>1500&&BIT_BUF<1700){
                buffer[byte_cnt] |= 0x80;}
                else if(BIT_BUF>300&&BIT_BUF<600){
                buffer[byte_cnt] &= ~0x80;}
                else{RESET_IR();break;}
                ICCR_RISING();
            }

            if(++bit_cnt>15){
                if(++byte_cnt>3){RESET_IR();ndat = 1;}
                else{bit_cnt = 0;}
            }
        //end case
    }
    TIFR |= (1<<ICF1);              //clear flag by write one
}