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

Bildgame version 2

Uploader:MitgliedBull-T07
Datum/Zeit:05.01.2008 21:56:27

Dim schauen as string
Screen 18,32
Bload "Front.bmp"
Input "willst du nach (rechts) oder nach (links) schauen?", schauen
Select Case LCASE(schauen)
Case "rechts": Bload "rsite.bmp"
Case "links": Bload "lsite.bmp"
Case Else: Print "Du hast Unsinn eingegeben!"
End Select
Sleep 2000
CLS
Dim schauen2 as string
Screen 18, 32
Bload "Front.bmp"
Input "willst du nach (oben) oder nach (unten) schauen?", schauen2
Select Case LCASE(schauen)
Case "oben": Bload "oben.bmp"
Case "unten": Bload "unten.bmp"
Case Else: Print "Du hast Unsinn eingegeben!"
End Select
sleep