Um Sender-Codierungen eines 125kHz Leitungssuchgerät von Beha herauszufinden, brauche ich bestimmte Kombinationen - offenbar nach folgender Regel:

16bit (2byte) Binärzahlen mit
1. Genau 6 Einsen
2. Min. 1x genau 3 Einsen hintereinander (niemals 4!)

Beispiel von Kombinationen, die ich bereits herausgefunden habe

00000000.11100111 => 8
00000010.01100111 => 2
00000010.11001110 => 4
00000011.00010111 => F (vorhandener Sender)
00000100.01100111 => 1
00000101.00010111 => E
00000110.00010111 => C
00000111.01100111 => 7

Mir fehlen also noch: 3,5,6,9,0,a,b,d
Um nicht alles durchprobieren zu müssen, möchte ich nun nur alle Binärzahlen nach beschriebenen Muster herausfinden/ausgeben.

Dabei habe ich an Perl gedacht, weil es in Sachen Regex sehr mächtig ist. 3 Einsen hintereinander sind wohl einfach zu matchen. Aber wie kann ich auf insgesamt genau 6 Einsen Matchen in einem String?
Und kann man einfach alle Permutationen erzeugen mit Perl? Dachte an einen For-Schleifenzähler von 0 bis 65535 und dann Typ-Umwandlung (binär) nach String?
Last edited: 2015-10-31 20:14:17 +0100 (CET)