Unterprogramm frage

[Jodi (Gast)]

Hallo,

habe noch ein kleines Problem bezüglich unterprogramme in Bascom. Ich 
habe ein Hauptprogramm, darin mit $include die Datei Unterprogramm.bas 
eingebunden. Das Unterprogramm sieht folgendermaßen aus:

Unterprogramm:
Declare Sub UP(argumente)
Goto Überspringe_Unterprogramm
Sub UP(argumente)
...
End Sub
Überspringe_Unterprogramm:

Nun meine Frage, wenn ich in der Datei Unterprogramm.bas nun mehrere 
Subs unterbringen möchte, (z.B. noch ein Sub DOWN(argumente) und ein 
Function Calc(argumente)) wie bringe ich das in die Datei 
Unterprogramm.bas?

Danke im Voraus für eure Hilfe.

Gruß Jodi

[Achim M. (minifloat)]

Ich hab von Bascom nciht allzuviel Ahnung.
Vermutung:

Declare Sub UP(argumente_up)
Declare Sub DOWN(argumente_down)

Goto Überspringe_Unterprogramm

Sub UP(argumente_up)
...
End Sub

Sub DOWN(argumente_down)
...
End Sub

Überspringe_Unterprogramm:

mfg mf

[Jodi (Gast)]

Danke! werde es mal so ausprobieren.