Rechnen

Zuviel Werbung?
-> Hier kostenlos registrieren
Wie ist folgender Lösungsvorschlag?

Code:
      L     #VolumenAlt                 // Gespeicherter Wert aus SPS
      L     #Volumen                    // Wert von TS
      <>R                               // Werte unterschiedlich?
      =     #VolumenIstNeu              // Bit zur Berechnung mit neuem Volumenwert
      SPBN  m001                        // Keine Änderung? Dann weiter. Sonst...
      T     #VolumenAlt                 // Neuen Wert in SPS speichern
m001: L     #GewichtAlt                 // Gespeicherter Wert aus SPS
      L     #Gewicht                    // Wert von TS
      <>R                               // Werte unterschiedlich?
      =     #GewichtIstNeu              // Bit zur Berechnung mit neuem Volumenwert
      SPBN  m002                        // Keine Änderung? Dann weiter. Sonst...
      T     #GewichtAlt                 // Neuen Wert in SPS speichern
m002: L     #DichteAlt                  // Gespeicherter Wert aus SPS
      L     #Dichte                     // Wert von TS
      <>R                               // Werte unterschiedlich?
      =     #DichteIstNeu               // Bit zur Berechnung mit neuem Volumenwert
      SPBN  m003                        // Keine Änderung? Dann weiter. Sonst...
      T     #DichteAlt                  // Neuen Wert in SPS speichern
m003: L     #DruckAlt                   // Gespeicherter Wert aus SPS
      L     #Druck                      // Wert von TS
      <>R                               // Werte unterschiedlich?
      =     #DruckIstNeu                // Bit zur Berechnung mit neuem Volumenwert
      SPBN  m004                        // Keine Änderung? Dann weiter. Sonst...
      T     #DruckAlt                   // Neuen Wert in SPS speichern
m004: UN    #VolumenIstNeu              // Kein neuer Volumenwert?
      SPB   m005                        // Dann weiter. Sonst...
      ...                               // Werte berechnen 
      BEA                               // Programmende   
m005: UN    #GewichtIstNeu              // Kein neuer Gewichtswert?
      SPB   m006                        // Dann weiter. Sonst...
      ...                               // Werte berechnen 
      BEA                               // Programmende   
m006: UN    #DichteIstNeu               // Kein neuer Dichtewert?
      SPB   m007                        // Dann weiter. Sonst...
      ...                               // Werte berechnen 
      BEA                               // Programmende   
m007: UN    #DichteIstNeu               // Kein neuer Druckwert?
      BEB                               // Dann Ende. Sonst...
      ...                               // Werte berechnen 
      BEA                               // Programmende
 
Zurück
Oben