Svenska ElektronikForumet

Kod: Markera allt

int x = 0;
#define NOP4	asm("nop"); asm("nop"); asm("nop"); asm("nop");
#define NOP2	asm("nop"); asm("nop");

void SendIRSequence(void);

//sends out a pulse of IR modulated at 40khz
// - the parameter is the number of cycles to send
// - each cycle is 25us long - and 50% duty cycle
//the macro converts microseconds into cycles
#define SendIRPulse(x) SendIRPulseCycles(x/25);
void SendIRPulseCycles(char cycles)
{
	while (cycles--)		//this loop is exactly 25us - of approximately 50% dutycycle
	{
		//PORTC=0b00001111;
		GPIO0 = 1;
		NOP4; NOP4; NOP2;
		//PORTC=0b00000000;
		GPIO0 = 0;
		NOP4; NOP4;
	}
}

//This is a delay loop that in theory delays an precise number of microseconds
//unfortunately it isn't particularly accurate
// - but it is easier to just trial/error the parameter value than to fix the function
#define waitExactUs(x) waitExactUsHex(x/256, (x%256)/5);
void waitExactUsHex(char hByte, char lByte)
{
	char i;
	while (lByte--) { continue; }	//delay for the extra bit
	while (hByte--) {				//delay loop for the bulk of the time
		i = 61;
		while (i--) { continue; }
		}
}

//This sends out the coded modulated IR pulses
// the sequence is courtesy of http://www.bigmike.it/ir-control.html
void SendIRSequence()
{
	SendIRPulse(2000);	//2250us of modulated IR
	waitExactUs(27800);	//delay 27600 us
	SendIRPulse(500);	//650us of modulated IR
	waitExactUs(1500);	//delay 1375 us
	SendIRPulse(500);	//575us of modulated IR
	waitExactUs(3500);	//delay 3350 us
	SendIRPulse(630);	//650us of modulated IR
	
}


void
main(void)
{
	init();	// Function call inserted by C-Wiz
	GPIO1 = 1;
	for(x = 0; x < 10000; x++){}
	GPIO1 = 0;
	SendIRSequence();
	
	while (1){
		//TODO Auto-generated main function
	}
	
}