ckeck out my cool game

[rollerdude]

i have to send this in to parts because it's so big after this, look for "missle game 2"

code...
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% MISSILE.T %
% %
% %
% This is a simple video game featuring an ever increasing %
% number of missiles tha must be avoided. The seeking %
% algorithm of the missiles is rather simplistic and is open %
% to modification and refinement by anyone. Suggested changes %
% are having the missiles trail disappear, different launching %
% times for each missile and having missiles last different %
% amounts of time. %
% %
% All of the constants defined at the top of the program can %
% be changed in order to experiment with different environments %
% and factors. Feel free to tinker, doctor and change this %
% program to your hearts content. That's what it's here for! %
% %
% %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% Constants %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
const groundColour := 1
const missileColour1 := 2
const missileColour2 := 1
const explosionColour := 2
const playerColour := 3
const playerSpeed := 4
const turnDelay := 100
const outOfPlay := - 1
const maxMissiles := 20

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% Global Variables %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
var numMissiles : int := 1 % the number of missiles in play
var evadedMissiles : int := 0 % total number of missiles evaded
var tx : int := maxx div 2 % the x position of the player in pixels
var ty : int := maxy div 2 % the y position of the player in pixels
var turns, prevTime, timer, dist : int

/**************************************************************
* This procedure gives the instructions for the game. *
**************************************************************/
procedure Instructions
setscreen ("text,screen,noecho,nocursor")
locate (1, 30)
put "MISSILE"
put skip
color (2)
put "You are a pilot over Zornastria. Unfortunately, the missile"
put "defence system has been activated and is now turned against"
put "you! Even worse, the missiles are heat seeking missiles and"
put "head straight for you. Luckily if you manuever carefully,"
put "you can dodge them until they run out of fuel."
put skip
put "To pilot your airplane, use the arrow keys. THe missiles start"
put "out coloured " ..
colour (13)
put "purple" ..
colour (2)
put " and turn " ..
colour (11)
put "blue" ..
colour (2)
put " when they run out of fuel. You"
put "must attempt to survive as long as you can. After surviving each"
put "wave, the next wave will be launched."
put skip
put "Good Luck! You'll need it."
put skip
put "Hit any key to start the game..."

var ch : string (1)
getch (ch)

setscreen ("graphics,noecho")
end Instructions

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% This procedure draws the player. %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
procedure DrawPlayer (clr : int)
drawline (tx - 1, ty - 1, tx + 1, ty - 1, clr)
drawline (tx - 1, ty, tx + 1, ty, clr)
drawline (tx - 1, ty + 1, tx + 1, ty + 1, clr)
end DrawPlayer

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% This procedure handles any key strokes by reading any char %
% from the keyboard and moving the player in response to it. %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
procedure ControlPlayer
% Blank out the old player by drawing it in colour 0 (black)
DrawPlayer (0)

% Read in a character
var c : string (1)
getch (c)

case ord (c (1)) of
% The 7 key (on the numeric keypad)
label 199 :
tx -= playerSpeed
ty += playerSpeed

% The 8 key (on the numeric keypad)
label 200 :
ty += playerSpeed

% The 9 key (on the numeric keypad)
label 201 :
tx += playerSpeed
ty += playerSpeed

% The 4 key (on the numeric keypad)
label 203 :
tx -= playerSpeed




have fun....

[Delos]

Please post this as an attachment.
There is no reason whatsoever for you to post 2 seperate threads, not even posts, to show all your code.
And even if you were to use raw code, you should have at least used the [code] tags.

[gohan]

FIRST OF ALL!!!!
THIS GAME WAS NOT CREATED BY YOU!!!
IT WAS DONE BY 2 PROGRAMMERS THAT PUT THAT INTO TURING FOR OTHERS TO ENJOY!!! NOT FOR PPL TO TAKE CREDIT FOR WHAT THE PROGRAMMERS DID!!!!

THE ONLY THING YOU CHANGED ON IT WAS USING THE ARROW KEYS AND NOT THE MOUSE....

To all the Mods out there...i am truely sry for the caps, its just that i wanted to credit the two that did the program!!
Again, I am sry...I'll update on who the two programmers are in a little bit..i'm still site seeing..lol

[rollerdude]

first of all, i did not change the program, second, it's not your place to put me in my place,

however, seeing as it is,

my story

i found a floppy disk in a school computer, i decided to see what's on it in order to get a better idea who's it was, after coming across this game, i made a copy and than put the floppy in the lost-&-found


i did not change it in any way, i just thought other might enjoy it as much as i had



ps. i would have loaded it as a whole, but the internet kept timeing out on me





so, for future reference, gohan, i'll ask the MOD-wannabe's like you before posting another program.

thanx for making my day

[Bacchus]

Yes, but in the topic it says 'ckeck out my cool game'. So in that way it can be taken that you are claiming this as your own. I'm not sure if you meant it as this, but that is one way it can be interpreted.

[gohan]

I found out who the programmers are; there is 3 and not 2.

There names are Tom West, Stephen Perelgut and Ric Holt.

Ok, maybe you didn't change the game,(supposibly) but the original game, you have to use the mouse...

and I wouldn't wanna be a MOD, because that's a really responsible job, and i'm not on this site as much as the MODs are!!

and glad to help on making your day....plzzed to help!!!

Should I load the orignal one on here????........Anyone!!!

[FeZbOy]

SO what I am getting is, you found a disk in the computer, and instead of being a responsible person and return the disk, you sneak a peek and decide to steal the contents. Then you post the file on this site and claim it to be yours, then change your story. The game was made, however, to be changed.

Quote:

Feel free to tinker, doctor and change this program to your hearts content. That's what it's here for!

That is what the programmers said, so no one is at fault. But the game was changed by someone else and you decide to steal. Good Job.

[Jorbalax]

Here is the original game and two other games that Tom West, Stephen Perelgut and Ric Holt created.

[[Gandalf]]

gohan wrote:

and I wouldn't wanna be a MOD, because that's a really responsible job, and i'm not on this site as much as the MODs are!!

I am .

Do you realize who those three 'people' are? They are the leaders (manner of speaking) or Turing - the creators and professors. And by the way, these posts are pointless, because these are not your games, they are free to be edited, and are included with Turing.

Personally, I don't think there is a point to continuing this conversation since it seems it could turn into flaming sometime soon.

[FeZbOy]

[Gandalf] wrote:

Personally, I don't think there is a point to continuing this conversation since it seems it could turn into flaming sometime soon.

Good Point!