Ich habe mal vor längerer Zeit eine "Scwich-Box" gebaut gehabt um RS232-Signale umzuschelten. Dazu braucht maqn eine Menge RS232-Treiber, einen EPROM (GAL geht auch) und eine C-Control (z.B. M-Unit). Die Umschaltung hatte ich extern steuerbar gemacht gehabt.
Den Code setzte ich einfach mal rein:
Code:' TF-1 Box Software für die C-Control/BASIC ' Version 1.00 ' !!! Nur für den Prototypen !!! ' (C) Wolfgang Schmid '----------------------------------------- 'I/O Definitionen DEFINE Sel_A PORT[1] 'Slave-Anwahl D0 DEFINE Sel_B PORT[2] 'Slave-Anwahl D1 DEFINE SendCom PORT[3] 'Sendefreigabe TF-1 an Master DEFINE Sonde PORT[6] 'Sonde für Datenfluß DEFINE RES PORT[4] 'Reset für Urzustand der Box DEFINE Remote PORT[7] 'Remote-Anschluß ist inaktiv DEFINE Power PORT[8] 'Peripherie zuschalten '----------------------------------------------------------------- DEFINE LED1 PORT[9] 'LED-Anzeige: Port 1 aktiv DEFINE LED2 PORT[10] 'LED-Anzeige: Port 2 aktiv DEFINE LED3 PORT[11] 'LED-Anzeige: Port 3 aktiv DEFINE LED4 PORT[12] 'LED-Anzeige: Port 4 aktiv DEFINE LED5 PORT[13] 'LED-Anzeige: Warten auf Datenblock DEFINE LED6 PORT[14] 'LED-Anzeige: ESC-Kommando erhalten DEFINE LED7 PORT[15] 'LED-Anzeige: Daten vorhanden DEFINE LEDs BYTEPORT[2] 'Alle LEDs ansprechen 'Variablen-Definitionen DEFINE WortWert WORD[1] 'Byte-Zahl 16-Bit DEFINE Multi WORD[2] 'Byte-Zahl 8-Bit DEFINE Nummer WORD[3] 'Multiplikations-Hilfsvariable DEFINE DatenEin BYTE[7] 'Aktuell gelesenes Daten-Byte DEFINE BoxID BYTE[8] 'ID-Nummer der TF-1 Box DEFINE BS1 BYTE[9] 'Baudrate Slaveteilnehmer 1 DEFINE BS2 BYTE[10] 'Baudrate Slaveteilnehmer 2 DEFINE BS3 BYTE[11] 'Baudrate Slaveteilnehmer 3 DEFINE BS4 BYTE[12] 'Baudrate Slaveteilnehmer 4 DEFINE Wert BYTE[13] '8-Bit Universal-Variable DEFINE Disp BYTE[14] 'Text-Ausgaben Mode DEFINE i BYTE[15] 'Universal-Schleifenzähler DEFINE a BYTE[16] 'Zeitverzögerung der Signalpause 'ASCII-Codes für die ESC-Sequenzen DEFINE ESC 27 'ESC-Zeichen DEFINE CLS 12 'Display löschen DEFINE LF 10 'Zeilenwechsel DEFINE CR 13 'Zum Zeilenanfang DEFINE DLE 16 'Zeichen löschen DEFINE ACK 6 'IO-Melung DEFINE NAK 21 'NIO-Meldung DEFINE DP 58 'Doppelpunkt DEFINE SP 59 'Strichpunkt DEFINE xB 66 'Buchstaben DEFINE xD 68 DEFINE xE 69 DEFINE xI 73 DEFINE xR 82 DEFINE xS 83 DEFINE xX 88 DEFINE x1 49 'Zahlen DEFINE x2 50 DEFINE x3 51 DEFINE x4 52 #Init SendCom = 1 Sel_A = 0 Sel_B = 0 LEDs = 0 Disp = 0 IF RES THEN GOTO Init4 i = 100 LED1 = 1 Disp = 1 #Init1 IF RES THEN GOTO Init4 i = i - 1 IF i = 0 THEN GOTO Init2 GOTO Init1 #Init2 LED1 = 0 LED2 = 1 Disp = 2 i = 100 #Init3 IF RES THEN GOTO Init4 i = i - 1 IF i = 0 THEN GOTO Init4 GOTO Init3 #Init4 LEDs = 0 IF NOT RES THEN GOTO Init4 LEDs = 127 IF Disp > 0 THEN GOTO JP001 PUT CLS PRINT " ***************************************" PRINT " * TF-1 Box Version: 1.00 *" PRINT " * Stand: 160801-1925 *" PRINT " * Entwicklung: Wolfgang Schmid *" PRINT " * Frank Acker *" PRINT " *-------------------------------------*" PRINT " * Im Auftrag von Mindrevolution *" PRINT " * http://www.mindrevolution.de *" PRINT " ***************************************" PUT LF PAUSE 1 SendCom = 0 #JP001 Nummer = 0 GOSUB xLoad IF Disp > 0 THEN GOTO JP002 SendCom = 1 PRINT "Box-ID: "; BoxID PUT LF PRINT "Ready. " PUT LF PAUSE 1 SendCom = 0 #JP002 SendCom = 0 LEDs = 0 #MainLoopO GOSUB AktivPort SendCom = 0 i = 0 GOTO MainLoop #MainLoopX GOSUB AktivPort SendCom = 0 i = 40 GOTO MainLoop #MainLoopF SLOWMODE OFF PAUSE 50 IF Disp < 1 THEN GOTO JP021 SendCom = 1 PRINT "Zuendung wurde eingeschaltet" PUT LF PAUSE 1 #JP021 GOTO MainLoopO #MainLoop IF Remote THEN GOTO Standby Power = 1 IF RXD THEN GOTO Kommando IF NOT RES THEN GOSUB Urladen LED5 = 0 IF i > 0 THEN i = i - 1 IF i > 0 THEN LED6 = 1 ELSE LED6 = 0 LED7 = Sonde GOTO MainLoop #Standby IF Disp < 1 THEN GOTO JP022 SendCom = 1 PRINT "Zuendung wurde ausgeschaltet" PUT LF PAUSE 1 SendCom = 0 #JP022 SLOWMODE ON #Standby2 IF NOT Remote THEN GOTO MainLoopF Power = 0 LEDs = 0 i = i + 1 IF i >= 12 THEN i = 0 IF i >= 11 THEN LED5 = 1 ELSE LED5 = 0 GOTO Standby2 #AktivPort LED1 = 0 IF NOT Sel_A AND NOT Sel_B THEN LED1 = 1 IF NOT Sel_A AND NOT Sel_B THEN Wert = BS1 LED2 = 0 IF Sel_A AND NOT Sel_B THEN LED2 = 1 IF Sel_A AND NOT Sel_B THEN Wert = BS2 LED3 = 0 IF NOT Sel_A AND Sel_B THEN LED3 = 1 IF NOT Sel_A AND Sel_B THEN Wert = BS3 LED4 = 0 IF Sel_A AND Sel_B THEN LED4 = 1 IF Sel_A AND Sel_B THEN Wert = BS4 IF Wert = 12 THEN BAUD R1200 IF Wert = 24 THEN BAUD R2400 IF Wert = 48 THEN BAUD R4800 IF Wert = 96 THEN BAUD R9600 RETURN #Kommando GET DatenEin IF DatenEin <> ESC THEN GOTO MainLoop LED6 = 1 GET DatenEin IF DatenEin = xB THEN GOTO xBaudrate IF DatenEin = xI THEN GOTO xID IF DatenEin = xE THEN GOTO xSave IF DatenEin = xS THEN GOTO xSwitch IF DatenEin = xX THEN GOTO xStatus IF DatenEin = xR THEN GOTO xReset GOTO MainLoop #xStatus 'Status der Schnittstellen und Box-ID anzeigen 'Syntax: ESC X; GET DatenEin LED6 = 0 IF DatenEin <> SP THEN GOTO MainLoop IF Disp < 1 THEN GOTO JP003 SendCom = 1 PRINT "Baudrate Slave 1: ";BS1;"00 Baud" PRINT "Baudrate Slave 2: ";BS2;"00 Baud" PRINT "Baudrate Slave 3: ";BS3;"00 Baud" PRINT "Baudrate Slave 4: ";BS4;"00 Baud" PRINT "Box-ID: ";BoxID PUT LF PAUSE 1 SendCom = 0 #JP003 PAUSE 200 GOTO MainLoopX #xBaudrate 'Baudrate einstellen für Slave-Teilnehmer 1 bis 4 'Syntax: ESC B[n]:[b]; ' n = Schnittstelle (Slave) ' b = Baudrate (1200, 2400, 4800, 9600) 'Schnittstellen-Baudrate wird umgestellt GET DatenEin DatenEin = DatenEin - x1 ON DatenEin GOTO xBaudSlave1, xBaudSlave2, xBaudSlave3, xBaudSlave4 GOTO MainLoopX #xBaudSlave1 GET DatenEin IF DatenEin <> DP THEN GOTO MainLoopX GOSUB LeseZahl GET DatenEin IF DatenEin <> SP THEN GOTO MainLoopX IF Disp < 1 THEN GOTO JP004 SendCom = 1 PRINT "Baudrate an Slave 1 wurde auf ";WortWert;" eingestellt" PUT LF PAUSE 1 SendCom = 0 #JP004 IF WortWert = 9600 THEN BS1 = 96 IF WortWert = 4800 THEN BS1 = 48 IF WortWert = 2400 THEN BS1 = 24 IF WortWert = 1200 THEN BS1 = 12 GOTO MainLoopX #xBaudSlave2 GET DatenEin IF DatenEin <> DP THEN GOTO MainLoopX GOSUB LeseZahl GET DatenEin IF DatenEin <> SP THEN GOTO MainLoopX IF Disp < 1 THEN GOTO JP005 SendCom = 1 PRINT "Baudrate an Slave 2 wurde auf ";WortWert;" eingestellt" PUT LF PAUSE 1 SendCom = 0 #JP005 IF WortWert = 9600 THEN BS2 = 96 IF WortWert = 4800 THEN BS2 = 48 IF WortWert = 2400 THEN BS2 = 24 IF WortWert = 1200 THEN BS2 = 12 GOTO MainLoopX #xBaudSlave3 GET DatenEin IF DatenEin <> DP THEN GOTO MainLoopX GOSUB LeseZahl GET DatenEin IF DatenEin <> SP THEN GOTO MainLoopX IF Disp < 1 THEN GOTO JP006 SendCom = 1 PRINT "Baudrate an Slave 3 wurde auf ";WortWert;" eingestellt" PUT LF PAUSE 1 SendCom = 0 #JP006 IF WortWert = 9600 THEN BS3 = 96 IF WortWert = 4800 THEN BS3 = 48 IF WortWert = 2400 THEN BS3 = 24 IF WortWert = 1200 THEN BS3 = 12 GOTO MainLoopX #xBaudSlave4 GET DatenEin IF DatenEin <> DP THEN GOTO MainLoopX GOSUB LeseZahl GET DatenEin IF DatenEin <> SP THEN GOTO MainLoopX IF Disp < 1 THEN GOTO JP007 SendCom = 1 PRINT "Baudrate an Slave 4 wurde auf ";WortWert;" eingestellt" PUT LF PAUSE 1 SendCom = 0 #JP007 IF WortWert = 9600 THEN BS4 = 96 IF WortWert = 4800 THEN BS4 = 48 IF WortWert = 2400 THEN BS4 = 24 IF WortWert = 1200 THEN BS4 = 12 GOTO MainLoopX #xID 'Box-ID ändern (1 bis 255) 'SYNTAX: ESC ID[n]; ' n = 0 bis 255 'Die ID der Box wird geändert GET DatenEin IF DatenEin <> xD THEN GOTO MainLoop 'Eingabe einlesen GET DatenEin IF DatenEin < 48 AND DatenEin > 57 THEN GOTO MainLoop DatenEin = DatenEin - 48 Nummer = DatenEin * 100 GET DatenEin IF DatenEin = SP THEN GOTO xIDEnde1 IF DatenEin < 48 AND DatenEin > 57 THEN GOTO MainLoop DatenEin = DatenEin - 48 Nummer = Nummer + (DatenEin * 10) GET DatenEin IF DatenEin = SP THEN GOTO xIDEnde2 IF DatenEin < 48 AND DatenEin > 57 THEN GOTO MainLoop DatenEin = DatenEin - 48 Nummer = Nummer + DatenEin GET DatenEin IF DatenEin <> SP THEN GOTO MainLoopX GOTO xIDEnde3 #xIDEnde1 Nummer = Nummer / 10 #xIDEnde2 Nummer = Nummer / 10 #xIDEnde3 BoxID = Nummer IF Disp < 1 THEN GOTO JP008 SendCom = 1 PRINT "Neue Box-ID: "; BoxID PUT LF PAUSE 1 SendCom = 0 #JP008 GOTO MainLoopX #xSave 'Setup sichern GET DatenEin IF DatenEin <> SP THEN GOTO MainLoopX OPEN# FOR WRITE PRINT# BoxID PRINT# BS1 PRINT# BS2 PRINT# BS3 PRINT# BS4 CLOSE# IF Disp < 1 THEN GOTO JP009 SendCom = 1 PRINT "Einstellungen im EEPROM gespeichert" PUT LF PAUSE 1 SendCom = 0 #JP009 GOTO MainLoopX #xLoad 'Setup laden OPEN# FOR READ INPUT# BoxID INPUT# BS1 INPUT# BS2 INPUT# BS3 INPUT# BS4 CLOSE# IF Disp < 1 THEN GOTO JP010 SendCom = 1 PRINT "Einstellungen aus EEPROM geladen" PUT LF PAUSE 1 SendCom = 0 #JP010 RETURN #xSwitch 'Umschaltung auf anderen Slave-Teilnehmer 'SYNTAX: ESC S[n]; ' n = Teilnehmer-Nummer 1 bis 4 'Schnittstelle anwählen GET DatenEin IF DatenEin < 49 AND DatenEin > 52 THEN GOTO MainLoopX Wert = DatenEin - 48 GET DatenEin IF DatenEin <> SP THEN GOTO MainLoopX IF Wert = 1 THEN WortWert = BS1 IF Wert = 2 THEN WortWert = BS2 IF Wert = 3 THEN WortWert = BS3 IF Wert = 4 THEN WortWert = BS4 WortWert = WortWert * 100 IF Disp < 1 THEN GOTO JP011 SendCom = 1 PRINT "Schnittstelle: Slave ";Wert PRINT "Baudrate: ";WortWert;" Baud" PUT LF PAUSE 1 #JP011 IF WortWert = 1200 THEN BAUD R1200 IF WortWert = 2400 THEN BAUD R2400 IF WortWert = 4800 THEN BAUD R4800 IF WortWert = 9600 THEN BAUD R9600 LED1 = 0 LED2 = 0 LED3 = 0 LED4 = 0 Wert = Wert - 1 ON Wert GOTO xSwitch1, xSwitch2, xSwitch3, xSwitch4 #xSwitch1 LED1 = 1 Sel_A = 0 Sel_B = 0 GOTO Signalpause #xSwitch2 LED2 = 1 Sel_A = 1 Sel_B = 0 GOTO Signalpause #xSwitch3 LED3 = 1 Sel_A = 0 Sel_B = 1 GOTO Signalpause #xSwitch4 LED4 = 1 Sel_A = 1 Sel_B = 1 GOTO Signalpause #Signalpause i = 255 a = 5 #Signalpause2 IF RXD THEN GET DatenEin else DatenEin = 0 LED5 = 1 LED7 = Sonde IF a = 5 THEN i = i - 1 IF Sonde THEN a = 5 IF a > 0 THEN a = a - 1 IF i = 0 THEN GOTO Signalpause3 IF a = 0 THEN GOTO Signalpause3 GOTO Signalpause2 #Signalpause3 LED5 = 0 SendCom = 0 GOTO MainLoopX #LeseZahl WortWert = 0 Multi = 1000 #LeseZahl1 GET DatenEin IF DatenEin < 48 AND DatenEin > 57 THEN RETURN Nummer = (DatenEin - 48) Nummer = Nummer * Multi WortWert = WortWert + Nummer IF Multi = 1 THEN RETURN Multi = Multi / 10 GOTO LeseZahl1 #Urladen FOR i = 1 to 5 LEDs = 1 PAUSE 7 LEDs = 2 PAUSE 7 LEDs = 4 PAUSE 7 LEDs = 8 PAUSE 7 IF RES THEN AbortRes NEXT i LOOKTAB StandardDaten, 0, BoxID LOOKTAB StandardDaten, 1, BS1 LOOKTAB StandardDaten, 2, BS2 LOOKTAB StandardDaten, 3, BS3 LOOKTAB StandardDaten, 4, BS4 LEDs = 255 #WartenRES IF NOT RES THEN GOTO WartenRES LEDs = 15 OPEN# FOR WRITE PRINT# BoxID PRINT# BS1 PRINT# BS2 PRINT# BS3 PRINT# BS4 CLOSE# IF Disp < 1 THEN GOTO JP012 SendCom = 1 PRINT "Standard-Daten wurden geladen!" PRINT "Slave 1: ";BS1;"00 Baud" PRINT "Slave 2: ";BS2;"00 Baud" PRINT "Slave 3: ";BS3;"00 Baud" PRINT "Slave 4: ";BS4;"00 Baud" PRINT "Einstellungen im EEPROM gespeichert" PUT LF PAUSE 1 SendCom = 0 #JP012 PAUSE 100 LEDs = 0 GOTO AbortRES #AbortRES i = 0 GOSUB AktivPort RETURN #xReset GET DatenEin IF DatenEin <> SP THEN GOTO MainLoopX IF Disp < 1 THEN GOTO JP013 SendCom = 1 PRINT "Software-Reset ausgefuehrt" PUT LF PAUSE 1 SendCom = 0 #JP013 GOTO Init END 'Initialisierungsdaten für den Urlade-Zustande der Box TABLE StandardDaten 0 48 48 48 48 TABEND
Das Programm ist für 5 Datenleitungen gedacht und eine davon ist der Master der den Schaltvorgang und die Baudrate ändern kann.
Externes Bild anzeigen
Die Box sah wie auf dem Foto hier aus. die PS/2-Anchlüsse dienen der 5V-Versorgung der RS232-Teilnehmer und die LED's auf der Frontseite sind die Kanäle 1 bis 4, Data, Kommando-Sequenz.
Eine Testsoftware von mir zum Prüfen der Funktion der Box unter MS-DOS:
http://www.mds-5.de/Temp/Tf1test1.exe
Bei Bedarf kann ich es ja noch auf meiner Seite veröffentlichen. Habe auch ein Demo-Programm geschrieben, Layouts angefangen. Funktioniert hatte sie aber ganz gut.
Aktueller Stand der TF-1 Box:
* Multiplexer zur direkten Verbindung von Slave-Teilnehmern zu den Master-Teilnehmern
* Auf dem Master horcht die MCU mit, um Steuer-Kommandos zu erkennen
* Die Baudrate der MCU-Schnittstelle stellt sich je nach angewähltem Slave-Teilnehmer automatisch ein
* Bei der Umschaltung der Slave-Schnittstelle werden alle Teilnehmer durch das RTS/CTS- Handshake blockiert, bis die Parametrierung und die Umschaltung fertig ist
* Die Multiplexer-Schaltung wird durch einen EPROM vom Typ 2764 realisiert
* Jede Schnittstelle wird mit einem eigenen RS232-Treiber ausgestattet vom Typ MAX232 von MAXIM
* Die RS232-Treiber der Slave-Teilnehmer soll mit einer Steuerleitung deaktiviert werden können. Der RS232-Treiber der Master-Schnittstelle ist jedoch immer aktiv
* Die Slave-Teilnehmer werden auf 4 Teilnehmer begrenzt
* Es gibt nur einen Master im System. In diesem Fall immer ein Palm-Top
* Slave 1 soll vorerst einmal nur der GPS-Empfänger sein. Baudrate 4800 Baud
* Slave 2 soll vorerst einmal nur ein Handy im GSM-Mode sein. Baudrate 9600 Baud
* Slave 3 und Slave 4 werden vorerst nur einmal Reserve sein, und sind auf eine Baudrate von 9600 Baud eingestellt
* Die Stromversorgung der Slave-Geräte wird durch eine PS2- Steckverbindung hergestellt werden
* Die Stromversorgung des GPS-Empfängers ist auch bei ausgeschalteter TF-1 Box aufrechtzuhalten. Diese Funktion kann durch einen Jumper deaktiviert werden
* Die Box soll eine Standby-Funktion besitzen. Die Wake-Up Funktion wird entweder durch ein beliebiges Kommando vom Palm- Top ausgelöst, oder durch eine Remote- Leitung von der Zündanlage des Fahrzeugs
* Der Palm-Top ist die Steuereinheit der TF1-Box, und besitzt alle nötigen Funktionen zur Bedienung der TF-1 Box
* Die TF-1 Box muß nur auf Kommandos des Palm-Top (Master) reagieren, und alle nötigen Umschaltsequenzen für das Handshake zwischen den Teilnehmern koordinieren
Funktionen im Schnittstellenprotokoll:
Schnittstelle wählen:
~~~~~~~~~~~~~~~~~~~~~
ESC S1; 27,S,1,;
Schnittstelle 1 Wird angewählt für Senden/Empfangen.
Danach muß der Palm auf die Baudrate der Schnittstelle wechseln (z.B. Schnittstelle 1 ist mit GPS-Empfänger verbunden, dann muß der Palm auf 4800 Baud umschalten). Dann wartet der Palm auf Empang von Daten.
Schnittstelle einstellen:
~~~~~~~~~~~~~~~~~~~~~~~~~
ESC B14800; 27,B,1,4,8,0,0,;
Schnittstelle 1 wird auf 4800 Baud eingestellt, damit die TF1-Box auch dei folgenden ESC-Kommandos versteht. Die start-Baudrate ist bei 9600 Baud fest eingestellt, wegen der sicheren Verbindung von Box und Palm.
Einstellungen sichern in EEPROM:
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
ESC E; 27,E;
Einstellungen werden im EEPROM gesichert wegen Spannungsausfall.
Beispiel:
~~~~~~~~~
1) Palm muß Schnittstelle auf 9600 Baud einstellen
2) Schnittstelle 1 einstellen mit dem Palm. Mit 'ESC B14800;'
3) Schnittstelle 2 einstellen mit dem Palm. Mit 'ESC B19600;'
4) Schnittstelle 3 einstellen mit dem Palm. Mit 'ESC B12400;'
5) Schnittstelle 4 einstellen mit dem Palm. Mit 'ESC B12400;'
6) Einstellungen sichern mit 'ESC E;'
---------------------------------------------------------------
7) Schnittstelle 1 anwählen mit 'ESC S1;'
Palm muß seine Schnittstelle jetzt sofort auf 4800 Baud einstellen
9) Jetzt kann der Palm auf Daten warten von der Box (Port 1 - GPS-Empfänger)
10) Die Daten die jetzt ankommen sind in 4800 Baud und im exakt gleichen Protokoll
wie die Daten vom GPS-Empfänger
11) Zu Schritt 7) wenn zu anderer Schnittstelle gewechselt werden soll
1) bis 6) nur bei Erstinbetriebnahme oder Änderungen nötig
7) bis 11) immer nötig für Umschaltung
Mit Reset werden die Schnittstellen auf 4800, 9600, 9600, 9600 eingestellt (Port 1 bis Port 4)
Das EPROM, das den Schaltvorgang durchführt sieht we folgt aus:
Grüsse WolfgangCode::100000005C7E9DBF5C7E9DBF5C7E9DBF5C7E9DBF18 :100010005C7E9DBF5C7E9DBF5C7E9DBF5C7E9DBF08 :100020005C7E9DBF5C7E9DBF5C7E9DBF5C7E9DBFF8 :100030005C7E9DBF5C7E9DBF5C7E9DBF5C7E9DBFE8 :100040005A7E5A7E9BBF9BBF5A7E5A7E9BBF9BBFE8 :100050005A7E5A7E9BBF9BBF5A7E5A7E9BBF9BBFD8 :100060005A7E5A7E9BBF9BBF5A7E5A7E9BBF9BBFC8 :100070005A7E5A7E9BBF9BBF5A7E5A7E9BBF9BBFB8 :10008000567E567E567E567E97BF97BF97BF97BFC8 :10009000567E567E567E567E97BF97BF97BF97BFB8 :1000A000567E567E567E567E97BF97BF97BF97BFA8 :1000B000567E567E567E567E97BF97BF97BF97BF98 :1000C0004E7E4E7E4E7E4E7E4E7E4E7E4E7E4E7ED0 :1000D0008FBF8FBF8FBF8FBF8FBF8FBF8FBF8FBFB0 :1000E0004E7E4E7E4E7E4E7E4E7E4E7E4E7E4E7EB0 :1000F0008FBF8FBF8FBF8FBF8FBF8FBF8FBF8FBF90 :100100005C7E9CBE5C7E9CBE5C7E9CBE5C7E9CBE1F :100110005C7E9CBE5C7E9CBE5C7E9CBE5C7E9CBE0F :100120005D7F9DBF5D7F9DBF5D7F9DBF5D7F9DBFEF :100130005D7F9DBF5D7F9DBF5D7F9DBF5D7F9DBFDF :100140005A7E5A7E9ABE9ABE5A7E5A7E9ABE9ABEEF :100150005A7E5A7E9ABE9ABE5A7E5A7E9ABE9ABEDF :100160005B7F5B7F9BBF9BBF5B7F5B7F9BBF9BBFBF :100170005B7F5B7F9BBF9BBF5B7F5B7F9BBF9BBFAF :10018000567E567E567E567E96BE96BE96BE96BECF :10019000567E567E567E567E96BE96BE96BE96BEBF :1001A000577F577F577F577F97BF97BF97BF97BF9F :1001B000577F577F577F577F97BF97BF97BF97BF8F :1001C0004E7E4E7E4E7E4E7E4E7E4E7E4E7E4E7ECF :1001D0008EBE8EBE8EBE8EBE8EBE8EBE8EBE8EBEBF :1001E0004F7F4F7F4F7F4F7F4F7F4F7F4F7F4F7F9F :1001F0008FBF8FBF8FBF8FBF8FBF8FBF8FBF8FBF8F :00000001FF
Zitieren
Lesezeichen