-set TCLHOME=w:/TCL/TCL8.3/tcl8.3.2
-set TCLBIN=%TCLHOME%/win/Release
-set WOKHOME=.
-set PATH=D%TCLBIN%;%WOKHOME%/lib/wnt;%PATH%
-
-rem If Not Defined TCL_RCFILE set TCL_RCFILE=%WOKHOME%\.tclshrc
-
-
-%TCLBIN%/tclsh.exe
-
+set TCLHOME=%CASROOT%/../3rdparty/win32/tcltk\r
+set TCLBIN=%TCLHOME%/bin\r
+set WOKHOME=%CASROOT%/../wok\r
+set PATH=%TCLBIN%;%WOKHOME%/lib/wnt;%PATH%\r
+set TCL_RCFILE=%WOKHOME%/site/tclshrc.tcl\r
+set WOK_ROOTADMDIR=%WOKHOME%/wok_entities\r
+set HOME=%WOKHOME%/site\r
+set INIT=%WOKHOME%/lib/wnt\r
+cd %WOK_ROOTADMDIR%\r
+%TCLBIN%/tclsh.exe\r