$B30ItJQ7A3hMQ%j%s%/=8$X!!La$k(B

$BE49|;0It:n$N%P%C%A%U%!%$%k=$@5J}K!(B

$B"((B$B!IE49|;0It:n(B(1$B!I(B) $B$N!I(BJW_PROX1.BAT$B!I(B$B$rNc$K$H$C$F$^$9!#(B$B@V?'I=<((B$B$NItJ,$r%(%G%#%?!<$GJT=8$7$F$/$@$5$$!#(B
$B!!!!(B$B@D?'I=<((B$BItJ,$O!";29M$K$7$F$/$@$5$$!#(B

em $BE49|;0It:n(B(1) $B9]:`CGLL:n?^(B vol.1 /
rem $B-!#H7A9](B
rem $B-"3Q7A9]4I(B
rem $B-#1_7A9]4I(B
rem $B-$EyJU;37A9](B
rem $B-%%j%C%W$_$>7A9](B($B#C%A%c%s(B)
rem $B-&=ENL9B7A9](B
rem written by $B@1$H2V(B(RXN12716@nifty.ne.jp)
rem ver.0.01 1998.05.03 $B@~ rem ver.0.02 1998.07.07 $BIA2h0LCV;XDj4X78$N2~NI(B
rem $B#H7A9](B,$BEyJU;37A9](B,$B#C%A%c%s(B,$B=ENL9B7A9]$N86:n @echo off
@cls
goto do%1
rem #jw$B!!!!!!!!!!!!!!!!(B$B"((Brem#jww$B$H$7$F$bNI$$$G$9$,!"(BDOS$BHG$G;H$($J$/$J$j$^$9!#(B
rem #cd$B!!!!!!!!!!!!!!"(DI2C9T!'2<$N9T$N=$@5$G!"F0:n$9$k$h$&$G$7$?$i!"DI2C$9$kI,MW$O$J$$$G$9!#(B
$B!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!(BDOS$BHGMQ$N30ItJQ7A$,$&$^$/F0$+$J$$$H$-!"DI2C$9$k$H$&$^$/F0:n$9$k>l9g$b$"$j$^$9!#(B


rem #hc $B:8(I8X/8(B $B1&(I8X/8(B $B!y&7(B
rem #hm$B9]:`:n?^(B | $B-!#H7A9](B| $B-"""9]4I(B| $B-#!{9]4I(B| $B-$(I1]8^Y(B| $B-%#C(IA,](B| $B-&=E9B(B| $B@1$H2V(B

rem #:1
rem #mc
rem #h0
rem #0 $B#H7A9]$N?^<(0LCV$r;X<((B
rem #1 $B#H7A9]$N#Y<4J}8~$r;X<((B.
rem #c $BIA2h4pE@(B $B!J(B1$B!A(B9$B!?(BCR=8$B!K(B: /_PT
rem #c $B9b$5(B (mm$B!?(BCR=250) : /_H
rem #c $BI}(B (mm$B!?(BCR=125) : /_B
rem #c $B%&%'%V8|(B (mm$B!?(BCR=6) : /_TW
rem #c $B%U%i%s%88|(B (mm$B!?(BCR=9) : /_TF
rem #c $B%U%#%l%C%H(B r(mm)$B!J(BCR=$BN,?^!?(I1YL'M^/D(B=BH) : /_R
rem #c $B@~ rem #c $B@~?'(B $B!J(B1$B!A(B6$B!?(BCR=2$B!K(B: /_LC
rem #e

rem #:2
rem #mc
rem #h0
rem #0 $B3Q7A9]4I$N?^<(0LCV$r;X<((B
rem #1 $B3Q7A9]4I$N#Y<4J}8~$r;X<((B.
rem #c $BIA2h4pE@(B $B!J(B1$B!A(B9$B!?(BCR=5$B!K(B: /_PT
rem #c $B9]4I$N7B(B (mm$B!?(BCR=300) : /_B
rem #c $BFy8|(B (mm$B!?(BCR=12) : /_T
rem #c $B@~ rem #c $B@~?'(B $B!J(B1$B!A(B6$B!?(BCR=2$B!K(B: /_LC
rem #e

rem #:3
rem #mc
rem #h0
rem #0 $B1_7A9]4I$N?^<(0LCV$r;X<((B
rem #1 $B1_7A9]4I$N#Y<4J}8~$r;X<((B.
rem #c $BIA2h4pE@(B $B!J(B1$B!A(B9$B!?(BCR=5$B!K(B: /_PT
rem #c $B9]4I$N7B(B (mm$B!?(BCR=318.5) : /_D
rem #c $BFy8|(B (mm$B!?(BCR=12.7) : /_T
rem #c $B@~ rem #c $B@~?'(B $B!J(B1$B!A(B6$B!?(BCR=2$B!K(B: /_LC
rem #e

rem #:4
rem #mc
rem #h0
rem #0 $BEyJU;37A9]$N?^<(0LCV$r;X<((B
rem #1 $BEyJU;37A9]$N#Y<4J}8~$r;X<((B.
rem #c $BIA2h4pE@(B (1$B!A(B9$B!?(BCR=1) : /_PT
rem #c $B=D!J(B=$B2#!K(B (mm$B!?(BCR=65) : /_A
rem #c $B8|$5(B (mm$B!?(BCR=6) : /_T
rem #c $BF~6y#RLL!J(BCR=$BN,?^(B^^;$B!K(B r1(mm) : /_R1
rem #c $B@hC<#RLL!J(BCR=$BN,?^(B^^;$B!K(B r2(mm) : /_R2
rem #c $B@~ rem #c $B@~?'(B $B!J(B1$B!A(B6$B!?(BCR=2$B!K(B: /_LC
rem #e

rem #:5
rem #mc
rem #h0
rem #0 $B%j%C%W9B7A9]$N?^<(0LCV$r;X<((B
rem #1 $B%j%C%W9B7A9]$N#Y<4J}8~$r;X<((B.
rem #c $BIA2h4pE@(B (1$B!A(B9$B!?(BCR=1) : /_PT
rem #c $B=D(B A (mm$B!?(BCR=100) : /_A
rem #c $B2#(B B (mm$B!?(BCR=50) : /_B
rem #c $B%j%C%W(B C (mm$B!?(BCR=20) : /_C
rem #c $B8|$5(B t (mm$B!?(BCR=2.3) : /_T
rem #c $B@~ rem #c $B@~?'(B $B!J(B1$B!A(B6$B!?(BCR=2$B!K(B: /_LC
rem #e


rem #:6
rem #mc
rem #h0
rem #0 $B=ENL9B7A9]$N?^<(0LCV$r;X<((B
rem #1 $B=ENL9B7A9]$N#Y<4J}8~$r;X<((B.
rem #c $BIA2h4pE@(B (1$B!A(B9$B!?(BCR=1) : /_PT
rem #c $B9b$5(B (mm$B!?(BCR=200) : /_H
rem #c $BI}(B (mm$B!?(BCR=80) : /_B
rem #c $B%&%'%V8|(B (mm$B!?(BCR=7.5) : /_TW
rem #c $B%U%i%s%88|(B (mm$B!?(BCR=11) : /_TF
rem #c $BF~6y#RLL!J(BCR=$BN,?^(B ^^;$B!K(B r1(mm) : /_R1
rem #c $B@hC<#RLL!J(BCR=$BN,?^(B ^^;$B!K(B r2(mm) : /_R2
rem #c $B@~ rem #c $B@~?'(B $B!J(B1$B!A(B6$B!?(BCR=2$B!K(B: /_LC
rem #e


:do1
copy jwc_temp.txt temp.txt > nul
jgawk -f KHGATA.AWK temp.txt %2 %3 %4 %5 %6 %7 %8 %9> jwc_temp.txt$B!!!!!!!!(B$B"("+=$@59T$G$9!#(B
del temp.txt >nul
goto END

:do2
copy jwc_temp.txt temp.txt > nul
jgawk -f KCOLUM.AWK temp.txt %2 %3 %4 %5 %6 %7 %8 %9> jwc_temp.txt$B!!!!!!!!(B$B"("+=$@59T$G$9!#(B
del temp.txt >nul
goto END

:do3
copy jwc_temp.txt temp.txt > nul
jgawk -f KENKEI.AWK temp.txt %2 %3 %4 %5 %6 %7 %8 %9> jwc_temp.txt$B!!!!!!!!!!(B$B"("+=$@59T$G$9!#(B
del temp.txt >nul
goto END

:do4
copy jwc_temp.txt temp.txt > nul
jgawk -f KANGLE.AWK temp.txt %2 %3 %4 %5 %6 %7 %8 %9> jwc_temp.txt$B!!!!!!!!(B$B"("+=$@59T$G$9!#(B
del temp.txt >nul
goto END

:do5
copy jwc_temp.txt temp.txt > nul
jgawk -f KC_CHAN.AWK temp.txt %2 %3 %4 %5 %6 %7 %8 %9> jwc_temp.txt$B!!!!!!(B$B"("+=$@59T$G$9!#(B
del temp.txt >nul
goto END

:do6
copy jwc_temp.txt temp.txt > nul
jgawk -f KCHAN.AWK temp.txt %2 %3 %4 %5 %6 %7 %8 %9> jwc_temp.txt$B!!!!!!!!!!(B$B"("+=$@59T$G$9!#(B
del temp.txt >nul
goto END

$B=$@5$,=*$o$C$?$i!"(B$B>e=q$-J]B8(B$B$7$F$/$@$5$$!#(B
$B$&$^$/F0:n$7$?$i!"(B$B!I:n$B$K46