GOTO Variable ?

Für Fragen bezüglich QBasic (programmieren, Suche nach Programmen etc.) gibt es dieses Forum.

Moderator:Administrator

Locked
MasterHero
GOTO Variable ?

Post by MasterHero » Sun Jan 22, 2006 6:13 pm

Hallo.
Ich schreibe grade ein Textadventure/RPG.

hier ein auszug aus dem code:

Code: Select all

REM (...)

GOTO 40

35'Inventar
?
? "Du besitzt";g%; " Goldstuecke und in deinem Rucksack befinden"
? "sich folgende Gegenstaende :"
?
SLEEP
GOTO wo%

40 'In deinem Haus[Hier beginnt das eigentliche Spiel]
CLS
41
Let wo%=41
?       "Du befindest dich jetzt in dem alten Holzhaus, in dem du lebst."

INPUT "Was willst du nun tun "; ent$
IF ent$="i" THEN GOTO 35
...
...
SLEEP
und mein problem ist folgendes: wie kann ich von jedem "raum" das program zum inventar sprigen lassen und zum SELBEN raum zurück. Das GOTO variable funktioniert ja nicht....gibt es eine möglichkeit diese option einzubauen ?

(Anstatt Goto wo% kann ich ja nicht GOTO 41 schreiben weil er ja dann immer wieder zum selben raum springen würde. Es muss ja individuell sein !! Wenn ich das inventar in raum 55 aufraufe will ich ja nicht zu raum 41 zurück )

User avatar
crossroads
Administrator
Posts:34
Joined:Wed Feb 13, 2002 10:15 pm
Location:Germany
Contact:

Re: GOTO Variable ?

Post by crossroads » Sun Jan 29, 2006 10:14 pm

Mit GOSUB / RETURN sollte es funktionieren:

Code: Select all

GOTO 40

35'Inventar
?
? "Du besitzt";g%; " Goldstuecke und in deinem Rucksack befinden"
? "sich folgende Gegenstaende :"
?
SLEEP
RETURN

40 'In deinem Haus[Hier beginnt das eigentliche Spiel]
CLS
41
? "Du befindest dich jetzt in dem alten Holzhaus, in dem du lebst."

INPUT "Was willst du nun tun "; ent$
IF ent$="i" THEN 
  GOSUB 35
  GOTO 41
End IF
...
...
SLEEP
crossroads (QBCafe Forum Admin)

Locked