REM zufallszahll bestimmte Drehung einzelner Buchstabenreihen set destination=%~dp0% set /a y=0 :loopb1 if %y% geq 12 goto loopbende1 set /a y=%y%+1 if exist block_%y%_1.log echo i >>var2%y%.txt if exist block_%y%_2.log echo j >>var2%y%.txt if exist block_%y%_3.log echo k >>var2%y%.txt if exist block_%y%_4.log echo l >>var2%y%.txt if exist block_%y%_5.log echo m >>var2%y%.txt if exist block_%y%_6.log echo n >>var2%y%.txt if exist block_%y%_7.log echo o >>var2%y%.txt if exist block_%y%_8.log echo p >>var2%y%.txt if exist block_%y%_9.log echo q >>var2%y%.txt if exist block_%y%_10.log echo r >>var2%y%.txt if exist block_%y%_11.log echo s >>var2%y%.txt if exist block_%y%_12.log echo t >>var2%y%.txt goto loopb1 :loopbende1 set /p var1="%destination%codeblock2.bat" ECHO FOR /F "tokens=1,2,3,4,5,6,7,8,9,10,11,12 delims= " %%%%i IN (chifende.txt) DO echo %%%%%var1% %%%%%var2% %%%%%var3% %%%%%var4% %%%%%var5% %%%%%var6% %%%%%var7% %%%%%var8% %%%%%var9% %%%%%var10% %%%%%var11% %%%%%var12% ^>^>chifendeergebnis.txt >>"%destination%codeblock2.bat" ECHO exit ^>^>chifendeergebnis.txt start /wait codeblock2.bat del var*.txt del chifende.txt del codeblock2.bat REM Zwoelf Reihen in einzelnen Dokumenten werden gebildet FOR /F "tokens=1,2,3,4,5,6,7,8,9,10,11,12 delims= " %%i IN (chifendeergebnis.txt) DO echo %%i >>auslese_1.txt FOR /F "tokens=1,2,3,4,5,6,7,8,9,10,11,12 delims= " %%i IN (chifendeergebnis.txt) do echo %%j >>auslese_2.txt FOR /F "tokens=1,2,3,4,5,6,7,8,9,10,11,12 delims= " %%i IN (chifendeergebnis.txt) do echo %%k >>auslese_3.txt FOR /F "tokens=1,2,3,4,5,6,7,8,9,10,11,12 delims= " %%i IN (chifendeergebnis.txt) do echo %%l >>auslese_4.txt FOR /F "tokens=1,2,3,4,5,6,7,8,9,10,11,12 delims= " %%i IN (chifendeergebnis.txt) do echo %%m >>auslese_5.txt FOR /F "tokens=1,2,3,4,5,6,7,8,9,10,11,12 delims= " %%i IN (chifendeergebnis.txt) do echo %%n >>auslese_6.txt FOR /F "tokens=1,2,3,4,5,6,7,8,9,10,11,12 delims= " %%i IN (chifendeergebnis.txt) do echo %%o >>auslese_7.txt FOR /F "tokens=1,2,3,4,5,6,7,8,9,10,11,12 delims= " %%i IN (chifendeergebnis.txt) do echo %%p >>auslese_8.txt FOR /F "tokens=1,2,3,4,5,6,7,8,9,10,11,12 delims= " %%i IN (chifendeergebnis.txt) do echo %%q >>auslese_9.txt FOR /F "tokens=1,2,3,4,5,6,7,8,9,10,11,12 delims= " %%i IN (chifendeergebnis.txt) do echo %%r >>auslese_10.txt FOR /F "tokens=1,2,3,4,5,6,7,8,9,10,11,12 delims= " %%i IN (chifendeergebnis.txt) do echo %%s >>auslese_11.txt FOR /F "tokens=1,2,3,4,5,6,7,8,9,10,11,12 delims= " %%i IN (chifendeergebnis.txt) do echo %%t >>auslese_12.txt del chifendeergebnis.txt REM es werden zwoelf Tabellen zur Decodierung erstellt set /a t=1 :wloop FOR /F "tokens=1,2,3,4 delims= " %%i IN (chiffre_%t%.txt) DO echo %%k %%l >>chiffren_%t%.txt set /a t=%t%+1 if exist chiffre_%t%.txt (goto wloop) else goto wloopende :wloopende del chiffer_*.log REM Ort wird ermittelt set destination=%~dp0% REM Zwoelf Reihen werden dechiffriert set destination=%~dp0% >"%destination%code1.bat" ECHO set vgl=%%1 >>"%destination%code1.bat" ECHO for /f "tokens=1,2,3,4" %%%%i in (chiffren_1.txt) do if %%%%i equ %%vgl%% (echo %%%%j) ^>^>auslese_1.log FOR /F "tokens=1 delims=" %%i in (auslese_1.txt) do call code1.bat %%i >"%destination%code2.bat" ECHO set vgl=%%1 >>"%destination%code2.bat" ECHO for /f "tokens=1,2,3,4" %%%%i in (chiffren_2.txt) do if %%%%i equ %%vgl%% (echo %%%%j) ^>^>auslese_2.log FOR /F "tokens=1 delims=" %%i in (auslese_2.txt) do call code2.bat %%i >"%destination%code3.bat" ECHO set vgl=%%1 >>"%destination%code3.bat" ECHO for /f "tokens=1,2,3,4" %%%%i in (chiffren_3.txt) do if %%%%i equ %%vgl%% (echo %%%%j) ^>^>auslese_3.log FOR /F "tokens=1 delims=" %%i in (auslese_3.txt) do call code3.bat %%i >"%destination%code4.bat" ECHO set vgl=%%1 >>"%destination%code4.bat" ECHO for /f "tokens=1,2,3,4" %%%%i in (chiffren_4.txt) do if %%%%i equ %%vgl%% (echo %%%%j) ^>^>auslese_4.log FOR /F "tokens=1 delims=" %%i in (auslese_4.txt) do call code4.bat %%i >"%destination%code5.bat" ECHO set vgl=%%1 >>"%destination%code5.bat" ECHO for /f "tokens=1,2,3,4" %%%%i in (chiffren_5.txt) do if %%%%i equ %%vgl%% (echo %%%%j) ^>^>auslese_5.log FOR /F "tokens=1 delims=" %%i in (auslese_5.txt) do call code5.bat %%i >"%destination%code6.bat" ECHO set vgl=%%1 >>"%destination%code6.bat" ECHO for /f "tokens=1,2,3,4" %%%%i in (chiffren_6.txt) do if %%%%i equ %%vgl%% (echo %%%%j) ^>^>auslese_6.log FOR /F "tokens=1 delims=" %%i in (auslese_6.txt) do call code6.bat %%i >"%destination%code7.bat" ECHO set vgl=%%1 >>"%destination%code7.bat" ECHO for /f "tokens=1,2,3,4" %%%%i in (chiffren_7.txt) do if %%%%i equ %%vgl%% (echo %%%%j) ^>^>auslese_7.log FOR /F "tokens=1 delims=" %%i in (auslese_7.txt) do call code7.bat %%i >"%destination%code8.bat" ECHO set vgl=%%1 >>"%destination%code8.bat" ECHO for /f "tokens=1,2,3,4" %%%%i in (chiffren_8.txt) do if %%%%i equ %%vgl%% (echo %%%%j) ^>^>auslese_8.log FOR /F "tokens=1 delims=" %%i in (auslese_8.txt) do call code8.bat %%i >"%destination%code9.bat" ECHO set vgl=%%1 >>"%destination%code9.bat" ECHO for /f "tokens=1,2,3,4" %%%%i in (chiffren_9.txt) do if %%%%i equ %%vgl%% (echo %%%%j) ^>^>auslese_9.log FOR /F "tokens=1 delims=" %%i in (auslese_9.txt) do call code9.bat %%i >"%destination%code10.bat" ECHO set vgl=%%1 >>"%destination%code10.bat" ECHO for /f "tokens=1,2,3,4" %%%%i in (chiffren_10.txt) do if %%%%i equ %%vgl%% (echo %%%%j) ^>^>auslese_10.log FOR /F "tokens=1 delims=" %%i in (auslese_10.txt) do call code10.bat %%i >"%destination%code11.bat" ECHO set vgl=%%1 >>"%destination%code11.bat" ECHO for /f "tokens=1,2,3,4" %%%%i in (chiffren_11.txt) do if %%%%i equ %%vgl%% (echo %%%%j) ^>^>auslese_11.log FOR /F "tokens=1 delims=" %%i in (auslese_11.txt) do call code11.bat %%i >"%destination%code12.bat" ECHO set vgl=%%1 >>"%destination%code12.bat" ECHO for /f "tokens=1,2,3,4" %%%%i in (chiffren_12.txt) do if %%%%i equ %%vgl%% (echo %%%%j) ^>^>auslese_12.log FOR /F "tokens=1 delims=" %%i in (auslese_12.txt) do call code12.bat %%i REM die Reihen werden zusammengefuehrt FOR /F "tokens=*" %%A IN ('findstr /N .* "auslese_1.log"') DO echo %%A^: >> tableone1.log FOR /F "tokens=*" %%A IN ('findstr /N .* "auslese_2.log"') DO echo %%A^: >> tabletwo1.log FOR /F "tokens=1,* delims=:" %%i IN (tableone1.log) DO echo %%j >tableone1_%%i.log FOR /F "tokens=1,* delims=:" %%i IN (tabletwo1.log) DO echo %%j >tabletwo1_%%i.log set /a x=1 :further1 for /f "delims=" %%a in (tableone1_%x%.log) do for /f "delims=" %%i in (tabletwo1_%x%.log) do echo %%i%%a >tablenew1_%x%.log set /a x=%x%+1 if exist *_%x%.log (goto further1) else goto final1 :final1 set /a y=1 :last1 for /f "TOKENS=*" %%a in ('dir tablenew1_%y%.log /b') do type "%%a" >> result1.txt set /a y=%y%+1 if exist tablenew1_%y%.log (goto last1) else goto nowend1 :nowend1 FOR /F "tokens=1,2 delims=:" %%i IN (result1.txt) DO echo %%i%%j >>chif_1_2.txt del tablenew1_*.log del tableone1_*.log del tabletwo1_*.log del result1.txt del tableone1.log del tabletwo1.log del auslese_*.txt FOR /F "tokens=*" %%A IN ('findstr /N .* "auslese_3.log"') DO echo %%A^: >> tableone1.log FOR /F "tokens=*" %%A IN ('findstr /N .* "auslese_4.log"') DO echo %%A^: >> tabletwo1.log FOR /F "tokens=1,* delims=:" %%i IN (tableone1.log) DO echo %%j >tableone1_%%i.log FOR /F "tokens=1,* delims=:" %%i IN (tabletwo1.log) DO echo %%j >tabletwo1_%%i.log set /a x=1 :further2 for /f "delims=" %%a in (tableone1_%x%.log) do for /f "delims=" %%i in (tabletwo1_%x%.log) do echo %%i%%a >tablenew1_%x%.log set /a x=%x%+1 if exist *_%x%.log (goto further2) else goto final2 :final2 set /a y=1 :last2 for /f "TOKENS=*" %%a in ('dir tablenew1_%y%.log /b') do type "%%a" >> result1.txt set /a y=%y%+1 if exist tablenew1_%y%.log (goto last2) else goto nowend2 :nowend2 FOR /F "tokens=1,2 delims=:" %%i IN (result1.txt) DO echo %%i%%j >>chif_3_4.txt del tablenew1_*.log del tableone1_*.log del tabletwo1_*.log del result1.txt del tableone1.log del tabletwo1.log FOR /F "tokens=*" %%A IN ('findstr /N .* "auslese_5.log"') DO echo %%A^: >> tableone1.log FOR /F "tokens=*" %%A IN ('findstr /N .* "auslese_6.log"') DO echo %%A^: >> tabletwo1.log FOR /F "tokens=1,* delims=:" %%i IN (tableone1.log) DO echo %%j >tableone1_%%i.log FOR /F "tokens=1,* delims=:" %%i IN (tabletwo1.log) DO echo %%j >tabletwo1_%%i.log set /a x=1 :further3 for /f "delims=" %%a in (tableone1_%x%.log) do for /f "delims=" %%i in (tabletwo1_%x%.log) do echo %%i%%a >tablenew1_%x%.log set /a x=%x%+1 if exist *_%x%.log (goto further3) else goto final3 :final3 set /a y=1 :last3 for /f "TOKENS=*" %%a in ('dir tablenew1_%y%.log /b') do type "%%a" >> result1.txt set /a y=%y%+1 if exist tablenew1_%y%.log (goto last3) else goto nowend3 :nowend3 FOR /F "tokens=1,2 delims=:" %%i IN (result1.txt) DO echo %%i%%j >>chif_5_6.txt del tablenew1_*.log del tableone1_*.log del tabletwo1_*.log del result1.txt del tableone1.log del tabletwo1.log FOR /F "tokens=*" %%A IN ('findstr /N .* "auslese_7.log"') DO echo %%A^: >> tableone1.log FOR /F "tokens=*" %%A IN ('findstr /N .* "auslese_8.log"') DO echo %%A^: >> tabletwo1.log FOR /F "tokens=1,* delims=:" %%i IN (tableone1.log) DO echo %%j >tableone1_%%i.log FOR /F "tokens=1,* delims=:" %%i IN (tabletwo1.log) DO echo %%j >tabletwo1_%%i.log set /a x=1 :further4 for /f "delims=" %%a in (tableone1_%x%.log) do for /f "delims=" %%i in (tabletwo1_%x%.log) do echo %%i%%a >tablenew1_%x%.log set /a x=%x%+1 if exist *_%x%.log (goto further4) else goto final4 :final4 set /a y=1 :last4 for /f "TOKENS=*" %%a in ('dir tablenew1_%y%.log /b') do type "%%a" >> result1.txt set /a y=%y%+1 if exist tablenew1_%y%.log (goto last4) else goto nowend4 :nowend4 FOR /F "tokens=1,2 delims=:" %%i IN (result1.txt) DO echo %%i%%j >>chif_7_8.txt del tablenew1_*.log del tableone1_*.log del tabletwo1_*.log del result1.txt del tableone1.log del tabletwo1.log FOR /F "tokens=*" %%A IN ('findstr /N .* "auslese_9.log"') DO echo %%A^: >> tableone1.log FOR /F "tokens=*" %%A IN ('findstr /N .* "auslese_10.log"') DO echo %%A^: >> tabletwo1.log FOR /F "tokens=1,* delims=:" %%i IN (tableone1.log) DO echo %%j >tableone1_%%i.log FOR /F "tokens=1,* delims=:" %%i IN (tabletwo1.log) DO echo %%j >tabletwo1_%%i.log set /a x=1 :further5 for /f "delims=" %%a in (tableone1_%x%.log) do for /f "delims=" %%i in (tabletwo1_%x%.log) do echo %%i%%a >tablenew1_%x%.log set /a x=%x%+1 if exist *_%x%.log (goto further5) else goto final5 :final5 set /a y=1 :last5 for /f "TOKENS=*" %%a in ('dir tablenew1_%y%.log /b') do type "%%a" >> result1.txt set /a y=%y%+1 if exist tablenew1_%y%.log (goto last5) else goto nowend5 :nowend5 FOR /F "tokens=1,2 delims=:" %%i IN (result1.txt) DO echo %%i%%j >>chif_9_10.txt del tablenew1_*.log del tableone1_*.log del tabletwo1_*.log del result1.txt del tableone1.log del tabletwo1.log FOR /F "tokens=*" %%A IN ('findstr /N .* "auslese_11.log"') DO echo %%A^: >> tableone1.log FOR /F "tokens=*" %%A IN ('findstr /N .* "auslese_12.log"') DO echo %%A^: >> tabletwo1.log FOR /F "tokens=1,* delims=:" %%i IN (tableone1.log) DO echo %%j >tableone1_%%i.log FOR /F "tokens=1,* delims=:" %%i IN (tabletwo1.log) DO echo %%j >tabletwo1_%%i.log set /a x=1 :further6 for /f "delims=" %%a in (tableone1_%x%.log) do for /f "delims=" %%i in (tabletwo1_%x%.log) do echo %%i%%a >tablenew1_%x%.log set /a x=%x%+1 if exist *_%x%.log (goto further6) else goto final6 :final6 set /a y=1 :last6 for /f "TOKENS=*" %%a in ('dir tablenew1_%y%.log /b') do type "%%a" >> result1.txt set /a y=%y%+1 if exist tablenew1_%y%.log (goto last6) else goto nowend6 :nowend6 FOR /F "tokens=1,2 delims=:" %%i IN (result1.txt) DO echo %%i%%j >>chif_11_12.txt del tablenew1_*.log del tableone1_*.log del tabletwo1_*.log del result1.txt del tableone1.log del tabletwo1.log FOR /F "tokens=*" %%A IN ('findstr /N .* "chif_1_2.txt"') DO echo %%A^: >> tableone1.log FOR /F "tokens=*" %%A IN ('findstr /N .* "chif_3_4.txt"') DO echo %%A^: >> tabletwo1.log FOR /F "tokens=1,* delims=:" %%i IN (tableone1.log) DO echo %%j >tableone1_%%i.log FOR /F "tokens=1,* delims=:" %%i IN (tabletwo1.log) DO echo %%j >tabletwo1_%%i.log set /a x=1 :further7 for /f "delims=" %%a in (tableone1_%x%.log) do for /f "delims=" %%i in (tabletwo1_%x%.log) do echo %%i%%a >tablenew1_%x%.log set /a x=%x%+1 if exist *_%x%.log (goto further7) else goto final7 :final7 set /a y=1 :last7 for /f "TOKENS=*" %%a in ('dir tablenew1_%y%.log /b') do type "%%a" >> result1.txt set /a y=%y%+1 if exist tablenew1_%y%.log (goto last7) else goto nowend7 :nowend7 FOR /F "tokens=1,2 delims=:" %%i IN (result1.txt) DO echo %%i%%j >>chif_1_2_3_4.txt del tablenew1_*.log del tableone1_*.log del tabletwo1_*.log del result1.txt del tableone1.log del tabletwo1.log del chif_1_2.txt del chif_3_4.txt FOR /F "tokens=*" %%A IN ('findstr /N .* "chif_5_6.txt"') DO echo %%A^: >> tableone1.log FOR /F "tokens=*" %%A IN ('findstr /N .* "chif_7_8.txt"') DO echo %%A^: >> tabletwo1.log FOR /F "tokens=1,* delims=:" %%i IN (tableone1.log) DO echo %%j >tableone1_%%i.log FOR /F "tokens=1,* delims=:" %%i IN (tabletwo1.log) DO echo %%j >tabletwo1_%%i.log set /a x=1 :further8 for /f "delims=" %%a in (tableone1_%x%.log) do for /f "delims=" %%i in (tabletwo1_%x%.log) do echo %%i%%a >tablenew1_%x%.log set /a x=%x%+1 if exist *_%x%.log (goto further8) else goto final8 :final8 set /a y=1 :last8 for /f "TOKENS=*" %%a in ('dir tablenew1_%y%.log /b') do type "%%a" >> result1.txt set /a y=%y%+1 if exist tablenew1_%y%.log (goto last8) else goto nowend8 :nowend8 FOR /F "tokens=1,2 delims=:" %%i IN (result1.txt) DO echo %%i%%j >>chif_5_6_7_8.txt del tablenew1_*.log del tableone1_*.log del tabletwo1_*.log del result1.txt del tableone1.log del tabletwo1.log del chif_5_6.txt del chif_7_8.txt FOR /F "tokens=*" %%A IN ('findstr /N .* "chif_9_10.txt"') DO echo %%A^: >> tableone1.log FOR /F "tokens=*" %%A IN ('findstr /N .* "chif_11_12.txt"') DO echo %%A^: >> tabletwo1.log FOR /F "tokens=1,* delims=:" %%i IN (tableone1.log) DO echo %%j >tableone1_%%i.log FOR /F "tokens=1,* delims=:" %%i IN (tabletwo1.log) DO echo %%j >tabletwo1_%%i.log set /a x=1 :further9 for /f "delims=" %%a in (tableone1_%x%.log) do for /f "delims=" %%i in (tabletwo1_%x%.log) do echo %%i%%a >tablenew1_%x%.log set /a x=%x%+1 if exist *_%x%.log (goto further9) else goto final9 :final9 set /a y=1 :last9 for /f "TOKENS=*" %%a in ('dir tablenew1_%y%.log /b') do type "%%a" >> result1.txt set /a y=%y%+1 if exist tablenew1_%y%.log (goto last9) else goto nowend9 :nowend9 FOR /F "tokens=1,2 delims=:" %%i IN (result1.txt) DO echo %%i%%j >>chif_9_10_11_12.txt del tablenew1_*.log del tableone1_*.log del tabletwo1_*.log del result1.txt del tableone1.log del tabletwo1.log del chif_9_10.txt del chif_11_12.txt FOR /F "tokens=*" %%A IN ('findstr /N .* "chif_1_2_3_4.txt"') DO echo %%A^: >> tableone1.log FOR /F "tokens=*" %%A IN ('findstr /N .* "chif_5_6_7_8.txt"') DO echo %%A^: >> tabletwo1.log FOR /F "tokens=1,* delims=:" %%i IN (tableone1.log) DO echo %%j >tableone1_%%i.log FOR /F "tokens=1,* delims=:" %%i IN (tabletwo1.log) DO echo %%j >tabletwo1_%%i.log set /a x=1 :further10 for /f "delims=" %%a in (tableone1_%x%.log) do for /f "delims=" %%i in (tabletwo1_%x%.log) do echo %%i%%a >tablenew1_%x%.log set /a x=%x%+1 if exist *_%x%.log (goto further10) else goto final10 :final10 set /a y=1 :last10 for /f "TOKENS=*" %%a in ('dir tablenew1_%y%.log /b') do type "%%a" >> result1.txt set /a y=%y%+1 if exist tablenew1_%y%.log (goto last10) else goto nowend10 :nowend10 FOR /F "tokens=1,2 delims=:" %%i IN (result1.txt) DO echo %%i%%j >>chif_final.txt del tablenew1_*.log del tableone1_*.log del tabletwo1_*.log del result1.txt del tableone1.log del tabletwo1.log del auslese_*.log FOR /F "tokens=*" %%A IN ('findstr /N .* "chif_final.txt"') DO echo %%A^: >> tableone1.log FOR /F "tokens=*" %%A IN ('findstr /N .* "chif_9_10_11_12.txt"') DO echo %%A^: >> tabletwo1.log FOR /F "tokens=1,* delims=:" %%i IN (tableone1.log) DO echo %%j >tableone1_%%i.log FOR /F "tokens=1,* delims=:" %%i IN (tabletwo1.log) DO echo %%j >tabletwo1_%%i.log set /a x=1 :further11 for /f "delims=" %%a in (tableone1_%x%.log) do for /f "delims=" %%i in (tabletwo1_%x%.log) do echo %%i%%a >tablenew1_%x%.log set /a x=%x%+1 if exist *_%x%.log (goto further11) else goto final11 :final11 set /a y=1 :last11 for /f "TOKENS=*" %%a in ('dir tablenew1_%y%.log /b') do type "%%a" >> result1.txt set /a y=%y%+1 if exist tablenew1_%y%.log (goto last11) else goto nowend11 :nowend11 FOR /F "tokens=1,2 delims=:" %%i IN (result1.txt) DO echo %%i%%j >>dechiffre1.txt FOR /F "tokens=1,2,3,4,5,6,7,8,9,10,11,12 delims= " %%i IN (dechiffre1.txt) DO echo %%t %%s %%r %%q %%p %%o %%n %%m %%l %%k %%j %%i >>dechiffre.txt del dechiffre1.txt del tablenew1_*.log del tableone1_*.log del tabletwo1_*.log del result1.txt del tableone1.log del tabletwo1.log del chif_final.txt del chif_*_*_*_*.txt del chiffren_*.txt del code*.bat