sdl-ios-xcode: src/joystick/mint/SDL

annotate src/joystick/mint/SDL_sysjoystick.c @ 1956:ba0d62354872

Simplified driver window creation code. Implemented several Cocoa window functions

author	Sam Lantinga <slouken@libsdl.org>
date	Sat, 29 Jul 2006 21:51:00 +0000
parents	c121d94672cb
children	8640d90b0406

rev	line source
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	1 /*
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	2 SDL - Simple DirectMedia Layer
1312 c9b51268668f Updated copyright information and removed rcs id lines (problematic in branch merges) Sam Lantinga <slouken@libsdl.org> parents: 1079 diff changeset	3 Copyright (C) 1997-2006 Sam Lantinga
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	4
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	5 This library is free software; you can redistribute it and/or
1312 c9b51268668f Updated copyright information and removed rcs id lines (problematic in branch merges) Sam Lantinga <slouken@libsdl.org> parents: 1079 diff changeset	6 modify it under the terms of the GNU Lesser General Public
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	7 License as published by the Free Software Foundation; either
1312 c9b51268668f Updated copyright information and removed rcs id lines (problematic in branch merges) Sam Lantinga <slouken@libsdl.org> parents: 1079 diff changeset	8 version 2.1 of the License, or (at your option) any later version.
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	9
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	10 This library is distributed in the hope that it will be useful,
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	11 but WITHOUT ANY WARRANTY; without even the implied warranty of
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
1312 c9b51268668f Updated copyright information and removed rcs id lines (problematic in branch merges) Sam Lantinga <slouken@libsdl.org> parents: 1079 diff changeset	13 Lesser General Public License for more details.
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	14
1312 c9b51268668f Updated copyright information and removed rcs id lines (problematic in branch merges) Sam Lantinga <slouken@libsdl.org> parents: 1079 diff changeset	15 You should have received a copy of the GNU Lesser General Public
c9b51268668f Updated copyright information and removed rcs id lines (problematic in branch merges) Sam Lantinga <slouken@libsdl.org> parents: 1079 diff changeset	16 License along with this library; if not, write to the Free Software
c9b51268668f Updated copyright information and removed rcs id lines (problematic in branch merges) Sam Lantinga <slouken@libsdl.org> parents: 1079 diff changeset	17 Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	18
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	19 Sam Lantinga
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	20 slouken@libsdl.org
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	21 */
1402 d910939febfa Use consistent identifiers for the various platforms we support. Sam Lantinga <slouken@libsdl.org> parents: 1361 diff changeset	22 #include "SDL_config.h"
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	23
1635 92947e3a18db Make sure code is only compiled if the appropriate subsystem is enabled Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	24 #ifdef SDL_JOYSTICK_MINT
92947e3a18db Make sure code is only compiled if the appropriate subsystem is enabled Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	25
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	26 /*
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	27 * Atari Joystick/Joypad drivers
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	28 *
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	29 * Patrice Mandin
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	30 */
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	31
557 0ce5a68278fd Updated Atari port for new system headers (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: 507 diff changeset	32 #include <mint/cookie.h>
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	33 #include <mint/osbind.h>
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	34
1350 adc8ff3c9597 Fixes for new SDL embedded libc stuff Patrice Mandin <patmandin@gmail.com> parents: 1338 diff changeset	35 #include "SDL_events.h"
1361 19418e4422cb New configure-based build system. Still work in progress, but much improved Sam Lantinga <slouken@libsdl.org> parents: 1358 diff changeset	36 #include "../SDL_sysjoystick.h"
19418e4422cb New configure-based build system. Still work in progress, but much improved Sam Lantinga <slouken@libsdl.org> parents: 1358 diff changeset	37 #include "../SDL_joystick_c.h"
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	38
1412 a8181c4040b8 Fixed include files Patrice Mandin <patmandin@gmail.com> parents: 1402 diff changeset	39 #include "../../video/ataricommon/SDL_ikbdinterrupt_s.h"
a8181c4040b8 Fixed include files Patrice Mandin <patmandin@gmail.com> parents: 1402 diff changeset	40 #include "../../video/ataricommon/SDL_xbiosevents_c.h"
a8181c4040b8 Fixed include files Patrice Mandin <patmandin@gmail.com> parents: 1402 diff changeset	41 #include "../../video/ataricommon/SDL_xbiosinterrupt_s.h"
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	42
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	43 /--- Const ---/
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	44
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	45 /* We can have:
305 9c6613983e85 Atari port cleanups from Patrice Sam Lantinga <slouken@libsdl.org> parents: 302 diff changeset	46 1 joystick on IKBD port 1, read via hardware I/O
9c6613983e85 Atari port cleanups from Patrice Sam Lantinga <slouken@libsdl.org> parents: 302 diff changeset	47 or same joystick on IKBD port 1, read via xbios
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	48 2 joypads on ports A,B
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	49 or 4 joysticks on joypads ports A,B
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	50 or 1 lightpen on joypad port A
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	51 or 2 analog paddles on joypads ports A,B
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	52 2 joysticks on parallel port
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	53 */
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	54
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	55 enum
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	56 {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	57 IKBD_JOY1 = 0,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	58 XBIOS_JOY1,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	59 PORTA_PAD,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	60 PORTB_PAD,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	61 PORTA_JOY0,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	62 PORTA_JOY1,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	63 PORTB_JOY0,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	64 PORTB_JOY1,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	65 PORTA_LP,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	66 PORTA_ANPAD,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	67 PORTB_ANPAD,
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	68 #if 0
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	69 PARA_JOY0,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	70 PARA_JOY1,
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	71 #endif
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	72 MAX_JOYSTICKS
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	73 };
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	74
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	75 enum
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	76 {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	77 MCH_ST = 0,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	78 MCH_STE,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	79 MCH_TT,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	80 MCH_F30,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	81 MCH_CLONE,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	82 MCH_ARANYM
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	83 };
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	84
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	85 /* Joypad buttons
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	86 * Procontroller note:
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	87 * L,R are connected to 4,6
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	88 * X,Y,Z are connected to 7,8,9
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	89 */
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	90
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	91 enum
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	92 {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	93 JP_UP = 0, JP_DOWN, JP_LEFT, JP_RIGHT,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	94 JP_KPMULT, JP_KP7, JP_KP4, JP_KP1,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	95 JP_KP0, JP_KP8, JP_KP5, JP_KP2,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	96 JP_KPNUM, JP_KP9, JP_KP6, JP_KP3,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	97 JP_PAUSE, JP_FIRE0, JP_UNDEF0, JP_FIRE1,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	98 JP_UNDEF1, JP_FIRE2, JP_UNDEF2, JP_OPTION
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	99 };
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	100
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	101 #define JP_NUM_BUTTONS 17
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	102
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	103 #define PORT_JS_RIGHT (1<<0)
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	104 #define PORT_JS_LEFT (1<<1)
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	105 #define PORT_JS_DOWN (1<<2)
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	106 #define PORT_JS_UP (1<<3)
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	107 #define PORT_JS_FIRE (1<<4)
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	108
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	109 /--- Types ---/
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	110
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	111 typedef struct
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	112 {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	113 SDL_bool enabled;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	114 unsigned char *name;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	115 Uint32 prevstate;
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	116 } atarijoy_t;
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	117
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	118 /--- Variables ---/
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	119
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	120 static atarijoy_t atarijoysticks[MAX_JOYSTICKS] = {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	121 {SDL_FALSE, "IKBD joystick port 1", 0},
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	122 {SDL_FALSE, "Xbios joystick port 1", 0},
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	123 {SDL_FALSE, "Joypad port A", 0},
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	124 {SDL_FALSE, "Joypad port B", 0},
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	125 {SDL_FALSE, "Joystick 0 port A", 0},
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	126 {SDL_FALSE, "Joystick 1 port A", 0},
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	127 {SDL_FALSE, "Joystick 0 port B", 0},
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	128 {SDL_FALSE, "Joystick 1 port B", 0},
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	129 {SDL_FALSE, "Lightpen port A", 0},
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	130 {SDL_FALSE, "Analog paddle port A", 0},
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	131 {SDL_FALSE, "Analog paddle port B", 0}
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	132 #if 0
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	133 , {SDL_FALSE, "Joystick 0 parallel port", 0},
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	134 {SDL_FALSE, "Joystick 1 parallel port", 0}
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	135 #endif
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	136 };
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	137
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	138 static const int jp_buttons[JP_NUM_BUTTONS] = {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	139 JP_FIRE0, JP_FIRE1, JP_FIRE2, JP_PAUSE,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	140 JP_OPTION, JP_KPMULT, JP_KPNUM, JP_KP0,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	141 JP_KP1, JP_KP2, JP_KP3, JP_KP4,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	142 JP_KP5, JP_KP6, JP_KP7, JP_KP8,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	143 JP_KP9
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	144 };
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	145
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	146 static SDL_bool joypad_ports_enabled = SDL_FALSE;
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	147
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	148 /* Updated joypad ports */
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	149 static Uint16 jp_paddles[4];
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	150 static Uint16 jp_lightpens[2];
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	151 static Uint16 jp_directions;
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	152 static Uint16 jp_fires;
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	153 static Uint32 jp_joypads[2];
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	154
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	155 /--- Functions prototypes ---/
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	156
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	157 static int GetEnabledAtariJoystick(int index);
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	158 static void UpdateJoypads(void);
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	159
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	160 /--- Functions ---/
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	161
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	162 int
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	163 SDL_SYS_JoystickInit(void)
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	164 {
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	165 int i;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	166 unsigned long cookie_mch;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	167 const char *envr = SDL_getenv("SDL_JOYSTICK_ATARI");
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	168
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	169 #define TEST_JOY_ENABLED(env,idstring,num) \
1336 3692456e7b0f Use SDL_ prefixed versions of C library functions. Sam Lantinga <slouken@libsdl.org> parents: 1312 diff changeset	170 if (SDL_strstr(env,idstring"-off")) { \
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	171 atarijoysticks[num].enabled=SDL_FALSE; \
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	172 } \
1336 3692456e7b0f Use SDL_ prefixed versions of C library functions. Sam Lantinga <slouken@libsdl.org> parents: 1312 diff changeset	173 if (SDL_strstr(env,idstring"-on")) { \
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	174 atarijoysticks[num].enabled=SDL_TRUE; \
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	175 }
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	176
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	177 /* Cookie _MCH present ? if not, assume ST machine */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	178 if (Getcookie(C__MCH, &cookie_mch) != C_FOUND) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	179 cookie_mch = MCH_ST << 16;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	180 }
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	181
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	182 /* Enable some default joysticks */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	183 if ((cookie_mch == MCH_ST << 16) \|\| ((cookie_mch >> 16) == MCH_STE) \|\|
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	184 (cookie_mch == MCH_TT << 16) \|\| (cookie_mch == MCH_F30 << 16) \|\|
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	185 (cookie_mch == MCH_ARANYM << 16)) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	186 atarijoysticks[IKBD_JOY1].enabled = (SDL_AtariIkbd_enabled != 0);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	187 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	188 if ((cookie_mch == MCH_STE << 16) \|\| (cookie_mch == MCH_F30 << 16)) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	189 atarijoysticks[PORTA_PAD].enabled = SDL_TRUE;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	190 atarijoysticks[PORTB_PAD].enabled = SDL_TRUE;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	191 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	192 if (!atarijoysticks[IKBD_JOY1].enabled) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	193 atarijoysticks[XBIOS_JOY1].enabled = (SDL_AtariXbios_enabled != 0);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	194 }
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	195
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	196 /* Read environment for joysticks to enable */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	197 if (envr) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	198 /* IKBD on any Atari, maybe clones */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	199 if ((cookie_mch == MCH_ST << 16) \|\| ((cookie_mch >> 16) == MCH_STE)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	200 \|\| (cookie_mch == MCH_TT << 16) \|\| (cookie_mch == MCH_F30 << 16)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	201 \|\| (cookie_mch == MCH_ARANYM << 16)) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	202 if (SDL_AtariIkbd_enabled != 0) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	203 TEST_JOY_ENABLED(envr, "ikbd-joy1", IKBD_JOY1);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	204 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	205 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	206 /* Joypads ports only on STE and Falcon */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	207 if ((cookie_mch == MCH_STE << 16) \|\| (cookie_mch == MCH_F30 << 16)) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	208 TEST_JOY_ENABLED(envr, "porta-pad", PORTA_PAD);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	209 if (!atarijoysticks[PORTA_PAD].enabled) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	210 TEST_JOY_ENABLED(envr, "porta-joy0", PORTA_JOY0);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	211 TEST_JOY_ENABLED(envr, "porta-joy1", PORTA_JOY1);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	212 if (!(atarijoysticks[PORTA_JOY0].enabled)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	213 && !(atarijoysticks[PORTA_JOY1].enabled)) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	214 TEST_JOY_ENABLED(envr, "porta-lp", PORTA_LP);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	215 if (!atarijoysticks[PORTA_LP].enabled) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	216 TEST_JOY_ENABLED(envr, "porta-anpad", PORTA_ANPAD);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	217 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	218 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	219 }
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	220
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	221 TEST_JOY_ENABLED(envr, "portb-pad", PORTB_PAD);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	222 if (!atarijoysticks[PORTB_PAD].enabled) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	223 TEST_JOY_ENABLED(envr, "portb-joy0", PORTB_JOY0);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	224 TEST_JOY_ENABLED(envr, "portb-joy1", PORTB_JOY1);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	225 if (!(atarijoysticks[PORTB_JOY0].enabled)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	226 && !(atarijoysticks[PORTB_JOY1].enabled)) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	227 TEST_JOY_ENABLED(envr, "portb-anpad", PORTB_ANPAD);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	228 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	229 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	230 }
305 9c6613983e85 Atari port cleanups from Patrice Sam Lantinga <slouken@libsdl.org> parents: 302 diff changeset	231
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	232 if (!atarijoysticks[IKBD_JOY1].enabled) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	233 if (SDL_AtariXbios_enabled != 0) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	234 TEST_JOY_ENABLED(envr, "xbios-joy1", XBIOS_JOY1);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	235 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	236 }
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	237 #if 0
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	238 /* Parallel port on any Atari, maybe clones */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	239 if ((cookie_mch == MCH_ST << 16) \|\| ((cookie_mch >> 16) == MCH_STE)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	240 \|\| (cookie_mch == MCH_TT << 16)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	241 \|\| (cookie_mch == MCH_F30 << 16)) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	242 TEST_JOY_ENABLED(envr, "para-joy0", PARA_JOY0);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	243 TEST_JOY_ENABLED(envr, "para-joy1", PARA_JOY1);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	244 }
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	245 #endif
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	246 }
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	247
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	248 /* Need to update joypad ports ? */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	249 joypad_ports_enabled = SDL_FALSE;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	250 for (i = PORTA_PAD; i <= PORTB_ANPAD; i++) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	251 if (atarijoysticks[i].enabled) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	252 joypad_ports_enabled = SDL_TRUE;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	253 break;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	254 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	255 }
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	256
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	257 SDL_numjoysticks = 0;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	258 for (i = 0; i < MAX_JOYSTICKS; i++) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	259 if (atarijoysticks[i].enabled) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	260 ++SDL_numjoysticks;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	261 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	262 }
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	263
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	264 return (SDL_numjoysticks);
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	265 }
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	266
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	267 static int
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	268 GetEnabledAtariJoystick(int index)
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	269 {
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	270 int i, j;
305 9c6613983e85 Atari port cleanups from Patrice Sam Lantinga <slouken@libsdl.org> parents: 302 diff changeset	271
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	272 /* Return the nth'index' enabled atari joystick */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	273 j = 0;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	274 for (i = 0; i < MAX_JOYSTICKS; i++) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	275 if (!atarijoysticks[i].enabled) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	276 continue;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	277 }
305 9c6613983e85 Atari port cleanups from Patrice Sam Lantinga <slouken@libsdl.org> parents: 302 diff changeset	278
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	279 if (j == index) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	280 break;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	281 }
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	282
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	283 ++j;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	284 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	285 if (i == MAX_JOYSTICKS)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	286 return -1;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	287
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	288 return i;
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	289 }
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	290
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	291 const char *
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	292 SDL_SYS_JoystickName(int index)
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	293 {
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	294 int numjoystick;
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	295
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	296 numjoystick = GetEnabledAtariJoystick(index);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	297 if (numjoystick == -1)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	298 return NULL;
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	299
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	300 return (atarijoysticks[numjoystick].name);
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	301 }
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	302
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	303 int
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	304 SDL_SYS_JoystickOpen(SDL_Joystick * joystick)
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	305 {
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	306 int numjoystick;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	307
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	308 numjoystick = GetEnabledAtariJoystick(joystick->index);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	309 if (numjoystick == -1)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	310 return -1;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	311
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	312 joystick->naxes = 0;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	313 joystick->nhats = 0;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	314 joystick->nballs = 0;
963 92c247cec42d No need to try to emulate analog axis when SDL support digital hats Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	315
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	316 switch (numjoystick) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	317 case PORTA_PAD:
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	318 case PORTB_PAD:
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	319 joystick->nhats = 1;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	320 joystick->nbuttons = JP_NUM_BUTTONS;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	321 break;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	322 case PORTA_LP:
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	323 case PORTA_ANPAD:
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	324 case PORTB_ANPAD:
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	325 joystick->naxes = 2;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	326 joystick->nbuttons = 2;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	327 break;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	328 default:
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	329 joystick->nhats = 1;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	330 joystick->nbuttons = 1;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	331 break;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	332 }
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	333
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	334 return (0);
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	335 }
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	336
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	337 void
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	338 SDL_SYS_JoystickUpdate(SDL_Joystick * joystick)
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	339 {
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	340 int numjoystick;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	341 Uint8 hatstate;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	342 Uint32 curstate, prevstate;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	343
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	344 numjoystick = GetEnabledAtariJoystick(joystick->index);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	345 if (numjoystick == -1)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	346 return;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	347
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	348 prevstate = atarijoysticks[numjoystick].prevstate;
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	349
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	350 if (joypad_ports_enabled) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	351 Supexec(UpdateJoypads);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	352 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	353
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	354 switch (numjoystick) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	355 case IKBD_JOY1:
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	356 case XBIOS_JOY1:
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	357 {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	358 curstate = 0;
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	359
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	360 if (numjoystick == IKBD_JOY1) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	361 curstate = SDL_AtariIkbd_joystick & 0xff;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	362 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	363 if (numjoystick == XBIOS_JOY1) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	364 curstate = SDL_AtariXbios_joystick & 0xff;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	365 }
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	366
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	367 if (curstate != prevstate) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	368 hatstate = SDL_HAT_CENTERED;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	369 if (curstate & IKBD_JOY_LEFT) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	370 hatstate \|= SDL_HAT_LEFT;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	371 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	372 if (curstate & IKBD_JOY_RIGHT) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	373 hatstate \|= SDL_HAT_RIGHT;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	374 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	375 if (curstate & IKBD_JOY_UP) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	376 hatstate \|= SDL_HAT_UP;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	377 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	378 if (curstate & IKBD_JOY_DOWN) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	379 hatstate \|= SDL_HAT_DOWN;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	380 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	381 SDL_PrivateJoystickHat(joystick, 0, hatstate);
305 9c6613983e85 Atari port cleanups from Patrice Sam Lantinga <slouken@libsdl.org> parents: 302 diff changeset	382
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	383 /* Button */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	384 if ((curstate & IKBD_JOY_FIRE)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	385 && !(prevstate & IKBD_JOY_FIRE)) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	386 SDL_PrivateJoystickButton(joystick, 0, SDL_PRESSED);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	387 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	388 if (!(curstate & IKBD_JOY_FIRE)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	389 && (prevstate & IKBD_JOY_FIRE)) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	390 SDL_PrivateJoystickButton(joystick, 0, SDL_RELEASED);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	391 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	392 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	393 atarijoysticks[numjoystick].prevstate = curstate;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	394 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	395 break;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	396 case PORTA_PAD:
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	397 case PORTB_PAD:
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	398 {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	399 int numjoypad, i;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	400
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	401 numjoypad = 0;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	402 if (numjoystick == PORTB_PAD)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	403 numjoypad = 1;
963 92c247cec42d No need to try to emulate analog axis when SDL support digital hats Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	404
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	405 curstate = jp_joypads[numjoypad];
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	406 if (curstate != prevstate) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	407 hatstate = SDL_HAT_CENTERED;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	408 if (curstate & (1 << JP_LEFT)) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	409 hatstate \|= SDL_HAT_LEFT;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	410 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	411 if (curstate & (1 << JP_RIGHT)) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	412 hatstate \|= SDL_HAT_RIGHT;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	413 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	414 if (curstate & (1 << JP_UP)) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	415 hatstate \|= SDL_HAT_UP;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	416 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	417 if (curstate & (1 << JP_DOWN)) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	418 hatstate \|= SDL_HAT_DOWN;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	419 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	420 SDL_PrivateJoystickHat(joystick, 0, hatstate);
963 92c247cec42d No need to try to emulate analog axis when SDL support digital hats Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	421
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	422 /* Buttons */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	423 for (i = 0; i < JP_NUM_BUTTONS; i++) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	424 int button;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	425
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	426 button = 1 << jp_buttons[i];
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	427
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	428 if ((curstate & button) && !(prevstate & button)) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	429 SDL_PrivateJoystickButton(joystick, i, SDL_PRESSED);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	430 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	431 if (!(curstate & button) && (prevstate & button)) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	432 SDL_PrivateJoystickButton(joystick, i, SDL_RELEASED);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	433 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	434 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	435 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	436 atarijoysticks[numjoystick].prevstate = curstate;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	437 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	438 break;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	439 case PORTA_JOY0:
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	440 case PORTA_JOY1:
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	441 case PORTB_JOY0:
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	442 case PORTB_JOY1:
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	443 {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	444 int fire_shift = 0, dir_shift = 0;
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	445
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	446 if (numjoystick == PORTA_JOY0) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	447 fire_shift = 0;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	448 dir_shift = 0;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	449 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	450 if (numjoystick == PORTA_JOY1) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	451 fire_shift = 1;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	452 dir_shift = 4;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	453 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	454 if (numjoystick == PORTB_JOY0) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	455 fire_shift = 2;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	456 dir_shift = 8;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	457 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	458 if (numjoystick == PORTB_JOY1) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	459 fire_shift = 3;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	460 dir_shift = 12;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	461 }
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	462
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	463 curstate = (jp_directions >> dir_shift) & 15;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	464 curstate \|= ((jp_fires >> fire_shift) & 1) << 4;
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	465
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	466 if (curstate != prevstate) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	467 hatstate = SDL_HAT_CENTERED;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	468 if (curstate & PORT_JS_LEFT) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	469 hatstate \|= SDL_HAT_LEFT;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	470 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	471 if (curstate & PORT_JS_RIGHT) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	472 hatstate \|= SDL_HAT_RIGHT;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	473 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	474 if (curstate & PORT_JS_UP) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	475 hatstate \|= SDL_HAT_UP;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	476 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	477 if (curstate & PORT_JS_DOWN) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	478 hatstate \|= SDL_HAT_DOWN;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	479 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	480 SDL_PrivateJoystickHat(joystick, 0, hatstate);
963 92c247cec42d No need to try to emulate analog axis when SDL support digital hats Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	481
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	482 /* Button */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	483 if ((curstate & PORT_JS_FIRE)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	484 && !(prevstate & PORT_JS_FIRE)) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	485 SDL_PrivateJoystickButton(joystick, 0, SDL_PRESSED);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	486 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	487 if (!(curstate & PORT_JS_FIRE)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	488 && (prevstate & PORT_JS_FIRE)) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	489 SDL_PrivateJoystickButton(joystick, 0, SDL_RELEASED);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	490 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	491 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	492 atarijoysticks[numjoystick].prevstate = curstate;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	493 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	494 break;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	495 case PORTA_LP:
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	496 {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	497 int i;
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	498
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	499 curstate = jp_lightpens[0] >> 1;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	500 curstate \|= (jp_lightpens[1] >> 1) << 15;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	501 curstate \|= (jp_fires & 3) << 30;
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	502
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	503 if (curstate != prevstate) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	504 /* X axis */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	505 SDL_PrivateJoystickAxis(joystick, 0,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	506 jp_lightpens[0] ^ 0x8000);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	507 /* Y axis */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	508 SDL_PrivateJoystickAxis(joystick, 1,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	509 jp_lightpens[1] ^ 0x8000);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	510 /* Buttons */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	511 for (i = 0; i < 2; i++) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	512 int button;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	513
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	514 button = 1 << (30 + i);
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	515
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	516 if ((curstate & button) && !(prevstate & button)) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	517 SDL_PrivateJoystickButton(joystick, i, SDL_PRESSED);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	518 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	519 if (!(curstate & button) && (prevstate & button)) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	520 SDL_PrivateJoystickButton(joystick, i, SDL_RELEASED);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	521 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	522 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	523 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	524 atarijoysticks[numjoystick].prevstate = curstate;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	525 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	526 break;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	527 case PORTA_ANPAD:
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	528 case PORTB_ANPAD:
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	529 {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	530 int numpaddle, i;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	531
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	532 numpaddle = 0 << 1;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	533 if (numjoystick == PORTB_ANPAD)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	534 numpaddle = 1 << 1;
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	535
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	536 curstate = jp_paddles[numpaddle] >> 1;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	537 curstate \|= (jp_paddles[numpaddle + 1] >> 1) << 15;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	538 curstate \|= ((jp_fires >> numpaddle) & 3) << 30;
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	539
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	540 if (curstate != prevstate) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	541 /* X axis */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	542 SDL_PrivateJoystickAxis(joystick, 0,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	543 jp_paddles[numpaddle] ^ 0x8000);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	544 /* Y axis */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	545 SDL_PrivateJoystickAxis(joystick, 1,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	546 jp_paddles[numpaddle + 1] ^ 0x8000);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	547 /* Buttons */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	548 for (i = 0; i < 2; i++) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	549 int button;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	550
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	551 button = 1 << (30 + i);
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	552
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	553 if ((curstate & button) && !(prevstate & button)) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	554 SDL_PrivateJoystickButton(joystick, i, SDL_PRESSED);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	555 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	556 if (!(curstate & button) && (prevstate & button)) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	557 SDL_PrivateJoystickButton(joystick, i, SDL_RELEASED);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	558 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	559 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	560 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	561 atarijoysticks[numjoystick].prevstate = curstate;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	562 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	563 break;
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	564 #if 0
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	565 case PARA_JOY0:
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	566 case PARA_JOY1:
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	567 break;
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	568 #endif
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	569 };
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	570
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	571 return;
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	572 }
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	573
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	574 void
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	575 SDL_SYS_JoystickClose(SDL_Joystick * joystick)
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	576 {
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	577 return;
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	578 }
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	579
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	580 void
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	581 SDL_SYS_JoystickQuit(void)
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	582 {
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	583 SDL_numjoysticks = 0;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	584 return;
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	585 }
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	586
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	587 /--- Joypad I/O read/write interface ---/
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	588
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	589 #define JOYPAD_IO_BASE (0xffff9200)
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	590 struct JOYPAD_IO_S
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	591 {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	592 Uint16 fires;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	593 Uint16 directions;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	594 Uint16 dummy1[6];
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	595 Uint16 paddles[4];
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	596 Uint16 dummy2[4];
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	597 Uint16 lightpens[2];
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	598 };
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	599 #define JOYPAD_IO (((volatile struct JOYPAD_IO_S )JOYPAD_IO_BASE))
8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	600
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	601 static void
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	602 UpdateJoypads(void)
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	603 {
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	604 Uint16 tmp;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	605
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	606 /--- This function is called in supervisor mode ---/
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	607
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	608 /* Update joysticks */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	609 jp_fires = (~(JOYPAD_IO.fires)) & 15;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	610 jp_directions = (~(JOYPAD_IO.directions));
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	611
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	612 /* Update lightpen */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	613 tmp = JOYPAD_IO.lightpens[0] & 1023;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	614 jp_lightpens[0] = (tmp << 6) \| (tmp >> 4);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	615 tmp = JOYPAD_IO.lightpens[1] & 1023;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	616 jp_lightpens[1] = (tmp << 6) \| (tmp >> 4);
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	617
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	618 /* Update paddles */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	619 tmp = (JOYPAD_IO.paddles[0] & 255);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	620 jp_paddles[0] = (tmp << 8) \| tmp;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	621 tmp = (JOYPAD_IO.paddles[1] & 255);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	622 jp_paddles[1] = (tmp << 8) \| tmp;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	623 tmp = (JOYPAD_IO.paddles[2] & 255);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	624 jp_paddles[2] = (tmp << 8) \| tmp;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	625 tmp = (JOYPAD_IO.paddles[3] & 255);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	626 jp_paddles[3] = (tmp << 8) \| tmp;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	627
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	628 /* Update joypad 0 */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	629 JOYPAD_IO.directions = 0xfffe;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	630 jp_joypads[0] = ((~(JOYPAD_IO.fires)) & 3) << (16);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	631 JOYPAD_IO.directions = 0xfffe;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	632 jp_joypads[0] \|= ((~(JOYPAD_IO.directions)) >> 8) & 15;
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	633
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	634 JOYPAD_IO.directions = 0xfffd;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	635 jp_joypads[0] \|= ((~(JOYPAD_IO.fires)) & 3) << (16 + 2);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	636 JOYPAD_IO.directions = 0xfffd;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	637 jp_joypads[0] \|= (((~(JOYPAD_IO.directions)) >> 8) & 15) << 4;
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	638
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	639 JOYPAD_IO.directions = 0xfffb;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	640 jp_joypads[0] \|= ((~(JOYPAD_IO.fires)) & 3) << (16 + 4);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	641 JOYPAD_IO.directions = 0xfffb;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	642 jp_joypads[0] \|= (((~(JOYPAD_IO.directions)) >> 8) & 15) << 8;
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	643
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	644 JOYPAD_IO.directions = 0xfff7;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	645 jp_joypads[0] \|= ((~(JOYPAD_IO.fires)) & 3) << (16 + 6);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	646 JOYPAD_IO.directions = 0xfff7;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	647 jp_joypads[0] \|= (((~(JOYPAD_IO.directions)) >> 8) & 15) << 12;
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	648
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	649 /* Update joypad 1 */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	650 JOYPAD_IO.directions = 0xffef;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	651 jp_joypads[1] = ((~(JOYPAD_IO.fires)) & (3 << 2)) << (16 - 2);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	652 JOYPAD_IO.directions = 0xffef;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	653 jp_joypads[1] \|= ((~(JOYPAD_IO.directions)) >> 12) & 15;
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	654
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	655 JOYPAD_IO.directions = 0xffdf;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	656 jp_joypads[1] \|= ((~(JOYPAD_IO.fires)) & (3 << 2)) << (16);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	657 JOYPAD_IO.directions = 0xffdf;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	658 jp_joypads[1] \|= (((~(JOYPAD_IO.directions)) >> 12) & 15) << 4;
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	659
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	660 JOYPAD_IO.directions = 0xffbf;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	661 jp_joypads[1] \|= ((~(JOYPAD_IO.fires)) & (3 << 2)) << (16 + 2);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	662 JOYPAD_IO.directions = 0xffbf;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	663 jp_joypads[1] \|= (((~(JOYPAD_IO.directions)) >> 12) & 15) << 8;
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	664
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	665 JOYPAD_IO.directions = 0xff7f;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	666 jp_joypads[1] \|= ((~(JOYPAD_IO.fires)) & (3 << 2)) << (16 + 4);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	667 JOYPAD_IO.directions = 0xff7f;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	668 jp_joypads[1] \|= (((~(JOYPAD_IO.directions)) >> 12) & 15) << 12;
302 8a86bdf34f0f Added Atari joystick support (thanks Patrice!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	669 }
1635 92947e3a18db Make sure code is only compiled if the appropriate subsystem is enabled Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	670
92947e3a18db Make sure code is only compiled if the appropriate subsystem is enabled Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	671 #endif /* SDL_JOYSTICK_MINT */
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1635 diff changeset	672 /* vi: set ts=4 sw=4 expandtab: */

Mercurial > sdl-ios-xcode

annotate src/joystick/mint/SDL_sysjoystick.c @ 1956:ba0d62354872