#include "crt.bi"
#include "vbcompat.bi"
#define ArgC ((*__p___argc())-1)
#undef GoTo 'Jojo hat Recht, danke ;-))
#ifndef False
	Const False=0, True=Not False
#endif

'+-----------------------------------------------------------------------------------+
'|    Header: Bestimmen der Übergabeparameter                                        |
'|    AnzeigeCheck:|Il1 sind:Alt-0124, Großes i, kleines L, Eins „ä”ö�üáߎę֚Üñ±ø°¸©|
Const Autor="_neu.Bas v0.99 ¸2012 by ytwinky, MD"'                                   |
'|           (Tastenkombination: keine)                                              |
'|    Zweck : Umrechner für die verschiedenen Zahlensystem die FreeBASIC beherrscht  |
'|    Getestet mit dem aktuellen fbc und FBEdit                                      |
'+-----------------------------------------------------------------------------------+
'(Anmerkung zu den Sonderzeichen: zuerst steht das DOS-Zeichen, danach das Windowszeichen)
Const CrLf=!"\r\n", Esc=!"\27", Pi=Atan2(0, -1), Rho=50.0/Atn(1.0), RhoD=45.0/Atn(1.0)
Screen 0:Width 90, 30
Print Autor
Print "ArgC=" &ArgC
Print "False=" &False
Print "True=" &True
Print "Eniki..";
GetKey 'ist besser als Sleep, denn es löscht den Tastaturpuffer^^

End