Turing Tower Defense

[fishtastic]

This is a remake of Desktop Tower Defense in Turing
Insturctions are at the top of the code.

featuring :

3 Difficulties
4 different towers
5 levels of upgrade
6 different enemy types
up to 75 waves
blood effect
and many more

All comments are welcome.

I have spent too many hour making this that I dont feel like working on this anymore.
If you want to see a cleaner version of my code please PM me.

If will try to update if there is a major bug/imbalance.

[LaZ3R]

It's neat but why on earth is all the code on a single line... I hope to god that's not how you program heh...

Game is fun, goodjob on the blocking detection and placement of towers along with tracking of enemies and such.

Fun

[DanielG]

Great game, good job fishtastic

[michaelp]

Very good game. I'm playing it now.
And I hope you don't put all code on a single line either.

edit: Final score of 1970. Lost on the last level.

[fishtastic]

LaZ3R @ Fri Feb 29, 2008 9:51 pm wrote:

It's neat but why on earth is all the code on a single line... I hope to god that's not how you program heh...

i made another program that reads all the codes and put it to another file in one line along with the instructions.

BTW, had any one found a bug yet? There was a horrible bug in my path finding.
IF you find any problem or imbalance please post here.

Also, the hard mode was added because my friend told me there were too little levels, but i don't think hard move can be easily beaten.

thanks for all the nice comments so far

[MichaelM]

Great Game! If you put it in turing and press control i it doesn't have enough memory to indent it haha

[BigBear]

I would like to see program to convert code into one unreadable line.

[fishtastic]

BigBear @ Mon Mar 03, 2008 5:07 pm wrote:

I would like to see program to convert code into one unreadable line.

here you go

you can use this to shorten any of your code into one line(may not always work for some comments), i just love visuals

Turing:

var IN, OUT : int var line := 0 var name : string put "file name w/ .t" get name : * open : IN, name, get open : OUT, "output.t", put var wtf : array 1 .. 100000 of string var total := 1 wtf (1) := "" proc drawP (p : real)     drawfillbox (maxx div 2 - 200, maxy div 2 - 10, maxx div 2 + 200, maxy div 2 + 10, red)     drawfillbox (maxx div 2 - 200 + (ceil (p * 400)), maxy div 2 - 10, maxx div 2 + 200, maxy div 2 + 10, cyan)     drawbox (maxx div 2 - 200, maxy div 2 - 10, maxx div 2 + 200, maxy div 2 + 10, black) end drawP View.Set ("offscreenonly") loop     line += 1     if line mod 29 = 0 then        cls     put "reading: "         put line        View.Update     end if     exit when eof (IN)     var s : string     get : IN, s : *     for i : 1 .. length (s)        if s (i) = '%' and i > 1 and (s (i - 1) not= '\'' and s (i - 1) not= '\"') then             exit        else        wtf (total) += s (i)        end if     end for     wtf (total) += " "     if length (wtf (total)) > 50 then         total += 1      wtf (total) := ""     end if end loop for i : 1 .. total     put : OUT, wtf (i) ..     cls     put "Putting "     locate (12, 40)     put i, "/", total     drawP (i / total)     locate (15, 40)     put (i / total) * 100 : 2 : 2, "%"     View.Update end for

if you find any problem in my game please report here.

[Sur_real]

Nice game fishtastic, beat the last level with score of 2872 (on easy though) : )


PS: Just started laughing when I saw the variable wtf.

[darkangel]

I shortened your suppress to one line program fishtastic
no need for big bulky array. (Although I did laugh when i saw it)

code:

var line : string var IN, OUT : int var nameIN, nameOUT : string put "name of input with extension" get nameIN put "name of output with extension" get nameOUT open : IN, nameIN, get open : OUT, nameOUT, put loop     exit when eof (IN)     get : IN, line : *     put : OUT, line," " .. end loop

No visual thou, i would have put it in but for it to work my program would have to look through the entire file first which wouldn't be too efficient.

[fishtastic]

Sur_real @ Tue Mar 04, 2008 4:43 pm wrote:

Nice game fishtastic, beat the last level with score of 2872 (on easy though) : )


PS: Just started laughing when I saw the variable wtf.

When i cant think of a good variable name, i just use something really stupid.(var wtf:array 1..maxint of string / var omg:int)

not a bad score.
I almost beat hard mode in school during lunch hour.
school rule allow you to play your own game.

I might try to re balance just to make sure hard mode is beatable.

darkangel @ Wed Mar 05, 2008 6:11 pm wrote:

I shortened your suppress to one line program fishtastic
no need for big bulky array. (Although I did laugh when i saw it)

code:

. . . loop     exit when eof (IN)     get : IN, line : *     put : OUT, line," " .. end loop

haha nice!

what you did is shorter and faster, that is what i did first too. then it turn out that i had comments start with "%"
then everything after "%" became comment.
...
then it didn't work.

[Mackie]

Just use /* multi-line comments */. You can put them in weird places and still have them work. Like:

code:

put /*RAWR*/ "foo"

[Clayton]

fishtastic wrote:

I might try to re balance just to make sure hard mode is beatable.

It is, you just have to be careful. I did it.

[Michael516]

great game, its really fun, but why does it say that there is not enough memory when you try to make it into more than one line? how many kbs was it before you compressed it to one line?

[fishtastic]

Michael516 @ Thu Mar 13, 2008 1:51 pm wrote:

great game, its really fun, but why does it say that there is not enough memory when you try to make it into more than one line? how many kbs was it before you compressed it to one line?

around 50 KB, 1.8k lines