#define F_CPU 1000000UL

#include <avr/io.h>
#include <avr/interrupt.h>
#include <stdbool.h>
#include <util/delay.h>
#include "lcd.h"

volatile bool flag = true;

/* 矢印を消す関数 */
void lcd_sel_clear()
{
	lcd_pos(1,1);
	lcd_data(0x20);
	lcd_pos(1,7);
	lcd_data(0x20);
	lcd_pos(2,1);
	lcd_data(0x20);
	lcd_pos(2,7);
	lcd_data(0x20);
}

/* 割り込み時に実行する関数 */
ISR(PCINT0_vect)
{
	_delay_ms(200);
	cli();
	lcd_sel_clear();
	flag = false;
	sei();
}

int main(void)
{
	DDRC  = 0b11111111;	// PC0にLEDを付ける
	PORTC = 0b00000000;	// ポートCをL出力
	DDRD  = 0b11111111;	// LCDピンに使用
	PORTD = 0b00000000;	// ポートD初期化
	
	// 割り込みの設定(PB0を割り込みとして使う)
	cli();						// 割り込み禁止
	DDRB   = 0b00000000;		// 入力に設定
	PORTB  = 0b00000001;		// PB0をプルアップ
	PCICR  = (1 << PCIE0);		// ピン・チェンジ・コントロール・レジスタの設定
	PCMSK0 = (1 << PCINT0);		// ピン・チェンジ・インタラプト・マスク0レジスタの設定

	lcd_init();
	int pattern = -1;
	
	// 最初の画面
	lcd_pos(1,1);
	lcd_str(" OFF   ON");
	lcd_pos(2,1);
	lcd_str(" Blink Hi-Blink");

    while (1) 
    {
		cli();
		pattern++;
		flag = true;
		
		switch (pattern)
		{
			case 0:
				lcd_pos(1,1);
				lcd_data(0x7E);
				sei();
				while (flag)
				{
					PORTC = 0b00000000;	// PC0 L
				}
				break;
			case 1:
				lcd_pos(1,7);
				lcd_data(0x7E);
				sei();
				while (flag)
				{
					PORTC = 0b00000001;	// PC0 H
				}
				break;
			case 2:
				lcd_pos(2,1);
				lcd_data(0x7E);
				sei();
				while (flag)
				{
					/* 1秒点滅 */
					PORTC = 0b00000001;
					_delay_ms(500);
					PORTC = 0b00000000;
					_delay_ms(500);
				}
				break;
			case 3:
				lcd_pos(2,7);
				lcd_data(0x7E);
				sei();
				while (flag)
				{
					/* 0.2秒点滅 */
					PORTC = 0b00000001;
					_delay_ms(100);
					PORTC = 0b00000000;
					_delay_ms(100);	
				}
				break;
			default:
				pattern = -1;
				break;
		}
    }
}

switch (条件式)
{
 case 数値:
  実行文;
  break;
 case 数値:
  実行文;
  break;
}

ISR(PCINT0_vect)
{
	_delay_ms(200);
	cli();
	lcd_sel_clear();
	flag = false;
	sei();
}

#ifndef _LCD_H_
#define  _LCD_H_

/* レジスター・セレクト・シグナルは何番ピンを使用するのか決める */
#define LCD_RS 0b00000001

/* イネーブル・シグナルは何番ピンを使用するのか決める */
#define LCD_E 0b00000010

/* LCDのデータビットに使うポートの指定(PIN4,5,6,7) */
#define LCD_PORT PORTD

// 4ビット送信
void lcd_out(char code, char rs);

// コマンド送信
void lcd_cmd(char cmd);

// データ送信
void lcd_data(char asci);

// 表示位置指定
void lcd_pos(char line, char col);

// ディスプレイ全消去
void lcd_clear(void);

// 文字列送信
void lcd_str(char *str);

// LCDモジュール初期化
void lcd_init(void);

#endif // _LCD_H_

/* lcd.h */
#include "lcd.h"
#include <avr/io.h>
#include <util/delay.h>


void lcd_out(char code, char rs) {
	LCD_PORT = (code & 0xF0) | (LCD_PORT & 0x0F);
	if (rs == 0)
	LCD_PORT = LCD_PORT & ~LCD_RS;
	else
	LCD_PORT = LCD_PORT | LCD_RS;

	_delay_ms(1);
	LCD_PORT = LCD_PORT | LCD_E;
	_delay_ms(1);
	LCD_PORT = LCD_PORT & ~LCD_E;
}

void lcd_cmd(char cmd) {
	lcd_out(cmd, 0);
	lcd_out(cmd<<4, 0);
	_delay_ms(2);
}

void lcd_data(char asci) {
	lcd_out(asci, 1);
	lcd_out(asci<<4, 1);
	_delay_ms(0.05);
}

void lcd_pos(char line, char col) {
	if (line == 1)
	lcd_cmd(0x80 + col - 1);
	else if (line == 2)
	lcd_cmd(0xC0 + col -1);
}

void lcd_clear(void) {
	lcd_cmd(0x01);
}

void lcd_str(char *str) {
	while(*str != '\0') {
		lcd_data(*str);
		str++;
	}
}

void lcd_init(void) {
	_delay_ms(15);
	lcd_out(0x30, 0);
	_delay_ms(5);
	lcd_out(0x30, 0);
	_delay_ms(1);
	lcd_out(0x30, 0);
	_delay_ms(1);
	lcd_out(0x20, 0);	// 4ビットモードに設定
	_delay_ms(1);
	lcd_cmd(0x28);		// 2行表示設定, 液晶2行, フォント5x7ドット
	lcd_cmd(0x0C);		// 画面表示ON, カーソルOFF, カーソル位置で点滅0FF
	lcd_cmd(0x06);		// カーソル移動右(インクリメントモード), 表示をシフトOFF
	lcd_cmd(0x01);		// 画面クリア
}