Mercurial > sdl-ios-xcode
annotate src/video/ataricommon/SDL_ikbdinterrupt.S @ 1629:ef4a796e7f24
Fixed bug #55
From Christian Walther:
When writing my patch for #12, I ended up doing all sorts of changes to the way
application/window activating/deactivating is handled in the Quartz backend,
resulting in the attached patch. It does make the code a bit cleaner IMHO, but
as it might be regarded as a case of "if it ain't broken, don't fix it" I'd
like to hear other people's opinion about it. Please shout if some change
strikes you as unnecessary or wrong, and I'll explain the reasons behind it. As
far as I tested it, it does not introduce any new bugs, but I may well have
missed some.
- The most fundamental change (that triggered most of the others) is irrelevant
for the usual single-window SDL applications, it only affects the people who
are crazy enough to display other Cocoa windows alongside the SDL window (I'm
actually doing this currently, although the additional window only displays
debugging info and won't be present in the final product): Before, some things
were done on the application becoming active, some on the window becoming key,
and some on the window becoming main. Conceptually, all these actions belong to
the window becoming key, so that's what I implemented. However, since in a
single-window application these three events always happen together, the
previous implementation "ain't broken".
- This slightly changed the meaning of the SDL_APPMOUSEFOCUS flag from
SDL_GetAppState(): Before, it meant "window is main and mouse is inside window
(or mode is fullscreen)". Now, it means "window is key and mouse is inside
window (or mode is fullscreen)". It makes more sense to me that way. (See
http://developer.apple.com/documentation/Cocoa/Conceptual/WinPanel/Concepts/ChangingMainKeyWindow.html
for a discussion of what key and main windows are.) The other two flags are
unchanged: SDL_APPACTIVE = application is not hidden and window is not
minimized, SDL_APPINPUTFOCUS = window is key (or mode is fullscreen).
- As a side effect, the reorganization fixes the following two issues (and
maybe others) (but they could also be fixed in less invasive ways):
* A regression that was introduced in revision 1.42 of SDL_QuartzVideo.m
(http://libsdl.org/cgi/cvsweb.cgi/SDL12/src/video/quartz/SDL_QuartzVideo.m.diff?r1=1.41&r2=1.42)
(from half-desirable to undesirable behavior):
Situation: While in windowed mode, hide the cursor using
SDL_ShowCursor(SDL_DISABLE), move the mouse outside of the window so that the
cursor becomes visible again, and SDL_SetVideoMode() to a fullscreen mode.
What happened before revision 1.42: The cursor is visible, but becomes
invisible as soon as the mouse is moved (half-desirable).
What happens in revision 1.42 and after (including current CVS): The cursor is
visible and stays visible (undesirable).
What happens after my patch: The cursor is invisible from the beginning
(desirable).
* When the cursor is hidden and grabbed, switch away from the application using
cmd-tab (which ungrabs and makes the cursor visible), move the cursor outside
of the SDL window, then cmd-tab back to the application. In 1.2.8 and in the
current CVS, the cursor is re-grabbed, but it stays visible (immovable in the
middle of the window). With my patch, the cursor is correctly re-grabbed and
hidden. (For some reason, it still doesn't work correctly if you switch back to
the application using the dock instead of cmd-tab. I haven't been able to
figure out why. I can step over [NSCursor hide] being called in the debugger,
but it seems to have no effect.)
- The patch includes my patch for #12 (it was easier to obtain using cvs diff
that way). If you apply both of them, you will end up with 6 duplicate lines in
SDL_QuartzEvents.m.
author | Sam Lantinga <slouken@libsdl.org> |
---|---|
date | Thu, 13 Apr 2006 14:17:48 +0000 |
parents | c9b51268668f |
children | 99210400e8b9 |
rev | line source |
---|---|
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
1 /* |
c5010ab8ba35
Added initial support for Atari (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:
1110
diff
changeset
|
3 Copyright (C) 1997-2006 Sam Lantinga |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
4 |
c5010ab8ba35
Added initial support for Atari (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:
1110
diff
changeset
|
6 modify it under the terms of the GNU Lesser General Public |
281
c5010ab8ba35
Added initial support for Atari (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:
1110
diff
changeset
|
8 version 2.1 of the License, or (at your option) any later version. |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
9 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
10 This library is distributed in the hope that it will be useful, |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
11 but WITHOUT ANY WARRANTY; without even the implied warranty of |
c5010ab8ba35
Added initial support for Atari (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:
1110
diff
changeset
|
13 Lesser General Public License for more details. |
281
c5010ab8ba35
Added initial support for Atari (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:
1110
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:
1110
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:
1110
diff
changeset
|
17 Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
18 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
19 Sam Lantinga |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
20 slouken@libsdl.org |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
21 */ |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
22 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
23 /* |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
24 * IKBD 6301 interrupt routine |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
25 * |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
26 * Patrice Mandin |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
27 */ |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
28 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
29 .text |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
30 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
31 .globl _SDL_AtariIkbdInstall |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
32 .globl _SDL_AtariIkbdUninstall |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
33 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
34 .globl _SDL_AtariIkbd_keyboard |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
35 .globl _SDL_AtariIkbd_mouseb |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
36 .globl _SDL_AtariIkbd_mousex |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
37 .globl _SDL_AtariIkbd_mousey |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
38 .globl _SDL_AtariIkbd_joystick |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
39 |
305
9c6613983e85
Atari port cleanups from Patrice
Sam Lantinga <slouken@libsdl.org>
parents:
297
diff
changeset
|
40 .globl _SDL_AtariIkbd_enabled |
9c6613983e85
Atari port cleanups from Patrice
Sam Lantinga <slouken@libsdl.org>
parents:
297
diff
changeset
|
41 |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
42 /*--- Install our IKBD vector ---*/ |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
43 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
44 _SDL_AtariIkbdInstall: |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
45 moveml d0-d1/a0-a1,sp@- |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
46 |
1082
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
47 | Disable interrupts |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
48 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
49 movew #0x2700,sr |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
50 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
51 | Save MFP registers used for keyboard |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
52 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
53 lea 0xfffffa00:w,a0 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
54 btst #6,a0@(0x09) |
1082
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
55 sne ikbd_ierb |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
56 btst #6,a0@(0x15) |
1082
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
57 sne ikbd_imrb |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
58 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
59 | Set our routine |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
60 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
61 movel 0x118:w,old_ikbd |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
62 movel #ikbd,0x118:w |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
63 bset #6,0xfffffa09:w | IERB |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
64 bset #6,0xfffffa15:w | IMRB |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
65 |
1082
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
66 | Set mouse relative mode |
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
67 |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
68 moveb #8,0xfffffc02:w |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
69 |
1082
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
70 | Reenable interrupts |
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
71 |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
72 movew #0x2300,sr |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
73 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
74 | Interrupts done |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
75 |
305
9c6613983e85
Atari port cleanups from Patrice
Sam Lantinga <slouken@libsdl.org>
parents:
297
diff
changeset
|
76 movew #0xffff,_SDL_AtariIkbd_enabled |
9c6613983e85
Atari port cleanups from Patrice
Sam Lantinga <slouken@libsdl.org>
parents:
297
diff
changeset
|
77 |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
78 moveml sp@+,d0-d1/a0-a1 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
79 rts |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
80 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
81 /*--- Uninstall our IKBD vector ---*/ |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
82 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
83 _SDL_AtariIkbdUninstall: |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
84 movel a0,sp@- |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
85 |
1082
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
86 | Disable interrupts |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
87 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
88 movew #0x2700,sr |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
89 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
90 | Restore previous MFP registers |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
91 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
92 lea 0xfffffa00:w,a0 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
93 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
94 bclr #6,a0@(0x09) |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
95 tstb ikbd_ierb |
1082
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
96 beqs ikbd_restoreierb |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
97 bset #6,a0@(0x09) |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
98 ikbd_restoreierb: |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
99 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
100 bclr #6,a0@(0x15) |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
101 tstb ikbd_imrb |
1082
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
102 beqs ikbd_restoreimrb |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
103 bset #6,a0@(0x15) |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
104 ikbd_restoreimrb: |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
105 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
106 movel old_ikbd,0x118:w |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
107 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
108 | Clear keyboard buffer |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
109 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
110 lea 0xfffffc00:w,a0 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
111 ikbd_videbuffer: |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
112 btst #0,a0@ |
1082
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
113 beqs ikbd_finbuffer |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
114 tstb a0@(0x02) |
1082
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
115 bras ikbd_videbuffer |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
116 ikbd_finbuffer: |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
117 |
1082
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
118 | Reenable interrupts |
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
119 |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
120 movew #0x2300,sr |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
121 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
122 movel sp@+,a0 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
123 rts |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
124 |
1081
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
125 .bss |
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
126 |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
127 .even |
1081
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
128 .comm ikbd_ierb,1 |
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
129 .comm ikbd_imrb,1 |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
130 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
131 /*--- Our custom IKBD vector ---*/ |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
132 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
133 .text |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
134 .even |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
135 .ascii "XBRA" |
287
e4bd0cf95506
From: Patrice Mandin <pmandin@caramail.com>
Sam Lantinga <slouken@libsdl.org>
parents:
281
diff
changeset
|
136 .ascii "LSDL" |
e4bd0cf95506
From: Patrice Mandin <pmandin@caramail.com>
Sam Lantinga <slouken@libsdl.org>
parents:
281
diff
changeset
|
137 .comm old_ikbd,4*1 |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
138 ikbd: |
1081
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
139 | Check if source is IKBD or MIDI |
1110
b6fdf299a2f3
Revert back to 1.6 revision
Patrice Mandin <patmandin@gmail.com>
parents:
1109
diff
changeset
|
140 btst #0,0xfffffc00.w |
b6fdf299a2f3
Revert back to 1.6 revision
Patrice Mandin <patmandin@gmail.com>
parents:
1109
diff
changeset
|
141 beqs ikbd_oldmidi |
1081
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
142 |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
143 moveml d0-d1/a0,sp@- |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
144 moveb 0xfffffc02:w,d0 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
145 |
1081
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
146 | Joystick packet ? |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
147 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
148 cmpb #0xff,d0 |
1081
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
149 beqs ikbd_yes_joystick |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
150 |
1081
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
151 | Mouse packet ? |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
152 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
153 cmpb #0xf8,d0 |
1081
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
154 bmis ikbd_no_mouse |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
155 cmpb #0xfc,d0 |
1081
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
156 bpls ikbd_no_mouse |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
157 |
1082
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
158 | Mouse packet, byte #1 |
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
159 |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
160 ikbd_yes_mouse: |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
161 andw #3,d0 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
162 movew d0,_SDL_AtariIkbd_mouseb |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
163 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
164 movel #ikbd_mousex,0x118:w |
1081
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
165 bras ikbd_endit_stack |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
166 |
1082
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
167 | Joystick packet, byte #1 |
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
168 |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
169 ikbd_yes_joystick: |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
170 movel #ikbd_joystick,0x118:w |
1081
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
171 bras ikbd_endit_stack |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
172 |
1082
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
173 | Keyboard press/release |
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
174 |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
175 ikbd_no_mouse: |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
176 moveb d0,d1 |
1082
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
177 lea _SDL_AtariIkbd_keyboard,a0 |
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
178 andw #0x7f,d1 |
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
179 tas d0 |
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
180 spl a0@(0,d1:w) |
1081
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
181 |
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
182 | End of interrupt |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
183 |
1081
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
184 ikbd_endit_stack: |
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
185 moveml sp@+,d0-d1/a0 |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
186 ikbd_endit: |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
187 bclr #6,0xfffffa11:w |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
188 rte |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
189 |
1081
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
190 | Call old MIDI interrupt |
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
191 |
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
192 ikbd_oldmidi: |
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
193 movel old_ikbd,sp@- |
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
194 rts |
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
195 |
1082
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
196 | Mouse packet, byte #2 |
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
197 |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
198 ikbd_mousex: |
1082
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
199 |
1081
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
200 | Check if source is IKBD or MIDI |
1110
b6fdf299a2f3
Revert back to 1.6 revision
Patrice Mandin <patmandin@gmail.com>
parents:
1109
diff
changeset
|
201 btst #0,0xfffffc00.w |
b6fdf299a2f3
Revert back to 1.6 revision
Patrice Mandin <patmandin@gmail.com>
parents:
1109
diff
changeset
|
202 beqs ikbd_oldmidi |
1081
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
203 |
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
204 movew d0,sp@- |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
205 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
206 moveb 0xfffffc02:w,d0 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
207 extw d0 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
208 addw d0,_SDL_AtariIkbd_mousex |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
209 |
1081
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
210 movew sp@+,d0 |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
211 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
212 movel #ikbd_mousey,0x118:w |
1081
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
213 bras ikbd_endit |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
214 |
1082
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
215 | Mouse packet, byte #3 |
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
216 |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
217 ikbd_mousey: |
1082
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
218 |
1081
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
219 | Check if source is IKBD or MIDI |
1110
b6fdf299a2f3
Revert back to 1.6 revision
Patrice Mandin <patmandin@gmail.com>
parents:
1109
diff
changeset
|
220 btst #0,0xfffffc00.w |
b6fdf299a2f3
Revert back to 1.6 revision
Patrice Mandin <patmandin@gmail.com>
parents:
1109
diff
changeset
|
221 beqs ikbd_oldmidi |
1081
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
222 |
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
223 movew d0,sp@- |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
224 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
225 moveb 0xfffffc02:w,d0 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
226 extw d0 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
227 addw d0,_SDL_AtariIkbd_mousey |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
228 |
1081
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
229 movew sp@+,d0 |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
230 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
231 movel #ikbd,0x118:w |
1081
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
232 bras ikbd_endit |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
233 |
1082
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
234 | Joystick packet, byte #2 |
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
235 |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
236 ikbd_joystick: |
1082
48436ffdf677
Avoid generating multiple key press/release messages for the same key
Patrice Mandin <patmandin@gmail.com>
parents:
1081
diff
changeset
|
237 |
1081
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
238 | Check if source is IKBD or MIDI |
1110
b6fdf299a2f3
Revert back to 1.6 revision
Patrice Mandin <patmandin@gmail.com>
parents:
1109
diff
changeset
|
239 btst #0,0xfffffc00.w |
b6fdf299a2f3
Revert back to 1.6 revision
Patrice Mandin <patmandin@gmail.com>
parents:
1109
diff
changeset
|
240 beqs ikbd_oldmidi |
1081
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
241 |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
242 moveb 0xfffffc02:w,_SDL_AtariIkbd_joystick+1 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
243 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
244 movel #ikbd,0x118:w |
1081
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
245 bras ikbd_endit |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
246 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
247 .data |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
248 |
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
249 .even |
305
9c6613983e85
Atari port cleanups from Patrice
Sam Lantinga <slouken@libsdl.org>
parents:
297
diff
changeset
|
250 _SDL_AtariIkbd_enabled: |
9c6613983e85
Atari port cleanups from Patrice
Sam Lantinga <slouken@libsdl.org>
parents:
297
diff
changeset
|
251 .word 0 |
1081
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
252 |
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
253 .bss |
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
254 |
305
9c6613983e85
Atari port cleanups from Patrice
Sam Lantinga <slouken@libsdl.org>
parents:
297
diff
changeset
|
255 .even |
281
c5010ab8ba35
Added initial support for Atari (thanks Patrice!)
Sam Lantinga <slouken@libsdl.org>
parents:
diff
changeset
|
256 .comm _SDL_AtariIkbd_keyboard,128 |
1081
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
257 .comm _SDL_AtariIkbd_mousex,2 |
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
258 .comm _SDL_AtariIkbd_mousey,2 |
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
259 .comm _SDL_AtariIkbd_mouseb,2 |
369dcdb52d70
Call old interrupt when receiving MIDI stuff
Patrice Mandin <patmandin@gmail.com>
parents:
305
diff
changeset
|
260 .comm _SDL_AtariIkbd_joystick,2 |