M("")

;

#undef M

static SDLProcs _proc;

{

	if (_proc.SDL_Init != NULL)

		return NULL;

	if (!LoadLibraryList((void**)&_proc, sdl_files))

		return "Unable to load sdl.dll";

	return NULL;

#endif

static char *SdlOpen(uint32 x)

{

#if defined(DYNAMICALLY_LOADED_SDL) && defined(WIN32)

#endif

	if (_sdl_usage++ == 0) {

		if (SDL_CALL SDL_Init(x) == -1)

			return SDL_CALL SDL_GetError();

		if (SDL_CALL SDL_InitSubSystem(x) == -1)

			return SDL_CALL SDL_GetError();

	}

#ifdef UNIX

	signal(SIGABRT, SdlAbort);

	return NULL;

}

static void SdlClose(uint32 x)

{

		SDL_CALL SDL_QuitSubSystem(x);

	if (--_sdl_usage == 0) {

		SDL_CALL SDL_Quit();

#ifdef UNIX

#ifndef __MORPHOS__

		signal(SIGABRT, SIG_DFL);

	}

	_num_dirty_rects++;

}

static SDL_Color pal[256];

	uint i;

	byte *b;

	for(i = start, b = _cur_palette + start * 3; i != end; i++, b += 3) {

		pal[i].r = b[0];

		pal[i].g = b[1];

		pal[i].unused = b[3];

	}

	SDL_CALL SDL_SetColors(_sdl_screen, pal, start, end);

}

	UpdatePalette(0, 256);

}

{

	if(_pal_last_dirty != -1) {

		UpdatePalette(_pal_first_dirty, _pal_last_dirty + 1);

		_pal_last_dirty = -1;

	}

}

{

		_num_dirty_rects = 0;

		if (n > MAX_DIRTY_RECTS)

			SDL_CALL SDL_UpdateRect(_sdl_screen, 0, 0, 0, 0);

			SDL_CALL SDL_UpdateRects(_sdl_screen, n, _dirty_rects);

		}

	}

static int CDECL compare_res(const void *pa, const void *pb)

{

	int x = ((const uint16*)pa)[0] - ((const uint16*)pb)[0];

	return ((const uint16*)pa)[1] - ((const uint16*)pb)[1];

}

static const uint16 default_resolutions[][2] = {

	{640,480},

	{800,600},

	{1024,768},

	{1152,864},

	{1280,960},

	{1280,1024},

	{1400,1050},

};

	int i;

	SDL_Rect **modes;

	modes = SDL_CALL SDL_ListModes(NULL, SDL_SWSURFACE + (_fullscreen ? SDL_FULLSCREEN : 0));

	if(modes == NULL)

		uint newdelta = abs((_resolutions[i][0] - *w) * (_resolutions[i][1] - *h));

		if (newdelta < delta) {

			best = i;

			delta = newdelta;

		}

	}

	*w = _resolutions[best][0];

	*h = _resolutions[best][1];

	return 2;

}

static bool CreateMainSurface(int w, int h)

	GetAvailableVideoMode(&w, &h);

	DEBUG(misc, 0) ("sdl: using mode %dx%d", w, h);

	// DO NOT CHANGE TO HWSURFACE, IT DOES NOT WORK

	if(newscreen == NULL)

		return false;

	_screen.width = newscreen->w;

	_screen.height = newscreen->h;

	_screen.pitch = newscreen->pitch;

	GameSizeChanged();

	return true;

}

	uint16 vk_from;

	byte vk_count;

	byte map_to;

} VkMapping;

#define AS(x,z) {x,0,z}

	AM(SDLK_KP0,SDLK_KP9, WKC_NUM_0, WKC_NUM_9),

	AS(SDLK_KP_DIVIDE,		WKC_NUM_DIV),

	AS(SDLK_KP_MULTIPLY,	WKC_NUM_MUL),

	AS(SDLK_KP_MINUS,			WKC_NUM_MINUS),

	AS(SDLK_KP_PLUS,			WKC_NUM_PLUS),

	AS(SDLK_KP_ENTER,			WKC_NUM_ENTER),

};

static uint32 ConvertSdlKeyIntoMy(SDL_keysym *sym)

{

			break;

		}

	}

	// check scancode for BACKQUOTE key, because we want the key left of "1", not anything else (on non-US keyboards)

