DECLARE SUB ZeigeText () 'Lokale Variablen COLOR , 1 CLS Text$ = "Tschá!" ZeigeText COLOR 15 PRINT "Wir befinden uns im Hauptprogramm. Der Inhalt von Text$ ist: "; COLOR 14 PRINT Text$ SUB ZeigeText Text$ = "Hallo!" COLOR 15 PRINT "Wir befinden uns in der SUB ZeigeText. Der Inhalt von Text$ ist: "; COLOR 14 PRINT Text$ END SUB