Keskustelu: Ohjelmointikysymykset: QB: taas onkelmaa

noni no nyt tossa ohjelmoidessa tuli tommone ongelma jota en saanu ratkastuu ku koodi oli

CLS
FOR i = 1 TO 100
LOCATE 5, 5
COLOR 2
PRINT i; "% valmiina"
FOR k = 1 TO 40000
NEXT k
NEXT i

nii haulisin tohon sillai että kun painaa tossa "asennuksen" aikana vaikka A näppiä se menee vaikka kohtaan kikkeli onko se edes mahdollista

INKEY$-muuttujasta löytyy viimeksi painettu näppäin, tässä tapauksessa "A" tai CHR$(65). Laita for-loopin loppuun ehtolause, joka tarkastaa, onko nappia painettu ja siirtyy sitten toiseen kohtaan.

Katso myös: https://www.ohjelmointiputka.net/oppaat/opas.php?tunnus=napk

empä osaa semmosta tehä miten ser menee IF INKEYs = chrs (68) then goto moi EI TOIMI noi S on niitä dollareita

ja minne se pitää ees laittaa

JES kylmä osasinkii se oli a EI A huomasin just että isoilla ja pienillä on eroja teun sen if inekys = "a" then goto kikkeli

no mites sitte sais sillai että pitää kirjottaa joku esim kun kirjottaa abu nii sitte se menee kohtaa pippeli

Yritä nyt vähän kysyä asiallisemmin, moni ei tuollaisiin viitsi vastata, jos nyt edes ymmärtää mitä kysyit. Saat varmasti parempaa tekstiä aikaan jos haluat, tai sitten on aihetta äidinkielen tukiopetukseen.

Jos haluaa saada komentoja selville, kannattaa imuroida tuo QbasicFin ja katsoa sen Manuaalia...

Mä en kyllä nyt ymmärtänyt mitään sun näistä viesteistä *FLD*, luin ne, mutta tekstin epäselvyyden myötämielisellä avustuksella keskittymiskyky viestiesi lukemiseen tippui nollaan. Ärh. Pikkuhiljaa alkaa *FLD* mennä mulla kokonaan ignoreen.

lainaus:

noi S on niitä dollareita

Dollari ($) merkin saat suomenkielisellä näppäimistöllä painamalla AltGr + 4 näppäinyhdistelmää ;)

lainaus:

no mites sitte sais sillai että pitää kirjottaa joku esim kun kirjottaa abu nii sitte se menee kohtaa pippeli

Menee hieman vaikeammaksi tällöin. Sinun pitää jotenkin ottaa painettuja näppäimiä muistiin ja kun kolmen peräkkäisen näppäimen sarja on "abu" niin sitten hyppäät sillä GOTO:lla tiettyyn kohtaan.

PS. GOTO:a ei vain kannattaisi edes opetella käyttämään - se tekee ohjelmakoodista vaikeaselkoisen ja sekavan.

lainaus:

PS. GOTO:a ei vain kannattaisi edes opetella käyttämään - se tekee ohjelmakoodista vaikeaselkoisen ja sekavan.

Voi olla, mutta mua se on kyllä helpottanut joissain tilanteissa huomattavasti, ja ainiin, mitä olisi nämä qb tekstiseikkailut ilman gotoa ;)

lainaus:

no mites sitte sais sillai että pitää kirjottaa joku esim kun kirjottaa abu nii sitte se menee kohtaa pippeli

Näin:

input "kirjota jotain", muuttuja$
if muuttuja$="abu" then goto pippeli

joo-o, ja jos haluaa että se hyväksy myös isolla kirjoitetun voi tehdä näin.

INPUT "Anna vastauksesi "; muuttuja$
IF UCASE$(muuttuja$) = "ABU" THEN GOTO pippeli

lainaus:

Voi olla, mutta mua se on kyllä helpottanut joissain tilanteissa huomattavasti, ja ainiin, mitä olisi nämä qb tekstiseikkailut ilman gotoa ;)

Helpostihan tekstiseikkailu syntyy ilman gotoa ;)
vaikka näin:

PRINT "Olet kotona, mitä teet? 1. Kuole. 2. Lähde ulos"
INPUT a
IF a = 1 THEN
  PRINT " You died! ": END
ELSE IF a = 2 THEN
  PRINT "Olet nyt ulkona..."
  ' jne.

Javastahan puuttuu GOTO kokonaan, ja jos sitä käyttää paljon, ohjelman debuggaaminen on aika tuskaista.