Keskustelu: Ohjelmointikysymykset: QB: Tekstiseikkailu

Miten teen tekstiseikkailupelin? siis mä oon tehny alun mutta miten siitä voi jatkaa. esim. ekax tulee et kirjoita nimesi jne. sit tulee et mitä pitää tehdä ja sitten tulee valikko esim.
olet kotona. minne menet? 1)keittiöön 2)vessaan jne,
sit tulee vastaukset ku painaa 1,2,3 tai jotain mut miten mä pystyn jatkamaan siitä. miten pystyy palaamaan takaisin ekaan valikkoon tai tekemään uuden valikon??? auttakaa tyhmää aloittelijaa!??

Tämä voisi auttaa alkuun: https://www.ohjelmointiputka.net/keskustelu/haku.php?sana=tekstiseikkailu&alue=5&jasen=0

Voisitko laittaa sen tekstiseikkailun koodin tänne niin voin kattoo miten sitä pitäis jatkaa .

DIM valinta AS STRING * 1

CLS
PLAY "a16b16c16d16b16f16d16"
SLEEP 2
PRINT "M"
COLOR a, 4
SLEEP 1
COLOR a, 9
PRINT "o"
COLOR a, 1
SLEEP 1
COLOR a, 6
PRINT "r"
COLOR a, 6
SLEEP 1
COLOR a, 3
PRINT "j"
COLOR a, 2
SLEEP 1
COLOR a, 7
PRINT "e"
SLEEP 1
COLOR a, 5
PRINT "n"
SLEEP 1
COLOR a, 6
PRINT "s"
SLEEP 2
PRINT

CLS
COLOR a, 2
PRINT "Käytä pilkkua nimien eroittamiseen!"
INPUT "Kirjoita etu- ja sukunimesi: ", Etunimi$, Sukunimi$
PRINT "Terveppä terve " + Etunimi$ + "! (Sukua " + Sukunimi$ + ")"
SLEEP 3
CLS
PRINT "Olet Konstaapeli piippu ja tehtävänäsi on selvittää minne katosivat"
PRINT "kuuluisat Maskulaiset taiteilijat Olga ja Matti mäkinen."
PLAY "cdedccc8"
SLEEP 4

CLS
COLOR a, 3
PRINT "Olet Maskun keskustassa."
PRINT "Mistä aloitat johtolankojen etsimisen?"
PRINT " 1)Brankkarilta"
PRINT " 2)Esson pihalta"
PRINT " 3)Maskutalolta"
PRINT " 4)Keskustasta(jossa muuten olet tälläkin hetkellä!)"
INPUT " valinta> ", valinta
CLS
IF valinta = "1" THEN
PRINT "Et löytänyt mitään"
ELSEIF valinta = "2" THEN
PRINT "Löysit vanhan tupakan ja kiviä. vau."
ELSEIF valinta = "3" THEN
PRINT " Löysit kaksi poikaa pelaamassa futista."
ELSEIF valinta = "4" THEN
PRINT "löysit puukon jossa on verta. edistystä"

END IF

END

Mä tiedän että noita coloreja on ihan liian paljon mut nyt pitäis saada tietää et miten tosta jutusta pääsee jatkamaan että esim. Löysit puukon jossa on verta. edistystä. Minne seuraavaksi?
ja sit tulis uutta valikkoa. Mä oon ohjelmoinu vast 2 päivää et toi on ihan vaan kokeilua ja oikeastaan suoraan kopioitua. idea on oma ja jotain muutakin omaa siinä on.

theniin pistätä GOTO frame
ja ettei tuu nyt uutta kysymystä niin kerrottakoon että tuo frame voi olla mikä vaan.
ja sit pistätä perään:

frame:
PRINT "Löysit puukon"
PRINT " 1)Tapa ittes"
PRINT " 2)Mene vessaan"
PRINT " 3)Opetelle koodaan"
...

kas kun topic ei ole "texti seikkailu"

hmm..minäkin ajattelin tehdä tekstiseikkailupelin mut se ei ollu kivaa ni ruppeen nyt puurtaan hotellimanageripelin kimpussa! ;D
ja ei millään tarkoituksella, noobien haukkuminen on tyhmää.... :O

Hyvä juttu. pistäs sitten osoitetta tänne et mistä sen hotellimanagerin sit joskus saa. Pitää heti kokeilla ;)

joops. muute, tuli mielee ja herätti mielenkiinnostusta toi komento:
PLAY "a16b16c16d16b16f16d16"
onko se joku et piipparist kuuluu tollane pimputus? ja muuten, varmasti pistän sitten linkkiä kehiin kun aikaisinkin alphaversio on levityksessä! ;)

kyllä. ja noi 16 tsydeemit on niitä et ne soi kuudestoistaosa nuotteina!!