--- nono/vm/x68kkbd.cpp 2026/04/29 17:05:21 1.1.1.13 +++ nono/vm/x68kkbd.cpp 2026/04/29 17:05:29 1.1.1.15 @@ -32,13 +32,6 @@ X68030Keyboard::X68030Keyboard() { led.resize(7); - rept_event.func = ToEventCallback(&X68030Keyboard::ReptCallback); - rept_event.time = 0; - rept_event.Regist("Keyboard Repeat"); - - mouse_event.func = ToEventCallback(&X68030Keyboard::MouseCallback); - mouse_event.Regist("Mouse"); - monitor.func = ToMonitorCallback(&X68030Keyboard::MonitorUpdate); monitor.SetSize(47, 5); monitor.Regist(ID_MONITOR_KEYBOARD); @@ -61,6 +54,15 @@ X68030Keyboard::Init() scc = GetSCCDevice(); sysport = GetSysportDevice(); + rept_event.func = ToEventCallback(&X68030Keyboard::ReptCallback); + rept_event.time = 0; + rept_event.SetName("Keyboard Repeat"); + scheduler->RegistEvent(rept_event); + + mouse_event.func = ToEventCallback(&X68030Keyboard::MouseCallback); + mouse_event.SetName("Mouse"); + scheduler->RegistEvent(mouse_event); + return true; } @@ -113,10 +115,10 @@ X68030Keyboard::MonitorUpdate(Monitor *, // キーリピート screen.Puts(0, y, "Key Repeat:"); - screen.Print(12, y++, "Delay $%x(%4dmsec)", - rept_delay_data, (int)(rept_delay / 1_msec)); - screen.Print(12, y++, "Repeat $%x(%4dmsec)", - rept_time_data, (int)(rept_time / 1_msec)); + screen.Print(12, y++, "Delay $%x(%4umsec)", + rept_delay_data, (uint)(rept_delay / 1_msec)); + screen.Print(12, y++, "Repeat $%x(%4umsec)", + rept_time_data, (uint)(rept_time / 1_msec)); // マウス int mx = mouse_x; @@ -153,7 +155,7 @@ X68030Keyboard::MonitorUpdate(Monitor *, y++; // LED の明るさ (というより暗さ) - screen.Print(0, y++, "LED Darkness: %d", led_darkness); + screen.Print(0, y++, "LED Darkness: %u", led_darkness); } // 共通 keystat を X680x0 キーコードに変換して返す。 @@ -361,7 +363,8 @@ X68030Keyboard::MouseSendStart() mouse_y = 0; // 1バイト目は MSCTRL が立ち下がってから 700us 以上後から送信。 - mouse_event.time = 700_usec; + // さらに1バイトの送信に 2.3msec かかる(このすぐ下参照)。 + mouse_event.time = 700_usec + 2300_usec; mouse_event.code = 1; scheduler->RestartEvent(mouse_event); } @@ -373,22 +376,20 @@ X68030Keyboard::MouseCallback(Event& ev) // マウスは 4800bps で、ストップビット 2 なので11ビット。 // 1/4800 * 11 = 2.29166 msec なので、1バイトあたり 2.3 msec にしておく。 - // code は 1 なら1バイト目 ([0]) - // : - // code が 4 なら送らずに終了 - - if (mouse_event.code < 4) { - // 1, 2, 3 バイト目送信 - scc->Rx(1, mouse_data[mouse_event.code - 1]); + // code 1 なら1バイト目 (mouse_data[0]) の送信完了時刻が来た。 + // code 2 なら2バイト目 (mouse_data[1]) の送信完了時刻が来た。 + // code 3 なら3バイト目 (mouse_data[2]) の送信完了時刻が来た。 + // 3バイト目を送信してイベントループ終了。 + + scc->Rx(1, mouse_data[mouse_event.code - 1]); + if (mouse_event.code < 3) { // 次のイベント mouse_event.time = 2300_usec; mouse_event.code++; scheduler->StartEvent(mouse_event); } else { - // 3 バイト目の送信が終わって、1文字送信分の時間が経過したので - // ここで code を 0 に戻す。 - // XXX 実際のタイミングがどうかは知らない。 + // 3 バイト目の送信が終わった。 mouse_event.code = 0; } } @@ -405,46 +406,46 @@ X68030Keyboard::Command(uint32 data) } else if (data < 0x48) { // $40-$47 MSCTRL 信号制御 // こいつは頻度が高いのでログレベルを上げておく - putlog(3, "Command MSCTRL control %d", (data & 1)); + putlog(3, "Command MSCTRL control %u", (data & 1)); } else if (data < 0x50) { // $48-$4f キーデータ送出許可 - putlog(1, "Command Key send enable %d (NOT IMPLEMENTED)", (data & 1)); + putlog(1, "Command Key send enable %u (NOT IMPLEMENTED)", (data & 1)); } else if (data < 0x54) { // $50-$53 ディスプレイ制御モード選択 // (実装不要) - putlog(2, "Command Display control mode %d", (data & 1)); + putlog(2, "Command Display control mode %u", (data & 1)); } else if (data < 0x58) { // $54-$57 LED 明るさ選択 // 0 が明るく 3 が暗いので、明るさというより暗さ。 led_darkness = (data & 3); - putlog(1, "Command LED brightness %d", led_darkness); + putlog(1, "Command LED brightness %u", led_darkness); } else if (data < 0x5c) { // $58-$5b 本体からのディスプレイ制御許可 // (実装不要) - putlog(2, "Command Display control enable %d", (data & 1)); + putlog(2, "Command Display control enable %u", (data & 1)); } else if (data < 0x60) { // $5c-$5f OPT.2 によるディスプレイ制御許可 // (実装不要) - putlog(2, "Command OPT2 control enable %d", (data & 1)); + putlog(2, "Command OPT2 control enable %u", (data & 1)); } else if (data < 0x70) { // $60-$6f リピートまでの時間 rept_delay_data = data & 15; rept_delay = 200_msec + rept_delay_data * 100_msec; - putlog(1, "Command Repeat Delay %d (%d msec)", rept_delay_data, - (int)(rept_delay / 1_msec)); + putlog(1, "Command Repeat Delay %u (%u msec)", rept_delay_data, + (uint)(rept_delay / 1_msec)); } else if (data < 0x80) { // $70-$7f リピート間隔 rept_time_data = data & 15; rept_time = 30_msec + rept_time_data * rept_time_data * 5_msec; - putlog(1, "Command Repeat time %d (%d msec)", rept_time_data, - (int)(rept_time / 1_msec)); + putlog(1, "Command Repeat time %d (%u msec)", rept_time_data, + (uint)(rept_time / 1_msec)); } else { // $80-$ff LED 制御