tools/ScanRsps.btm

   1 @echo off
   2 pushd ..\src\engine
   3 set i=shared
   4 gosub scanSub1
   5 set i=client
   6 gosub scanSub1
   7 set i=server
   8 gosub scanSub1
   9 popd
  10
  11 pushd ..\src\game
  12 set i=shared
  13 gosub scanSub1
  14 set i=client
  15 gosub scanSub1
  16 set i=server
  17 gosub scanSub1
  18 popd
  19
  20 goto end
  21
  22 :scanSub1
  23 pushd %i
  24 for /a:d j in (*) do (if "%@TRIM[%@LEFT[2, %j]]" != "." (gosub scanSub2))
  25 popd
  26 return
  27
  28 :scanSub2
  29 pushd %j
  30 for /a:d k in (*) do (if "%@TRIM[%@LEFT[2, %k]]" != "." (gosub scanSub3))
  31 popd
  32 return
  33
  34 :scanSub3
  35 if not isdir %k\build\win32 goto missing
  36 pushd %k\build\win32
  37
  38 :found
  39 echo ----------
  40 if not exist "includePaths.rsp" goto missingp
  41 call ScanRsp includePaths.rsp %i/%j/%k/build/win32
  42 popd
  43 return
  44
  45 :missing
  46 echo missing includePaths.rsp in %i/%j/%k/build/win32
  47 return
  48
  49 :missingp
  50 echo missing includePaths.rsp in %i/%j/%k/build/win32
  51 popd
  52 return
  53
  54 :end