CoolBasic Forums

DatsuniG

Knoy wrote:Yläasteen numeroilla on jonkinverran virkaa...

Jaa? Kyllä Vaasassa tuntui pääsevän millä tahansa keskiarvolla niin lukioon kuin amikseen.

DatsuniG

Ihan kohtuullisesti meni viime jakso. MAA4 Analyyttinen geometria .....................................10 FY3 Aallot ............................................................10 ENA3 Opiskelu ja työ ................................................9 ÄI3 Kirjallisuuden keinoja ja tulkintaa ............

DatsuniG

Itsehän käyn neljä kertaa viikossa kuntosalilla. Kyllä rupee kroppa pikku hiljaa olemaan rantakunnossa.

ps. Kertokaa jos allekirjoitukseni toimii. : )

DatsuniG

Code: Select all

Drawgame
// Kuvien piirtäminen tähän
Drawscreen

DatsuniG

http://koti.mbnet.fi/datsunig/cbbeta1042.rar

DatsuniG

Code: Select all

Chaosworm ... = 6
koodaaja .... = 6

Koodaajalle piste koska Cw on liian nuubi voittaakseen hänet.

DatsuniG

Olwi wrote:
DatsuniG wrote:Plää, teoriakoe ensiviikon tiistaina ja ajotunteja voi ottaa vasta tämän kuun puolessa välissä. Voi tätä tuskaa.
Kemmu? Mikä pyörä alla?

Yamaha DT 125 RE, ihanan luotettava pyörä. : )

DatsuniG

Code: Select all

Chaosworm ... = 3
Jare ........ = 1
koodaaja .... = 0
SPuntte ..... = 1

Kai sitä pitää nyt Jareakin äänestää. : )

DatsuniG

Code: Select all

Chaosworm ... = 7
Jare ........ = 8
koodaaja .... = 10 *
SPuntte ..... = 8
Sumppi ...... = 7

Ja koodaajalle 10 pistettä. : )

DatsuniG

Eipä tuo sinun funktiosi enään piirräkkään laatikkoa, jos x_ < xx_ tai y_ < yy_.

EDIT:

Asioita ei saa jättää puolitiehen?

DatsuniG

Code: Select all

Chaosworm ... = 6
Jare ........ = 6
koodaaja .... = 7
SPuntte ..... = 6
Sumppi ...... = 6

Ei SPuntte voi olla viimeinen.

DatsuniG

@jaahas: Repeat Text 2,2,"Box2()" Text 350,2,"Box1()" SetWindow -150 + MouseX() + "" Box2(75, 100, MouseX() - 75, MouseY()) Box1(225, 100, MouseX() + 75, MouseY()) DrawScreen Forever Function box1 (x_,y_,xx_,yy_) xx=xx_-x_ yy=yy_-y_ Box x_,y_,xx,yy End Function Function...

DatsuniG

@Phons: Viestin voi poistaa vain silloin, jos siihen ei ole tullut vastauksia. ;) mustakos puhutte? no jaa ihan sama meinasin opetella tekemään tekoälyn joten voisko joku laittaa jonku pienen tekoälyn jota tutkisin ja opettelisin? en oo varma meneekö offtopiciks jos menee niin anteeksi offtopic map...

DatsuniG

Plää, teoriakoe ensiviikon tiistaina ja ajotunteja voi ottaa vasta tämän kuun puolessa välissä. Voi tätä tuskaa.

DatsuniG

EDIT:

mkn:llä on käsitteet hieman hukassa. Neliö, suorakulmio ja nelikulmio eivät ole sama asia.

DatsuniG

Code: Select all

Function Box2(x1 As Float, y1 As Float, x2 As Float, y2 As Float, fill = 1)
    w As Float = x2 - x1
    h As Float = y2 - y1
    x As Float = 0
    y As Float = 0
    If w < 0 Then x = x2 Else x = x1
    If h < 0 Then y = y2 Else y = y1
    Box x, y, abs(w), abs(h), fill
EndFunction

DatsuniG

@Phons: Viestin voi poistaa vain silloin, jos siihen ei ole tullut vastauksia.

DatsuniG

Ei toimi, includesta ei jää jälkeäkään varsinaiseen suoritettavaan tiedostoon.

DatsuniG

Code: Select all

Chaosworm ... = 1
Jare ........ = 0
koodaaja .... = 0
SPuntte ..... = 1
Sumppi ...... = 0
TheDuck ..... = 0

SPuntte plussaa, koska hänellä on hienoja matemaattisia funktioita.

DatsuniG

Code: Select all

Chaosworm ... = 2
Grandi ...... = 5 *
Jare ........ = 4
koodaaja .... = 5 *
MikkoK ...... = 2
SPuntte ..... = 4
Sumppi ...... = 4
TheDuck ..... = 4

MikkoK:lle plussaa. Nyt ollaan pisteen verran lähempänä tämän maanmainion pelin loppua. : )

CoolBasic Forums

Search found 367 matches

Re: Offtopic (I/2010)

Re: Offtopic (I/2010)

Re: Offtopic (I/2010)

Re: Tyhmät kysymykset (I/2010)

Re: Offtopic (I/2010)

Re: CoolBasic Survivors II [Kierros 17]

Re: Offtopic (I/2010)

Re: CoolBasic Survivors II [Kierros 16]

Re: CoolBasic Survivors II [Kierros 13]

Re: Voisko joku guru auttaa? :)

Re: CoolBasic Survivors II [Kierros 13]

Re: Voisko joku guru auttaa? :)

Re: Tyhmät kysymykset (I/2010)

Re: Offtopic (I/2010)

Re: Voisko joku guru auttaa? :)

Re: Voisko joku guru auttaa? :)

Re: Tyhmät kysymykset (I/2010)

Re: Palvelimelta tiedostoja....

Re: CoolBasic Survivors II [Kierros 12]

Re: CoolBasic Survivors II [Kierros 11]