RL78 旧ページからの移植

//================================================================================================
// TO11/12 16ビット・タイマ出力（モーターPWM）
//================================================================================================
void To11Main(void)
{
    To11Duty(80); // duty 80%
    R_TAU1_Channel0_Start();
    To11Duty(10); // duty 10%
    R_TAU1_Channel0_Stop();
}
// PWMのduty設定：duty比 0～100（%）
void To11Duty(uint8_t d)
{
    if (d >= 100) TDR11 = 0x0C80U;  // 100%=0x0C80U, 50%=0x0640U  
    else TDR11 = (0x0C80U / 100U) * d;
}
void To10Intr(void){    NOP();  }   // PWMマスター10INTR
void To11Intr(void){    NOP();  }   // PWMスレーブ11INTR
// TO12 16ビット・タイマ12出力（予備PWM出力）
void To12Main(void)
{
    TDR12 = 0x0C80U;    // duty 100%
    R_TAU1_Channel0_Start();
    TDR12 = 0x0640U;    // duty 50%
    TDR12 = 0x0U;  // duty 0%
    R_TAU1_Channel0_Stop();
}
void To12Intr(void){    NOP();  }   // PWMスレーブ12INTR 

//
// lcd.c ILI9341+4DLCD-28QA 2016/10/15
//   http://imagewriteriij.blogspot.jp/2014/01/raspberry-pi-9-lcd-1.html
//   http://nopnop2002.webcrow.jp/TFT/ILI9340-1.html
//
#include "r_cg_macrodriver.h"
#include "iodefine.h"
#include "r_cg_userdefine.h"
// LCD Ports define
#define LCD_BKL     P3_bit.no1  // BackLight
#define LCD_CSX     P6_bit.no5  // CSX
#define LCD_DCX     P6_bit.no4  // DCX
#define LCD_WRX     P6_bit.no7  // WRX
#define LCD_RDX     P6_bit.no6  // RDX
// Prototype
static void lcd_test(uint16_t r, uint16_t g, uint16_t b);
static void clear(uint16_t r, uint16_t g, uint16_t b);
static void colorbar(void);
static void write_dc(uint8_t dc, uint8_t c);
static void write_dc_w(uint16_t w);
static void write_dc_w16(uint16_t w);
static void lcd_init(void);
static void addset(uint16_t x, uint16_t y);
static uint16_t rgb565_conv(uint16_t r, uint16_t g, uint16_t b);
//================================================================================================
// LCD main
//================================================================================================
void LcdMain(void)
{
/* 手動でリセットするなら･･･
 LCD_CSX = 0;   // CS=L（これは要らないかも）
 LCD_DCX = 1;   // D/C = H
 RESET = 0;     // Reset = L
 delay1ms(100); // delay 100ms
 RESET = 1;     // Reset = 1
 delay1ms(100); // delay 100ms
*/
    LCD_BKL = 1;    // バックライトON
    LCD_CSX = 0;    // CS=L
    lcd_init();

    lcd_test(0, 255, 255);
    lcd_test(255, 255, 0);
    lcd_test(255, 0, 255);

    LCD_CSX = 1;    // CS=H
    LCD_BKL = 0;    // バックライトOFF
}
// デバッグ用のLCD表示
void lcd_test(uint16_t r, uint16_t g, uint16_t b)
{
    clear(r, g, b);
    colorbar();
}
// lcd initial
static void lcd_init(void)
{
    LCD_WRX = 1;
    LCD_RDX = 1;
    delay1ms(25);
    write_dc(0,0xC0);       //Power control 
    write_dc(1,0x23);
    write_dc(0,0xC1);       //Power control 
    write_dc(1,0x10);
    write_dc(0,0xC5);       //VCM control 
    write_dc(1,0x3e);
    write_dc(1,0x28); 
    write_dc(0,0xC7);       //VCM control2 
    write_dc(1,0x86);
    write_dc(0,0x36);       // Memory Access Control 
    write_dc(1,0x48);
    write_dc(0,0x3A);       
    write_dc(1,0x55); 
    write_dc(0,0xB1);       
    write_dc(1,0x00);    
    write_dc(1,0x18); 
    write_dc(0,0xB6);       // Display Function Control 
    write_dc(1,0x08); 
    write_dc(1,0x82);
    write_dc(1,0x27);    
    write_dc(0,0xF2);       // 3Gamma Function Disable 
    write_dc(1,0x00); 
    write_dc(0,0x26);       //Gamma curve selected 
    write_dc(1,0x01); 
    write_dc(0,0xE0);       //Set Gamma 
    write_dc(1,0x0F); 
    write_dc(1,0x31); 
    write_dc(1,0x2B); 
    write_dc(1,0x0C); 
    write_dc(1,0x0E); 
    write_dc(1,0x08); 
    write_dc(1,0x4E); 
    write_dc(1,0xF1); 
    write_dc(1,0x37); 
    write_dc(1,0x07); 
    write_dc(1,0x10); 
    write_dc(1,0x03); 
    write_dc(1,0x0E); 
    write_dc(1,0x09); 
    write_dc(1,0x00); 
    write_dc(0,0XE1);       //Set Gamma 
    write_dc(1,0x00); 
    write_dc(1,0x0E); 
    write_dc(1,0x14); 
    write_dc(1,0x03); 
    write_dc(1,0x11); 
    write_dc(1,0x07); 
    write_dc(1,0x31); 
    write_dc(1,0xC1); 
    write_dc(1,0x48); 
    write_dc(1,0x08); 
    write_dc(1,0x0F); 
    write_dc(1,0x0C); 
    write_dc(1,0x31); 
    write_dc(1,0x36); 
    write_dc(1,0x0F); 
    write_dc(0,0x11);       //Exit Sleep 
    delay1ms(120); 
    write_dc(0,0x29);       //Display on 
    write_dc(0,0x2c);       //Memory Write
}
// clear
static void clear(uint16_t r, uint16_t g, uint16_t b)
{
    int i,j; 
    for (i=0;i<240;i++) {       // x = 0 to 239
        for(j=0;j<320;j++) {    // y = 0 to 319 
            addset(i,j);
            write_dc_w16(rgb565_conv(r, g, b));
        }
    }
}
// write color bar
static void colorbar(void)
{
    int i,j; 
    for(i=0;i<240;i++){         // x = 0 to 239
        for(j=0;j<320;j++){     // y = 0 to 319 
            if(j<106) {
                addset(i,j);
                write_dc_w16(rgb565_conv(255,0,0)); //red
            } else if(j<212) {
                addset(i,j);
                write_dc_w16(rgb565_conv(0,255,0)); //green
            } else { 
                addset(i,j);
                write_dc_w16(rgb565_conv(0,0,255)); //blue
            }
        }
    }
}
// set address
static void addset(uint16_t x, uint16_t y)
{
    write_dc(0,0x2A); // set column(x) address
    write_dc_w(x);
    write_dc_w(x);
    write_dc(0,0x2B); // set Page(y) address
    write_dc_w(y);
    write_dc_w(y);
    write_dc(0,0x2C); // Memory Write
}
// RGB565 conversion
// RGB565 is R(5)+G(6)+B(5)=16bit color format.
// Bit image "RRRRRGGGGGGBBBBB"
static uint16_t rgb565_conv(uint16_t r,uint16_t g,uint16_t b)
{
    uint16_t RR,GG,BB;
    RR = (r * 31 / 255) << 11;
    GG = (g * 63 / 255) << 5;
    BB = (b * 31 / 255);
    return(RR | GG | BB);
}
// Write data/command
static void write_dc(uint8_t dc, uint8_t c) 
{
    LCD_DCX = dc;   // 0=command, 1=data
    P7 = c;         // 下位8bitのみ（上位8bitはdont care）
    LCD_WRX = 0;    // WR out
    NOP();
    LCD_WRX = 1;    
}
// Write data word
static void write_dc_w(uint16_t w)
{
    uint8_t hi,lo;
    hi = (uint8_t)(w >> 8);
    lo = (uint8_t)(w & 0x00FF);
    write_dc(1,hi);
    write_dc(1,lo);
}
// Write data word by 16bit
static void write_dc_w16(uint16_t w)
{
    uint8_t hi,lo;
    hi = (uint8_t)(w >> 8);
    lo = (uint8_t)(w & 0x00FF);
    LCD_DCX = 1;    // 1=data
    P8 = hi;        // 上位8bit
    P7 = lo;        // 下位8bit
    LCD_WRX = 0;    // WR out
    NOP();
    LCD_WRX = 1;    
}

