Kirjautuminen

Haku

Tehtävät

Keskustelu: Ohjelmointikysymykset: QB: ihme juttu

borri317 [09.11.2004 19:47:08]

#

tuo ohjelma on kummallisi minkä oon tehny vaikka ei siltä näytä qbasic 4.5 menee siitä iha sekasi

CLS
K=1
S:
CLS
PRINT "KISSA"
IF V=1 THEN PRINT " ";CHR$(27) ELSE PRINT ""
PRINT "KOIRA"
IF V=1 THEN PRINT " ";CHR$(27) ELSE PRINT ""
PRINT "KEPPI JALKA"
IF V=1 THEN PRINT " ";CHR$(27) ELSE PRINT ""
DO
I$=INKEY$
IF INKEY$(27) THEN END
KK=K
IF I$="+" THEN K=K+1
IF I$="-" THEN K=K-1
IF K>3 THEN K=K-1
IF K<1 THEN K=K+1
IF NOT(KK=K) THEN GOTO S
LOOP

remontti-reiska [09.11.2004 19:49:33]

#

Jaa-a, mikähän mahtaa olla tämän topicin kysymys?

borri317 [09.11.2004 19:54:03]

#

remontti-reiska kirjoitti:

Jaa-a, mikähän mahtaa olla tämän topicin kysymys?

mistä tuo johtuu

hunajavohveli [09.11.2004 20:12:15]

#

Mistä johtuu mikä? Ei tuo sekaisin mene vaan ei edes käynnisty, ja johtuu siitä, että INKEY$ on funktio, jolle ei anneta parametreja, joten ota se (27) pois perästä.
Tarkoitit varmaan:

I$ = INKEY$
IF I$ = CHR$(27) THEN END

Ja käytä näitä kooditageja. Ne selitetään keskustelun ohjeissa, jotka on syytä lukea.

borri317 [09.11.2004 21:54:06]

#

mulla tuo toimi ainaki

Vastaus

Aihe on jo aika vanha, joten et voi enää vastata siihen.

Tietoa sivustosta