CoolBasic introkisa 2010 [ÄÄNESTYS]
CoolBasic introkisa 2010 [ÄÄNESTYS]
Saatte valita 2 mielestänne näyttävintä introa, äänestäkää. Saatte myös kertoa mielipiteitänne tässä topikissa, kunhan rauha säilyy.
-
- Forum Veteran
- Posts: 2396
- Joined: Tue Aug 28, 2007 4:20 pm
Re: CoolBasic introkisa 2010 [ÄÄNESTYS]
Ääneni menivät Tiskijukkanörtin ja Siipimiehen tuotoksille. Epäilen vahvasti suuren osan osallistujista saaneen opastusta introihinsa #cb2-kanavalla, joten minäpä annan näille kahdelle, oletettavasti itsenäisesti tekeleensä tehneille, tukea sitten äänien muodossa.
Re: CoolBasic introkisa 2010 [ÄÄNESTYS]
Tuo kaksi valintaa on vähän huono kun kahdelle parhaalle tulee helposti tasapeli. Mutta voihan niiden välillä sitten pitää finaalin . Atomimallin oli paras, Sitten valitsin nipin napin CCE:n ja KilledWhalen introista CCE:n.
Laitoin linkin vielä tuohon voittobanneriin jos voittaja sitä haluaa pitää: (by skinkken)
E2: Tai sitten ei tarvi ottaa banneria ollenkaan
Laitoin linkin vielä tuohon voittobanneriin jos voittaja sitä haluaa pitää: (by skinkken)
EDIT:
Pienennetty versio jos ei halua isoa hirviötä pitää allekirjoituksessa [/edit]E2: Tai sitten ei tarvi ottaa banneria ollenkaan
Last edited by skinkken on Mon Jun 21, 2010 9:23 pm, edited 2 times in total.
Valmiit pelit: House of Horrors , Battle Zone , Über Ball , Itdoti , Space Chaos , Bloxxplosives ☺
Projekti jota teen ehkä joskus vielä: viewtopic.php?f=11&t=2636 <-- Tämä rivi päivitetty 14.1.2013
Projekti jota teen ehkä joskus vielä: viewtopic.php?f=11&t=2636 <-- Tämä rivi päivitetty 14.1.2013
Re: CoolBasic introkisa 2010 [ÄÄNESTYS]
Jääköön nyt salaisuudeksi ketkä kaksi nappasivat ääneni, jos ei saa yö unia tämän takia niin kenties voin ne kysymällä kertoa. Hienoja tuotoksia kyllä kaikilla täytyy sanoa!
PS. Ristis on entistä kovempi äijä.
Epäilen vahvasti suuren osan kyseisestä tekstistä bullshitiksi. Ainakin omien huomioiden mukaan.Grandi wrote:Epäilen vahvasti suuren osan osallistujista saaneen opastusta introihinsa #cb2-kanavalla
PS. Ristis on entistä kovempi äijä.
Re: CoolBasic introkisa 2010 [ÄÄNESTYS]
Walalaa!! Mikä pistepotti: 2 Kiitos äänestäjille myötätunnosta Itse äänestin atomimallia ja CCE:tä
-
- Advanced Member
- Posts: 485
- Joined: Tue Aug 28, 2007 3:53 pm
- Location: Suomi, Finland
- Contact:
Re: CoolBasic introkisa 2010 [ÄÄNESTYS]
Atomimalli ansaitsi pisteensä minulta, CCE:n työstä en voinut nauttia muuta kuin musiikista, koska näin vain mustan ruudun.
Re: CoolBasic introkisa 2010 [ÄÄNESTYS]
Itse äänestin Henkrua ja Joxia, koska heillä oli itseni poislukien vähiten pisteitä.
Re: CoolBasic introkisa 2010 [ÄÄNESTYS]
CCE:n introhan ei tainnut kaikilla näkyä, mutta MetalRainhan heitti jotain koodia jolla varmaankin toimisi. Tässä siis CCE:n intro joka toiminee kaikilla
Code: Select all
SCREEN 640,480,0,0// POLYORBISM by cce, 16.6.2010
tasot=4
Dim bg(Tasot)
Dim pallot(tasot,1)
Box 18, 468, 604, 9, 0
DrawScreen OFF
font=LoadFont("tahoma",42)
SetFont font
bg(0) = LoadImage("gfx\bg.png")
result=MakeImage(640,480)
mask=MakeImage(640,480)
ruutu=MakeImage(640,480)
MaskImage mask, 255, 255, 255
valkea=MakeImage(639,479,1)
DrawToImage valkea
Box 0,0,640,480,1
DrawToScreen
CalculationStart = Timer()
brighten# = 99/(Tasot)
For i=1 To Tasot
bg(i) = CloneImage( bg(0 ))
DrawToImage bg(i)
DrawImage bg(0), 0, 0
DrawGhostImage valkea, 1, 1, 0, Int(brighten*i)
DrawToScreen
Box 18, 468, 604, 9, 0
Box 20, 470, (i)*(600.0/tasot), 5
DrawScreen OFF
Next i
For i=0 To tasot
size# = 32
pallot(i,0) = MakeImage(int(size),int(size))
pallot(i,1) = MakeImage(Int(size),Int(size))
DrawToImage pallot(i,0)
Circle x#,y#,Max(2, size# - (i*((size-4)/tasot)) ),1
DrawToImage pallot(i,1)
Circle x#,y#,Max(2, size# - (i*((size-4)/tasot)) )*1.5,1
Next i
DrawToScreen
biisi = LoadSound("sfx/demotone.mp3")
bpm# = 104
interval#=60000 / (bpm)
songphase = 150
Cls
DrawScreen
Wait 600
PositionCamera 320,-240
start=Timer()
fx2# = 1
PlaySound biisi
Repeat
aika=Timer()-start+songphase
tahdit = ((aika/2.0) / interval) + 1
tahdit2 = ((aika) / interval) + 1
fadein# = Min(1, (aika/2.0) / (interval * 15))
fadeout# = Min(1, Max(0, (aika/2.0)-(interval * 50)) / (interval * 15))
oldgamma# = gamma#
gamma# = 1.0-(fadein# - fadeout#)
If gamma<> oldgamma Then ScreenGamma -Int(gamma*255), -Int(gamma*255), -Int(gamma*255)
If tahdit > 0 And tahdit < 17 Then
sync# = 0
ElseIf tahdit > 17 And tahdit < 25 Then
sync# = 1
ElseIf tahdit > 35 And tahdit < 50 Then
fx2# = Min(1, (((1-(1.0-Sin( aika/17 ))/2 )*0.8)+0.2) * 2)
ElseIf tahdit > 50 And tahdit < 67 Then
sync# = 0
ElseIf tahdit => 67 And tahdit < 70 Then
Goto greetz
EndIf
beat# =((1-Sin( aika * (360.0/interval) )) / 2.0 ) * sync
beat2# =( (1-Sin( (aika/2.0) * (360.0/interval) )) / 2.0 ) * sync
DrawToImage ruutu
DrawImage bg(0), 0, 0
For i=1 To tasot
DrawToImage mask
Color cbBlack
Box -1,0,640,480,1
Color cbWhite
t#=aika / 90.0
r = Max(2, size - (i*((size-4)/tasot)) )
For u=0 To 21
rr# = (64+(Min(1,(1-beat2)*4))*20)
xx3#= valimuoto( (fadein# - fadeout#), (( Cos( ((t+u) )*16 ))), valimuoto( fx2#, Sin( t + u*16 ) * (240+beat2*32), valimuoto( (( ( 1-Sin( t*2 ) )/2.0)*0.8+0.1),(( Cos( ((t/2+u) )*16.5 )* (128-Sin((t/2)+180)* rr)) )-(r/2) , ( Cos( t*1.5+u*32 )*u-(r/2) ) )))
yy3#= valimuoto( (fadein# - fadeout#), (( Sin( ((t+u) )*16 ))), valimuoto( fx2#, (u*999) Mod 120, valimuoto((( ( 1-Sin( t*2 ) )/2.0)*0.8+0.1),((Sin(((t/2+u))*16.5)*(128-Sin(t/2)*rr)))-(r/2) , ( Sin( t*1.5+u*16 ) *rr-(r/2) ) )))
x# = ( 320 + xx3 ) Mod 640
y# = ( 240 + yy3) Mod 480
frame=0
If i > (tasot-2) And beat2 > 0.9 Then frame = 1
DrawImage pallot(i,frame), x -frame*3-((r/2)*(1-(fadein# - fadeout#)))-(((r/2)*(1-fx2)))-1, y-frame*3-((r/2)*(1-(fadein# - fadeout#)))-(((r/2)*(1-fx2)))
Next u
DrawToImage result
DrawImage bg(i),1,0
DrawImage mask,1,0
DrawToImage(ruutu)
DrawImage result, 1, 0
Next i
DrawToScreen
DrawImage ruutu, 1 ,0
s = 32
w = 320 / s
h = 240 / s
t# = Min(1, (1-beat2)*4)
For y = 0 To h*2
For x = 0 To w*2
a# = GetAngle(x*s, y*s, 320, 240)
dd# = Distance(x*s, y*s, 320, 240)
d# = dd# / 210
p# = -( ((-7)-t*(-7)) * Max(0, (2-(2.0/d) )) )
plusx# = Cos(a) * p
plusy# = -Sin(a) * p
If dd# > 150 Then
CopyBox Int(x*s), Int(y*s), s, s, Int(x*s+plusx), Int(y*s+plusy), Image(ruutu), SCREEN()
EndIf
Next x
Next y
DrawScreen()
Forever
greetz:
ScreenGamma 0,0,0
info$ = "POLYORBISM|by cce|Greets|to|atomimalli|Henkru|KilledWhale|lastdear|leonarven|msqrt| "
For i=1 To CountWords(info$, "|")
Text 320 - TextWidth(GetWord(info$, i, "|" ))/2 ,240 - TextHeight(GetWord(info$, i, "|" ))/2,GetWord(info$, i, "|" )
DrawScreen
s=Timer()
Repeat
Until Timer() > (s+577)
Next i
End
Function valimuoto( k#, a#, b# ) // arvo k kannattaa olla väliltä 0-1
Return Float((a*(1-k)) + (b*k))
EndFunction
-
- Tech Developer
- Posts: 545
- Joined: Sun Aug 26, 2007 2:43 pm
- Location: Liminka
Re: CoolBasic introkisa 2010 [ÄÄNESTYS]
Itse en huomannut kenenkään pyytävän apua intronsa koodaukseen #cb2:lla, enkä muista itsekään pyytäneeni, joten väitteesi on täyttä hevonpaskaa. Lisäksi epäilen että sait äänestysvalintoihisi apua #aha.-kanavalta ja sen vuoksi äänesi tulisi hylätä.Grandi wrote:Ääneni menivät Tiskijukkanörtin ja Siipimiehen tuotoksille. Epäilen vahvasti suuren osan osallistujista saaneen opastusta introihinsa #cb2-kanavalla, joten minäpä annan näille kahdelle, oletettavasti itsenäisesti tekeleensä tehneille, tukea sitten äänien muodossa.
Eniveis, omat ääneni menivät atomimallille ja itselleni, koska atomimallin demo oli paras mutta pitää jaksaa uskoa myös itseensä.
CoolBasic henkilökuntaa
Kehittäjä
cbFUN Kello
cbSDL
Whale.dy.fi
<@cce> miltäs tuntuu olla suomen paras
Kehittäjä
cbFUN Kello
cbSDL
Whale.dy.fi
<@cce> miltäs tuntuu olla suomen paras
-
- Forum Veteran
- Posts: 2396
- Joined: Tue Aug 28, 2007 4:20 pm
Re: CoolBasic introkisa 2010 [ÄÄNESTYS]
Henkru wrote:Epäilen vahvasti suuren osan kyseisestä tekstistä bulls***ksi.
Väitin vain epäileväni asiaa vahvasti. Miten voitte todistaa tämän olevan valhetta, olettaen, että ette osaa lukea ajatuksiani? Tuollainen kiroileminen on muuten aivan tarpeetonta eikä tee teistä yhtään sen isompia.KilledWhale wrote:väitteesi on täyttä hevonp***aa.
Äänestyksen säännöthän eivät tätä kiellä, joten ääneni ovat täysin korrektit.KilledWhale wrote:Lisäksi epäilen että sait äänestysvalintoihisi apua #aha.-kanavalta ja sen vuoksi äänesi tulisi hylätä.
Re: CoolBasic introkisa 2010 [ÄÄNESTYS]
No joo, tuskin #cb2 -kanavalla, on niitä paljon muitakin paikkoja...KilledWhale wrote:Itse en huomannut kenenkään pyytävän apua intronsa koodaukseen #cb2:lla, enkä muista itsekään pyytäneeni, joten väitteesi on täyttä hevonpaskaa. Lisäksi epäilen että sait äänestysvalintoihisi apua #aha.-kanavalta ja sen vuoksi äänesi tulisi hylätä...Grandi wrote:Ääneni menivät Tiskijukkanörtin ja Siipimiehen tuotoksille. Epäilen vahvasti suuren osan osallistujista saaneen opastusta introihinsa #cb2-kanavalla, joten minäpä annan näille kahdelle, oletettavasti itsenäisesti tekeleensä tehneille, tukea sitten äänien muodossa.
Tuskimpa sai. Grandi kuuluu vain niihin harvoihin, jotka osaavat arvostaa itsetehtyä työtä. [saivartelu] Ja jos hän olisi saanut apua, hän ei olisi voinut estää sitä. [/saivartelu]KilledWhale wrote: Lisäksi epäilen että sait äänestysvalintoihisi apua #aha.-kanavalta ja sen vuoksi äänesi tulisi hylätä.
Ei se mitään, parempi voittaa aina vaikka olisi hieman lainattu jostain. Ei se työn arvoa laske...kai.
Mutta kunhan pysyy mielessä:
Viltzu wrote:... Saatte myös kertoa mielipiteitänne tässä topikissa, kunhan rauha säilyy.
Last edited by DJ-Filbe on Tue Jun 22, 2010 9:07 pm, edited 1 time in total.
Re: CoolBasic introkisa 2010 [ÄÄNESTYS]
Mihinkäs tuo Grandin höpinä perustuu? Ei kuulosta kovin uskottavalta, että suurin osa osallistujista on saanut jotain opastusta jossakin, varsinkin kun väitteellä ei ole mitään perusteita. Ja vähentääkö työn arvoa se, että sen tekijä on saanut 'opastusta', jota vahvasti epäilen.
CoolBasic henkilökuntaa
Graafikko
Graafikko
- TheDuck
- Devoted Member
- Posts: 632
- Joined: Sun Aug 26, 2007 3:51 pm
- Location: C:\Program Files\Tuusula\
Re: CoolBasic introkisa 2010 [ÄÄNESTYS]
Grandilla tuntuu olevan jokin #CB2-vastaisuus, koska sattuu olemaan erinäisistä syistä hyvin epätoivottu henkilö siellä.
^^
-
- Forum Veteran
- Posts: 2396
- Joined: Tue Aug 28, 2007 4:20 pm
Re: CoolBasic introkisa 2010 [ÄÄNESTYS]
Pate5 wrote:Mihinkäs tuo Grandin höpinä perustuu? Ei kuulosta kovin uskottavalta, että suurin osa osallistujista on saanut jotain opastusta jossakin, varsinkin kun väitteellä ei ole mitään perusteita.
Epäilykseni perustuvat siihen, että monen teoksen lopussa kiitettiin #cb2-kanavalla esiintyviä tyyppejä. Kyseisellä kanavalla on myös tapana antaa opastusta ohjelmoinnin saralla. En väitä faktana, että apua olisi introihin annettu, mutta uskon itse sen mahdollisuuteen.TheDuck wrote:Grandilla tuntuu olevan jokin #CB2-vastaisuus, koska sattuu olemaan erinäisistä syistä hyvin epätoivottu henkilö siellä.
Ja sillähän ei minulle ole mitään väliä, oliko kyseessä nyt cb2, ne9 vai kz11 -kanava. Mistään "vastaisuudesta" ei ole suinkaan kyse.
Saan valita itse millä perusteella äänestän. Teen itse kaiken ilman muiden apua, joten arvostan samaa piirrettä myös muissa. Näetkö siinä ongelman?Pate5 wrote:Ja vähentääkö työn arvoa se, että sen tekijä on saanut 'opastusta', jota vahvasti epäilen.
Re: CoolBasic introkisa 2010 [ÄÄNESTYS]
Grandilla ei käsittääkseni ole mitään #cb2-vastaista asennetta. Sen sijaan #cb2:lla on todettu mm. tällaista:TheDuck wrote:Grandilla tuntuu olevan jokin #CB2-vastaisuus, koska sattuu olemaan erinäisistä syistä hyvin epätoivottu henkilö siellä.
Jotten irrottaisi lainausta kontekstistaan, sitä ennen keskusteltiin autorejoinista ja sen takia bannimisesta.19:34 <@KilledWhale> Mutta grandille ja borikselle tulee jo joinista bannit
19:34 < TheDuck> mikä tän softan nimi olikaa
19:34 <+Esa94> no grandi nyt ei käykään tääl
19:34 <@KilledWhale> Onneksi
Re: CoolBasic introkisa 2010 [ÄÄNESTYS]
Jännä tosiaan, kun ei saa enään ystäviään muistaa. Tosiaan tämä on aika vahva perinne jo muutamien assyjen takaa.Grandi wrote:Epäilykseni perustuvat siihen, että monen teoksen lopussa kiitettiin #cb2-kanavalla esiintyviä tyyppejä.
Mutta mutta, jos tosiaan keskusteltaisiin niistä introista.
Re: CoolBasic introkisa 2010 [ÄÄNESTYS]
Mjoo, yhdestä demosta spottasin, että kiitettiin jotakuta, mutta greet:hän itsessään tarkoittaa tervehtimistä. Asiasta tärkeämpää: Kiva oli kattoo kaikkia introja ja pisteet meni atomille ja henkrulle. Pidetään perinne yllä
-
- Devoted Member
- Posts: 594
- Joined: Tue Sep 30, 2008 4:30 pm
- Location: Ruudun toisella puolella
Re: CoolBasic introkisa 2010 [ÄÄNESTYS]
Aijjuu, unohdin nimen kertoa, enkä enää sitä alkuperästä muista, mutta omani on Pentagonic. nyt vasta ittekki pääsee windowsilla latailemaan ja kattelemaan, joten pisteitä on luvassa
E: ääneni menivät sitten atomimallille ja joxille, hienoja introja/demoja
E: ääneni menivät sitten atomimallille ja joxille, hienoja introja/demoja
- kaneli2000
- Guru
- Posts: 1059
- Joined: Mon Mar 17, 2008 2:40 pm
- Location: Lempäälä
Re: CoolBasic introkisa 2010 [ÄÄNESTYS]
Ääneni atomille. Eeppistä menoa kyllä. Saisiko ne musiikit .mp3? :3
I see the rainbow rising