Help SDL behaves strangely...

[asdfarkangel]

Oh I forgot. To make this clear and precede any further questions about this.WILL so you are saying my program in the end should look something like this:

Program torpedo;
uses sdl;
{-type definitions
-variable definitions
-input procedure with local mouse coordinate variables
-other game procedures such as drawing the boards and other sprites, playing the sounds
-calculating the shots etc...}
BEGIN
//-graphics, sound and other initialization.
While loopconditions=true do
begin
{-input procedure
 -other procedures, including looping music, refreshing graphics and gameplay status}
if somecondition then loopconditions:=false;
end;
{-freeing current sdl surfaces except for screen
-drawing victory/lose screen
-waiting for keypress for example
-shutting down SDL}
end.