Offtopic (I/2009)
Re: Offtopic, aiheen vierestä, niitä näitä ja banniruletti
Onnea Dibalolle. (Vaan kaks vuotta vanhempi ku mä? se selittääkin paljon... )
-On selkeästi impulsiivinen koodaaja joka...
- Dibalo
- Advanced Member
- Posts: 298
- Joined: Mon Aug 27, 2007 8:12 pm
- Location: Espoo, Finland
- Contact:
Re: Offtopic, aiheen vierestä, niitä näitä ja banniruletti
Kiitos kaikille muistaneille!
-
- Advanced Member
- Posts: 308
- Joined: Tue Nov 25, 2008 8:06 pm
- Contact:
Re: Offtopic, aiheen vierestä, niitä näitä ja banniruletti
Kiittänet siis foorumisoftaa.Dibalo wrote:Kiitos kaikille muistaneille!
Mutta onnea minultakin.
a.k.a. Gehock
Re: Offtopic, aiheen vierestä, niitä näitä ja banniruletti
Juu myöhäiset onnittelut minunkin puolesta kaikille edellä mainituille henkilöille, en ole itse muistanut onnitella!
Solar Eclipse
We're in a simulation, and God is trying to debug us.
Re: Offtopic, aiheen vierestä, niitä näitä ja banniruletti
Onnittelut kaikille tänä vuonna syntymäpäiviänsä viettäneille,mulla se on viel edessä
Huuda mun ip:tä!
Re: Offtopic, aiheen vierestä, niitä näitä ja banniruletti
ABCDEFGHIJKLMNOPQRSTUVWXYZÅÄÖ
EDIT:
Edit by Zero 4.12.2009:
Joo ei tällasia... tästä napsahti varoitus.
Re: Offtopic, aiheen vierestä, niitä näitä ja banniruletti
Hah, meinasin laittaa toisenkin ennen kuin edes luin viestin loppuun
Re: Offtopic, aiheen vierestä, niitä näitä ja banniruletti
Olenpa miettinyt miettinyt mitenkä CoolBasic:n oma GetAngle loppujen lopuksi toimii, ja väänsin omani. Tästä on jopa hyötyä muillekkin kielille. ;D
Code: Select all
Repeat
Color cbblue
Text 0,0,"Angle from own function: " + GetAngle3(200,150,MouseX(),MouseY())
Color cbyellow
Text 0,15,"Angle from cb's own: " + GetAngle(200,150,MouseX(),MouseY())
Color cbred
Line 200,150,MouseX(),MouseY()
DrawScreen
Forever
Function GetAngle3(x#,y#,x2#,y2#)
If x2 => x And y2 =< y Then
Return Float(ATan(Abs((y2-y)/(x2-x))))
ElseIf x2 =< x And y2 =< y Then
Return Float(180-ATan(Abs((y2-y)/(x2-x))))
ElseIf x2 =< x And y2 => y
Return Float(180 + ATan(Abs((y2-y)/(x2-x))))
ElseIf x2 => x And y2 => y
Return Float(360-ATan(Abs((y2-y)/(x2-x))))
EndIf
EndFunction
Solar Eclipse
We're in a simulation, and God is trying to debug us.
- kaneli2000
- Guru
- Posts: 1059
- Joined: Mon Mar 17, 2008 2:40 pm
- Location: Lempäälä
Re: Offtopic, aiheen vierestä, niitä näitä ja banniruletti
Ai että kun olisi kiva saada L4D 2, cb-porukasta kun löytyy hyvää peliseuraa. Mutta eipä oikein ole rahaa (tai no on, mutta säästän iPodiin).
Kukaan ei ole varmaan niin tyhmä, että ostaisi pelin nyt minulle (50€) ja saisi ensi kesä-assyilla 60€? Tuskin...
Kukaan ei ole varmaan niin tyhmä, että ostaisi pelin nyt minulle (50€) ja saisi ensi kesä-assyilla 60€? Tuskin...
I see the rainbow rising
Re: Offtopic, aiheen vierestä, niitä näitä ja banniruletti
Mikäs skorpioni-cb:n tilanne olikaan? Eikös se saanut banaania tai jotain..? Kun nyt postailee aikas paljon vieraana.
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
-
- Active Member
- Posts: 135
- Joined: Fri Mar 07, 2008 8:49 pm
Re: Offtopic, aiheen vierestä, niitä näitä ja banniruletti
MaGetzUb wrote:Olenpa miettinyt miettinyt mitenkä CoolBasic:n oma GetAngle loppujen lopuksi toimii, ja väänsin omani. Tästä on jopa hyötyä muillekkin kielille. ;DCode: Select all
Repeat Color cbblue Text 0,0,"Angle from own function: " + GetAngle3(200,150,MouseX(),MouseY()) Color cbyellow Text 0,15,"Angle from cb's own: " + GetAngle(200,150,MouseX(),MouseY()) Color cbred Line 200,150,MouseX(),MouseY() DrawScreen Forever Function GetAngle3(x#,y#,x2#,y2#) If x2 => x And y2 =< y Then Return Float(ATan(Abs((y2-y)/(x2-x)))) ElseIf x2 =< x And y2 =< y Then Return Float(180-ATan(Abs((y2-y)/(x2-x)))) ElseIf x2 =< x And y2 => y Return Float(180 + ATan(Abs((y2-y)/(x2-x)))) ElseIf x2 => x And y2 => y Return Float(360-ATan(Abs((y2-y)/(x2-x)))) EndIf EndFunction
Code: Select all
Function GetAngle3#(x1#,y1#,x2#,y2#) // Heittää vähän CB:n getAnglesta, mutta onpahan kompakti.
If (y2-y1)>0 Then Return 360.0-ACos((x2-x1)/Sqrt((x2-x1)^2+(y2-y1)^2)) Else Return ACos((x2-x1)/Sqrt((x2-x1)^2+(y2-y1)^2))
EndFunction
Code: Select all
Function GetAngle3#(x1#,y1#,x2#,y2#) // Pientä säätöä.
If (y2-y1)>0 Then Return 360.0-ACos(Cos(ATan((y2-y1)/(x2-x1)))) Else Return ACos(Cos(ATan((y2-y1)/(x2-x1))))
EndFunction
Re: Offtopic, aiheen vierestä, niitä näitä ja banniruletti
Linkkiä?VesQ wrote:Mikäs skorpioni-cb:n tilanne olikaan? Eikös se saanut banaania tai jotain..? Kun nyt postailee aikas paljon vieraana.
-
- Advanced Member
- Posts: 308
- Joined: Tue Nov 25, 2008 8:06 pm
- Contact:
Re: Offtopic, aiheen vierestä, niitä näitä ja banniruletti
viewtopic.php?p=34564#p34564Pettis wrote:Linkkiä?VesQ wrote:Mikäs skorpioni-cb:n tilanne olikaan? Eikös se saanut banaania tai jotain..? Kun nyt postailee aikas paljon vieraana.
a.k.a. Gehock
Re: Offtopic, aiheen vierestä, niitä näitä ja banniruletti
Hengität nyt manuaalisesti.
Re: Offtopic, aiheen vierestä, niitä näitä ja banniruletti
Se on nyt itsenäisyyspäivä. Itselläni on vielä 10 päivää koulua + muutaman tunnin mittainen lauantaikoulupäivä.
Code: Select all
#aha. @ IRCNet
<Grandi> Voit laittaa jo valmiiks hailaittiin "Amis-Mikko", koska alan kutsua sua sillä nimellä.
Re: Offtopic, aiheen vierestä, niitä näitä ja banniruletti
Testatkaapas tietokoneenne laskuteho osoitteessa WhoHasTheFastestComputer.com. Oma tulokseni on 13.9 GigaFlopsia, eli 100% (palvelu on niin tuore että koneeni on palvelun tilastojen kärjessä). Tieteellistä tarkkuutta epäilen, mutta onhan tämä ihan hauska.
Palveluun kirjaudutaan toistaiseksi facebook -tunnuksilla.
Palveluun kirjaudutaan toistaiseksi facebook -tunnuksilla.
Last edited by Ruuttu on Sun Dec 06, 2009 9:59 pm, edited 1 time in total.
- kaneli2000
- Guru
- Posts: 1059
- Joined: Mon Mar 17, 2008 2:40 pm
- Location: Lempäälä
Re: Offtopic, aiheen vierestä, niitä näitä ja banniruletti
Ïtsellä tuli vain 2.3 (tai jotain) gf:ää. Ihan hyvä tämän pitäisi olla .Ruuttu wrote:Testatkaapas tietokoneenne laskuteho osoitteessa WhoHasTheFastestComputer.com. Oma tulokseni on 13.9 GigaFlopsia, eli 100% (palvelu on niin tuore että koneeni on palvelun tilastoissa ykkösenä). Tieteellistä tarkkuutta epäilen, mutta onhan tämä ihan hauska.
Palveluun kirjaudutaan toistaiseksi facebook -tunnuksilla.
I see the rainbow rising
Re: Offtopic, aiheen vierestä, niitä näitä ja banniruletti
Itse sain vain 0.94 gf :/
Code: Select all
#aha. @ IRCNet
<Grandi> Voit laittaa jo valmiiks hailaittiin "Amis-Mikko", koska alan kutsua sua sillä nimellä.