AHHH!

#1programma

the thing i hate bout makin' games is tryin to find the right coordinates for all of the objects. this is needed because my lame computer science teacher is makin' us make games in pascal without using bgi graphics. i have an all right game but he siad it would not count because i only used ascii characters. if ne1 wants to help me cheat e-mail me the file at kc489@hotmail.com


casey

Haroldo_o_p

: the thing i hate bout makin' games is tryin to find the right coordinates for all of the objects. this is needed because my lame computer science teacher is makin' us make games in pascal without using bgi graphics. i have an all right game but he siad it would not count because i only used ascii characters. if ne1 wants to help me cheat e-mail me the file at kc489@hotmail.com
:

Sorry, but I don't understand what exactly you want. You're asking for help on making graphics without using BGI, or on collision detection?

Well, if what you want is making graphics without using BGI, here's a piece of code:

procedure InitGraph13h; {Initializes VGA 320x200 mode}
begin
asm
mov ax, 13h
int 10h
end;
end;

procedure CloseGraph13h; {Returns to text mode}
begin
asm
mov ax, 03h
int 10h
end;
end;

procedure PutPixel13h(X,Y:integer;Color:byte); {Puts a pixel on screen}
begin
Mem[$A000:(Y*320)+X]:=Color;
end;

if what you want is collision detection, here's a piece of code:

function Crashed(X1,Y1,W1,H1:integer; {X,Y,Width,Height of Obj1}
X2,Y2,W2,H2:integer; {Same, for Obj2} ):boolean;
begin
Chrashed:=(X1 => (X2-W1)) and (X1 <= (X2+W2)) and
(Y1 => (Y2-H1)) and (Y1 <= (Y2+H2));
end;

#1programma

well that's not exactly what i wanted i actually wanted a whole program but that will help some.
thanks neway

kc

Scarecrow

: well that's not exactly what i wanted i actually wanted a whole program but that will help some.
: thanks neway
:
: kc
:
:

I don't think you should even try to get your homework done by anyone else because it only get's you to look like a lamer, and you'll probably get flamed in the future. This is not an insult, it's an advice. I don't think you are a lamer and I'm not flaming you!