@echo off
if "%1"=="" goto printhelp
if "%1"=="/?" goto printhelp

:make_ribfile
set currentlevoyname=%1

type head.rib.txt                     >%currentlevoyname%.rib
echo Display "%currentlevoyname%.tif" "file" "rgba"   >>%currentlevoyname%.rib
type name2rotate.rib.txt              >>%currentlevoyname%.rib
echo   Rotate %2 0 1 0                >>%currentlevoyname%.rib
type rotate2stepsize.rib.txt          >>%currentlevoyname%.rib
echo     "float stepsize" %3          >>%currentlevoyname%.rib
echo     "float isovalue" %4          >>%currentlevoyname%.rib
echo     "float isovaluealpha" %5     >>%currentlevoyname%.rib
echo     "float isovaluethickness" %6 >>%currentlevoyname%.rib
shift
shift
shift
shift
shift
shift

if "%1"=="black" set matcolor=[0 0 0]
if "%1"=="red"   set matcolor=[1 0 0]
if "%1"=="green" set matcolor=[0 1 0]
if "%1"=="blue"  set matcolor=[0 0 1]
if "%1"=="tuerk" set matcolor=[0 1 1]
if "%1"=="white" set matcolor=[1 1 1]
echo     "color mat0_color" %matcolor% "float mat0_alpha" %2 "float mat0_value" %3    >>%currentlevoyname%.rib

shift
shift
shift
if "%1"=="black" set matcolor=[0 0 0]
if "%1"=="red"   set matcolor=[1 0 0]
if "%1"=="green" set matcolor=[0 1 0]
if "%1"=="blue"  set matcolor=[0 0 1]
if "%1"=="tuerk" set matcolor=[0 1 1]
if "%1"=="white" set matcolor=[1 1 1]
echo     "color mat1_color" %matcolor% "float mat1_alpha" %2 "float mat1_value" %3    >>%currentlevoyname%.rib

shift
shift
shift
if "%1"=="black" set matcolor=[0 0 0]
if "%1"=="red"   set matcolor=[1 0 0]
if "%1"=="green" set matcolor=[0 1 0]
if "%1"=="blue"  set matcolor=[0 0 1]
if "%1"=="tuerk" set matcolor=[0 1 1]
if "%1"=="white" set matcolor=[1 1 1]
echo     "color mat2_color" %matcolor% "float mat2_alpha" %2 "float mat2_value" %3    >>%currentlevoyname%.rib

shift
shift
shift
if "%1"=="black" set matcolor=[0 0 0]
if "%1"=="red"   set matcolor=[1 0 0]
if "%1"=="green" set matcolor=[0 1 0]
if "%1"=="blue"  set matcolor=[0 0 1]
if "%1"=="tuerk" set matcolor=[0 1 1]
if "%1"=="white" set matcolor=[1 1 1]
echo     "color mat3_color" %matcolor% "float mat3_alpha" %2 "float mat3_value" %3    >>%currentlevoyname%.rib

shift
shift
shift
if "%1"=="black" set matcolor=[0 0 0]
if "%1"=="red"   set matcolor=[1 0 0]
if "%1"=="green" set matcolor=[0 1 0]
if "%1"=="blue"  set matcolor=[0 0 1]
if "%1"=="tuerk" set matcolor=[0 1 1]
if "%1"=="white" set matcolor=[1 1 1]
echo     "color mat4_color" %matcolor% "float mat4_alpha" %2 "float mat4_value" %3    >>%currentlevoyname%.rib

type tail.rib.txt                     >>%currentlevoyname%.rib 


:call_bmrt
echo Created file %currentlevoyname%.rib, starting with image creation

echo mit radiosity
echo rendrib -radio 50 %currentlevoyname%.rib 
echo ohne radiosity
rendrib %currentlevoyname%.rib

echo Finished with image %currentlevoyname%.
set matcolor=
set currentlevoyname=
goto end



:printhelp
echo levoy.bat calls bmrt (blue moon rendering tools) to create an image using the
echo  following options
echo  syntax:  levoy [imgname] [angle] [stepsize]
echo                 [isovalue] [isovaluealpha] [isovaluethickness]
echo                 [mat0color] [mat0alpha] [mat0value]
echo                 [mat1color] [mat1alpha] [mat1value]
echo                 [mat2color] [mat2alpha] [mat2value]
echo                 [mat3color] [mat3alpha] [mat3value]
echo                 [mat4color] [mat4alpha] [mat4value]
echo  imgname is the mere name of the resulting image without a suffix (e.g. ctskull)
echo  mat?color is a color name from [black, white, red, green, blue]
echo  the other parameters are values

:end