int led=13, button=2;
#define	DO()	{tone(led,523,200);delay(200);}
#define	RE()	{tone(led,587,200);delay(200);}
#define	MI()	{tone(led,659,200);delay(200);}
#define	FA()	{tone(led,698,200);delay(200);}
void f38kHz(int n){								// 26μs × n周期
	volatile char i;
	int j;
	for(j=0;j<n;j++){
		digitalWrite(led, HIGH);	i=0;i++;	// 13μs点灯
		digitalWrite(led, LOW);		i=0;		// 13μs消灯
	}
}
void tx1(){f38kHz(300/26); delayMicroseconds(1800);}// 「1」の赤外線信号
void tx0(){f38kHz(300/26); delayMicroseconds(700);}	// 「0」の赤外線信号
void sx1(){delayMicroseconds(600);f38kHz(1200/26); }// 「1」の赤外線信号(SONY)
void sx0(){delayMicroseconds(600);f38kHz(600/26); }	// 「0」の赤外線信号(SONY)
void txbyte(uint8_t data){						// 1バイトのdataの赤外線信号
	if(data&0x01) tx1();	else tx0();			// ビット0
	if(data&0x02) tx1();	else tx0();			// ビット1
	if(data&0x04) tx1();	else tx0();			// ビット2
	if(data&0x08) tx1();	else tx0();			// ビット3
	if(data&0x10) tx1();	else tx0();			// ビット4
	if(data&0x20) tx1();	else tx0();			// ビット5
	if(data&0x40) tx1();	else tx0();			// ビット6
	if(data&0x80) tx1();	else tx0();			// ビット7
}
void sxbyte(uint8_t data){						// 4ビットのdataの赤外線信号(SONY)
	if(data&0x01) sx1();	else sx0();			// ビット0
	if(data&0x02) sx1();	else sx0();			// ビット1
	if(data&0x04) sx1();	else sx0();			// ビット2
	if(data&0x08) sx1();	else sx0();			// ビット3
	if(data&0x10) sx1();	else sx0();			// ビット4
	if(data&0x20) sx1();	else sx0();			// ビット5
	if(data&0x40) sx1();	else sx0();			// ビット6
	if(data&0x80) sx1();	else sx0();			// ビット7
}

void setup(){
	pinMode(led, OUTPUT);
	pinMode(button, INPUT_PULLUP);
}
void loop(){
	int i;
while(digitalRead(button)==HIGH);				// (1) SWを押すと点灯
	digitalWrite(led, HIGH);	delay(1000);
while(digitalRead(button)==HIGH);				// (2) SWを押すと消灯
	digitalWrite(led, LOW);		delay(1000);
while(digitalRead(button)==HIGH);				// (3) SWを押すと500ms点灯 500ms消灯を5回繰返す(1Hz 5秒)
	for(i=0;i<5;i++){digitalWrite(led, HIGH);	delay(500); digitalWrite(led, LOW);	delay(500);}
while(digitalRead(button)==HIGH);				// (4) SWを押すと5ms点灯 5ms消灯を200回(100Hz 2秒)
	for(i=0;i<200;i++){digitalWrite(led, HIGH);	delay(5); digitalWrite(led, LOW);	delay(5);}
while(digitalRead(button)==HIGH);				// (5) SWを押すとドレミファミレド
	DO();RE();MI();FA();MI();RE();DO();
while(digitalRead(button)==HIGH);				// (6) SWを押すとTVリモコンのチャンネルUP
	f38kHz(9000/26);	delayMicroseconds(4500);// 東芝TVのチャンネルUP
	txbyte(0x40); txbyte(0xbf);	txbyte(0x1b); txbyte(0xe4); tx0();
	delay(100);	// ******************************* 少し時間をおいて
	f38kHz(3600/26);	delayMicroseconds(1600); // パナソニックTVのチャンネルUP
	txbyte(0x02); txbyte(0x20);
	txbyte(0x80); txbyte(0x00);	txbyte(0x34); txbyte(0xb4);	tx0();
	delay(100);	// ******************************* 少し時間をおいて
	f38kHz(3600/26);	delayMicroseconds(1600);// パナソニックBDのチャンネルUP
	txbyte(0x02); txbyte(0x20);
	txbyte(0xb0); txbyte(0x00);	txbyte(0x34); txbyte(0x84);	tx0();
	delay(100);	// ******************************* 少し時間をおいて
	txbyte(0x8f); txbyte(0x12);	delay(42);		// シャープTVのチャンネルUP
	txbyte(0x11); txbyte(0xa1);	tx0();
	delay(100);	// ******************************* 少し時間をおいて
	f38kHz(2500/26); sxbyte(0x90); sx0();sx0();sx0();sx0(); delay(27);	// SONY TVのチャンネルUP
	f38kHz(2500/26); sxbyte(0x90); sx0();sx0();sx0();sx0(); delay(27);
	f38kHz(2500/26); sxbyte(0x90); sx0();sx0();sx0();sx0();
	delay(1000);
while(digitalRead(button)==HIGH);				// (7) SWを押すとTVリモコンのチャンネルDOWN
	f38kHz(9000/26);	delayMicroseconds(4500);// 東芝TVのチャンネルDOWN
	txbyte(0x40); txbyte(0xbf);	txbyte(0x1f); txbyte(0xe0);	tx0();
	delay(100);	// ******************************* 少し時間をおいて
	f38kHz(3600/26);	delayMicroseconds(1600);// パナソニックTVのチャンネルDOWN
	txbyte(0x02); txbyte(0x20);
	txbyte(0x80); txbyte(0x00);	txbyte(0x35); txbyte(0xb5);	tx0();
	delay(100);	// ******************************* 少し時間をおいて
	f38kHz(3600/26);	delayMicroseconds(1600);// パナソニックBDのチャンネルDOWN
	txbyte(0x02); txbyte(0x20);
	txbyte(0xb0); txbyte(0x00);	txbyte(0x35); txbyte(0x85);	tx0();
	delay(100);	// ******************************* 少し時間をおいて
	txbyte(0x8f); txbyte(0x12);	delay(42);		// シャープTVのチャンネルDOWN
	txbyte(0x12); txbyte(0x91);	tx0();
	delay(100);	// ******************************* 少し時間をおいて
	f38kHz(2500/26); sxbyte(0x91); sx0();sx0();sx0();sx0(); delay(27);	// SONY TVのチャンネルDOWN
	f38kHz(2500/26); sxbyte(0x91); sx0();sx0();sx0();sx0(); delay(27);
	f38kHz(2500/26); sxbyte(0x91); sx0();sx0();sx0();sx0();
}