hedgewars/SDLh.pas
changeset 2567 02ff5f9510b5
parent 2525 e6cdc0251cd1
child 2575 d06e0e829828
--- a/hedgewars/SDLh.pas	Tue Oct 20 11:49:10 2009 +0000
+++ b/hedgewars/SDLh.pas	Tue Oct 20 17:55:11 2009 +0000
@@ -126,6 +126,20 @@
 {$ENDIF}
 {*end sdl_event binding*}
 
+{$IFDEF SDL13}
+{*#define SDL_BUTTON(X)		(1 << ((X)-1))
+#define SDL_BUTTON_LEFT		1
+#define SDL_BUTTON_MIDDLE	2
+#define SDL_BUTTON_RIGHT	3
+#define SDL_BUTTON_X1		4
+#define SDL_BUTTON_X2		5
+#define SDL_BUTTON_LMASK	SDL_BUTTON(SDL_BUTTON_LEFT)
+#define SDL_BUTTON_MMASK	SDL_BUTTON(SDL_BUTTON_MIDDLE)
+#define SDL_BUTTON_RMASK	SDL_BUTTON(SDL_BUTTON_RIGHT)
+#define SDL_BUTTON_X1MASK	SDL_BUTTON(SDL_BUTTON_X1)
+#define SDL_BUTTON_X2MASK	SDL_BUTTON(SDL_BUTTON_X2)*}
+{$ENDIF}
+
 	RMask = $000000FF;
 	GMask = $0000FF00;
 	BMask = $00FF0000;