Tyhmä kysymys...

Voit pyytää apua ohjelmointiongelmiin täältä.
Post Reply
Image
Member
Posts: 59
Joined: Sat May 09, 2009 3:28 pm

Tyhmä kysymys...

Post by Image »

Tää varmaan luki jossain pelin sisällä mutta en löytäny. Elikkäs miten saan silleensä että kun pelin aukasee niin tulee se tekstijuttu kuten esimerkki 1 pelissä tai muissa ja sitten ku painaisi entteriä niin itse peli lähtisi käyntiin?
rami123
Advanced Member
Posts: 354
Joined: Mon Jun 23, 2008 8:20 pm
Location: Kittilä

Re: Tyhmä kysymys...

Post by rami123 »

Image wrote:Tää varmaan luki jossain pelin sisällä mutta en löytäny. Elikkäs miten saan silleensä että kun pelin aukasee niin tulee se tekstijuttu kuten esimerkki 1 pelissä tai muissa ja sitten ku painaisi entteriä niin itse peli lähtisi käyntiin?
Tämän voi tehdä eri tavoilla , joko gotolla tai sitten odotetaan että painetaan jotain.
Image
Member
Posts: 59
Joined: Sat May 09, 2009 3:28 pm

Re: Tyhmä kysymys...

Post by Image »

rami123 wrote:
Image wrote:Tää varmaan luki jossain pelin sisällä mutta en löytäny. Elikkäs miten saan silleensä että kun pelin aukasee niin tulee se tekstijuttu kuten esimerkki 1 pelissä tai muissa ja sitten ku painaisi entteriä niin itse peli lähtisi käyntiin?
Tämän voi tehdä eri tavoilla , joko gotolla tai sitten odotetaan että painetaan jotain.
Joo tuota.. Tuolta pelin sisältä ei oikein ota selvää mitenkä tuota Goto käytetään..?

Ainiin ja tiedätkö kun mulla on "resoluutio" no tuo SCREEN 1200,900 tai jotenki silleen niin että miten voit "Zoomata" sitä mun pelihahmoa?
Last edited by Image on Sat Jul 25, 2009 6:02 pm, edited 1 time in total.
rami123
Advanced Member
Posts: 354
Joined: Mon Jun 23, 2008 8:20 pm
Location: Kittilä

Re: Tyhmä kysymys...

Post by rami123 »

Image wrote:
rami123 wrote:
Image wrote:Tää varmaan luki jossain pelin sisällä mutta en löytäny. Elikkäs miten saan silleensä että kun pelin aukasee niin tulee se tekstijuttu kuten esimerkki 1 pelissä tai muissa ja sitten ku painaisi entteriä niin itse peli lähtisi käyntiin?
Tämän voi tehdä eri tavoilla , joko gotolla tai sitten odotetaan että painetaan jotain.
Joo tuota.. Tuolta pelin sisältä ei oikein ota selvää mitenkä tuota Goto käytetään..?

Ainiin ja tiedätkö kun mulla on "resoluutio" no tuo SCREEN 1200,900 tai jotenki silleen niin että miten voit "Zoomata" sitä mun pelihahmoa? Sori kun kyselen.
"hello wordlin" ja esimerkin yhdistäminen ;)

Code: Select all

'Esimerkki 8 : Toimiva pelirunko
'================================================

'! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! !
'Aja tämä ohjelma painamalla F5.
'Lopeta ohjelma painamalla ESC.
'! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! !

Print "Hello World"

WaitKey
SCREEN 800,600
FrameLimit 40
'Tee pelimaailma
ruoho = MakeObjectFloor ()
nurmikko = LoadImage ("Media\grass.bmp")
PaintObject ruoho, nurmikko

ukko1 = LoadObject ("Media\guy.bmp",72)
ukko2 = LoadObject ("Media\guy.bmp",72)

'Pyöritä ukot alkuasentoon
RotateObject ukko1,0
RotateObject ukko2,180

'Aseta ukot alkupaikkoihin
PositionObject ukko1,-150,100
PositionObject ukko2,150,-100

Repeat

    'Ukon 1 ohjaus
    If LeftKey() Then TurnObject ukko1,5
    If RightKey() Then TurnObject ukko1,-5
    If UpKey() Then MoveObject ukko1,2
    If DownKey() Then MoveObject ukko1,-2

    'Ukon 2 ohjaus
    If KeyDown(cbKeyA) Then TurnObject ukko2,5
    If KeyDown(cbKeyD) Then TurnObject ukko2,-5
    If KeyDown(cbKeyW) Then MoveObject ukko2,2
    If KeyDown(cbKeyS) Then MoveObject ukko2,-2

    'Älä päästä ukkoa 1 seinien ulkopuolelle
    If ObjectX(ukko1)<-200 Then PositionObject ukko1,-200,ObjectY(ukko1)
    If ObjectX(ukko1)>200 Then PositionObject ukko1,200,ObjectY(ukko1)
    If ObjectY(ukko1)<-150 Then PositionObject ukko1,ObjectX(ukko1),-150
    If ObjectY(ukko1)>150 Then PositionObject ukko1,ObjectX(ukko1),150
    
    'Älä päästä ukkoa 2 seinien ulkopuolelle
    If ObjectX(ukko2)<-200 Then PositionObject ukko2,-200,ObjectY(ukko2)
    If ObjectX(ukko2)>200 Then PositionObject ukko2,200,ObjectY(ukko2)
    If ObjectY(ukko2)<-150 Then PositionObject ukko2,ObjectX(ukko2),-150
    If ObjectY(ukko2)>150 Then PositionObject ukko2,ObjectX(ukko2),150
        
    
    DrawScreen

