hallo...
ich will von einer zeichenfolge die nur aus einsen und zweien besteht z.b. '111,111,111,111,111,111' (beispiel 6 dreier gruppen können ach 4 0der 9 dreiergruppen sein) irgend eine zweite stelle einer dreiergruppe von einer 1 in eine 2 wandeln oder umgekehrt wenn schon eine 2 drin steht, das ganze natürlich nach zufallsprinzip. wie mache ich das am dümmsten.
zeichenkette könnte auch so aussehen '121,211,111,112,211,121'
es sind immer zwischen 4 und 9 dreiergruppen pro zeichenkette
weis jemand rat? bin für jede hilfe dankbar
das habe ich bisher:
Delphi-Quellcode:
while zeile = nfolge[jetztzeil] do
begin
randomize;
tonfehler := Random((anzton*3)+(anzton-1))+1;
if copy(zeile,tonfehler,1) = '1' then
begin
zeile := copy(zeile,1,tonfehler-1)+'2'+copy(Zeile,tonfehler+1,length(zeile));
ok := True;
end
else
if copy(zeile,tonfehler,1) = '2' then
begin
zeile := copy(zeile,1,tonfehler-1)+'1'+copy(Zeile,tonfehler+1,length(zeile));
ok := True;
end;
end;
diese routine eine erste oder eine zweite oder eine dritte stelle ich brauche aber nur eine zweite stelle
es darf aber nur die 2te oder 6te oder 10te oder 14te oder 18te oder 22te stelle verändert werden bei eine zeichenkette mit 6 dreierblöcken