typet ja sijoittelu

[aapeli]

Eli jos minulla on tehty yksi vihu mutta hauaisin niitä vaikka lisää ja sijoitella ne eri paikkoihin kentässä. En ole tuota type systeemiä oikein omaksunut (vielä)

[Harakka]

Code: Select all

Type vihu
  Field obj
End type

mvihu = LoadObject("media/tatti.bmp") : ShowObject mVihu,0
Const vihuMaara = 50

For i = 1 to vihuMaara
  uusi.VIHU = New(vihu)
  uusi\obj = CloneObject(mVihu)
  PositionObject uusi\obj,Rand(-ScreenWidth()/2,ScreenWidth()/2),Rand(-ScreenHeight()/2,ScreenHeight()/2)
Next i
DrawScreen
WaitKey

Eli For...Next - loopilla luodaan vihollisia ja arvotaan sijainnit Rand()-funktiolla.

[aapeli]

Joo muuten hyvä paitsi että millä nimellä vihuja kutsutaan esim jos haluan jokainsen suorittavan seuraavan koodin pätkän:

Code: Select all

    TurnObject vihun_nimi, Rand(-25, 25)     
    MoveObject vihun_nimi, Rand(3)

[iTKEVAnAKKI]

Code: Select all

for nimi.VIHU=EACH VIHU
moveobject nimi\obj,5
next nimi

[aapeli]

En oikein ymmärtänyt mihin kohtaan koodia tuo "uusin" koodin pätkä pitäisi laittaa?. Vai pitäisikö vaan unohtaa koko homma?

[koodaaja]

En oikein ymmärtänyt mihin kohtaan koodia tuo "uusin" koodin pätkä pitäisi laittaa?. Vai pitäisikö vaan unohtaa koko homma?

No johan on. Tuossa näytetään, kuinka kaikkia vihuja liikutetaan kerralla viisi pikseliä eteenpäin, et sinä copy/pastella pitkälle pääse kuitenkaan niin unohda suorien koodinpätkien kalastelu. Tuon siis voit laittaa minne tahansa tyypin määrittelyn jälkeen. Manuaali käteen, siitä niitä asioita opiskellaan.

[aapeli]

Joo sori nyt kun tässä aamulla tarkemmin katselin niin oivalsinkin jo sen.