Buchempfehlung
MySQL kurz & gut
MySQL kurz & gut
Das preiswerte Taschen- buch stellt MySQL-rele- vante Inhalte systematisch und knapp dar, sodass es sich optimal zum Nach- schlagen beim Pro- grammieren eignet. [Mehr Infos...]
FreeBASIC-Chat
Es sind Benutzer im FreeBASIC-Chat online.
(Stand:  )
FreeBASIC bei Twitter
Twitter FreeBASIC-Nachrichten jetzt auch über Twitter erhalten. Follow us!

fb:porticula NoPaste

Info
Info / Hilfe
Liste
Übersicht / Liste
Neu
Datei hochladen
Suche
Quellcode suchen
Download
Dateidownload

jetz aba

Uploader:Redakteurytwinky
Datum/Zeit:06.01.2008 19:48:29

Cls
Color 4
Screen 18,32
Bload "TITEL.bmp"
Sleep 5000
Print "Drcke ENTER, um das Spiel zu starten!"
Sleep
Screen 18,32
Bload "Level1Logo.bmp"
Sleep 2000
Cls
Locate 12, 6
Print "Errate die L”sung und gib sie in das dafr vorhergesehene Feld ein!"
Sleep 6000
Cls
Dim loesungl1 as String
Screen 18,32
Bload "Level1.bmp"
While Inkey <> "": Wend
Input "L”sung  :", loesungl1
Select Case lcase(loesungl1)
    Case "keiner"
        BLoad "richtig.bmp"
    While Inkey <> "": Wend
    Case Else
        BLoad "falsch.bmp"
    Sleep
    End
End Select
Sleep