#if defined(WIN32)

	if (sym->scancode == 41) key |= WKC_BACKQUOTE;

		if (sym->scancode == 10) key |= WKC_BACKQUOTE;

			if (sym->scancode == 0)  key |= WKC_BACKQUOTE;  // yes, that key is code '0' under MorphOS :)

		#else

			if (sym->scancode == 49) key |= WKC_BACKQUOTE;

		#endif

	// META are the command keys on mac

	if (sym->mod & KMOD_META) key |= WKC_META;

	if (sym->mod & KMOD_SHIFT) key |= WKC_SHIFT;

	if (sym->mod & KMOD_CTRL) key |= WKC_CTRL;

	if (sym->mod & KMOD_ALT) key |= WKC_ALT;

	//printf("scancode character pressed %d\n", sym->scancode);

	//printf("unicode character pressed %d\n", sym->unicode);

	return (key << 16) + sym->unicode;

}

	SDL_Event ev;

	if (!SDL_CALL SDL_PollEvent(&ev))

		return -2;

	switch(ev.type) {

		break;

	case SDL_MOUSEBUTTONDOWN:

		if (_rightclick_emulate && (SDL_CALL SDL_GetModState() & (KMOD_LCTRL | KMOD_RCTRL)))

			ev.button.button = SDL_BUTTON_RIGHT;

			_left_button_down = true;

			_right_button_down = true;

			_right_button_clicked = true;

#if !defined(WIN32)

			_cursor.wheel--;

			_cursor.wheel++;

		}

		break;

	case SDL_MOUSEBUTTONUP:

		if (_rightclick_emulate) {

			_right_button_down = false;

			_left_button_down = false;

			AskExitGame();

		else

			return ML_QUIT;

		break;

	case SDL_KEYDOWN:

			_fullscreen ^= true;

			GetVideoModes();

			CreateMainSurface(_screen.width, _screen.height);

			MarkWholeScreenDirty();

		} else {

			_pressed_key = ConvertSdlKeyIntoMy(&ev.key.keysym);

		}

		break;

	case SDL_VIDEORESIZE: {

			ChangeResInGame(w, h);

			break;

		}

	}

	return -1;

}

static const char *SdlVideoStart(char **parm)

{

    char buf[30];

	SDL_CALL SDL_VideoDriverName(buf, 30);

	DEBUG(misc, 0) ("sdl: using driver '%s'", buf);

	GetVideoModes();

	CreateMainSurface(_cur_resolution[0], _cur_resolution[1]);

	SDL_CALL SDL_EnableKeyRepeat(SDL_DEFAULT_REPEAT_DELAY, SDL_DEFAULT_REPEAT_INTERVAL);

	SDL_CALL SDL_EnableUNICODE(1);

	return NULL;

}

{

	SdlClose(SDL_INIT_VIDEO);

}

{

	int i;

	uint32 mod;

	int numkeys;

	Uint8 *keys;

		InteractiveRandom(); // randomness

		while ((i=PollEvent()) == -1) {}

		if (i>=0) return i;

		if (_exit_game)	return ML_QUIT;

		mod = SDL_CALL SDL_GetModState();

		keys = SDL_CALL SDL_GetKeyState(&numkeys);

#if defined(_DEBUG)

#else

#endif

			if (!_networking) _fast_forward |= 2;

		} else if (_fast_forward&2) {

			_fast_forward = 0;

		}

		cur_ticks=SDL_CALL SDL_GetTicks();

			_ctrl_pressed = !!(mod & (KMOD_LCTRL | KMOD_RCTRL));

			_shift_pressed = !!(mod & (KMOD_LSHIFT | KMOD_RSHIFT));

			_dbg_screen_rect = !!(mod & KMOD_CAPS);

			// determine which directional keys are down

			_dirkeys =

			    (keys[SDLK_DOWN] ? 8 : 0);

			GameLoop();

			_screen.dst_ptr = _sdl_screen->pixels;

			UpdateWindows();

			if (++ pal_tick > 4){

	SdlVideoMainLoop,

	SdlVideoChangeRes,

};

static void CDECL fill_sound_buffer(void *userdata, Uint8 *stream, int len)

{

}

static char *SdlSoundStart(char **parm)

{

	SDL_AudioSpec spec;

	spec.freq = GetDriverParamInt(parm, "hz", 11025);

	spec.format = AUDIO_S16SYS;

	spec.channels = 2;

	spec.samples = 512;

	SDL_CALL SDL_OpenAudio(&spec, &spec);

	SDL_CALL SDL_PauseAudio(0);

	return NULL;

}

{

	SDL_CALL SDL_CloseAudio();

	SdlClose(SDL_INIT_AUDIO);

}

const HalSoundDriver _sdl_sound_driver = {

	SdlSoundStart,

	SdlSoundStop,

};

#include "viewport.h"

void redsq_debug(int tile)

{

	_thd.redsq = tile;

	MarkWholeScreenDirty();

	_screen.dst_ptr = _sdl_screen->pixels;

static void DbgRedraw()

{

	SdlVideoMakeDirty(0,0,_screen.width,_screen.height);

	DrawSurfaceToScreen();

}

#endif // WITH_SDL