2013-07-06 04:37:13 +00:00
|
|
|
/*
|
2013-06-11 07:08:15 +00:00
|
|
|
* Apple // emulator for Linux: Keyboard handler
|
|
|
|
*
|
|
|
|
* Copyright 1994 Alexander Jean-Claude Bottema
|
|
|
|
* Copyright 1995 Stephen Lee
|
|
|
|
* Copyright 1997, 1998 Aaron Culliney
|
|
|
|
* Copyright 1998, 1999, 2000 Michael Deutschmann
|
|
|
|
*
|
|
|
|
* This software package is subject to the GNU General Public License
|
2013-07-06 04:37:13 +00:00
|
|
|
* version 2 or later (your choice) as published by the Free Software
|
2013-06-11 07:08:15 +00:00
|
|
|
* Foundation.
|
|
|
|
*
|
2013-07-06 04:37:13 +00:00
|
|
|
* THERE ARE NO WARRANTIES WHATSOEVER.
|
2013-06-11 07:08:15 +00:00
|
|
|
*
|
|
|
|
*/
|
|
|
|
|
2013-10-06 08:31:58 +00:00
|
|
|
#include "common.h"
|
2013-06-11 07:08:15 +00:00
|
|
|
|
|
|
|
/* from misc.c */
|
|
|
|
extern uid_t user, privileged;
|
|
|
|
|
2013-07-06 04:37:13 +00:00
|
|
|
static int next_key = -1;
|
2013-11-24 20:19:54 +00:00
|
|
|
static int last_scancode = -1;
|
2014-10-12 23:44:49 +00:00
|
|
|
bool caps_lock = true; // default enabled because so much breaks otherwise
|
2013-06-11 07:08:15 +00:00
|
|
|
|
|
|
|
/* ----------------------------------------------------
|
|
|
|
//e Keymap. Mapping scancodes to Apple //e US Keyboard
|
|
|
|
---------------------------------------------------- */
|
2013-12-30 02:07:24 +00:00
|
|
|
#define MAP_SIZE 128
|
|
|
|
static int apple_iie_keymap_plain[MAP_SIZE] =
|
|
|
|
{ -1, kESC, '1', '2', '3', '4', '5', '6', /* 00-07 */
|
|
|
|
'7', '8', '9', '0', '-', '=', kLT, kTAB, /* 08-15 */
|
2013-07-06 04:37:13 +00:00
|
|
|
'q', 'w', 'e', 'r', 't', 'y', 'u', 'i', /* 16-23 */
|
2013-12-30 02:07:24 +00:00
|
|
|
'o', 'p', '[', ']', kRET, -1, 'a', 's', /* 24-31 */
|
2013-07-06 04:37:13 +00:00
|
|
|
'd', 'f', 'g', 'h', 'j', 'k', 'l', ';', /* 32-39 */
|
|
|
|
'\'', '`', -1,'\\', 'z', 'x', 'c', 'v', /* 40-47 */
|
|
|
|
'b', 'n', 'm', ',', '.', '/', -1, -1, /* 48-55 */
|
2013-10-07 04:01:00 +00:00
|
|
|
JB0, ' ', -1, kF1, kF2, kF3, kF4, kF5, /* 56-63 */
|
2013-12-30 02:07:24 +00:00
|
|
|
kF6, kF7, kF8, kF9, kF10, kF11, kF12, JUL, /* 64-71 */
|
|
|
|
J_U, JUR, -1, J_L, J_C, J_R, -1, JDL, /* 72-79 */
|
2013-10-07 04:01:00 +00:00
|
|
|
J_D, JDR, -1, -1, -1, kF11, kF12, -1, /* 80-87 */
|
2013-07-06 04:37:13 +00:00
|
|
|
-1, -1, -1, -1, -1, -1, -1, -1, /* 88-95 */
|
2013-12-30 02:07:24 +00:00
|
|
|
-1, -1, -1, -1, JB1, -1, kHOME, kUP, /* 96-103 */
|
|
|
|
kPGUP, kLT, kRT, kEND, kDN, kPGDN, JB2, kDEL, /* 104-111 */
|
2013-11-30 22:14:22 +00:00
|
|
|
-1, -1, -1, -1, -1, -1, -1, kPAUSE, /* 112-119 */
|
2013-07-06 04:37:13 +00:00
|
|
|
-1, -1, -1, -1, -1, -1, -1, -1 }; /* 120-127 */
|
2013-06-11 07:08:15 +00:00
|
|
|
|
2013-12-30 02:07:24 +00:00
|
|
|
// TODO FIXME : remove magic constants and verify ctrl-keys
|
|
|
|
static int apple_iie_keymap_ctrl[MAP_SIZE] =
|
|
|
|
{ -1, kESC, '1', '2', '3', '4', '5', '6', /* 00-07 */
|
|
|
|
'7', '8', '9', '0', '-', '=', kLT, kTAB, /* 08-15 */
|
|
|
|
17, 23, 5, 18, 20, 25, kRT, kTAB, /* 16-23 */
|
|
|
|
15, 16, kESC, 29, kRET, -1, 1, 19, /* 24-31 */
|
|
|
|
4, 6, 7, kLT, kDN, kUP, 12, ';', /* 32-39 */
|
2013-07-06 04:37:13 +00:00
|
|
|
'\'', '`', -1,'\\', 26, 24, 3, 22, /* 40-47 */
|
2013-12-30 02:07:24 +00:00
|
|
|
2, 14, kRET, ',', '.', '/', -1, -1, /* 48-55 */
|
2013-10-07 04:01:00 +00:00
|
|
|
JB0, ' ', -1, kF1, kF2, kF3, kF4, kF5, /* 56-63 */
|
2013-12-30 02:07:24 +00:00
|
|
|
kF6, kF7, kF8, kF9, kF10, kF11, kF12, JUL, /* 64-71 */
|
|
|
|
J_U, JUR, -1, J_L, J_C, J_R, -1, JDL, /* 72-79 */
|
2013-10-07 04:01:00 +00:00
|
|
|
J_D, JDR, -1, -1, -1, kF11, kF12, -1, /* 80-87 */
|
2013-07-06 04:37:13 +00:00
|
|
|
-1, -1, -1, -1, -1, -1, -1, -1, /* 88-95 */
|
2013-12-30 02:07:24 +00:00
|
|
|
-1, -1, -1, -1, JB1, -1, kHOME, kUP, /* 96-103 */
|
|
|
|
kPGUP, kLT, kRT, kEND, kDN, kPGDN, JB2, kDEL, /* 104-111 */
|
2013-11-30 22:14:22 +00:00
|
|
|
-1, -1, -1, -1, -1, -1, -1, kPAUSE, /* 112-119 */
|
2013-07-06 04:37:13 +00:00
|
|
|
-1, -1, -1, -1, -1, -1, -1, -1 }; /* 120-127 */
|
2013-06-11 07:08:15 +00:00
|
|
|
|
2013-12-30 02:07:24 +00:00
|
|
|
static int apple_iie_keymap_shifted[MAP_SIZE] =
|
|
|
|
{ -1, kESC, '!', '@', '#', '$', '%', '^', /* 00-07 */
|
|
|
|
'&', '*', '(', ')', '_', '+', kLT, kTAB, /* 08-15 */
|
2013-07-06 04:37:13 +00:00
|
|
|
'Q', 'W', 'E', 'R', 'T', 'Y', 'U', 'I', /* 16-23 */
|
2013-12-30 02:07:24 +00:00
|
|
|
'O', 'P', '{', '}', kRET, -1, 'A', 'S', /* 24-31 */
|
2013-07-06 04:37:13 +00:00
|
|
|
'D', 'F', 'G', 'H', 'J', 'K', 'L', ':', /* 32-39 */
|
|
|
|
'"', '~', -1, '|', 'Z', 'X', 'C', 'V', /* 40-47 */
|
|
|
|
'B', 'N', 'M', '<', '>', '?', -1, -1, /* 48-55 */
|
2013-10-07 04:01:00 +00:00
|
|
|
JB0, ' ', -1, kF1, kF2, kF3, kF4, kF5, /* 56-63 */
|
2013-12-30 02:07:24 +00:00
|
|
|
kF6, kF7, kF8, kF9, kF10, kF11, kF12, JUL, /* 64-71 */
|
|
|
|
J_U, JUR, -1, J_L, J_C, J_R, -1, JDL, /* 72-79 */
|
2013-10-07 04:01:00 +00:00
|
|
|
J_D, JDR, -1, -1, -1, kF11, kF12, -1, /* 80-87 */
|
2013-07-06 04:37:13 +00:00
|
|
|
-1, -1, -1, -1, -1, -1, -1, -1, /* 88-95 */
|
2013-12-30 02:07:24 +00:00
|
|
|
-1, -1, -1, -1, JB1, -1, kHOME, kUP, /* 96-103 */
|
|
|
|
kPGUP, kLT, kRT, kEND, kDN, kPGDN, JB2, kDEL, /* 104-111 */
|
2013-11-30 22:14:22 +00:00
|
|
|
-1, -1, -1, -1, -1, -1, -1, kPAUSE, /* 112-119 */
|
2013-07-06 04:37:13 +00:00
|
|
|
-1, -1, -1, -1, -1, -1, -1, -1 }; /* 120-127 */
|
2013-06-11 07:08:15 +00:00
|
|
|
|
2013-12-30 02:07:24 +00:00
|
|
|
static int apple_iie_keymap_caps[MAP_SIZE] =
|
|
|
|
{ -1, kESC, '1', '2', '3', '4', '5', '6', /* 00-07 */
|
|
|
|
'7', '8', '9', '0', '-', '=', kLT, kTAB, /* 08-15 */
|
2013-07-06 04:37:13 +00:00
|
|
|
'Q', 'W', 'E', 'R', 'T', 'Y', 'U', 'I', /* 16-23 */
|
2013-12-30 02:07:24 +00:00
|
|
|
'O', 'P', '[', ']', kRET, -1, 'A', 'S', /* 24-31 */
|
2013-07-06 04:37:13 +00:00
|
|
|
'D', 'F', 'G', 'H', 'J', 'K', 'L', ';', /* 32-39 */
|
|
|
|
'\'', '`', -1,'\\', 'Z', 'X', 'C', 'V', /* 40-47 */
|
|
|
|
'B', 'N', 'M', ',', '.', '/', -1, -1, /* 48-55 */
|
2013-10-07 04:01:00 +00:00
|
|
|
JB0, ' ', -1, kF1, kF2, kF3, kF4, kF5, /* 56-63 */
|
2013-12-30 02:07:24 +00:00
|
|
|
kF6, kF7, kF8, kF9, kF10, kF11, kF12, JUL, /* 64-71 */
|
|
|
|
J_U, JUR, -1, J_L, J_C, J_R, -1, JDL, /* 72-79 */
|
2013-10-07 04:01:00 +00:00
|
|
|
J_D, JDR, -1, -1, -1, kF11, kF12, -1, /* 80-87 */
|
2013-07-06 04:37:13 +00:00
|
|
|
-1, -1, -1, -1, -1, -1, -1, -1, /* 88-95 */
|
2013-12-30 02:07:24 +00:00
|
|
|
-1, -1, -1, -1, JB1, -1, kHOME, kUP, /* 96-103 */
|
|
|
|
kPGUP, kLT, kRT, kEND, kDN, kPGDN, JB2, kDEL, /* 104-111 */
|
2013-11-30 22:14:22 +00:00
|
|
|
-1, -1, -1, -1, -1, -1, -1, kPAUSE, /* 112-119 */
|
2013-07-06 04:37:13 +00:00
|
|
|
-1, -1, -1, -1, -1, -1, -1, -1 }; /* 120-127 */
|
2013-06-11 07:08:15 +00:00
|
|
|
|
2013-12-30 02:07:24 +00:00
|
|
|
// TODO FIXME : remove magic constants and verify ctrl-keys
|
|
|
|
static int apple_iie_keymap_shift_ctrl[MAP_SIZE] =
|
|
|
|
{ -1, kESC, '1', 0, '3', '4', '5', 30, /* 00-07 */
|
|
|
|
'7', '8', '9', '0', 31, '=', kLT, kTAB, /* 08-15 */
|
|
|
|
17, 23, 5, 18, 20, 25, kRT, kTAB, /* 16-23 */
|
|
|
|
15, 16, kESC, 29, kRET, -1, 1, 19, /* 24-31 */
|
|
|
|
4, 6, 7, kLT, kDN, kUP, 12, ';', /* 32-39 */
|
2013-07-06 04:37:13 +00:00
|
|
|
'\'', '`', 28, -1, 26, 24, 3, 22, /* 40-47 */
|
2013-12-30 02:07:24 +00:00
|
|
|
2, 14, kRET, ',', '.', '/', -1, -1, /* 48-55 */
|
2013-10-07 04:01:00 +00:00
|
|
|
JB0, ' ', -1, kF1, kF2, kF3, kF4, kF5, /* 56-63 */
|
2013-12-30 02:07:24 +00:00
|
|
|
kF6, kF7, kF8, kF9, kF10, kF11, kF12, JUL, /* 64-71 */
|
|
|
|
J_U, JUR, -1, J_L, J_C, J_R, -1, JDL, /* 72-79 */
|
2013-10-07 04:01:00 +00:00
|
|
|
J_D, JDR, -1, -1, -1, kF11, kF12, -1, /* 80-87 */
|
2013-07-06 04:37:13 +00:00
|
|
|
-1, -1, -1, -1, -1, -1, -1, -1, /* 88-95 */
|
2013-12-30 02:07:24 +00:00
|
|
|
-1, -1, -1, -1, JB1, -1, kHOME, kUP, /* 96-103 */
|
|
|
|
kPGUP, kLT, kRT, kEND, kDN, kPGDN, JB2, kDEL, /* 104-111 */
|
2013-11-30 22:14:22 +00:00
|
|
|
-1, -1, -1, -1, -1, -1, -1, kPAUSE, /* 112-119 */
|
2013-07-06 04:37:13 +00:00
|
|
|
-1, -1, -1, -1, -1, -1, -1, -1 }; /* 120-127 */
|
2013-06-11 07:08:15 +00:00
|
|
|
|
2013-12-28 21:08:35 +00:00
|
|
|
static char key_pressed[ 256 ] = { 0 };
|
2013-06-11 07:08:15 +00:00
|
|
|
|
2014-08-17 22:29:06 +00:00
|
|
|
/* -------------------------------------------------------------------------
|
|
|
|
convert ascii character to scancode
|
|
|
|
------------------------------------------------------------------------- */
|
|
|
|
|
|
|
|
static int scode_map[MAP_SIZE] =
|
|
|
|
{ -1, -1, -1, -1, -1, -1, -1, -1, /* 00-07 */
|
|
|
|
SCODE_BS, SCODE_TAB, -1, -1, -1, SCODE_RET, -1, -1, /* 08-15 */
|
|
|
|
-1, -1, -1, -1, -1, -1, -1, -1, /* 16-23 */
|
|
|
|
-1, -1, -1, SCODE_ESC, -1, -1, -1, -1, /* 24-31 */
|
|
|
|
/* */57, /*!*/2 , /*"*/40, /*#*/4 , /*$*/5 , /*%*/6 , /*&*/8 , /*'*/40, /* 32-39 */
|
|
|
|
/*(*/10, /*)*/11, /***/9 , /*+*/13, /*,*/51, /*-*/12, /*.*/52, /*/*/53, /* 40-47 */
|
|
|
|
/*0*/11, /*1*/2 , /*2*/3 , /*3*/4 , /*4*/5 , /*5*/6 , /*6*/7 , /*7*/8 , /* 48-55 */
|
|
|
|
/*8*/9 , /*9*/10, /*:*/39, /*;*/39, /*<*/51, /*=*/13, /*>*/52, /*?*/53, /* 56-63 */
|
|
|
|
/*@*/3 , /*A*/30, /*B*/48, /*C*/46, /*D*/32, /*E*/18, /*F*/33, /*G*/34, /* 64-71 */
|
|
|
|
/*H*/35, /*I*/23, /*J*/36, /*K*/37, /*L*/38, /*M*/50, /*N*/49, /*O*/24, /* 72-79 */
|
|
|
|
/*P*/25, /*Q*/16, /*R*/19, /*S*/31, /*T*/20, /*U*/22, /*V*/47, /*W*/17, /* 80-87 */
|
|
|
|
/*X*/45, /*Y*/21, /*Z*/44, /*[*/26, /*\*/43, /*]*/27, /*^*/7 , /*_*/12, /* 88-95 */
|
|
|
|
/*`*/41, /*a*/30, /*b*/48, /*c*/46, /*d*/32, /*e*/18, /*f*/33, /*g*/34, /* 96-103 */
|
|
|
|
/*h*/35, /*i*/23, /*j*/36, /*k*/37, /*l*/38, /*m*/50, /*n*/49, /*o*/24, /* 104-111 */
|
|
|
|
/*p*/25, /*q*/16, /*r*/19, /*s*/31, /*t*/20, /*u*/22, /*v*/47, /*w*/17, /* 112-119 */
|
|
|
|
/*x*/45, /*y*/21, /*z*/44, /*{*/26, /*|*/43, /*}*/27, /*~*/41, SCODE_DEL }; /* 120-127 */
|
|
|
|
|
|
|
|
int c_keys_ascii_to_scancode(int c)
|
|
|
|
{
|
|
|
|
return scode_map[c&0x7f];
|
|
|
|
}
|
|
|
|
|
|
|
|
int c_keys_is_shifted()
|
|
|
|
{
|
|
|
|
return key_pressed[SCODE_L_SHIFT] || key_pressed[SCODE_R_SHIFT];
|
|
|
|
}
|
|
|
|
|
2013-06-11 07:08:15 +00:00
|
|
|
/* -------------------------------------------------------------------------
|
2014-09-07 03:04:32 +00:00
|
|
|
Handle input : keys and joystick.
|
2013-12-28 21:08:35 +00:00
|
|
|
------------------------------------------------------------------------- */
|
2014-09-22 00:26:37 +00:00
|
|
|
void c_keys_handle_input(int scancode, int pressed, int is_cooked)
|
2013-12-28 21:08:35 +00:00
|
|
|
{
|
|
|
|
int *keymap = NULL;
|
2013-06-11 07:08:15 +00:00
|
|
|
|
2014-09-22 00:26:37 +00:00
|
|
|
if (is_cooked) {
|
|
|
|
last_scancode = -1;
|
|
|
|
if (!pressed) {
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
if (! (key_pressed[ SCODE_L_CTRL ] || key_pressed[ SCODE_R_CTRL ]) ) {
|
|
|
|
if (caps_lock && scancode >= 'a' && scancode <= 'z') {
|
|
|
|
scancode -= 32;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
next_key = scancode;
|
|
|
|
} else if (scancode >= 0) {
|
2014-10-12 23:44:49 +00:00
|
|
|
assert(scancode < 0x80);
|
2013-12-28 21:08:35 +00:00
|
|
|
last_scancode = scancode;
|
2013-07-06 04:37:13 +00:00
|
|
|
|
2013-12-30 02:07:24 +00:00
|
|
|
if ((key_pressed[ SCODE_L_SHIFT ] || key_pressed[ SCODE_R_SHIFT ]) &&
|
|
|
|
(key_pressed[ SCODE_L_CTRL ] || key_pressed[ SCODE_R_CTRL ]))
|
|
|
|
{
|
|
|
|
keymap = apple_iie_keymap_shift_ctrl;
|
|
|
|
}
|
|
|
|
else if (key_pressed[ SCODE_L_CTRL ] || key_pressed[ SCODE_R_CTRL ])
|
|
|
|
{
|
|
|
|
keymap = apple_iie_keymap_ctrl;
|
|
|
|
}
|
|
|
|
else if (key_pressed[ SCODE_L_SHIFT ] || key_pressed[ SCODE_R_SHIFT ])
|
|
|
|
{
|
|
|
|
keymap = apple_iie_keymap_shifted;
|
|
|
|
}
|
|
|
|
else if (caps_lock)
|
|
|
|
{
|
|
|
|
keymap = apple_iie_keymap_caps;
|
2013-07-06 04:37:13 +00:00
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
2013-12-30 02:07:24 +00:00
|
|
|
keymap = apple_iie_keymap_plain;
|
2013-12-28 21:08:35 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
if (pressed)
|
|
|
|
{
|
|
|
|
key_pressed[ scancode ] = 1;
|
|
|
|
switch (keymap[ scancode ])
|
|
|
|
{
|
|
|
|
case JB0:
|
|
|
|
joy_button0 = 0xff; /* open apple */
|
|
|
|
break;
|
|
|
|
case JB1:
|
|
|
|
joy_button1 = 0xff; /* closed apple */
|
|
|
|
break;
|
|
|
|
default:
|
|
|
|
next_key = keymap[scancode];
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
key_pressed[ scancode ] = 0;
|
|
|
|
switch (keymap[ scancode ])
|
|
|
|
{
|
|
|
|
case JB0:
|
|
|
|
joy_button0 = 0x00;
|
|
|
|
break;
|
|
|
|
case JB1:
|
|
|
|
joy_button1 = 0x00;
|
|
|
|
break;
|
|
|
|
default:
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
// key input consumption
|
|
|
|
|
2014-09-17 03:42:07 +00:00
|
|
|
if ((next_key >= 0)
|
|
|
|
#ifdef INTERFACE_CLASSIC
|
|
|
|
&& !in_interface
|
|
|
|
#endif
|
2015-04-12 21:20:17 +00:00
|
|
|
)
|
|
|
|
{
|
2013-12-28 21:08:35 +00:00
|
|
|
do {
|
|
|
|
int current_key = next_key;
|
|
|
|
next_key = -1;
|
|
|
|
|
|
|
|
if (current_key < 128)
|
|
|
|
{
|
|
|
|
apple_ii_64k[0][0xC000] = current_key | 0x80;
|
|
|
|
apple_ii_64k[1][0xC000] = current_key | 0x80;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
|
2014-12-02 06:00:45 +00:00
|
|
|
#ifdef INTERFACE_CLASSIC
|
2013-12-28 21:08:35 +00:00
|
|
|
if (current_key == kF9)
|
|
|
|
{
|
|
|
|
timing_toggle_cpu_speed();
|
2015-04-18 21:53:01 +00:00
|
|
|
if (video_backend->animation_showCPUSpeed) {
|
|
|
|
video_backend->animation_showCPUSpeed();
|
2015-04-12 21:20:17 +00:00
|
|
|
}
|
2013-12-28 21:08:35 +00:00
|
|
|
break;
|
|
|
|
}
|
2015-03-23 01:53:13 +00:00
|
|
|
if (current_key == kF3) {
|
|
|
|
|
|
|
|
double scale = (alt_speed_enabled ? cpu_altscale_factor : cpu_scale_factor);
|
|
|
|
int percent_scale = (int)round(scale * 100);
|
|
|
|
if (scale == CPU_SCALE_FASTEST) {
|
|
|
|
scale = CPU_SCALE_FASTEST0;
|
|
|
|
percent_scale = (int)round(scale * 100);
|
|
|
|
} else {
|
|
|
|
if (percent_scale > 100) {
|
|
|
|
percent_scale -= 25;
|
|
|
|
} else {
|
|
|
|
percent_scale -= 5;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
scale = percent_scale/100.0;
|
|
|
|
|
|
|
|
if (scale < CPU_SCALE_SLOWEST) {
|
|
|
|
scale = CPU_SCALE_SLOWEST;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (alt_speed_enabled) {
|
|
|
|
cpu_altscale_factor = scale;
|
|
|
|
} else {
|
|
|
|
cpu_scale_factor = scale;
|
|
|
|
}
|
|
|
|
|
2015-04-18 21:53:01 +00:00
|
|
|
if (video_backend->animation_showCPUSpeed) {
|
|
|
|
video_backend->animation_showCPUSpeed();
|
2015-03-23 01:53:13 +00:00
|
|
|
}
|
|
|
|
#warning HACK TODO FIXME ... refactor timing stuff
|
|
|
|
timing_toggle_cpu_speed();
|
|
|
|
timing_toggle_cpu_speed();
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
if (current_key == kF4) {
|
|
|
|
|
|
|
|
int percent_scale = (int)round((alt_speed_enabled ? cpu_altscale_factor : cpu_scale_factor) * 100);
|
|
|
|
double scale = 0.0;
|
|
|
|
if (percent_scale >= 100) {
|
|
|
|
percent_scale += 25;
|
|
|
|
} else {
|
|
|
|
percent_scale += 5;
|
|
|
|
}
|
|
|
|
scale = percent_scale/100.0;
|
|
|
|
|
|
|
|
if (scale > CPU_SCALE_FASTEST) {
|
|
|
|
scale = CPU_SCALE_FASTEST;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (alt_speed_enabled) {
|
|
|
|
cpu_altscale_factor = scale;
|
|
|
|
} else {
|
|
|
|
cpu_scale_factor = scale;
|
|
|
|
}
|
|
|
|
|
2015-04-18 21:53:01 +00:00
|
|
|
if (video_backend->animation_showCPUSpeed) {
|
|
|
|
video_backend->animation_showCPUSpeed();
|
2015-03-23 01:53:13 +00:00
|
|
|
}
|
|
|
|
#warning HACK TODO FIXME ... refactor timing stuff
|
|
|
|
timing_toggle_cpu_speed();
|
|
|
|
timing_toggle_cpu_speed();
|
|
|
|
break;
|
|
|
|
}
|
2014-12-02 06:00:45 +00:00
|
|
|
#endif
|
2013-12-28 21:08:35 +00:00
|
|
|
|
|
|
|
if (current_key == kEND)
|
2013-07-06 04:37:13 +00:00
|
|
|
{
|
2013-11-30 22:14:22 +00:00
|
|
|
if (key_pressed[ SCODE_L_CTRL ] || key_pressed[ SCODE_R_CTRL ])
|
|
|
|
{
|
|
|
|
cpu65_interrupt(ResetSig);
|
|
|
|
}
|
2013-07-06 04:37:13 +00:00
|
|
|
break;
|
2013-12-28 21:08:35 +00:00
|
|
|
}
|
2013-10-07 04:01:00 +00:00
|
|
|
|
2014-03-23 21:25:28 +00:00
|
|
|
#ifdef INTERFACE_CLASSIC
|
2014-09-17 03:42:07 +00:00
|
|
|
if ( c_keys_is_interface_key(current_key) || (current_key == kPAUSE) )
|
|
|
|
{
|
|
|
|
c_interface_begin(current_key);
|
2013-07-06 04:37:13 +00:00
|
|
|
}
|
2014-03-23 21:25:28 +00:00
|
|
|
#endif
|
2013-12-28 21:08:35 +00:00
|
|
|
|
|
|
|
} while(0);
|
2013-06-11 07:08:15 +00:00
|
|
|
}
|
|
|
|
|
2013-12-28 21:08:35 +00:00
|
|
|
#if defined(KEYPAD_JOYSTICK)
|
2013-12-30 02:07:24 +00:00
|
|
|
// Keypad emulated joystick relies on "raw" keyboard input
|
2014-11-09 21:13:27 +00:00
|
|
|
if (joy_mode == JOY_KPAD)
|
2013-07-06 04:37:13 +00:00
|
|
|
{
|
2014-12-02 06:00:45 +00:00
|
|
|
bool joy_x_axis_unpressed = !( key_pressed[SCODE_KPAD_L] || key_pressed[SCODE_KPAD_R] ||
|
|
|
|
key_pressed[SCODE_KPAD_UL] || key_pressed[SCODE_KPAD_DL] || key_pressed[SCODE_KPAD_UR] || key_pressed[SCODE_KPAD_DR] ||
|
|
|
|
// and allow regular PC arrow keys to manipulate joystick...
|
|
|
|
key_pressed[SCODE_L] || key_pressed[SCODE_R]);
|
|
|
|
bool joy_y_axis_unpressed = !( key_pressed[SCODE_KPAD_U] || key_pressed[SCODE_KPAD_D] ||
|
2014-01-01 18:52:12 +00:00
|
|
|
key_pressed[SCODE_KPAD_UL] || key_pressed[SCODE_KPAD_DL] || key_pressed[SCODE_KPAD_UR] || key_pressed[SCODE_KPAD_DR] ||
|
2014-12-02 06:00:45 +00:00
|
|
|
key_pressed[SCODE_U] || key_pressed[SCODE_D]);
|
2013-12-29 05:48:42 +00:00
|
|
|
|
2014-09-21 22:01:02 +00:00
|
|
|
if (key_pressed[ SCODE_KPAD_C ])
|
2013-12-29 05:48:42 +00:00
|
|
|
{
|
|
|
|
joy_x = HALF_JOY_RANGE;
|
|
|
|
joy_y = HALF_JOY_RANGE;
|
|
|
|
}
|
|
|
|
|
2014-10-19 19:54:03 +00:00
|
|
|
if (joy_auto_recenter) {
|
2014-12-02 06:00:45 +00:00
|
|
|
static int x_unpressed_count = 0;
|
|
|
|
if (joy_x_axis_unpressed) {
|
|
|
|
++x_unpressed_count;
|
|
|
|
if (x_unpressed_count > 2) {
|
|
|
|
x_unpressed_count = 0;
|
2014-09-21 22:01:02 +00:00
|
|
|
joy_x = HALF_JOY_RANGE;
|
2014-12-02 06:00:45 +00:00
|
|
|
}
|
|
|
|
} else {
|
|
|
|
x_unpressed_count = 0;
|
|
|
|
}
|
|
|
|
static int y_unpressed_count = 0;
|
|
|
|
if (joy_y_axis_unpressed) {
|
|
|
|
++y_unpressed_count;
|
|
|
|
if (y_unpressed_count > 2) {
|
|
|
|
y_unpressed_count = 0;
|
2014-09-21 22:01:02 +00:00
|
|
|
joy_y = HALF_JOY_RANGE;
|
|
|
|
}
|
|
|
|
} else {
|
2014-12-02 06:00:45 +00:00
|
|
|
y_unpressed_count = 0;
|
2014-09-21 22:01:02 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2014-01-01 18:52:12 +00:00
|
|
|
if (key_pressed[ SCODE_KPAD_UL ] || key_pressed[ SCODE_KPAD_U ] || key_pressed[ SCODE_KPAD_UR ] ||/* regular arrow up */key_pressed[ SCODE_U ])
|
2013-07-06 04:37:13 +00:00
|
|
|
{
|
|
|
|
if (joy_y > joy_step)
|
|
|
|
{
|
|
|
|
joy_y -= joy_step;
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
joy_y = 0;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2014-01-01 18:52:12 +00:00
|
|
|
if (key_pressed[ SCODE_KPAD_DL ] || key_pressed[ SCODE_KPAD_D ] || key_pressed[ SCODE_KPAD_DR ] ||/* regular arrow dn */key_pressed[ SCODE_D ])
|
2013-07-06 04:37:13 +00:00
|
|
|
{
|
2013-12-21 23:25:02 +00:00
|
|
|
if (joy_y < JOY_RANGE - joy_step)
|
2013-07-06 04:37:13 +00:00
|
|
|
{
|
|
|
|
joy_y += joy_step;
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
2013-12-21 23:25:02 +00:00
|
|
|
joy_y = JOY_RANGE-1;
|
2013-07-06 04:37:13 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2014-01-01 18:52:12 +00:00
|
|
|
if (key_pressed[ SCODE_KPAD_UL ] || key_pressed[ SCODE_KPAD_L ] || key_pressed[ SCODE_KPAD_DL ] ||/* regular arrow l */key_pressed[ SCODE_L ])
|
2013-07-06 04:37:13 +00:00
|
|
|
{
|
|
|
|
if (joy_x > joy_step)
|
|
|
|
{
|
|
|
|
joy_x -= joy_step;
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
joy_x = 0;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2014-01-01 18:52:12 +00:00
|
|
|
if (key_pressed[ SCODE_KPAD_UR ] || key_pressed[ SCODE_KPAD_R ] || key_pressed[ SCODE_KPAD_DR ] ||/* regular arrow r */key_pressed[ SCODE_R ])
|
2013-07-06 04:37:13 +00:00
|
|
|
{
|
2013-12-21 23:25:02 +00:00
|
|
|
if (joy_x < JOY_RANGE - joy_step)
|
2013-07-06 04:37:13 +00:00
|
|
|
{
|
|
|
|
joy_x += joy_step;
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
2013-12-21 23:25:02 +00:00
|
|
|
joy_x = JOY_RANGE-1;
|
2013-07-06 04:37:13 +00:00
|
|
|
}
|
|
|
|
}
|
2013-12-28 21:08:35 +00:00
|
|
|
}
|
|
|
|
#endif
|
2013-06-11 07:08:15 +00:00
|
|
|
}
|
|
|
|
|
2013-12-28 21:08:35 +00:00
|
|
|
int c_rawkey()
|
2013-11-24 20:19:54 +00:00
|
|
|
{
|
2013-12-28 21:08:35 +00:00
|
|
|
return last_scancode;
|
2013-11-24 20:19:54 +00:00
|
|
|
}
|
|
|
|
|
2015-05-31 19:57:33 +00:00
|
|
|
#ifdef INTERFACE_CLASSIC
|
2013-06-11 07:08:15 +00:00
|
|
|
int c_mygetch(int block)
|
|
|
|
{
|
|
|
|
int retval;
|
|
|
|
|
2015-05-31 19:59:26 +00:00
|
|
|
if (emulator_shutting_down) {
|
|
|
|
next_key = kESC;
|
|
|
|
}
|
|
|
|
|
|
|
|
while (next_key == -1 && block)
|
2013-07-06 04:37:13 +00:00
|
|
|
{
|
2015-05-31 19:59:26 +00:00
|
|
|
static struct timespec ts = { .tv_sec=0, .tv_nsec=33333333 };
|
|
|
|
nanosleep(&ts, NULL); // 30Hz framerate
|
2013-07-06 04:37:13 +00:00
|
|
|
}
|
2013-06-11 07:08:15 +00:00
|
|
|
|
|
|
|
retval = next_key;
|
|
|
|
next_key = -1;
|
|
|
|
|
|
|
|
return retval;
|
|
|
|
}
|
2013-12-15 22:59:18 +00:00
|
|
|
|
|
|
|
void c_keys_set_key(int key)
|
|
|
|
{
|
|
|
|
next_key = key;
|
|
|
|
}
|
|
|
|
|
|
|
|
bool c_keys_is_interface_key(int key)
|
|
|
|
{
|
|
|
|
switch (key)
|
|
|
|
{
|
|
|
|
case kF1:
|
|
|
|
case kF2:
|
|
|
|
case kF5:
|
|
|
|
#ifdef DEBUGGER
|
|
|
|
case kF7:
|
|
|
|
#endif
|
|
|
|
case kF8:
|
|
|
|
case kF10:
|
|
|
|
return true;
|
|
|
|
default:
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
return false;
|
|
|
|
}
|
2014-12-02 06:00:45 +00:00
|
|
|
#endif
|
2013-12-15 22:59:18 +00:00
|
|
|
|
2015-04-19 21:31:30 +00:00
|
|
|
#if INTERFACE_TOUCH
|
|
|
|
bool (*keydriver_isTouchKeyboardAvailable)(void) = NULL;
|
|
|
|
void (*keydriver_setTouchKeyboardEnabled)(bool enabled) = NULL;
|
2015-04-27 01:12:56 +00:00
|
|
|
void (*keydriver_setTouchKeyboardOwnsScreen)(bool pwnd) = NULL;
|
2015-04-19 21:31:30 +00:00
|
|
|
#endif
|
|
|
|
|