mirror of
https://github.com/AppleWin/AppleWin.git
synced 2026-04-20 15:17:50 +00:00
Remove the top-level AppleWin folder
This commit is contained in:
tomcw
@@ -0,0 +1,825 @@
|
||||
/*
|
||||
AppleWin : An Apple //e emulator for Windows
|
||||
|
||||
Copyright (C) 1994-1996, Michael O'Brien
|
||||
Copyright (C) 1999-2001, Oliver Schmidt
|
||||
Copyright (C) 2002-2005, Tom Charlesworth
|
||||
Copyright (C) 2006-2007, Tom Charlesworth, Michael Pohoreski
|
||||
|
||||
AppleWin is free software; you can redistribute it and/or modify
|
||||
it under the terms of the GNU General Public License as published by
|
||||
the Free Software Foundation; either version 2 of the License, or
|
||||
(at your option) any later version.
|
||||
|
||||
AppleWin is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
GNU General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU General Public License
|
||||
along with AppleWin; if not, write to the Free Software
|
||||
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
||||
*/
|
||||
|
||||
/* Description: Joystick emulation via keyboard, PC joystick or mouse
|
||||
*
|
||||
* Author: Various
|
||||
*/
|
||||
|
||||
// TC: Extended for 2nd joystick:
|
||||
// Apple joystick #0 can be emulated with: NONE, JOYSTICKID1, KEYBOARD, MOUSE
|
||||
// Apple joystick #1 can be emulated with: NONE, JOYSTICKID2, KEYBOARD, MOUSE
|
||||
// If Apple joystick #0 is using {KEYBOARD | MOUSE} then joystick #1 can't use it.
|
||||
// If Apple joystick #1 is using KEYBOARD, then disable the standard keys that control Apple switches #0/#1.
|
||||
// - So that in a 2 player game, player 2 can't cheat by controlling player 1's buttons.
|
||||
// If Apple joystick #1 is not NONE, then Apple joystick #0 only gets the use of Apple switch #0.
|
||||
// - When using 2 joysticks, button #1 is used by joystick #1 (Archon).
|
||||
// Apple joystick #1's button now controls Apple switches #1 and #2.
|
||||
// - This is because the 2-joystick version of Mario Bros expects the 2nd joystick to control Apple switch #2.
|
||||
|
||||
#include "StdAfx.h"
|
||||
#include "MouseInterface.h"
|
||||
#include "Configuration\PropertySheet.h"
|
||||
|
||||
#define BUTTONTIME 5000 // TODO: Describe this magic number
|
||||
|
||||
enum {DEVICE_NONE=0, DEVICE_JOYSTICK, DEVICE_KEYBOARD, DEVICE_MOUSE};
|
||||
|
||||
// Indexed by joytype[n]
|
||||
static const DWORD joyinfo[5] = { DEVICE_NONE,
|
||||
DEVICE_JOYSTICK,
|
||||
DEVICE_KEYBOARD, // Cursors (prev: Numpad-Standard)
|
||||
DEVICE_KEYBOARD, // Numpad (prev: Numpad-Centering)
|
||||
DEVICE_MOUSE };
|
||||
|
||||
// Key pad [1..9]; Key pad 0,Key pad '.'; Left ALT,Right ALT
|
||||
enum JOYKEY { JK_DOWNLEFT=0,
|
||||
JK_DOWN,
|
||||
JK_DOWNRIGHT,
|
||||
JK_LEFT,
|
||||
JK_CENTRE,
|
||||
JK_RIGHT,
|
||||
JK_UPLEFT,
|
||||
JK_UP,
|
||||
JK_UPRIGHT,
|
||||
JK_BUTTON0,
|
||||
JK_BUTTON1,
|
||||
JK_OPENAPPLE,
|
||||
JK_CLOSEDAPPLE,
|
||||
JK_MAX
|
||||
};
|
||||
|
||||
const UINT PDL_MIN = 0;
|
||||
const UINT PDL_CENTRAL = 127;
|
||||
const UINT PDL_MAX = 255;
|
||||
|
||||
static BOOL keydown[JK_MAX] = {FALSE};
|
||||
static POINT keyvalue[9] = {{PDL_MIN,PDL_MAX}, {PDL_CENTRAL,PDL_MAX}, {PDL_MAX,PDL_MAX},
|
||||
{PDL_MIN,PDL_CENTRAL},{PDL_CENTRAL,PDL_CENTRAL},{PDL_MAX,PDL_CENTRAL},
|
||||
{PDL_MIN,PDL_MIN}, {PDL_CENTRAL,PDL_MIN}, {PDL_MAX,PDL_MIN}};
|
||||
|
||||
static DWORD buttonlatch[3] = {0,0,0};
|
||||
static BOOL joybutton[3] = {0,0,0};
|
||||
|
||||
static int joyshrx[2] = {8,8};
|
||||
static int joyshry[2] = {8,8};
|
||||
static int joysubx[2] = {0,0};
|
||||
static int joysuby[2] = {0,0};
|
||||
|
||||
// Value persisted to Registry for REGVALUE_JOYSTICK0_EMU_TYPE
|
||||
DWORD joytype[2] = {J0C_JOYSTICK1, J1C_DISABLED}; // Emulation Type for joysticks #0 & #1
|
||||
|
||||
static BOOL setbutton[3] = {0,0,0}; // Used when a mouse button is pressed/released
|
||||
|
||||
static int xpos[2] = {PDL_CENTRAL,PDL_CENTRAL};
|
||||
static int ypos[2] = {PDL_CENTRAL,PDL_CENTRAL};
|
||||
|
||||
static unsigned __int64 g_nJoyCntrResetCycle = 0; // Abs cycle that joystick counters were reset
|
||||
|
||||
static short g_nPdlTrimX = 0;
|
||||
static short g_nPdlTrimY = 0;
|
||||
|
||||
enum {JOYPORT_LEFTRIGHT=0, JOYPORT_UPDOWN=1};
|
||||
|
||||
static UINT g_bJoyportEnabled = 0; // Set to use Joyport to drive the 3 button inputs
|
||||
static UINT g_uJoyportActiveStick = 0;
|
||||
static UINT g_uJoyportReadMode = JOYPORT_LEFTRIGHT;
|
||||
|
||||
//===========================================================================
|
||||
void CheckJoystick0()
|
||||
{
|
||||
static DWORD lastcheck = 0;
|
||||
DWORD currtime = GetTickCount();
|
||||
if ((currtime-lastcheck >= 10) || joybutton[0] || joybutton[1])
|
||||
{
|
||||
lastcheck = currtime;
|
||||
JOYINFO info;
|
||||
if (joyGetPos(JOYSTICKID1,&info) == JOYERR_NOERROR)
|
||||
{
|
||||
if ((info.wButtons & JOY_BUTTON1) && !joybutton[0])
|
||||
buttonlatch[0] = BUTTONTIME;
|
||||
if ((info.wButtons & JOY_BUTTON2) && !joybutton[1] &&
|
||||
(joyinfo[joytype[1]] == DEVICE_NONE) // Only consider 2nd button if NOT emulating a 2nd Apple joystick
|
||||
)
|
||||
buttonlatch[1] = BUTTONTIME;
|
||||
joybutton[0] = ((info.wButtons & JOY_BUTTON1) != 0);
|
||||
if (joyinfo[joytype[1]] == DEVICE_NONE) // Only consider 2nd button if NOT emulating a 2nd Apple joystick
|
||||
joybutton[1] = ((info.wButtons & JOY_BUTTON2) != 0);
|
||||
|
||||
xpos[0] = (info.wXpos-joysubx[0]) >> joyshrx[0];
|
||||
ypos[0] = (info.wYpos-joysuby[0]) >> joyshry[0];
|
||||
|
||||
// NB. This does not work for analogue joysticks (not self-centreing) - except if Trim=0
|
||||
if(xpos[0] == 127 || xpos[0] == 128) xpos[0] += g_nPdlTrimX;
|
||||
if(ypos[0] == 127 || ypos[0] == 128) ypos[0] += g_nPdlTrimY;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
void CheckJoystick1()
|
||||
{
|
||||
static DWORD lastcheck = 0;
|
||||
DWORD currtime = GetTickCount();
|
||||
if ((currtime-lastcheck >= 10) || joybutton[2])
|
||||
{
|
||||
lastcheck = currtime;
|
||||
JOYINFO info;
|
||||
if (joyGetPos(JOYSTICKID2,&info) == JOYERR_NOERROR)
|
||||
{
|
||||
if ((info.wButtons & JOY_BUTTON1) && !joybutton[2])
|
||||
{
|
||||
buttonlatch[2] = BUTTONTIME;
|
||||
if(joyinfo[joytype[1]] != DEVICE_NONE)
|
||||
buttonlatch[1] = BUTTONTIME; // Re-map this button when emulating a 2nd Apple joystick
|
||||
}
|
||||
|
||||
joybutton[2] = ((info.wButtons & JOY_BUTTON1) != 0);
|
||||
if(joyinfo[joytype[1]] != DEVICE_NONE)
|
||||
joybutton[1] = ((info.wButtons & JOY_BUTTON1) != 0); // Re-map this button when emulating a 2nd Apple joystick
|
||||
|
||||
xpos[1] = (info.wXpos-joysubx[1]) >> joyshrx[1];
|
||||
ypos[1] = (info.wYpos-joysuby[1]) >> joyshry[1];
|
||||
|
||||
// NB. This does not work for analogue joysticks (not self-centreing) - except if Trim=0
|
||||
if(xpos[1] == 127 || xpos[1] == 128) xpos[1] += g_nPdlTrimX;
|
||||
if(ypos[1] == 127 || ypos[1] == 128) ypos[1] += g_nPdlTrimY;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// ----- ALL GLOBALLY ACCESSIBLE FUNCTIONS ARE BELOW THIS LINE -----
|
||||
//
|
||||
|
||||
//===========================================================================
|
||||
void JoyInitialize()
|
||||
{
|
||||
// Emulated joystick #0 can only use JOYSTICKID1 (if no joystick, then use keyboard)
|
||||
// Emulated joystick #1 can only use JOYSTICKID2 (if no joystick, then disable)
|
||||
|
||||
//
|
||||
// Init for emulated joystick #0:
|
||||
//
|
||||
|
||||
if (joyinfo[joytype[0]] == DEVICE_JOYSTICK)
|
||||
{
|
||||
JOYCAPS caps;
|
||||
if (joyGetDevCaps(JOYSTICKID1,&caps,sizeof(JOYCAPS)) == JOYERR_NOERROR)
|
||||
{
|
||||
joyshrx[0] = 0;
|
||||
joyshry[0] = 0;
|
||||
joysubx[0] = (int)caps.wXmin;
|
||||
joysuby[0] = (int)caps.wYmin;
|
||||
UINT xrange = caps.wXmax-caps.wXmin;
|
||||
UINT yrange = caps.wYmax-caps.wYmin;
|
||||
while (xrange > 256)
|
||||
{
|
||||
xrange >>= 1;
|
||||
++joyshrx[0];
|
||||
}
|
||||
while (yrange > 256)
|
||||
{
|
||||
yrange >>= 1;
|
||||
++joyshry[0];
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
joytype[0] = J0C_KEYBD_NUMPAD;
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Init for emulated joystick #1:
|
||||
//
|
||||
|
||||
if (joyinfo[joytype[1]] == DEVICE_JOYSTICK)
|
||||
{
|
||||
JOYCAPS caps;
|
||||
if (joyGetDevCaps(JOYSTICKID2,&caps,sizeof(JOYCAPS)) == JOYERR_NOERROR)
|
||||
{
|
||||
joyshrx[1] = 0;
|
||||
joyshry[1] = 0;
|
||||
joysubx[1] = (int)caps.wXmin;
|
||||
joysuby[1] = (int)caps.wYmin;
|
||||
UINT xrange = caps.wXmax-caps.wXmin;
|
||||
UINT yrange = caps.wYmax-caps.wYmin;
|
||||
while (xrange > 256)
|
||||
{
|
||||
xrange >>= 1;
|
||||
++joyshrx[1];
|
||||
}
|
||||
while (yrange > 256)
|
||||
{
|
||||
yrange >>= 1;
|
||||
++joyshry[1];
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
joytype[1] = J1C_DISABLED;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
//===========================================================================
|
||||
|
||||
#define SUPPORT_CURSOR_KEYS
|
||||
|
||||
BOOL JoyProcessKey(int virtkey, BOOL extended, BOOL down, BOOL autorep)
|
||||
{
|
||||
static struct
|
||||
{
|
||||
UINT32 Left:1;
|
||||
UINT32 Up:1;
|
||||
UINT32 Right:1;
|
||||
UINT32 Down:1;
|
||||
} CursorKeys = {0};
|
||||
|
||||
if ( (joyinfo[joytype[0]] != DEVICE_KEYBOARD) &&
|
||||
(joyinfo[joytype[1]] != DEVICE_KEYBOARD) &&
|
||||
(virtkey != VK_MENU) // VK_MENU == ALT Key
|
||||
)
|
||||
{
|
||||
return 0;
|
||||
}
|
||||
|
||||
//
|
||||
|
||||
BOOL keychange = 0;
|
||||
bool bIsCursorKey = false;
|
||||
|
||||
if (virtkey == VK_MENU) // VK_MENU == ALT Key (Button #0 or #1)
|
||||
{
|
||||
keychange = 1;
|
||||
keydown[JK_OPENAPPLE+(extended != 0)] = down;
|
||||
}
|
||||
else if (!extended)
|
||||
{
|
||||
if (JoyUsingKeyboardNumpad())
|
||||
{
|
||||
keychange = 1;
|
||||
|
||||
if ((virtkey >= VK_NUMPAD1) && (virtkey <= VK_NUMPAD9)) // NumLock on
|
||||
{
|
||||
keydown[virtkey-VK_NUMPAD1] = down;
|
||||
}
|
||||
else // NumLock off
|
||||
{
|
||||
switch (virtkey)
|
||||
{
|
||||
case VK_END: keydown[JK_DOWNLEFT] = down; break;
|
||||
case VK_DOWN: keydown[JK_DOWN] = down; break;
|
||||
case VK_NEXT: keydown[JK_DOWNRIGHT] = down; break;
|
||||
case VK_LEFT: keydown[JK_LEFT] = down; break;
|
||||
case VK_CLEAR: keydown[JK_CENTRE] = down; break;
|
||||
case VK_RIGHT: keydown[JK_RIGHT] = down; break;
|
||||
case VK_HOME: keydown[JK_UPLEFT] = down; break;
|
||||
case VK_UP: keydown[JK_UP] = down; break;
|
||||
case VK_PRIOR: keydown[JK_UPRIGHT] = down; break;
|
||||
case VK_NUMPAD0: keydown[JK_BUTTON0] = down; break;
|
||||
case VK_DECIMAL: keydown[JK_BUTTON1] = down; break;
|
||||
default: keychange = 0; break;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
#ifdef SUPPORT_CURSOR_KEYS
|
||||
else if (extended)
|
||||
{
|
||||
if (JoyUsingKeyboardCursors() && (virtkey == VK_LEFT || virtkey == VK_UP || virtkey == VK_RIGHT || virtkey == VK_DOWN))
|
||||
{
|
||||
keychange = 1; // This prevents cursors keys being available to the Apple II (eg. Lode Runner uses cursor left/right for game speed & Ctrl-J/K for joystick/keyboard)
|
||||
bIsCursorKey = true;
|
||||
|
||||
switch (virtkey)
|
||||
{
|
||||
case VK_LEFT: CursorKeys.Left = down; break;
|
||||
case VK_UP: CursorKeys.Up = down; break;
|
||||
case VK_RIGHT: CursorKeys.Right = down; break;
|
||||
case VK_DOWN: CursorKeys.Down = down; break;
|
||||
}
|
||||
}
|
||||
}
|
||||
#endif
|
||||
|
||||
if (!keychange)
|
||||
return 0;
|
||||
|
||||
//
|
||||
|
||||
if (virtkey == VK_NUMPAD0)
|
||||
{
|
||||
if(down)
|
||||
{
|
||||
if(joyinfo[joytype[1]] != DEVICE_KEYBOARD)
|
||||
{
|
||||
buttonlatch[0] = BUTTONTIME;
|
||||
}
|
||||
else if(joyinfo[joytype[1]] != DEVICE_NONE)
|
||||
{
|
||||
buttonlatch[2] = BUTTONTIME;
|
||||
buttonlatch[1] = BUTTONTIME; // Re-map this button when emulating a 2nd Apple joystick
|
||||
}
|
||||
}
|
||||
}
|
||||
else if (virtkey == VK_DECIMAL)
|
||||
{
|
||||
if(down)
|
||||
{
|
||||
if(joyinfo[joytype[1]] != DEVICE_KEYBOARD)
|
||||
buttonlatch[1] = BUTTONTIME;
|
||||
}
|
||||
}
|
||||
else if ((down && !autorep) || (sg_PropertySheet.GetJoystickCenteringControl() == JOYSTICK_MODE_CENTERING))
|
||||
{
|
||||
int xkeys = 0;
|
||||
int ykeys = 0;
|
||||
int xtotal = 0;
|
||||
int ytotal = 0;
|
||||
|
||||
for (int keynum = JK_DOWNLEFT; keynum <= JK_UPRIGHT; keynum++)
|
||||
{
|
||||
if (keydown[keynum])
|
||||
{
|
||||
if ((keynum % 3) != 1) // Not middle col (ie. not VK_DOWN, VK_CLEAR, VK_UP)
|
||||
{
|
||||
xkeys++;
|
||||
xtotal += keyvalue[keynum].x;
|
||||
}
|
||||
if ((keynum / 3) != 1) // Not middle row (ie. not VK_LEFT, VK_CLEAR, VK_RIGHT)
|
||||
{
|
||||
ykeys++;
|
||||
ytotal += keyvalue[keynum].y;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
if (CursorKeys.Left)
|
||||
{
|
||||
xkeys++; xtotal += keyvalue[JK_LEFT].x;
|
||||
}
|
||||
if (CursorKeys.Right)
|
||||
{
|
||||
xkeys++; xtotal += keyvalue[JK_RIGHT].x;
|
||||
}
|
||||
if (CursorKeys.Up)
|
||||
{
|
||||
ykeys++; ytotal += keyvalue[JK_UP].y;
|
||||
}
|
||||
if (CursorKeys.Down)
|
||||
{
|
||||
ykeys++; ytotal += keyvalue[JK_DOWN].y;
|
||||
}
|
||||
|
||||
// Joystick # which is being emulated by keyboard
|
||||
int nJoyNum = (joyinfo[joytype[0]] == DEVICE_KEYBOARD) ? 0 : 1;
|
||||
|
||||
if (xkeys)
|
||||
xpos[nJoyNum] = xtotal / xkeys;
|
||||
else
|
||||
xpos[nJoyNum] = PDL_CENTRAL + g_nPdlTrimX;
|
||||
|
||||
if (ykeys)
|
||||
ypos[nJoyNum] = ytotal / ykeys;
|
||||
else
|
||||
ypos[nJoyNum] = PDL_CENTRAL + g_nPdlTrimY;
|
||||
}
|
||||
|
||||
if (bIsCursorKey && sg_PropertySheet.GetJoystickCursorControl())
|
||||
{
|
||||
// Allow AppleII keyboard to see this cursor keypress too
|
||||
return 0;
|
||||
}
|
||||
|
||||
return 1;
|
||||
}
|
||||
|
||||
//===========================================================================
|
||||
|
||||
static void DoAutofire(UINT uButton, BOOL& pressed)
|
||||
{
|
||||
static BOOL toggle[3] = {0};
|
||||
static BOOL lastPressed[3] = {0};
|
||||
|
||||
BOOL nowPressed = pressed;
|
||||
if (sg_PropertySheet.GetAutofire(uButton) && pressed)
|
||||
{
|
||||
toggle[uButton] = (!lastPressed[uButton]) ? TRUE : toggle[uButton] = !toggle[uButton];
|
||||
pressed = pressed && toggle[uButton];
|
||||
}
|
||||
lastPressed[uButton] = nowPressed;
|
||||
}
|
||||
|
||||
BYTE __stdcall JoyportReadButton(WORD address, ULONG nCyclesLeft)
|
||||
{
|
||||
BOOL pressed = 0;
|
||||
|
||||
if (g_uJoyportActiveStick == 0)
|
||||
{
|
||||
switch (address)
|
||||
{
|
||||
case 0x61:
|
||||
pressed = (buttonlatch[0] || joybutton[0] || setbutton[0] /*|| keydown[JK_OPENAPPLE]*/);
|
||||
if(joyinfo[joytype[1]] != DEVICE_KEYBOARD) // BUG? joytype[1] should be [0] ?
|
||||
pressed = (pressed || keydown[JK_BUTTON0]);
|
||||
buttonlatch[0] = 0;
|
||||
break;
|
||||
|
||||
case 0x62: // Left or Up
|
||||
if (g_uJoyportReadMode == JOYPORT_LEFTRIGHT) // LEFT
|
||||
{
|
||||
if (xpos[0] == 0) // TODO: More range for mouse control?
|
||||
pressed = 1;
|
||||
}
|
||||
else // UP
|
||||
{
|
||||
if (ypos[0] == 0) // TODO: More range for mouse control?
|
||||
pressed = 1;
|
||||
}
|
||||
break;
|
||||
|
||||
case 0x63: // Right or Down
|
||||
if (g_uJoyportReadMode == JOYPORT_LEFTRIGHT) // RIGHT
|
||||
{
|
||||
if (xpos[0] >= 255) // TODO: More range for mouse control?
|
||||
pressed = 1;
|
||||
}
|
||||
else // DOWN
|
||||
{
|
||||
if (ypos[0] >= 255) // TODO: More range for mouse control?
|
||||
pressed = 1;
|
||||
}
|
||||
break;
|
||||
}
|
||||
}
|
||||
else // TODO: stick #1
|
||||
{
|
||||
}
|
||||
|
||||
pressed = pressed ? 0 : 1; // Invert as Joyport signals are active low
|
||||
|
||||
return MemReadFloatingBus(pressed, nCyclesLeft);
|
||||
}
|
||||
|
||||
BYTE __stdcall JoyReadButton(WORD pc, WORD address, BYTE, BYTE, ULONG nCyclesLeft)
|
||||
{
|
||||
address &= 0xFF;
|
||||
|
||||
if(joyinfo[joytype[0]] == DEVICE_JOYSTICK)
|
||||
CheckJoystick0();
|
||||
if(joyinfo[joytype[1]] == DEVICE_JOYSTICK)
|
||||
CheckJoystick1();
|
||||
|
||||
if (g_bJoyportEnabled)
|
||||
{
|
||||
// Some extra logic to stop the Joyport forcing a self-test at CTRL+RESET
|
||||
if ((address != 0x62) || (address == 0x62 && pc != 0xC242 && pc != 0xC2BE)) // Original //e ($C242), Enhanced //e ($C2BE)
|
||||
return JoyportReadButton(address, nCyclesLeft);
|
||||
}
|
||||
|
||||
BOOL pressed = 0;
|
||||
switch (address)
|
||||
{
|
||||
case 0x61:
|
||||
pressed = (buttonlatch[0] || joybutton[0] || setbutton[0] || keydown[JK_OPENAPPLE]);
|
||||
if(joyinfo[joytype[1]] != DEVICE_KEYBOARD) // BUG? joytype[1] should be [0] ?
|
||||
pressed = (pressed || keydown[JK_BUTTON0]);
|
||||
buttonlatch[0] = 0;
|
||||
DoAutofire(0, pressed);
|
||||
break;
|
||||
|
||||
case 0x62:
|
||||
pressed = (buttonlatch[1] || joybutton[1] || setbutton[1] || keydown[JK_CLOSEDAPPLE]);
|
||||
if(joyinfo[joytype[1]] != DEVICE_KEYBOARD)
|
||||
pressed = (pressed || keydown[JK_BUTTON1]);
|
||||
buttonlatch[1] = 0;
|
||||
DoAutofire(1, pressed);
|
||||
break;
|
||||
|
||||
case 0x63:
|
||||
if (IS_APPLE2 && (joyinfo[joytype[1]] == DEVICE_NONE))
|
||||
{
|
||||
// Apple II/II+ with no joystick has the "SHIFT key mod"
|
||||
// See Sather's Understanding The Apple II p7-36
|
||||
pressed = !(GetKeyState(VK_SHIFT) < 0);
|
||||
}
|
||||
else
|
||||
{
|
||||
pressed = (buttonlatch[2] || joybutton[2] || setbutton[2]);
|
||||
DoAutofire(2, pressed);
|
||||
}
|
||||
buttonlatch[2] = 0;
|
||||
break;
|
||||
}
|
||||
|
||||
return MemReadFloatingBus(pressed, nCyclesLeft);
|
||||
}
|
||||
|
||||
//===========================================================================
|
||||
|
||||
// PREAD: ; $FB1E
|
||||
// AD 70 C0 : (4) LDA $C070
|
||||
// A0 00 : (2) LDA #$00
|
||||
// EA : (2) NOP
|
||||
// EA : (2) NOP
|
||||
// Lbl1: ; 11 cycles is the normal duration of the loop
|
||||
// BD 64 C0 : (4) LDA $C064,X
|
||||
// 10 04 : (2) BPL Lbl2 ; NB. 3 cycles if branch taken (not likely)
|
||||
// C8 : (2) INY
|
||||
// D0 F8 : (3) BNE Lbl1 ; NB. 2 cycles if branch not taken (not likely)
|
||||
// 88 : (2) DEY
|
||||
// Lbl2:
|
||||
// 60 : (6) RTS
|
||||
//
|
||||
|
||||
static const double PDL_CNTR_INTERVAL = 2816.0 / 255.0; // 11.04 (From KEGS)
|
||||
|
||||
BYTE __stdcall JoyReadPosition(WORD programcounter, WORD address, BYTE, BYTE, ULONG nCyclesLeft)
|
||||
{
|
||||
int nJoyNum = (address & 2) ? 1 : 0; // $C064..$C067
|
||||
|
||||
CpuCalcCycles(nCyclesLeft);
|
||||
|
||||
ULONG nPdlPos = (address & 1) ? ypos[nJoyNum] : xpos[nJoyNum];
|
||||
|
||||
// This is from KEGS. It helps games like Championship Lode Runner & Boulderdash
|
||||
if(nPdlPos >= 255)
|
||||
nPdlPos = 280;
|
||||
|
||||
BOOL nPdlCntrActive = g_nCumulativeCycles <= (g_nJoyCntrResetCycle + (unsigned __int64) ((double)nPdlPos * PDL_CNTR_INTERVAL));
|
||||
|
||||
return MemReadFloatingBus(nPdlCntrActive, nCyclesLeft);
|
||||
}
|
||||
|
||||
//===========================================================================
|
||||
void JoyReset()
|
||||
{
|
||||
int loop = 0;
|
||||
while (loop < JK_MAX)
|
||||
keydown[loop++] = FALSE;
|
||||
}
|
||||
|
||||
//===========================================================================
|
||||
BYTE __stdcall JoyResetPosition(WORD, WORD, BYTE, BYTE, ULONG nCyclesLeft)
|
||||
{
|
||||
CpuCalcCycles(nCyclesLeft);
|
||||
g_nJoyCntrResetCycle = g_nCumulativeCycles;
|
||||
|
||||
if(joyinfo[joytype[0]] == DEVICE_JOYSTICK)
|
||||
CheckJoystick0();
|
||||
if(joyinfo[joytype[1]] == DEVICE_JOYSTICK)
|
||||
CheckJoystick1();
|
||||
|
||||
return MemReadFloatingBus(nCyclesLeft);
|
||||
}
|
||||
|
||||
//===========================================================================
|
||||
|
||||
// Called when mouse is being used as a joystick && mouse button changes
|
||||
void JoySetButton(eBUTTON number, eBUTTONSTATE down)
|
||||
{
|
||||
if (number > 1) // Sanity check on mouse button #
|
||||
return;
|
||||
|
||||
// If 2nd joystick is enabled, then both joysticks only have 1 button
|
||||
if((joyinfo[joytype[1]] != DEVICE_NONE) && (number != 0))
|
||||
return;
|
||||
|
||||
// If it is 2nd joystick that is being emulated with mouse, then re-map button #
|
||||
if(joyinfo[joytype[1]] == DEVICE_MOUSE)
|
||||
{
|
||||
number = BUTTON1; // 2nd joystick controls Apple button #1
|
||||
}
|
||||
|
||||
setbutton[number] = down;
|
||||
|
||||
if (down)
|
||||
buttonlatch[number] = BUTTONTIME;
|
||||
}
|
||||
|
||||
//===========================================================================
|
||||
BOOL JoySetEmulationType(HWND window, DWORD newtype, int nJoystickNumber, const bool bMousecardActive)
|
||||
{
|
||||
if(joytype[nJoystickNumber] == newtype)
|
||||
return 1; // Already set to this type. Return OK.
|
||||
|
||||
if (joyinfo[newtype] == DEVICE_JOYSTICK)
|
||||
{
|
||||
JOYCAPS caps;
|
||||
unsigned int nJoyID = nJoystickNumber == JN_JOYSTICK0 ? JOYSTICKID1 : JOYSTICKID2;
|
||||
if (joyGetDevCaps(nJoyID, &caps, sizeof(JOYCAPS)) != JOYERR_NOERROR)
|
||||
{
|
||||
MessageBox(window,
|
||||
TEXT("The emulator is unable to read your PC joystick. ")
|
||||
TEXT("Ensure that your game port is configured properly, ")
|
||||
TEXT("that the joystick is firmly plugged in, and that ")
|
||||
TEXT("you have a joystick driver installed."),
|
||||
TEXT("Configuration"),
|
||||
MB_ICONEXCLAMATION | MB_SETFOREGROUND);
|
||||
return 0;
|
||||
}
|
||||
}
|
||||
else if ((joyinfo[newtype] == DEVICE_MOUSE) &&
|
||||
(joyinfo[joytype[nJoystickNumber]] != DEVICE_MOUSE))
|
||||
{
|
||||
if (bMousecardActive)
|
||||
{
|
||||
// Shouldn't be necessary, since Property Sheet's logic should prevent this option being given to the user.
|
||||
MessageBox(window,
|
||||
TEXT("Mouse interface card is enabled - unable to use mouse for joystick emulation."),
|
||||
TEXT("Configuration"),
|
||||
MB_ICONEXCLAMATION | MB_SETFOREGROUND);
|
||||
return 0;
|
||||
}
|
||||
|
||||
MessageBox(window,
|
||||
TEXT("To begin emulating a joystick with your mouse, move ")
|
||||
TEXT("the mouse cursor over the emulated screen of a running ")
|
||||
TEXT("program and click the left mouse button. During the ")
|
||||
TEXT("time the mouse is emulating a joystick, you will not ")
|
||||
TEXT("be able to use it to perform mouse functions, and the ")
|
||||
TEXT("mouse cursor will not be visible. To end joystick ")
|
||||
TEXT("emulation and regain the mouse cursor, click the left ")
|
||||
TEXT("mouse button while pressing Ctrl."),
|
||||
TEXT("Configuration"),
|
||||
MB_ICONINFORMATION | MB_SETFOREGROUND);
|
||||
}
|
||||
else if (joyinfo[newtype] == DEVICE_KEYBOARD)
|
||||
{
|
||||
if (newtype == J0C_KEYBD_CURSORS || newtype == J1C_KEYBD_CURSORS)
|
||||
{
|
||||
MessageBox(window,
|
||||
TEXT("Using cursor keys to emulate a joystick can cause conflicts.\n\n")
|
||||
TEXT("Be aware that 'cursor-up' = CTRL+K, and 'cursor-down' = CTRL+J.\n")
|
||||
TEXT("EG. Lode Runner uses CTRL+K/J to switch between keyboard/joystick modes ")
|
||||
TEXT("(and cursor-left/right to control speed).\n\n")
|
||||
TEXT("Also if cursor keys are blocked from being read from the Apple keyboard ")
|
||||
TEXT("then even simple AppleSoft command-line editing (cursor left/right) will not work."),
|
||||
TEXT("Configuration"),
|
||||
MB_ICONINFORMATION | MB_SETFOREGROUND);
|
||||
}
|
||||
}
|
||||
|
||||
joytype[nJoystickNumber] = newtype;
|
||||
JoyInitialize();
|
||||
JoyReset();
|
||||
return 1;
|
||||
}
|
||||
|
||||
|
||||
//===========================================================================
|
||||
|
||||
// Called when mouse is being used as a joystick && mouse position changes
|
||||
void JoySetPosition(int xvalue, int xrange, int yvalue, int yrange)
|
||||
{
|
||||
int nJoyNum = (joyinfo[joytype[0]] == DEVICE_MOUSE) ? 0 : 1;
|
||||
xpos[nJoyNum] = (xvalue*255)/xrange;
|
||||
ypos[nJoyNum] = (yvalue*255)/yrange;
|
||||
}
|
||||
|
||||
//===========================================================================
|
||||
void JoyUpdatePosition()
|
||||
{
|
||||
if (buttonlatch[0]) --buttonlatch[0];
|
||||
if (buttonlatch[1]) --buttonlatch[1];
|
||||
if (buttonlatch[2]) --buttonlatch[2];
|
||||
}
|
||||
|
||||
//===========================================================================
|
||||
|
||||
BOOL JoyUsingMouse()
|
||||
{
|
||||
return (joyinfo[joytype[0]] == DEVICE_MOUSE) || (joyinfo[joytype[1]] == DEVICE_MOUSE);
|
||||
}
|
||||
|
||||
BOOL JoyUsingKeyboard()
|
||||
{
|
||||
return (joyinfo[joytype[0]] == DEVICE_KEYBOARD) || (joyinfo[joytype[1]] == DEVICE_KEYBOARD);
|
||||
}
|
||||
|
||||
BOOL JoyUsingKeyboardCursors()
|
||||
{
|
||||
return (joytype[0] == J0C_KEYBD_CURSORS) || (joytype[1] == J1C_KEYBD_CURSORS);
|
||||
}
|
||||
|
||||
BOOL JoyUsingKeyboardNumpad()
|
||||
{
|
||||
return (joytype[0] == J0C_KEYBD_NUMPAD) || (joytype[1] == J1C_KEYBD_NUMPAD);
|
||||
}
|
||||
|
||||
//===========================================================================
|
||||
|
||||
void JoyDisableUsingMouse()
|
||||
{
|
||||
if (joyinfo[joytype[0]] == DEVICE_MOUSE)
|
||||
joytype[0] = J0C_DISABLED;
|
||||
|
||||
if (joyinfo[joytype[1]] == DEVICE_MOUSE)
|
||||
joytype[1] = J1C_DISABLED;
|
||||
}
|
||||
|
||||
//===========================================================================
|
||||
|
||||
void JoySetTrim(short nValue, bool bAxisX)
|
||||
{
|
||||
if(bAxisX)
|
||||
g_nPdlTrimX = nValue;
|
||||
else
|
||||
g_nPdlTrimY = nValue;
|
||||
|
||||
int nJoyNum = -1;
|
||||
|
||||
if(joyinfo[joytype[0]] == DEVICE_KEYBOARD)
|
||||
nJoyNum = 0;
|
||||
else if(joyinfo[joytype[1]] == DEVICE_KEYBOARD)
|
||||
nJoyNum = 1;
|
||||
|
||||
if(nJoyNum >= 0)
|
||||
{
|
||||
xpos[nJoyNum] = PDL_CENTRAL+g_nPdlTrimX;
|
||||
ypos[nJoyNum] = PDL_CENTRAL+g_nPdlTrimY;
|
||||
}
|
||||
}
|
||||
|
||||
short JoyGetTrim(bool bAxisX)
|
||||
{
|
||||
return bAxisX ? g_nPdlTrimX : g_nPdlTrimY;
|
||||
}
|
||||
|
||||
//===========================================================================
|
||||
|
||||
// Joyport truth-table:
|
||||
//
|
||||
// AN0 AN1 /PB0 /PB1 /PB2
|
||||
// ------------------------------------
|
||||
// 0 0 Trigger-1 Left-1 Right-1
|
||||
// 0 1 Trigger-1 Up-1 Down-1
|
||||
// 1 0 Trigger-2 Left-2 Right-2
|
||||
// 1 1 Trigger-2 Up-2 Down-2
|
||||
|
||||
#if 0
|
||||
void JoyportEnable(const bool bEnable)
|
||||
{
|
||||
if (IS_APPLE2C)
|
||||
g_bJoyportEnabled = false;
|
||||
else
|
||||
g_bJoyportEnabled = bEnable ? 1 : 0;
|
||||
}
|
||||
#endif
|
||||
|
||||
void JoyportControl(const UINT uControl)
|
||||
{
|
||||
if (!g_bJoyportEnabled)
|
||||
return;
|
||||
|
||||
switch (uControl)
|
||||
{
|
||||
case 0: // AN0 clr
|
||||
g_uJoyportActiveStick = 0;
|
||||
break;
|
||||
case 1: // AN0 set
|
||||
g_uJoyportActiveStick = 1;
|
||||
break;
|
||||
case 2: // AN1 clr
|
||||
g_uJoyportReadMode = JOYPORT_LEFTRIGHT;
|
||||
break;
|
||||
case 3: // AN1 set
|
||||
g_uJoyportReadMode = JOYPORT_UPDOWN;
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
//===========================================================================
|
||||
|
||||
DWORD JoyGetSnapshot(SS_IO_Joystick* pSS)
|
||||
{
|
||||
pSS->g_nJoyCntrResetCycle = g_nJoyCntrResetCycle;
|
||||
return 0;
|
||||
}
|
||||
|
||||
DWORD JoySetSnapshot(SS_IO_Joystick* pSS)
|
||||
{
|
||||
g_nJoyCntrResetCycle = pSS->g_nJoyCntrResetCycle;
|
||||
return 0;
|
||||
}
|
||||
Reference in New Issue
Block a user