Forever
"GOTO"lla siirrytään koodin paikasta toiseen.

Code: Select all

Paikka1:

ukko = LoadObject("Media\guy.bmp", 72)
Repeat

If KeyHit (cbkeySPACE) Then Goto paikka2
DrawScreen 
Forever 

'//////

paikka2:

lehmä = LoadObject("Media\cow.bmp", 72)
Repeat

If KeyHit (cbkeyENTER) Then Goto paikka1
DrawScreen 
Forever
ja suoraan kopioitu esimerkki manuaalista

Code: Select all

Print "MOI"
GoTo yli

Print "Tätä riviä ei ikinä tulostu."

yli:
Print "Tänne hypättiin!"

WaitKey
EDIT:

JOTAIN: (eli muutat tuon tekstin ennen kaksoispisteitä)

Toivottavasti oli apua :D
Image
Member
Posts: 59
Joined: Sat May 09, 2009 3:28 pm

Re: Tyhmä kysymys...

Post by Image »

EDIT:

JOTAIN: (eli muutat tuon tekstin ennen kaksoispisteitä)

Toivottavasti oli apua :D
Öö.. Joo kiitti yritän saada selvää tuosta.. Jos jotain epäselvää nii kysyn viel.. Ainii :D Et sattus tietää millo V.3 tulee CoolBasicist?
rami123
Advanced Member
Posts: 354
Joined: Mon Jun 23, 2008 8:20 pm
Location: Kittilä

Re: Tyhmä kysymys...

Post by rami123 »

Image wrote:
EDIT:

JOTAIN: (eli muutat tuon tekstin ennen kaksoispisteitä)

Toivottavasti oli apua :D
Öö.. Joo kiitti yritän saada selvää tuosta.. Jos jotain epäselvää nii kysyn viel.. Ainii :D Et sattus tietää millo V.3 tulee CoolBasicist?
Juup en tiedä.., mutta tässä keskustellaan siitä v3.
Image
Member
Posts: 59
Joined: Sat May 09, 2009 3:28 pm

Re: Tyhmä kysymys...

Post by Image »

rami123 wrote:
Image wrote:
EDIT:

JOTAIN: (eli muutat tuon tekstin ennen kaksoispisteitä)

Toivottavasti oli apua :D
Öö.. Joo kiitti yritän saada selvää tuosta.. Jos jotain epäselvää nii kysyn viel.. Ainii :D Et sattus tietää millo V.3 tulee CoolBasicist?
Juup en tiedä.., mutta tässä keskustellaan siitä v3.
Ok.. hei oon ettimäs tätä samaan aikaan tuolta pelistä mutta tarkistanpahan nyt tässä samalla että saako tohon Print komentoon mitään erivärisiä tekstejä?
rami123
Advanced Member
Posts: 354
Joined: Mon Jun 23, 2008 8:20 pm
Location: Kittilä

Re: Tyhmä kysymys...

Post by rami123 »

Ok.. hei oon ettimäs tätä samaan aikaan tuolta pelistä mutta tarkistanpahan nyt tässä samalla että saako tohon Print komentoon mitään erivärisiä tekstejä?
Saa ennen printtiää kirjoitat

Code: Select all

color cbred 
EDIT:

ELIKKÄ (cbVÄRI)

EDIT:

2.öö.. en saanukkaa väriä siihe testaan viel..

ok :D ajattelin että viimesenä toi komento toimii kun olin laittanut sen Printin ETEEN :D Joo no kiitti paljosta tiedosta :)
EDIT:

juu ei mitt :)

Last edited by rami123 on Sat May 09, 2009 5:17 pm, edited 1 time in total.
Image
Member
Posts: 59
Joined: Sat May 09, 2009 3:28 pm

Re: Tyhmä kysymys...

Post by Image »

rami123 wrote:
Ok.. hei oon ettimäs tätä samaan aikaan tuolta pelistä mutta tarkistanpahan nyt tässä samalla että saako tohon Print komentoon mitään erivärisiä tekstejä?
Saa ennen printtiää kirjoitat

Code: Select all

color cbred 
EDIT:

ELIKKÄ (cbVÄRI)

ok :D ajattelin että viimesenä toi komento toimii kun olin laittanut sen Printin ETEEN :D Joo no kiitti paljosta tiedosta :)
Koodiapina
Forum Veteran
Posts: 2396
Joined: Tue Aug 28, 2007 4:20 pm

Re: Tyhmä kysymys...

Post by Koodiapina »

Suosittelen selaamaan sitä CoolBasicin ohessa tullutta manuaalia muutenkin kuin esimerkkien osalta. Löydät eri komennot ja niiden yksityiskohtaiset selitykset nopeasti ja helposti eikä tarvitse odottaa vastausta foorumeilta.
Image
Member
Posts: 59
Joined: Sat May 09, 2009 3:28 pm

Re: Tyhmä kysymys...

Post by Image »

Grandi wrote:Suosittelen selaamaan sitä CoolBasicin ohessa tullutta manuaalia muutenkin kuin esimerkkien osalta. Löydät eri komennot ja niiden yksityiskohtaiset selitykset nopeasti ja helposti eikä tarvitse odottaa vastausta foorumeilta.
Jjuu. Olenhan minä niitä lueskellut jo hiukan...
Post Reply