Pre April 2014 - Welcome to PGD! Make your first post here....

[comingnine]

Hi everyone, PGD has so wonderful engines and people ! Delphi rules !

[jfbilodeau]

I'm just proving that I'm a human.

[SilverWarior]

I'm just proving that I'm a human.

Helo jfbilodeau!
Welcome to PGD. I hope your stay here would be as pleasant as posible.

Please do some more browsing through the forums so autompromotion system can kick in and unmoderate you so you will be able to freely post around the forums.

[anikoy_test]

Hi,

I'm Nikolay.

[SilverWarior]

Hi,

I'm Nikolay.

Hi Nikolay! Welcome to PGD. I hope your stay here would be as pleasant as posible.
Please do some more browsing through the PGD forums so autopromotion system can kick in and get you unmoderated.

[much.love]

Hello everybody.

I'm not really sure how long such an introduction should be, so I'll make it short. My name is Jack, I'm 22 years old and know pretty much nothing about programming, let alone game development. I did some programming in pascal during high school, which I rather enjoyed, but since everyone else in the class was bored to death by it, our teacher moved on to excel, which means I'm basically starting from square one. I don't have big plans, but game developing seems like a rewarding and relaxing hobby, so I'm going to give it a shot. I started experimenting with SDL and this is what I've come up with so far (feel free to comment!), the movement doesn't work quite yet, though (not really sure why).

program sdltest;

uses
    sdl2, SDL2_image;
const
     SCREEN_WIDTH: integer = 640;
     SCREEN_HEIGHT: integer = 480;
     quit: boolean = false;
var
   win: pSDL_WINDOW;
   ren: pSDL_RENDERER;
   background, sprite: pSDL_TEXTURE;
   e: pSDL_EVENT;
   ret: pSDL_RECT;
   rect: pSDL_RECT;
   thisTime, lastTime: integer;
   dt: single;

begin
     win := SDL_CreateWindow('Hello World', 100, 100, SCREEN_WIDTH, SCREEN_HEIGHT, SDL_WINDOW_SHOWN);
     ren := SDL_CreateRenderer(win, -1, SDL_RENDERER_ACCELERATED or SDL_RENDERER_PRESENTVSYNC);
     background := IMG_LoadTexture(ren, 'background.png');
     sprite := IMG_LoadTexture(ren, 'sprite.png');
     new(ret);
     ret^.x := 0;
     ret^.y := 0;
     ret^.w := 64;
     ret^.h := 64;
     new(rect);
     rect^.x := 100;
     rect^.y := 100;
     rect^.w := 64;
     rect^.h := 64;
     new(e);

     while quit = false do
     begin
          thisTime := SDL_GetTicks;
          dt := (thisTime - lastTime) / 1000;
          lastTime := thisTime;
                   while SDL_POLLEVENT(e) <> 0 do
                   begin
                        if e^.type_ = SDL_MOUSEBUTTONDOWN then
                           quit := TRUE;
                        if e^.type_ = SDL_KEYDOWN then
                           begin
                            case e^.type_ of
                                 SDLK_LEFT: rect^.x := rect^.x - 10;
                                 SDLK_RIGHT: rect^.x := rect^.x + 10;
                                 SDLK_UP: rect^.y := rect^.y - 10;
                                 SDLK_DOWN: rect^.y := rect^.y + 10;
                             end;
                           end;
                   SDL_RenderClear(ren);
                   SDL_RenderCopy(ren, background, nil, nil);
                   SDL_RenderCopy(ren, sprite, ret, rect);
                   SDL_RenderPresent(ren);
                   end;

 end;
     SDL_DestroyTexture(background);
     SDL_DestroyTexture(sprite);
     SDL_DestroyRenderer(ren);
     SDL_DestroyWindow(win);

     IMG_QUIT;
     SDL_QUIT;
end.

That's it. Thanks for your time.

[SilverWarior]

Hello everybody.

I'm not really sure how long such an introduction should be, so I'll make it short. My name is Jack, I'm 22 years old and know pretty much nothing about programming, let alone game development.

Hi Jack!
Welcome to PGD! I hope your stay here would be as pleasent as posible. Please do some more browsing through the forums for autopromotion system to kick in and unmoderate you.

I did some programming in pascal during high school, which I rather enjoyed, but since everyone else in the class was bored to death by it, our teacher moved on to excel, which means I'm basically starting from square one.

I'm Sorry to hear that.
Was rest of the class less bored working with Excer rather than with programming?
Or was you simply unlucky of being in a class full of lazy pepole who werent prepared to learn anything new (most pepole know athleast some basics about Excel)?

[much.love]

Hi Jack!
I'm Sorry to hear that.
Was rest of the class less bored working with Excer rather than with programming?
Or was you simply unlucky of being in a class full of lazy pepole who werent prepared to learn anything new (most pepole know athleast some basics about Excel)?

Haha, they were just as bored with excel. The switch from pascal didn't really help much in that regard, but our teacher stuck with it anyways, because it had a more "immediate applicability".

[SilverWarior]

but our teacher stuck with it anyways, because it had a more "immediate applicability".

Yes that is ture. There is more applicability to use of excel than some programming language. But since most pepole know how to use it it doesn't give you much help in finding job nowadays.
But I also have to admit that excel is quite powerfull and you can do wonder with it. For instance you can create a 3D graphics engine with it. Sorta. Check the link below and be mindblown as I was when I saw the article for the first time
http://www.gamasutra.com/view/featur...ionary_3d_.php

[Wolfen]

Hi guys .
I'm a fan of pascal programming and would like to build a little game I hope in your help.
thanks

W.