x4get.bat

   1 @echo off\r
   2 del %*\r
   3 setlocal\r
   4 set url="4ch.mooo.com/16"\r
   5 rem for %@eval[%#+1] in (%*) do (\r
   6 rem for %# in (1,1,%*) do (\r
   7 :loop\r
   8         set /a o=0\r
   9 :oooo\r
  10         set /a q=%@EVAL[%@LEN[%1] - 4]\r
  11         set w=%@INSTR[0,%q,%1]\r
  12         iff NOT "%w" == "" then\r
  13         set /a o=%o+1\r
  14         set y=%w.z%o\r
  15 rem      echo y=%y\r
  16         htget http://%url/%1.zip.00%o > %y\r
  17 rem     pause\r
  18         type %y >> %w.zip\r
  19         iff "%@FILESIZE[%y,b]" == "65536" then\r
  20 rem             echo o=%o\r
  21                 goto oooo\r
  22         endiff\r
  23         iff NOT "%#" == "0" then\r
  24                 shift /1\r
  25                 unzip %w.zip\r
  26                 del %w.z*\r
  27                 goto loop\r
  28         endiff\r
  29         endiff\r
  30 rem  echo y="%y"\r
  31 rem  echo q=%q\r
  32 rem  echo o=%o\r
  33 rem  echo w=%w\r
  34 rem  echo %%1=%1\r
  35 endlocal\r