+@echo off\r
+del %*\r
+setlocal\r
+rem for %@eval[%#+1] in (%*) do (\r
+rem for %# in (1,1,%*) do (\r
+:loop\r
+ set /a o=0\r
+:oooo\r
+ set /a q=%@EVAL[%@LEN[%1] - 4]\r
+ set w=%@INSTR[0,%q,%1]\r
+ iff NOT "%w" == "" then\r
+ set /a o=%o+1\r
+ set y=%w.z%o\r
+rem echo y=%y\r
+ htget http://4ch.mooo.com/16/%1.zip.00%o > %y\r
+rem pause\r
+ type %y >> %w.zip\r
+ iff "%@FILESIZE[%y,b]" == "65536" then\r
+rem echo o=%o\r
+ goto oooo\r
+ endiff\r
+ iff NOT "%#" == "0" then\r
+ shift /1\r
+ unzip %w.zip\r
+ del %w.z*\r
+ goto loop\r
+ endiff\r
+ endiff\r
+rem echo y="%y"\r
+rem echo q=%q\r
+rem echo o=%o\r
+rem echo w=%w\r
+rem echo %%1=%1\r
+endlocal\r