140 lines
3.6 KiB
C
140 lines
3.6 KiB
C
/*
|
||
PS/2 キーボードを SHARP X1 につなぐ
|
||
X1 キーボードの送信処理
|
||
|
||
X1センターさん (http://www.x1center.org/) の、キーボードの伝送フォーマット仕様を参考にしました。
|
||
X1キーボードの実物を持っていないので、大変助かりました。
|
||
X1センターさんの資料は「使える物があれば自由に使って下さい」とのことです。
|
||
|
||
|
||
2014年7月22日 作成
|
||
|
||
佐藤恭一 http://kyoutan.jpn.org/
|
||
|
||
無保証です。
|
||
佐藤恭一が作成した部分は用途に制限を設けません。商用・非商用にかかわらず自由に使用して頂いて構いません。
|
||
勝手に複製したり、改造したり、配布したり、売ったりしても良いということです。
|
||
連絡不要です。
|
||
*/
|
||
|
||
|
||
#include "sfr_r8m12a.h"
|
||
#include "x1key.h"
|
||
#include "iodefine.h"
|
||
|
||
unsigned short SEND_DATA; // X1送信データ
|
||
|
||
void X1_send(unsigned short data)
|
||
{
|
||
while(0 != tcstf_trjcr); // 送信中なら終わるまで待つ
|
||
|
||
SEND_DATA=data;
|
||
|
||
/* TIMER RJ */
|
||
trjioc= 0b00000011; /* TRJO Hから出力開始、TRJIO トグル出力無し */
|
||
trjmr= 0b00000001; /* パルス出力モード、分周無し */
|
||
trjcr= 0b00000100; /* カウント停止 出力ピン初期化 */
|
||
pmh3 = 0b10000000; // P3_7 TRJO X1KEYOUT を TRJO に
|
||
trjie_trjir=1; /* TIMER RJ 割り込み許可 */
|
||
trj=TRJ250us; // 250us セット （250us 後に L ヘッダー分）250usに意味は無い。もっと短くても良い
|
||
tstart_trjcr=1; // タイマースタート
|
||
}
|
||
|
||
void x1key_init(void)
|
||
{
|
||
X1KEYOUT=1;
|
||
|
||
/* TIMER RJ 初期化*/
|
||
msttrj=0; // スタンバイ解除
|
||
trjcr= 0b00000100; /* カウント停止 */
|
||
trjioc= 0b00000011; /* TRJO Hから出力開始、TRJIO トグル出力無し */
|
||
trjmr= 0b00000001; /* パルス出力モード、分周無し */
|
||
trjcr= 0b00000100; /* カウント停止 出力ピン初期化 */
|
||
}
|
||
|
||
// TIMER RJ アンダーフロー割り込み
|
||
// タイマーの機能で、ダウンカウンタがアンダーフローするたびに、
|
||
// 出力ピン (TRJO) の出力が反転します
|
||
#pragma INTERRUPT INT_trj (vect=22)
|
||
void INT_trj(void)
|
||
{
|
||
static unsigned char count=0;
|
||
|
||
if(0==(count&1)) // 偶数 L 期間
|
||
{ // 0 2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 32 34 36
|
||
switch(count)
|
||
{
|
||
case 0: // header L
|
||
trj=TRJ1000us; // 1000us
|
||
break;
|
||
|
||
case 36: // stop 終了
|
||
while(1==tcstf_trjcr) tstart_trjcr=0; // タイマー停止（ビット操作だと出力初期化されないよう）
|
||
trjcr= 0b00000100; // カウント停止 出力ピン初期化
|
||
pmh3 =0b10000000; // P3_7 TRJO X1KEYOUT を TRJO に
|
||
break;
|
||
|
||
default:
|
||
trj=TRJ250us; // 250us
|
||
break;
|
||
}
|
||
}
|
||
else // 奇数 H 期間
|
||
{ // 1 3 5 7 9 11 13 15 17 19 21 23 25 27 29 31 33 35
|
||
switch(count)
|
||
{
|
||
case 1: // header H
|
||
trj=TRJ700us;
|
||
break;
|
||
|
||
//case 3: // start H スタートビットいらない
|
||
//trj=TRJ750us;
|
||
// break;
|
||
|
||
case 35: // stop H 期間
|
||
X1KEYOUT=1; // H 出力
|
||
pmh3 =0b00000000; // P3_7 TRJO X1KEYOUT をI/Oポートに 反転出力動作終了
|
||
trj=TRJ1750us;
|
||
break;
|
||
|
||
default: // 上位ビットから16ビット送信
|
||
if(0==(SEND_DATA & 0x8000))
|
||
{
|
||
trj=TRJ750us; // 0
|
||
}
|
||
else
|
||
{
|
||
trj=TRJ1750us; // 1
|
||
}
|
||
SEND_DATA=(SEND_DATA<<1);
|
||
break;
|
||
}
|
||
}
|
||
|
||
count++;
|
||
if(36<count) count=0;
|
||
|
||
while(1==trjif_trjir) trjif_trjir=0; // 割り込みフラグクリア
|
||
}
|
||
|
||
// デバッグ用 1バイトを16進2桁で送出（表示）
|
||
void puth2(unsigned char a)
|
||
{
|
||
X1_send(((unsigned short)0b10111111 << 8) + tochar((a&0xF0)>>4));//押す
|
||
X1_send(((unsigned short)0b11111111 << 8) + 0x00);//離す
|
||
|
||
X1_send(((unsigned short)0b10111111 << 8) + tochar(a&0x0F));//押す
|
||
X1_send(((unsigned short)0b11111111 << 8) + 0x00);//離す
|
||
|
||
X1_send(((unsigned short)0b10111111 << 8) + 0x20);//押す
|
||
X1_send(((unsigned short)0b11111111 << 8) + 0x00);//離す
|
||
}
|
||
|
||
// デバッグ用 0～15の数を文字に変換
|
||
unsigned char tochar(unsigned char a)
|
||
{
|
||
if(a<10) a=a+0x30;
|
||
else a=a+0x41-10;
|
||
return a;
|
||
}
|