Keskustelu: Ohjelmointikysymykset: QB: INPUT ja IF-lauseet ongelmana

Eli haluaisin tehdä pienen ohjelman, mutta siinä on muutama ongelma. Eli

CLS
f$ = elukko
s$ = kana

PRINT "Press f if you are fool and if you are smart then press s"
INPUT ; "f/s: ", A$

CLS
IF f = f THEN
  PRINT "Need code to end program!"
  INPUT "Print code here: ", f$
ELSEIF f$ = "elukko" THEN
END IF
END

IF m = m THEN
  PRINT "Need code to end program!"
  INPUT "Print code here: ", s$
ELSEIF s$ = "kana" THEN
END IF
END

Eli ohjelman pitäisi kysyä tuon "Press f if you are fool and if you are smart then press s" ja tulla "Need code to end program!" ja "Print code here: " tämän se tekeekin, mutta tuohon pystyy vastaamaan mitä vain niin se heittää nuo "Need code to end program!" ja "Print code here: "mutta haluaisin,
että siihen pystyy vain vastaamaan f tai s ja tuohon koodi juttussa on sama juttu eli miten tälläisen pystyn korjaamaan?
PS: tuo "ohjelma" on tehty noin 5 aikaan aamulla joten se on niin ja näin.

(Mod. edit: opettelepa käyttämään kooditageja ja kirjoittamaan parempia otsikoita. Ohjeet.)

Minun silmään ainakin osuivat nämä kohdat:

IF f=f THEN...

Tässä kohdassa oleva muuttuja "f" ei liity millään lailla hakemiisi näppäimien painalluksiin. Hakemasi tietyn näppäimen painalluksen odottaminen tapahtuu muuttamalla kyseinen kohta näin:

IF A$="f" then...

..Ja tämän kohdan muutat vastaavasti...

IF m=m THEN...

...näin:

If A$="s" then...

Ja ohjelman pitäisi toimia huomattavasti paremmin...

Näin tähän loppuun suosittelisin lukemaan jonkin tutoriaalin liittyen input-käskyn käyttöön. Ainakin tämän koodinpätkän perusteella. :)

EDIT: Toivottavasti annoin oikeaa tietoa, kun itsekin yön pikkutunteja vietän... :P

juuh kiitoksia. Itsekin spottasin juuri muutaman ajatus virheen :)
PS: tuonkin "ohjelman" tein parissa minuutissa ja tuokin tulisi olemaan ensimäinen "ohjelmani"

Hienoa, että jengi jaksaa vielä innostua QB:sta, mutta suosittelisin miettimään ongelmaa pari minuuttia kauemmin, ja ennen kuin painaa "Lähetä vastaus"-nappia, kattoo ongelman vielä kerran läpi ja miettii, sitten onko tarpeellistapainaa sitä nappia. Mut hyvä homma, jos selvisi. :)