LABEL STARTUP

ANSI( "me" )

HEADBLOCK( " BOERSE ", " Alle Angaben ohne Gewaehr! " )
SAY()

SELECT 
	LAB0, "Ausgewaehlte Aktien Indizes"
	SAY()
	LAB1, "Waehrungen" 
	SAY()
	LAB2, "Edelmetalle"
	SAY()
	LAB3, "Beenden"
	SAY() 
	SAY()
	ANSI( "us" )
ENDSELECT( "Und wofuer entscheiden wir uns? " ) 


LABEL LAB0
	ANSI( "me" );
	HEADBLOCK( " Aktien Indizes ", "Index                   Notierung " )
	FILE( "/tmp/stock" )
	SAY()
	ANSI( "us" )
	SAY( "Alle Angaben in US Dollar!" ) 
	ANSI( "me" ) 
	WAITKEY()
GOTO STARTUP


LABEL LAB1
	ANSI( "me" );
	HEADBLOCK( " Waehrungen Weltweit ", "Waehrung               Ankauf  Verkauf " )
	FILE( "/tmp/cur3" )
	SAY()
	ANSI( "us" )
	SAY( "Die Werte geben am, wieviel man fuer einen US Dollar bekommt!" )
	ANSI("me" )
	WAITKEY()
GOTO STARTUP

LABEL LAB2
	ANSI( "me" );
	HEADBLOCK( " Edelmetall ",          "Metall                 Ankauf   Verkauf " )
	FILE( "/tmp/cur4" )
	SAY()
	ANSI( "us" )
	SAY( "Alle Angaben pro Feinunze und in US Dollar!" )
	ANSI( "me" ) 
	WAITKEY()
GOTO STARTUP

LABEL LAB3
SAY()

