New FPC/JEDI-SDL tutorials

[WILL]

Hey just wondering if anyone has seen this site yet. If not then here ya go: http://userpage.fu-berlin.de/~molski/fpsdl/

Have at 'em. It looks like he has recently (just last month) started converting all his tutorials for JEDI-SDL. For those that were looking for these before, have fun.

[Reiter]

The independend address is http://www.fp.sdl.de.vu though.

[IchimaruGin]

is there anybody that would be willing to convert this tut to normal object pascal since it looks like FPC uses some diff SDL functions and actions im using delphi 2007 and couldnt get any of the code working propally

statements like

USES crt

if screen=nil then HALT; <-- wtf is HALT :s

and CLRSCR;

[arthurprs]

is there anybody that would be willing to convert this tut to normal object pascal since it looks like FPC uses some diff SDL functions and actions im using delphi 2007 and couldnt get any of the code working propally

statements like

USES crt

if screen=nil then HALT; <-- wtf is HALT :s

and CLRSCR;

crt is a unit with more functions to work with the console window {not sure}

Halt is a function that tells the program to shutdown completely like the "return 0" on C++ main function;

CLRSCR is a function that clears the console window

[IchimaruGin]

is there anybody that would be willing to convert this tut to normal object pascal since it looks like FPC uses some diff SDL functions and actions im using delphi 2007 and couldnt get any of the code working propally

statements like

USES crt

if screen=nil then HALT; <-- wtf is HALT :s

and CLRSCR;

crt is a unit with more functions to work with the console window {not sure}

Halt is a function that tells the program to shutdown completely like the "return 0" on C++ main function;

CLRSCR is a function that clears the console window

well these are the functions/actions i get errors with when following the tutorial in this thread i was thinking it might be something to do with FPC compiling maybe but im not sure does anyone not know how to fix the code?

[arthurprs]

is there anybody that would be willing to convert this tut to normal object pascal since it looks like FPC uses some diff SDL functions and actions im using delphi 2007 and couldnt get any of the code working propally

statements like

USES crt

if screen=nil then HALT; <-- wtf is HALT :s

and CLRSCR;

crt is a unit with more functions to work with the console window {not sure}

Halt is a function that tells the program to shutdown completely like the "return 0" on C++ main function;

CLRSCR is a function that clears the console window

well these are the functions/actions i get errors with when following the tutorial in this thread i was thinking it might be something to do with FPC compiling maybe but im not sure does anyone not know how to fix the code?

What errors ?

[IchimaruGin]

follow the tutorial on the pages they do not compile i dont know why

[arthurprs]

Post the error, i can't help if i don't know what is going on...

[edexter]

I found some syntax errors in your text example (last code block). I also noticed when I tried to compile it with free pascal that it did compile as a much smaller file than yours (29k vs 134 or something) and it seemed to get stuck when It tried to do something with the true type font but when I used yours it seemed to work fine. I would like to convert the library I have released http://dexrow.blogspot.com/2007/10/w...-extended.html this is what I have come up with..

PROGRAM chap5;
USES SDL, SDL_TTF;

VAR
screen,fontface:pSDL_SURFACE;
loaded_font:pointer;
colour_font, colour_font2:pSDL_COLOR;

BEGIN
SDL_INIT(SDL_INIT_VIDEO);
screen:=SDL_SETVIDEOMODE(400,200,32,SDL_SWSURFACE);
IF screen=NIL THEN HALT;

if TTF_INIT=-1 THEN HALT;
loaded_font:=TTF_OPENFONT('C:\WINDOWS\fonts\Ariel.ttf',40);

NEW(colour_font);
NEW(colour_font2);
colour_font^.r:=255; colour_font^.g:=0; colour_font^.b:=0;
colour_font2^.r:=255; colour_font2^.g:=0; colour_font2^.b:=0;

fontface:=TTF_RENDERTEXT_SHADED(loaded_font,'HELLO WORLD!',colour_font^, colour_font2^);

SDL_BLITSURFACE(fontface,NIL,screen,NIL);
SDL_FLIP(screen);

readln;
DISPOSE(colour_font);
DISPOSE(colour_font2);
SDL_FREESURFACE(screen);
SDL_FREESURFACE(fontface);
TTF_CLOSEFONT(loaded_font);
TTF_QUIT;
SDL_QUIT;
END.

[arthurprs]

I found some syntax errors in your text example (last code block). I also noticed when I tried to compile it with free pascal that it did compile as a much smaller file than yours (29k vs 134 or something) and it seemed to get stuck when It tried to do something with the true type font but when I used yours it seemed to work fine. I would like to convert the library I have released http://dexrow.blogspot.com/2007/10/w...-extended.html this is what I have come up with..

..

try "arial.ttf" instead of "ariel.ttf"