Geschirrspüler

Diese Seite verwendet Cookies. Durch die Nutzung unserer Seite erklären Sie sich damit einverstanden, dass wir Cookies setzen. Weitere Informationen

Aufgrund technischer Veränderungen ist der Mailverkehr innerhalb des Forums (Private Nachrichten) nur noch eingeschränkt möglich. Die Einschränkung ist notwendig, um zusätzliche Betriebskosten für das Forum zu vermeiden. Näheres zu den Hintergründen im Thread "Aktuelles zum Forum".Wir bitten um Verständnis.

Hinweis kann nach Kenntnisnahme deaktiviert werden!

  • Geschirrspüler

    Die hier im folgenden veröffentlichte Ausführung an Geräten und Handhabung von Netzspannung kann lebensgefährlich sein und sollte keinesfalls als Bau- oder Handlungsanweisung verstanden werden!
    /admin bascomforum.de

    Bilder vom Projekt Geschirrspüler
    Dateien
  • Bilder vom Projekt Geschirrspüler
    Dateien
  • Quellcode

    1. 'Erste Geschirrspüler Steuerung
    2. $regfile = "m88pdef.dat"
    3. $crystal = 8000000
    4. $hwstack = 40
    5. $swstack = 16
    6. $framesize = 32
    7. Config Portd = Output ' 0 = An , 1 = Aus
    8. 'Ausgänge
    9. Wwmotor Alias Portd.6 ' Wasser Weiche Motor
    10. Heizung Alias Portd.5 ' Heizung als Taster
    11. Umwp Alias Portd.4 'Umwälzpumpe
    12. Laugp Alias Portd.3 'Laugenpumpe
    13. Zulaufv Alias Portd.2 'Zulaufventil
    14. Enthanlage Alias Portd.1 'Enthärtungsanlage
    15. Reiniger Alias Portd.0 'Reiniger
    16. Config Portb.2 = Output ' Led Ein
    17. Led_ein Alias Portb.2
    18. Config Portb.3 = Output
    19. Led1 Alias Portb.3
    20. Config Portb.4 = Output
    21. Led2 Alias Portb.4
    22. Config Portb.5 = Output
    23. Led3 Alias Portb.5
    24. 'Eingänge
    25. Config Pinb.6 = Input 'Druckschalter
    26. Druckschalter Alias Pinb.6
    27. Portb.6 = 1
    28. Config Pinb.7 = Input 'Wasserweiche Sensor
    29. Wwsensor Alias Pinb.7
    30. Portb.7 = 1
    31. Config Pinb.1 = Input 'Einschalter
    32. Taster Alias Pinb.1
    33. Portb.1 = 1
    34. Config Pinc.5 = Input 'Taster 2
    35. Taster2 Alias Pinc.5
    36. Portc.5 = 1
    37. Config Pinc.4 = Input 'Taster 3
    38. Taster3 Alias Pinc.4
    39. Portc.4 = 1
    40. Declare Sub Wassereinlauf()
    41. Declare Sub Wasserweiche()
    42. Declare Sub Reinigerk()
    43. Declare Sub Waschen()
    44. 'Enthanlage = 1
    45. Laugp = 1 'Laugenpumpe 10 Sekunden Einschalten
    46. Wait 20
    47. Laugp = 0
    48. 'Enthanlage = 0
    49. 'Config Portd.0 = Output
    50. 'Reiniger = 1
    51. 'Wait 33
    52. 'Reiniger = 0
    53. Dim I As Byte
    54. 'Dim Schritt As Byte
    55. 'Dim E As Bit
    56. Do
    57. Debounce , Taster , 0 , Einschalten , Sub
    58. Debounce , Taster2 , 0 , Hauptwaschen , Sub
    59. Debounce , Taster3 , 0 , Spuehlen , Sub
    60. If Led_ein = 1 Then Gosub Starten
    61. Loop
    62. End
    63. Einschalten: 'Einschalten
    64. Led_ein = 1
    65. Return
    66. '####################################
    67. Sub Wassereinlauf() 'Sub Wassereinlauf
    68. 'Zulaufv = 1
    69. Do
    70. If Druckschalter = 0 Then
    71. Zulaufv = 1
    72. Else
    73. Wait 5
    74. Zulaufv = 0
    75. End If
    76. 'If Druckschalter = 1 Then
    77. If Zulaufv = 0 Then
    78. 'Led1 = 1
    79. 'Wait 2
    80. Return
    81. End If
    82. Loop
    83. End Sub
    84. '#########################################
    85. Sub Wasserweiche() ' Wasserweiche
    86. Wwmotor = 1
    87. Do
    88. Loop Until Wwsensor = 0
    89. Wwmotor = 1
    90. Do
    91. Loop Until Wwsensor = 1
    92. Wwmotor = 0
    93. End Sub
    94. '#############################################
    95. Sub Reinigerk()
    96. Reiniger = 1 'Reiniger dazugeben
    97. Wait 34
    98. Reiniger = 0
    99. End Sub
    100. '########################################
    101. ' Sub Waschen
    102. Sub Waschen()
    103. Umwp = 1
    104. Wait 120 '1 Mal Vorwaschen
    105. Umwp = 0
    106. Call Wasserweiche()
    107. Umwp = 1 '2 Mal Vorwaschen
    108. Wait 120
    109. Umwp = 0
    110. Call Wasserweiche()
    111. Umwp = 1 '3 Mal Vorwaschen
    112. Wait 120
    113. Umwp = 0
    114. Call Wasserweiche()
    115. Umwp = 1 '4 Mal Vorwaschen
    116. Wait 120
    117. Umwp = 0
    118. Call Wasserweiche()
    119. End Sub
    120. '########################### Ende Waschen
    121. Starten:
    122. Led1 = 1 ' Vorspühlen
    123. Enthanlage = 1
    124. Call Wassereinlauf()
    125. Enthanlage = 0
    126. Call Waschen()
    127. Laugp = 1 'Abpumpen Laugenpumpe 20 Sekunden Einschalten
    128. Wait 20
    129. Laugp = 0
    130. Led1 = 0
    131. 'Hauptwaschen ####################################
    132. Led2 = 1
    133. Call Reinigerk()
    134. If Reiniger = 0 Then
    135. Call Wassereinlauf() 'Zulauf für den Hauptwaschgang
    136. End If
    137. Heizung = 1 'Heizung an
    138. For I = 0 To 5 '5 Mal Hauptwaschgang
    139. Call Waschen()
    140. Next I
    141. Led2 = 0
    142. Heizung = 0 'Heizung aus
    143. Laugp = 1 'Abpumpen Laugenpumpe 10 Sekunden Einschalten
    144. Wait 20
    145. Laugp = 0
    146. ' Ende Hauptwaschen
    147. '####### Spühlen ####################
    148. Led3 = 1
    149. Heizung = 1 'Zulauf für Spühlen
    150. For I = 0 To 3
    151. Call Wassereinlauf()
    152. Call Waschen()
    153. Laugp = 1 'Abpumpen Laugenpumpe 10 Sekunden Einschalten
    154. Wait 20
    155. Laugp = 0
    156. Next I
    157. Heizung = 0
    158. Led3 = 0
    159. Led_ein = 0
    160. Return
    161. ' Ende Waschen
    162. '###############################################################################
    163. Hauptwaschen: 'Hauptwaschen
    164. Call Reinigerk()
    165. If Reiniger = 0 Then
    166. Call Wassereinlauf() 'Zulauf für den Hauptwaschgang
    167. End If
    168. Led2 = 1 ' Hauptwaschen
    169. Heizung = 1 'Heizung an
    170. For I = 0 To 5 '5 Mal Hauptwaschgang
    171. Call Waschen()
    172. Next I
    173. Led2 = 0
    174. Heizung = 0 'Heizung aus
    175. Laugp = 1 'Abpumpen Laugenpumpe 10 Sekunden Einschalten
    176. Wait 20
    177. Laugp = 0
    178. ' Ende Hauptwaschen
    179. Return
    180. '################################################################################
    181. Spuehlen: 'Spühlen
    182. Led3 = 1
    183. 'Heizung = 1
    184. For I = 0 To 3
    185. Call Wassereinlauf() 'Zulauf für Spühlen
    186. Wait 3
    187. Call Waschen()
    188. 'End If
    189. Laugp = 1 'Abpumpen Laugenpumpe 10 Sekunden Einschalten
    190. Wait 20
    191. Laugp = 0
    192. Next I
    193. 'Heizung = 0
    194. Led3 = 0
    195. Return
    Alles anzeigen
  • Hallo,
    1. Wo ist die Abfrage des Sicherheit Wassersensor in der Bodenwanne (der Styropor Schwimmer)
    dieser hat bei den Geräten Doppel Funktion (Wasserstand Max und Wasser in der Bodenwanne)

    2. Heizen ohne Überwachung ob auch die Pumpe lauft? und tatsächlich Wasser fördert?
    3. Temperaturreglung der Heizung …. ?
    Gerade bei den BSH Geräten ist die Heizung empfindlich und kann nur mit der Pumpe erneuert werden …

    4.Wait‘s sollten tunlich vermieden werden wenn es im Gerät immer irgendwas zu überwachen gibt …

    Es gibt noch viel zu tun ……
  • Hallo
    Die Sicherungen hat der Geschirrspüler. Die Heizung würde Früher mit einen Eigenen Druckschalter Konstruiert. Die Arbeitet nur wenn die Umwälzpumpe Läuft.
    Der Schwimmer Arbeitet im Originalzustand auf 220 Volt. Wenn es zur Überschwemmung kommt wird vom Zulaufventil auf die Ablaufpumpe geschalten.
    Das Ganze ist nur für das alte System ausgelegt.
  • Mir fällt noch mehr ein..


    5. Klarspülen ?

    6. Seid ihr im Weichwassergebiet? Der Enthärter will „normal“ auch Regeneriert werden ….
    7- Überwachter Wassereinlauf ? wenn in 2 Minuten kein Wasser drinnen ist muss das Ventil wieder Schließen Das hat in der Regel keine 100% ED


    Evtl. hat das Gerät auch noch ein Wärmetaucher mit Ventil
  • Stefan wie schrieb:

    Ich Spüle nur mit Tabs , dadurch ist es Egal
    Nein so einfach ist es nicht …. Muss dennoch angesteuert werden.. es darf kein Totes Wasser geben,
    Wasser im Salzbehälter Mus auch zeitweise erneuert werden
    Geschirrspüler gehören zum „Lebensmittelbereich“

    Stefan wie schrieb:

    Die neuen Geschirrspüler haben keine Sicherheiten
    Jetzt erzählst du aber gewaltigen Quatsch… Wie kommst du darauf … Quelle? Nachweis … ich bin gespannt …


    Stefan wie schrieb:

    Es fängt schon an den Dünnen Kabel an.


    Bei dir sehe ich auch dünne Drähte …
    Ist doch alles eine Frage des Stromes / Leistung die durch muss …

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von HansHans () aus folgendem Grund: Erweitert

  • .. au weia, mit der Präsentation hätte ich noch ein wenig gewartet..
    Vielleicht hilft ein Studium von Statemachine [siehe Lexikon] bei der Programmstrukturierung im Vorfeld da weiter.
    Die vielen Fotos sind wenig aussagekräftig, solange die Erklärungen fehlen.
    Die Schaltbilder runden das Erscheinungsbild ab.
    Gruß Rudi
    Immer Glück haben ist fast wie können..
  • Zum Thema Geschirrspültabs.

    Kombinierte Reiniger
    In den letzten Jahren ist bei den Verbrauchern ein klarer Trend zu den einfacher und bequemer anzuwendenden Mehr-in–1-Produkten zu erkennen. Marktstudien haben ergeben, dass speziell das regelmäßige Nachfüllen von Regeneriersalz und Klarspüler von Verbrauchern als lästig und unbequem empfunden und gegebenenfalls auch vergessen wird. Diesem Umstand trägt die Einführung von sogenannten Multi-Tabs Rechnung. Je nach Produkt kommen unterschiedliche Bestandteile dazu. Bei 2in1-Produkten ist der Klarspüler integriert und bei 3in1-Produkten sowohl der Klarspüler als auch die Funktion des Regeneriersalzes. Bei allen weiteren Mehrphasen-Tabs kommen weitere Inhaltsstoffe dazu.
    Inhaltstoffe Multi-Tabletten (Herstellerangaben)
    2-in-1-TabsKlarspüler zusätzlich zum Geschirrreiniger
    3-in-1-Tabszusätzlich Wasserenthärter
    4-in-1-Tabszusätzlich Glasschutz
    5-in-1-Tabszusätzlich Bleichmittelaktivatoren
    7-in-1-Tabszusätzlich Edelstahlglanz und Reinigungsverstärker

    Die kombinierten Reiniger werden überwiegend als Reinigertabletten aber auch als Pulver angeboten. Hinsichtlich der Klarspülerfunktion gibt es im Markt verschiedene Varianten. Ähnliches gilt auch für die Inhibierung von Kalkablagerungen bei 3in1-Produkten beim Spülen mit höheren Wasserhärten. In den einzelnen Phasen des Spülprozesses muss eine Ablagerung von Kalk effektiv verhindert werden. Hier gibt es jedoch Grenzen: 3in1-Produkte können lediglich bis einschließlich Härtebereich 3 (hart)bis zu 21 °dH) ohne Regeneriersalz verwendet werden. Die ursprüngliche Befürchtung der Geschirrspülmaschinenindustrie, die Enthärtungsanlage der Geschirrspüler könnte bei längerem Betrieb ohne Regeneriersalz Schaden nehmen, hat sich in der Praxis als unbegründet erwiesen.
    Mechanik


    Ich hätte da eh nichts Reingestellt. aber ich bin ja nicht so. Für das alles braucht man Fachwissen . Das kann man nicht so Erklären.
    Wichtig ist das es Funktioniert. Ich weis was ich da Gebastelt habe.
  • Stefan wie schrieb:

    Wichtig ist das es Funktioniert.
    So isses :thumbsup: Die Feinheiten können später hinzu.
    Das die Sicherheitseinrichtungen außerhalb der Steuerung liegen geht gar nicht:
    - Ein Fehler wird viel zu schnell erkannt.
    - Die Selbstzerstörung durch Absturz oder Stundenzähler sind nicht möglich.
    - Wie soll die Steuerung nun "Kundendienst rufen" anzeigen?
    Und ganz wichtig. Da fehlt ein Wait 15 (besser 30) zwischen Zeile 91 und 92. Sie startet sofort. Das erschreckt den modernen Menschen was sicher zu Schmerzensgeldklagen führt. :D
  • Dein Code lässt sich nicht fehlerfrei (mit Version 2.0.2.8) compilieren.

    Grund:
    In den Zeilen 80 bis 82 muss das 1. Komma nach "Debounce" weg.
    Das meckert mein Compiler an!

    Ich sehe das Programm auch eher als bedenklich an, da auf keine unvorhergesehene Fehler reagiert wird.

    Wenn z.B. der Wasserhahn vom Zulauf zugedreht ist, bleibt das Programm in der Routine "Wassereinlauf" hängen.
    Damit wird zwar verhindert, dass die Heizung und die Umwälzpumpe aus bleibt.
    Aber besser wäre es, dem Bediener einen Fehler anzuzeigen. Selbst wenn dann nur ne LED blinkt, um das anzuzeigen,
    ist das noch besser als keine Anzeige. Platz ist ja noch für LED's.

    Regelt sich die Wassertemperatur selber aus? Oder ist da noch ein Temperaturfühler/Schalter?
    Was passiert, wie die Heizung wegen Störung nicht abgeschaltet wird?
    Oder was passiert, wenn die Heizung nicht heizt? Kaltwäsche?
    Was passiert, wenn die Abwasser-Pumpe wegen Verstopfung das Wasser in der vorgesehenen Pumpzeit nicht losbekommt?


    Wie @Michael schon sagte, sind da keinerlei Sicherungen im Programm.
    Und der Teufel ist ein Eichhörnchen. Es kommt der Tag, wo der Geschirrspüler auch mal unbeaufsichtigt läuft.
    Und wenn was passiert, wird die Versicherung nach Gründen suchen, nicht zahlen zu müssen!

    Du solltest also dein Programm nochmal genau überdenken und überlegen, wo welche Störungen eintreten können,
    und wie du darauf reagieren musst, um Schaden zu vermeiden.
  • Stefan wie schrieb:

    Ich hätte da eh nichts Reingestellt. aber ich bin ja nicht so. Für das alles braucht man Fachwissen . Das kann man nicht so Erklären.
    Wichtig ist das es Funktioniert. Ich weis was ich da Gebastelt habe.


    Guten Morgen,

    Mir ist bekannt wie die Taps funktionieren, eigentlich must du sogar noch tiefer gehen.
    Wie die einzelnen Phasen aktiviert werden da gibt es unterschiedliche varianten über Temperatur und/oder HP Wert.
    Das die Taps bis einer Wasserhärte von 21° Funktionieren ist bekannt. (bei uns somit nichtmehr)

    Du hast nicht verstanden worauf ich hinauswollte:
    Wenn du in deinem GSP die Regenerierung komplett wegbläst, wird das Wasser im Salzbehälter nicht mehr gewechselt (Erneuert).
    Somit hast du hier totes Wasser über sehr lange Zeit, das auch noch immer mal schön aufgeheizt wird.
    Es verkeimt also, dies gilt es zu verhindern, indem du eben doch Regeneierst …. Zumindest so tust als ob ….
    Einfach das das Wasser frisch gehalten wird.
    Oder du musst diesen Wasserweg ausbauen.

    Zugegeben:
    Das ist aber das geringste Problem das deine GSP zur Zeit (noch) hat.
    Den Punkt kannst du auf deine Agenda auch nach hinten schieben.
    Du solltest es aber verstehen ….

    Eine Agenda zu erstellen wäre auch schon mal ein guter Schritt.

    Mir wäre wichtig wie die darauf kommst?

    Stefan wie schrieb:

    Die neuen Geschirrspüler haben keine Sicherheiten.
    Gruß HH