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 (auslese.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 (auslese.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 (auslese.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 (auslese.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 (auslese.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 (auslese.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 (auslese.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 (auslese.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 (auslese.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 (auslese.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 (auslese.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 (auslese.txt) do echo %%t >>auslese_12.txt REM Ort wird ermittelt set destination=%~dp0% REM Zwoelf Reihen werden unterschiedlich chiffriert set destination=%~dp0% >"%destination%code1.bat" ECHO set vgl=%%1 >>"%destination%code1.bat" ECHO for /f "tokens=1,2,3,4" %%%%i in (chiffre_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 (chiffre_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 (chiffre_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 (chiffre_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 (chiffre_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 (chiffre_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 (chiffre_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 (chiffre_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 (chiffre_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 (chiffre_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 (chiffre_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 (chiffre_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 code*.bat 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 >>chif1.txt FOR /F "tokens=1,2,3,4,5,6,7,8,9,10,11,12 delims= " %%i IN (chif1.txt) DO echo %%t %%s %%r %%q %%p %%o %%n %%m %%l %%k %%j %%i >>chif.txt del chif1.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 REM zufallszahll bestimmt Drehung einzelner Buchstabenreihen REM zufallszahll bestimmt Drehung einzelner Buchstabenreihen REM Hier muss der ambitionierte User Hand anlegen REM eigene Reihen erfinden und beim dechiffrieren ebenfalls aendern set destination=%~dp0% set /a y=0 :loopb if %y% geq 12 goto loopbende set /a y=%y%+1 if exist block_1_%y%.log echo i >>var1%y%.txt if exist block_2_%y%.log echo j >>var1%y%.txt if exist block_3_%y%.log echo k >>var1%y%.txt if exist block_4_%y%.log echo l >>var1%y%.txt if exist block_5_%y%.log echo m >>var1%y%.txt if exist block_6_%y%.log echo n >>var1%y%.txt if exist block_7_%y%.log echo o >>var1%y%.txt if exist block_8_%y%.log echo p >>var1%y%.txt if exist block_9_%y%.log echo q >>var1%y%.txt if exist block_10_%y%.log echo r >>var1%y%.txt if exist block_11_%y%.log echo s >>var1%y%.txt if exist block_12_%y%.log echo t >>var1%y%.txt goto loopb :loopbende set /p var1="%destination%codeblock1.bat" ECHO FOR /F "tokens=1,2,3,4,5,6,7,8,9,10,11,12 delims= " %%%%i IN (chif.txt) DO echo %%%%%var1% %%%%%var2% %%%%%var3% %%%%%var4% %%%%%var5% %%%%%var6% %%%%%var7% %%%%%var8% %%%%%var9% %%%%%var10% %%%%%var11% %%%%%var12% ^>^>chifende.txt >>"%destination%codeblock1.bat" ECHO exit ^>^>chifende.txt start /wait codeblock1.bat del var*.txt del chif.txt del codeblock1.bat