liberty basic noob-problem

hier das script :

NOMAINWIN

WindowWidth = 600
WindowHeight = 600
UpperLeftX = 100
UpperLeftY = 100

MENU #haupt, &Datei, Speichern, [save], Laden, [load]

GROUPBOX #haupt.wohn, Angaben zur Person, 10, 10, 235, 125
RADIOBUTTON #haupt.herr, Herr, [herr], [nichts], 25, 25, 50, 25
RADIOBUTTON #haupt.frau, Frau, [frau], [nichts], 75, 25, 50, 25
TEXTBOX #haupt.name, 25, 50, 200, 25
beruf$(0) = Schüler
beruf$(1) = Azubi
beruf$(2) = Student
beruf$(3) = Geselle
beruf$(4) = Meister
COMBOBOX #haupt.beruf, beruf$(), [beruf], 25, 100, 200, 25
GROUPBOX #haupt.wohn, Angaben zum Wohnort, 285, 10, 235, 100
STATICTEXT #haupt.orth, , 300, 25, 200, 25
orte$(0) = Haisterkirch
orte$(1) = Bad Waldsee
orte$(2) = Osterhofen
orte$(3) = Hittelkofen
orte$(4) = Molpertshaus
LISTBOX #haupt.Wohnort, orte$(), [wohnort], 300, 50, 200, 25
CHECKBOX #haupt.eigenheim, Eigenheim, [eigenheim], [nichts], 300, 75, 200, 25
OPEN Skript FOR Window AS #haupt
PRINT #haupt, trapclose [quit]
PRINT #haupt.name, Name
WAIT


[wohnort]
PRINT #haupt.Wohnort, selection?
INPUT #haupt.Wohnort, wohnort$
NOTICE Sie wohnen in + wohnort$
WAIT
[nichts]
WAIT
[herr]
WAIT
[frau]
WAIT
[beruf]
WAIT
[eigenheim]
WAIT
[save]
FILEDIALOG Wählen sie den Namen der Datei und den Speicherort aus, *.dat, dateiname$
OPEN dateiname$ FOR RANDOM AS #daten LEN = 16
FIELD #daten, 1 AS herr, 15 AS name$
INPUT #haupt.name, name$
PRINT #haupt.herr, value?
INPUT #haupt.herr, herr$
IF (herr$ = set) THEN
herr = 1
ELSE
IF (herr$ = reset) THEN
herr = 0
END IF
PUT #daten, 1
CLOSE #daten
WAIT
[load]
FILEDIALOG Wählen sie den Namen der Datei und den Speicherort aus, *.dat, dateiname$
OPEN dateiname$ FOR RANDOM AS #daten LEN = 16
FIELD #daten, 1 AS herr, 15 AS name$
GET #daten, 1
IF (herr = 1) THEN
PRINT #haupt.herr, set
ELSE
IF (herr = 0) THEN
PRINT #haupt.frau, set
END IF
PRINT #haupt.name, name$
CLOSE #daten
WAIT
[quit]
CONFIRM Sind sie sicher?; answer$
IF answer$ = no THEN WAIT
CLOSE #haupt
END

das prob is : Es kommt immer, ich soll CLOSE befehle adden, aber da sind doch welche drin -.-.
außerdem kommt : branch label not found : endIF0.
Das kommt immer wenn ich speicher will


Bitte keine blöden comments ich bin erst 15 und am anfang meiner karriere