Lomakisa - tuotokset
Lomakisa - tuotokset
Vain Lomakisan tuotoksille, ei keskustelua ennen vuoden vaihtumista, kiitos.
Säännöt ja ohjeet täällä: viewtopic.php?f=14&t=1309
Säännöt ja ohjeet täällä: viewtopic.php?f=14&t=1309
Re: Lomakisa - tuotokset
Tässäpä minun tuotokseni: Teh Ultimate Ilotulitus
Re: Lomakisa - tuotokset
Tässä oma ilotulitukseni. Tulitus sulkeutuu itsestään kun se on ohi, älä paina esciä.
Linkki
Linkki
EDIT:
Muistakaa vääntää äänet täysille.
CoolBasic henkilökuntaa
Graafikko
Graafikko
- TheDuck
- Devoted Member
- Posts: 632
- Joined: Sun Aug 26, 2007 3:51 pm
- Location: C:\Program Files\Tuusula\
Re: Lomakisa - tuotokset
Oma ilotulitukseni, joka hieman epäonnistui. Hiirestä ampuu raketteja Kaikkihan nyt itse haluaa rakettinsa ampua?
Code: Select all
SCREEN 800,600
Type Rocket
Field x#
Field y
Field tx
Field ty
Field speed
Field b
Field kulma
Field cr
Field cg
Field cb
Field style
EndType
Repeat
If MouseHit(1) Then AddRocket(400,600,MouseX(),MouseY(),Rand(3,5),Rand(1,2))
UpdateRockets()
DrawScreen
Forever
Function AddRocket(startx,starty,tox,toy,speed,style)
r.rocket = New(rocket)
r\x# = startx
r\y = starty
r\tx = tox
r\ty = toy
r\speed = speed
r\b = 0
r\kulma = 0
lol = Rand(1,6)
Select lol
Case 1
r\cr = 128
r\cg = 168
r\cb = 4
Case 2
r\cr = 255
r\cg = 255
r\cb = 0
Case 3
r\cr = 0
r\cg = 164
r\cb = 255
Case 4
r\cr = 255
r\cg = 0
r\cb = 0
Case 5
r\cr = 255
r\cg = 172
r\cb = 0
Case 6
r\cr = 253
r\cg = 167
r\cb = 171
EndSelect
r\style = style
EndFunction
Function UpdateRockets()
For ro.rocket = Each rocket
Color cbwhite
If Distance(ro\x, ro\y, ro\tx, ro\ty) > 10 Then
ro\kulma = GetAngle(ro\x#,ro\y,ro\tx,ro\ty)
ro\x = ro\x + Cos(ro\kulma)*3
ro\y = ro\y - Sin(ro\kulma)*3
Line ro\x,ro\y,ro\x + Cos(ro\kulma)*4,ro\y - Sin(ro\kulma)*4
Else
ro\b = ro\b + 6
Color ro\cr, ro\cg, ro\cb
Select ro\style
Case 1
For il = 1 To 30
Circle ro\tx + Cos(il*Rnd(12,12.5))*ro\b,ro\ty - Sin(il*Rnd(12,12.5))*ro\b,3
Next il
If ro\b > 150 Then Delete ro:Exit
Case 2
For al = 1 To 30
Dot ro\tx + ro\b * Rnd(-0.5,0.5),ro\ty + ro\b * Rnd(0.5,0.8) - Rnd(1,3)
Next al
If ro\b > 250 Then Delete ro:Exit
EndSelect
EndIf
Next ro
EndFunction
^^
Re: Lomakisa - tuotokset
No niin. Osallistumisaika on päättynyt ja tässä viestiketjussa voidaan keskustella vapaasti. Lisään hetkisen kuluttua äänestyksen tähän viestiketjuun.
Re: Lomakisa - tuotokset
Äänestys lisätty.
Re: Lomakisa - tuotokset
Vielä on viimeiset hetket aikaa äänestää.
Re: Lomakisa - tuotokset
Sly_Jack0:n ilotulitusta en saanut ladattua mediafiresta... zHelmetin tuotos kaatui lähes heti MAViin (tarkoitusko?) ja Pate5:nkin omien rakettien ampuminen MAVitti kun niitä raketteja tarpeeksi kerralla oli olemassa. Valtzun tuotos oli aika vaisu ja TheDuckin hieman oudohko.
Kaikki tuotokset (paitsi zHelmetin MAV-ohjelma) olivat kuitenkin hienoja ja hyviä
Kaikki tuotokset (paitsi zHelmetin MAV-ohjelma) olivat kuitenkin hienoja ja hyviä
EDIT:
Nyt sain Sly_Jack0:nkin ilotulituksen ladattua. Hieno! Mutta todelllllla laginen... FPS varmaan jossain viiden paikkeilla keskimäärin.
Nno, nyt on kaikki katsottu ja ääni annettu (:
Last edited by valscion on Fri Jan 02, 2009 9:44 pm, edited 1 time in total.
cbEnchanted, uudelleenkirjoitettu runtime. Uusin versio: 0.4.1 — Nyt myös sorsat GitHubissa!
NetMatch - se kunnon nettimättö-deathmatch! Avoimella lähdekoodilla varustettu
vesalaakso.com
NetMatch - se kunnon nettimättö-deathmatch! Avoimella lähdekoodilla varustettu
vesalaakso.com
Re: Lomakisa - tuotokset
Taisi mavini johtua vain siitä että putpixel piirtää yli ruudun (hups) mutta itselläni tuo ei valita siitä...
Re: Lomakisa - tuotokset
Juu, tiedän että se on laginen koska koodasin sen tällä uudella koneella missä on vähän enenmmän tehoja ja se pyörii tällä suurilta osin varsin hyvin, mutta vanhalla koneella se lagaa kauheasti. Enkä sitten tietenkään älynnyt koittaa sitä sillä vanhalla ennen kuin laitoin tänne... Ois voinu vähän keventää sitä jos ois älynny...OonSuomesta wrote:EDIT:Nyt sain Sly_Jack0:nkin ilotulituksen ladattua. Hieno! Mutta todelllllla laginen... FPS varmaan jossain viiden paikkeilla keskimäärin.
Re: Lomakisa - tuotokset
Ja yleisöäänestyksen perusteella parhaimman ilotulituksen teki Pate5. Onnittelut.