Das deutsche QBasic- und FreeBASIC-Forum

[ninis]

Hallo,
Ich bin 12 Jahre alt. Ich habe vor einer Woche mit dem programmieren angefangen. Ich kenne mich noch sehr wenig aus.
Ich möchte ein kleines Programm, das "spiel wer wird millionär" nur in Buchstaben. Nur bleibe ich schon sehr früh hängen.
Hier ist das Programm:


dim bal as integer
Print "Wilkommen bei wer wird Milionär! Wenn sie mit dem Spiel beginnen möchten drücken sie auf enter. Um das programm zu beenden drücken sie Esc"
sleep
cls
Print "Frage 1: Peter Kreuder komponierte 1936 den Schlager, Ich wollt' ich wär' ein ...?"
sleep
Print "A: Hund"
sleep
print "B: Huhn"
sleep
print "C: Hummer"
sleep
print "D: Huflattich"
sleep
Print "Ihre Antwort:",bal
sleep
select case bal
case a,b,d
Print "Sie haben Verloren"
sleep 4000
CASE c
Print "Herzlichen Glückwunsch! 100 Euro"
sleep
End selelect



Wenn man als Antwort c eingibt (sollte die richtige sein), kommt "sie haben Verloren" und dann wird das programm nach 4 sek. beendet. Doch ich will, dass das hier kommt, wenn man c eingibt:
"Herzlichen Glückwunsch! 100 Euro"
Ich glaube das liegt an dem "sleep 4000". Aber ich sag dem Programm doch, dass es nur "sleep 4000" ausführen soll wenn man a,b oder d eingibt.
(Wenn man die sleep-Befele weglässt, wird das programm sofort beendet.)
Was muss ich vorgehen ?
Ich würde mich sehr über Eure Antworten freuen.
Danke,

[MOD]

Zur Eingabe brauchst du Input und nicht Print und es muss eine Stringvariable sein.

So gehts:

[ninis]

tut trotzdem nicht

[ninis]

und wenn man die sleeps weglässt wird dass Programm beendet

[ninis]

trotzdem danke

[tim.vogt]

Mach doch bitte mal das Sleep nach dem Input weg, dann sollte es klappen.

Edit:Ok, das falsche Sleep..
_________________
"Nichts ist wahrhaftig und alles ist erlaubt."

[Sebastian]

Hallo,

das eigentliche Problem dürfte das SLEEP vor dem INPUT sein. Wenn man nämlich die Eingabetaste drückt, um die letzte Zeile ("D: Huflattich") angezeigt zu bekommen, dauert der Tastendruck in der Regel lange genug, um auch noch beim INPUT als "Datenfreigabe" zu wirken, ehe überhaupt etwas eingegeben wurde.
Wenn man tatsächlich die ganzen SLEEPs haben möchte, die die Textausgabe künstlich "bremsen", müsste man vor die INPUT-Anweisung Folgendes schreiben:

[MOD]

Du musst deine Probleme genauer beschreiben. Ehrlich gesagt verstehe ich nicht, wie bei deinem Programm irgendwas rauskommen konnte, bei mir hat der Compiler gleich wegen den falschen Datentypen gemeckert und ohne Input würde es auch nicht gehen.

Die Sleeps ohne jegliche Zahlen dahinter sind dazu da, das Programm kurz zu stoppen. Wenn du also erst nach einem Tastendruck weitermachen willst, dann eignet sich Sleep, auch wenn es den Tastaturpuffer nicht leert.

tim hat natürlich recht, dass auf das Sleep nach Input verzichtet werden kann, da Input ja eh auf Eingabe wartet.

Das Programm an sich funktioniert aber, wenn man "c" eingibt, kommt das, was du haben willst.

[dreael]

Da hat es gemäss diesem Artikel wieder einmal viel Verbesserungspotenzial drin.

Die wichtigste Grundbasis für dieses Projekt: Datenbank mit den Fragen! Für diesen Fall empfehlenswert: Textdatei (z.B. FRAGEN.TXT => im NOTEPAD.EXE von Windows erstellt) mit einem einfachen Format wie

[nemored]

Zunächst mal willkommen an Board!

ähhm ... ich kenne ja nur das Arrangement von den Comedian Harmonists, aber bist du sicher, dass es im Original "Ich wollt' ich wär' ein Hummer" heißt? Das wäre nämlich Antwort C ...

Die erste PRINT-Ausgabe sagt, man könne mit ESC das Programm beenden. Dazu ein Vorschlag: