Buchempfehlung
Windows-Programmierung. Das Entwicklerhandbuch zur WIN32-API
Windows-Programmierung. Das Entwicklerhandbuch zur WIN32-API
"Der" Petzold, das über 1000 Seiten starke Standardwerk zum Win32-API - besonders nützlich u. a. bei der GUI-Programmierung in FreeBASIC! [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

test_yetlib.bas

Uploader:RedakteurVolta
Datum/Zeit:25.05.2009 16:30:12

'mit fbc -s console "test_yetlib.bas" "Starten"

'= , = , = ; = , =, = , = ,= , =
#include once "yetlib.bi"

Const Esc=!"\27"
Dim As String y="Hallo Welt"
PrintAt(y, 2, 7)
Print y
PrintAt("Normal",, 1)
Print Deg2Rad(45.0)
Print Rad2Deg(Deg2Rad(45.0))
PrintAt("Men:", 14, 10, 40)
Print MenuChar("Norden")
Print MenuChar("Sden")
Print MenuChar("Osten")
Print MenuChar("Westen")
Print MenuChar("Wohin mchtest du gehen(Standard:Osten)", 34);
Do
  y=GetKeyPress("", "NSOW" &Esc)
Loop Until InStr("NSOW" &Esc, y)
Print y
Print "Eniki..";
Sleep