1Wire Temperaturmessung für PI-Regelung

[Bonze]

ja, aber das problem ist ich hab 2versch, 1wire sensoren,. deshalb kann mans zwar abändern bringt aber eigentlich nix,.

muss dann sprüunge verwenden , 2 stück, wird hoffentlich nich so viel ausmachen,.

 

[Bonze]

so habs mal so überlegt, ich denk das ist ok,.

   Do                                                       'Beginn Der Hauptschleife
      Enable Timer1
      Start Timer1
      Gosub Sensor1
         If Scratch(9) <> Crc8(scratch(1) , 8) Then
            Gosub Sensor1
            Fversuch1 = Fversuch1 + 1
            Print "Sensor 1 neuer Versuch;"
            If Fversuch1 = 2 Then
               Change1 = 255
            End If
         Else
            Fversuch1 = 0
            Piregel1 = Piregler(ist_temp1 , Change1)              'funktion regler aufrufen
            Change1 = Piregel1                                    'in typ word wandeln
            Compare1b = Change1                                   'Gehäuselküfter 'weisst compare1a den wert von Change zu
         End If
      Gosub Sensor2
         If Scratch(9) <> Crc8(scratch(1) , 8) Then
            Gosub Sensor2
            Fversuch2 = Fversuch2 + 1
            Print "Sensor 2 neuer Versuch;"
            If Fversuch2 = 2 Then
               Change2 = 255
            End If
         Else
            Fversuch2 = 0
            Piregel2 = Piregler(ist_temp2 , Change2)              'funktion regler aufrufen
            Change2 = Piregel2                                    'in typ word wandeln
            Compare1a = Change2                             'Gehäuselküfter 'weisst compare1a den wert von Change zu
         End If

funzt leider nich so , wie ich will

wasn scheiss da passiert gar n ix mehr, keine print ausgabe,.