Tekoäly ja muu

[Jani]

Olis taas tämmönen pulma.

Miten voi tehdä tekoälyn?

Ja saisko vähän apua siihen lottoon. ei oikein tuu päähän

EDIT: Siis muuttuvien numeroiden saanti onnistuu. Mutta generointi ei

EDIT: Tyhmä kyselee taas: Miten saan toiminnon joka tallentaa syötetyn tekstin niin, että sitä voi käyttää myös silloin kun ohjelma on käynnistetty uudelleen?

EDIT: Kun ajan ohjelmaa niin tulee teksti "OpenToWrite failed" missä vika? Tässä OpenToWrite vaihe

Code: Select all

SetFont nimes
Color cbBlue
Repeat
//Aseta nimi
    nimesi$=Input("anna nimesi: ")
    DrawScreen
    Until KeyHit(28)
CloseInput
//Avataan text.txt tiedosto, luo tiedoston jos ei ole olemassa
f=OpenToWrite("Media\text.txt")
    //kirjotetaan input tiedostoon
    WriteLine f,nimesi
    //Fontti nimes

CloseInput
CloseFile f
AddText ""
f=OpenToRead("Media\text.txt")

[Viltzu]

Noh, tekoäly on hieman vaikeempi, jos haluaa siitä hyvä.
Randomisti liikkuva botti on helpoin, mutta siinä ei ole järkeä ;D
Esim. näin:
Arvot suunnan mihin liikkuu. Sit laitat liikkuun sinne jonkin verran ja tätä vaan jatkaa.

[Jani]

Noh, tekoäly on hieman vaikeempi, jos haluaa siitä hyvä.
Randomisti liikkuva botti on helpoin, mutta siinä ei ole järkeä ;D
Esim. näin:
Arvot suunnan mihin liikkuu. Sit laitat liikkuun sinne jonkin verran ja tätä vaan jatkaa.

eh...?

[Jani]

En oo kuitenkaan mikään mestari.

[Viltzu]

Aivan, sori.
Mutta noin se periaatteessa voisi mennä. En nyt esimerkki koodia rupea tekeen ja tekoäly on vielä ehkä liian vaikeeta sulle.
Suosittelen ensimmäiseksi peliksi jotain yksinkertaista, esim. tekstipeli voisi olla yksi.

EDIT:

Aivan, sinähän olit tehnyt jo.

[Jani]

Aivan, sori.
Mutta noin se periaatteessa voisi mennä. En nyt esimerkki koodia rupea tekeen ja tekoäly on vielä ehkä liian vaikeeta sulle.
Suosittelen ensimmäiseksi peliksi jotain yksinkertaista, esim. tekstipeli voisi olla yksi.

Oon jo tehnyt

[valscion]

EDIT: Kun ajan ohjelmaa niin tulee teksti "OpenToWrite failed" missä vika?

Katsoppa ettei F-Secure rajoita ohjelman toimintaa jollain jännällä tavalla (eli "Järjestelmänhallinta"), kokeile vaikka ottaa F-Secure hetkeksi pois päältä (jos siis sinulla on se) ja testaa toimisiko koodi nyt.

[Jani]

EDIT: Kun ajan ohjelmaa niin tulee teksti "OpenToWrite failed" missä vika?

Katsoppa ettei F-Secure rajoita ohjelman toimintaa jollain jännällä tavalla (eli "Järjestelmänhallinta"), kokeile vaikka ottaa F-Secure hetkeksi pois päältä (jos siis sinulla on se) ja testaa toimisiko koodi nyt.

Ei oo

[Jani]

Miten muutan ohjelman .zip muotoon?

[phons]

Paina haluamasi kansion päällä hiiren oikeaa korvaa, sieltä "Lähetä" ja "Pakattu kansio".

[Someday coder]

EDIT: Kun ajan ohjelmaa niin tulee teksti "OpenToWrite failed" missä vika?

Katsoppa ettei F-Secure rajoita ohjelman toimintaa jollain jännällä tavalla (eli "Järjestelmänhallinta"), kokeile vaikka ottaa F-Secure hetkeksi pois päältä (jos siis sinulla on se) ja testaa toimisiko koodi nyt.

Ei oo

Korjaa OpenToWrite OpenToEditillä se siis luo tekstitiedoston jos sitä ei ole olemassa. Opentowrite ei tee sitä