--- a/hedgewars/CCHandlers.inc	Tue Jan 26 04:13:37 2010 +0000
+++ b/hedgewars/CCHandlers.inc	Tue Jan 26 21:55:51 2010 +0000
@@ -598,6 +598,9 @@
 {$IFDEF DEBUGFILE}
     buf: array[byte] of char;
 {$ENDIF}
+{$IFDEF SDL13}
+    window: PSDL_Window;
+{$ENDIF}
 begin
 	if Length(s) = 0 then cFullScreen:= not cFullScreen
 	else cFullScreen:= s = '1';
@@ -607,10 +610,6 @@
 {$ENDIF}
 
 	flags:= SDL_OPENGL;// or SDL_RESIZABLE;
-{$IFDEF IPHONEOS}
-	// remove the topbar from the iPhone
-	flags:= flags or SDL_NOFRAME;
-{$ENDIF}
 
 	if cFullScreen then
 	begin
@@ -628,9 +627,21 @@
 		SDL_FreeSurface(SDLPrimSurface);
 	end;
 	
+{$IFDEF SDL13}
+	window:= SDL_CreateWindow('Hedgewars', 0, 0, cScreenWidth, cScreenHeight,
+		SDL_WINDOW_OPENGL or SDL_WINDOW_SHOWN 	 
+	        {$IFDEF IPHONEOS} or SDL_WINDOW_BORDERLESS{$ENDIF}); 	 
+	SDL_CreateRenderer(window, -1, 0); 	 
+	PixelFormat:= nil; 	 
+	  	 
+	SDL_SetRenderDrawColor(0, 0, 0, 255); 	 
+	SDL_RenderFill(nil); 	 
+	SDL_RenderPresent();
+{$ELSE}
 	SDLPrimSurface:= SDL_SetVideoMode(cScreenWidth, cScreenHeight, cBits, flags);
 	SDLTry(SDLPrimSurface <> nil, true);
 	PixelFormat:= SDLPrimSurface^.format;
+{$ENDIF}
 
 {$IFDEF DEBUGFILE}
 	AddFileLog('Setting up OpenGL...');