Unterprogramme

ich habe 5 var muss sie erst bestimmern welche ich gerade bearbeite und dann den neuen wert hineinspeichern

wie kann ich 2 var vergleichen und unterschiede von +-5 eingeben also der soll sagen var 1 und 2 sind gleich auch wenn die +-5 abweichung haben also ~

Du machst eine If-Abfrage mit deinen Grenzen als Bedingung.
Sprich
Ergebnis = var1 - var 2
If Ergebnis > 5 Then
Print "Variable 1 ist um mehr als 5 größer als Variable 2"
elseif Ergebnis < -5
Print "Variable 2 ist um 5 größer als Variable 1"
else
Print "Variable 1 und 2 sind beinahe gleich"
End if

Ist ungetestet aber es soll nur das Prinzip verdeutlichen.

nein ohne print ich muss nur den port auf 1 setzten wenn die um min +-5 gleich sind p1 und o2 werden über getadc ermittelt

Das Print war auch nur ein Beispiel. Statt Print kannst du da jeden anderen Befehl reinsetzen......