
-----------------------------------
fishtastic
Sat Jan 05, 2008 3:29 pm

Wormy !
-----------------------------------
I was bored ..:mrgreen: 
If someone already submitted something like this before, then sorry about that.
Have fun!




% Wormy by fishtastic.
% you can also hold mouse button to give wormy a little speed boost

var total := 1
var x : array 1 .. 200 of real
var y : array 1 .. 200 of real
var sx, sy := 0.0
var mx, my, mc : int
var r := 0
var ix, iy := 50

View.Set ("offscreenonly")
colorback (black)
color (white)
var temp := 1 / total * 0.5
for i : 1 .. 200
    x (i) := 100.0
    y (i) := 100.0
end for


loop
    put total, "/200"
    drawfilloval (ix, iy, 10, 10, total + 1)
    drawoval (ix, iy, 10, 10, Rand.Int(1,255))

    for i : 1 .. total
        r := round (10 + (maxx - y (i)) / 100)
        drawfilloval (round (x (i)), round (y (i)), r, r, i)
    end for


    mousewhere (mx, my, mc)
    if mc = 1 then
        sx += (mx - x (1)) / 200
        sy += (my - y (1)) / 200
    end if

    if Math.Distance (x (1), y (1), ix, iy) < 15 then
        total += 1
        ix := Rand.Int (1, maxx)
        iy := Rand.Int (1, maxy)
        if total = 200 then
            cls
            put "you win!!"
            View.Update
            exit
        end if
    end if

    sx += (mx - x (1)) / 2000
    sy += (my - y (1)) / 2000
    x (1) += sx
    y (1) += sy

    for i : 2 .. total
        x (i) := (x (i) + x (i - 1)) / 2
        y (i) := (y (i) + y (i - 1)) / 2
    end for

    sx *= 0.99
    sy *= 0.99

    delay (10)
    View.Update
    cls
end loop




-----------------------------------
shakin cookie
Sat Jan 05, 2008 5:33 pm

RE:Wormy !
-----------------------------------
is there a way to lose?  That is one of the points of Worm.

Other than that, i like the 3D-ish feel.

Very good job

-----------------------------------
Gackt
Sat Jan 05, 2008 6:20 pm

RE:Wormy !
-----------------------------------
That Is Pretty Awesome!

-----------------------------------
fishtastic
Sat Jan 05, 2008 8:39 pm

Re: RE:Wormy !
-----------------------------------
That Is Pretty Awesome!
thank!
is there a way to lose?  That is one of the points of worm.

no there is no way to lose.
you are probably thinking about snake game.

-----------------------------------
DIIST
Sat Jan 05, 2008 10:08 pm

Re: Wormy !
-----------------------------------
pretty cool. You should look into the RGB module. It could probbly make you worm look a lot cooler. 

  :wink:

-----------------------------------
petree08
Wed Jan 16, 2008 11:32 am

RE:Wormy !
-----------------------------------
Um i just did a quick glance at the code, its pretty clean and easy to understand, I knew what it was going to do before i excecuted it good job! 

This would be sweet if there was random enimies rolling around and if you hit one you shrink (or some other enemey v.s player mechanics) the AI could be tricky but it would be worth it 

keep up the clean code
yeah 100th post lol
 :mrgreen:

-----------------------------------
fishtastic
Wed Jan 16, 2008 6:39 pm

Re: RE:Wormy !
-----------------------------------
Um i just did a quick glance at the code, its pretty clean and easy to understand, 
keep up the clean code
yeah 100th post lol
 :mrgreen:
congrats for 100 th post.
my code is very confusing in the game that I am working right now.

-----------------------------------
yusong
Thu Jan 24, 2008 8:05 pm

RE:Wormy !
-----------------------------------
It was a cool game, it kept me occupied for like 15 minutes in Computer Sciences Club, right Fishtastic?
I think adding enemies would be a good idea because it gets boring after a while.

-----------------------------------
Nyrd
Sun Feb 10, 2008 10:18 pm

RE:Wormy !
-----------------------------------
I must admit that at first the game looks lame, but when the worm starts growing it actually looks pretty cool. Because of this I'd give your worm a longer starting length. Also, some enemies and such would be interesting. 

Apart from that, your worm is pretty trippy!

-----------------------------------
Michael516
Thu Mar 13, 2008 10:26 am

Re: Wormy !
-----------------------------------
nice game. the 3d effect was really neat.

-----------------------------------
A.J
Thu Mar 13, 2008 10:38 am

Re: Wormy !
-----------------------------------
hey fishtastic!
good game, and see if you can add the A* again for this game in adding enemies.
I'll see if I can do it, but I am not that good with A* implementation myself :D

-----------------------------------
fishtastic
Thu Mar 13, 2008 12:47 pm

Re: Wormy !
-----------------------------------
nice game. the 3d effect was really neat. thanks.

hey fishtastic!
good game, and see if you can add the A* again for this game in adding enemies.
I'll see if I can do it, but I am not that good with A* implementation myself :D no..... A.J......  You don't need A* for everything. :shock:   :? 
there is no need for A* because there are no obstacles and the map is not really gird based.

If you want the enemy to follow you, all you need to do is to let them move and the angle toward you using simple trig.  :mrgreen: 

but I did use A* in my Turing TD.  :wink:

-----------------------------------
A.J
Thu Mar 13, 2008 12:50 pm

Re: Wormy !
-----------------------------------
I know that u don't need A*, but at first I thought your wormy game was like snake....
but after reading the other comments.....i found out that i screwed up..
anyways, i'll try adding A* to my crude snake game :D

A.J

-----------------------------------
Doug101
Wed Apr 02, 2008 8:31 am

Re: Wormy !
-----------------------------------
kick ass game loved it

-----------------------------------
repsoccer16
Fri Apr 04, 2008 7:45 am

RE:Wormy !
-----------------------------------
amazing game and the 3d effect is pretty trippy.

-----------------------------------
Prince Pwn
Mon Apr 07, 2008 12:56 pm

RE:Wormy !
-----------------------------------
Holy, sweet Turing game, and only like 50 lines. u own

-----------------------------------
repsoccer16
Tue Apr 08, 2008 8:04 am

RE:Wormy !
-----------------------------------
amazing how short you made the program for such a good game.

-----------------------------------
Tallguy
Mon Apr 14, 2008 8:27 am

RE:Wormy !
-----------------------------------
that is really cool, i like how each color adds a new segment, great job

-----------------------------------
repsoccer16
Tue Apr 15, 2008 7:50 am

RE:Wormy !
-----------------------------------
ya the colours are really cool :-P

-----------------------------------
crysis
Tue Apr 15, 2008 8:31 am

RE:Wormy !
-----------------------------------
good game
