Hi!
während du zb. im automatikbetrieb bist würde ich eine abfrage zur betriebsmodeumschaltung einbauen(define bm port[12])

die gosub Befehl wird bei basic++ nicht mehr unterstützt!

und wenn es geht vermeide goto befehle(bessere übersichtlichkeit)
also:


Code:
' --- Definitionen ---

' die Relais
define Hp port[7]
define Mv port[8]
define Kp port[9]

' der Drucksensor
define Ds port[1]

' der Anenometer
define Am ad[5]

' die Folien-Funktionstasten
define F1 port[9]
define F2 port[10]
define F3 port[11]
define FTaste byte 
define bm port[12] 'Taster für betriebsmoduswechsel

FUNCTION Automatisch()
PRINT "Automatikbetrieb"
'Deine Programmzeilen für die automatische Regelung
loop until bm = 1 'Solange durchlaufen bis der betriebsmode taster gedrückt wird
END FUNCTION

FUNCTION Halbautomatisch()
PRINT "Halbautomatikbetrieb"
'Deine Programmzeilen für die halbautomatische Regelung
loop until bm = 1 'Solange durchlaufen bis der betriebsmode taster gedrückt wird
END FUNCTION

FUNCTION Manuel()
do
PRINT "Manuel"
'Deine Programmzeilen für die Manuele Regelung
loop until bm = 1 'Solange durchlaufen bis der betriebsmode taster gedrückt wird
END FUNCTION

if FTaste = 1 then Automatisch()
if FTaste = 2 then Halbautomatisch()
if FTaste = 3 then Manuel ()
aber sonst schauts nicht schlecht aus denke ich