PureBoard

Verfasst: **05.04.2007 13:07**

Viele kennen bestimmt die Magischen kugel die man eine Frage stehlt, dann die kugel schüttelt und sie in einem Fensterchen die Antwort anzeigt in form von Ja, Nein u.s.w.
Und da ich schon immer sowas aus Interesse mal haben wollte, dachte ich mir, das ich es einfach Programmiere.

Und weil der Code Ziemlich klein ist, Poste ich ihn hier einfach rein

Code: Alles auswählen

OpenConsole()
  Wiederholung:
  PrintN("Stelle deine Frage die nur mit Ja oder Nein")
  PrintN("beantwortet werden kann und druecke ENTER")
  Input()
  Zufall=Random(4)
  Select Zufall
    Case 0
      PrintN("")
      PrintN("Ja")
    Case 1
      PrintN("")
      PrintN("Nein")
    Case 2
      PrintN("")
      PrintN("Vielleicht")
    Case 3
      PrintN("")
      PrintN("Versuchs nochmal!")
    Case 4
      PrintN("")
      PrintN("Das kann ich dir nicht sagen")
  EndSelect
  Delay(2000)
  ClearConsole()
  Goto Wiederholung
CloseConsole()

Verfasst: **05.04.2007 13:09**

3DKante hat geschrieben:
Code: Alles auswählen
PrintN("Fileicht")

so ein kleiner Code und schon einen Bug gefunden

Grüße ... Kiffi

Verfasst: **05.04.2007 13:14**

Ich muss wohl besser auf meine Rechtschreibung achten.
Vor allem wen ich ein Code anzeige

Verfasst: **05.04.2007 13:15**

So und gleich ein Folgefehler:

Code: Alles auswählen

   PrintN("Vielleicht)

Richtig ist:

Code: Alles auswählen

   PrintN("Vielleicht")

PureBoard

Art Magic Ball

Art Magic Ball

Re: Art Magic Ball