//======================================================================================
//
// データフラッシュ（0xF1000～の4K）をEELでアクセスする 2015/08/12 
// ・どの関数も1秒以内に終わるからWDTのリセットはほっとくべ
// 
//======================================================================================
#include "r_cg_macrodriver.h"
#include "r_cg_cgc.h"
#include "r_cg_port.h"
#include "r_cg_userdefine.h"
#include "r_cg_wdt.h"

#include <string.h>             
#include "fdl.h"                    /* FDL library header file               */
#include "fdl_types.h"              /* FDL types definition header file      */
#include "fdl_descriptor.h"         /* FDL descriptor header file            */
#include "eel.h"                    /* EEL library header file               */
#include "eel_types.h"              /* EEL types definition header file      */
#include "eel_descriptor.h"         /* EEL descriptor header file            */
#include "eel_user_types.h"         /* EEL user types definition header file */

//  IDでR/Wするbyte数を指定する（例えばID=1なら2byte,ID=8なら255byteだ）。
//  変更したいなら eel_descriptor.c を見れ（まぁ255byteにしておけば万能だろうと思う）。
#define IDNUM   8      // 255byteのR/Wを行う

// global variable
#define SAM_WRITE_SIZE  255         // テスト用のR/Wバッファのサイズ
eel_request_t   dtyEelReq;
eel_u08         dubWriteBuffer[ SAM_WRITE_SIZE ];
eel_u08         dubReadBuffer[ SAM_WRITE_SIZE ];
fdl_status_t    fdlStatus = 0; 
eel_u08         err_flag = 0;

//======================================================================================
// EELの初期化
//  formatflag:TRUEなら強制的にFormatを行う
//======================================================================================
bool eel_Init(bool formatflag)
{
    dtyEelReq.address_pu08   = 0;
    dtyEelReq.identifier_u08 = 0;
    dtyEelReq.command_enu    = 0;
    dtyEelReq.status_enu     = 0;
    // 開始
    fdlStatus = FDL_Init( &fdl_descriptor_str );    // FDLの初期化
    if( fdlStatus == FDL_OK ) {                     // OKなら
        FDL_Open();                                 // FDLオープン
        dtyEelReq.status_enu = EEL_Init();          // EELの初期化
        if( dtyEelReq.status_enu == EEL_OK ) {      // OKなら
            EEL_Open();                             // EELオープン
            do {
                // EEL開始コマンド発行
                dtyEelReq.command_enu = EEL_CMD_STARTUP;                    // コマンドをセットし
                EEL_Execute( &dtyEelReq );                                  // 実行し
                while( dtyEelReq.status_enu == EEL_BUSY ) EEL_Handler();    // 実行完了を待つ
                // EELブロック不整合エラーならFormatを実行する
                if (formatflag == true || dtyEelReq.status_enu == EEL_ERR_POOL_INCONSISTENT ) {
                    dtyEelReq.command_enu = EEL_CMD_FORMAT;
                    EEL_Execute( &dtyEelReq );
                    while( dtyEelReq.status_enu == EEL_BUSY ) EEL_Handler();
                    formatflag = false;
                }
            // Formatしたら再度EEL開始コマンドを実行する
            } while((dtyEelReq.command_enu == EEL_CMD_FORMAT) && (dtyEelReq.status_enu  == EEL_OK));
        }
    }
    return ( dtyEelReq.status_enu == EEL_OK )? true:false;
}
//======================================================================================
// EELでの書き込み
//======================================================================================
bool eel_Write(void)
{
    int i;
    do {
        // 適当にデータをセットしてやる
        for (i=0;i<SAM_WRITE_SIZE; ++i) dubWriteBuffer[i] = (uint8_t)i;
        dubWriteBuffer[254] = 0x10;
        dubWriteBuffer[253] = 0x20;
        // EEL書き込みコマンド発行
        dtyEelReq.address_pu08   = dubWriteBuffer;
        dtyEelReq.identifier_u08 = IDNUM;   // IDで書き込みbyte数を指定（ID8＝255byte）
        dtyEelReq.command_enu    = EEL_CMD_WRITE;
        EEL_Execute( &dtyEelReq );
        while( dtyEelReq.status_enu == EEL_BUSY ) EEL_Handler();
        // データを書き込める領域が存在しないエラーならRefreshを実行する
        if (dtyEelReq.status_enu == EEL_ERR_POOL_FULL) {
            dtyEelReq.command_enu    = EEL_CMD_REFRESH;
            EEL_Execute( &dtyEelReq );
            while( dtyEelReq.status_enu == EEL_BUSY ) EEL_Handler();
        }
        // Refreshしたら再度EEL書き込みコマンドを実行する
    } while((dtyEelReq.command_enu == EEL_CMD_REFRESH) && (dtyEelReq.status_enu  == EEL_OK));
    return ( dtyEelReq.status_enu == EEL_OK )? true: false;
}
//======================================================================================
// EELでの読み出し
//======================================================================================
bool eel_Read(void)
{
    // EEL読み出しコマンド発行
    dtyEelReq.address_pu08   = dubReadBuffer;
    dtyEelReq.identifier_u08 = IDNUM;   // IDで読み出しbyte数を指定（ID8=255byte）
    dtyEelReq.command_enu    = EEL_CMD_READ;
    EEL_Execute( &dtyEelReq );
    while( dtyEelReq.status_enu == EEL_BUSY ) EEL_Handler();
    return  (dtyEelReq.status_enu == EEL_OK )? true:false;
}
//======================================================================================
// EELの終了処理
//======================================================================================
void eel_Finish(void)
{
    dtyEelReq.command_enu = EEL_CMD_SHUTDOWN;
    EEL_Execute( &dtyEelReq );
    while( dtyEelReq.status_enu == EEL_BUSY ) EEL_Handler();
    EEL_Close();
    FDL_Close();
}
//-----------------------------------------------
// EELのコマンド実行と完了待ち（未使用）
//-----------------------------------------------
eel_status_t _eelCmd(eel_command_t cmd)
{
    dtyEelReq.command_enu = cmd;                            // コマンドをセットし
    EEL_Execute(&dtyEelReq);                                // 実行し
    while(dtyEelReq.status_enu==EEL_BUSY) EEL_Handler();    // 実行完了を待つ
    return dtyEelReq.status_enu;                            // 結果を返す
}