Ｗ線用のＲ面取りを作ってみました。
以下データー

#Ｗ線用　Ｒ面取り（辺寸法指定）　　２線指示（内側線指示）

input"内側線の辺面取り寸法(mm)"%men_sun1=300
input"壁厚(mm)　"%kabeatu1=120

#外側の円弧辺面取り寸法
%men_sun2=%men_sun1+%kabeatu1
#２線指定
gsen_read2
#元レイヤON
$motolayer_set
#指示線のグループに移動
$group_set:%sread_glp1
$urasen_set:0:11
#内側の円弧処理
%kaku1=%sread_kakudo2
$rotate:0:0:0:%men_sun1:%kaku1
%zax1=%result_x1
%zay1=%result_y1
#3点円用の頂点座標を求める
$ten3_zusin:-%men_sun1:0:%zax1:%zay1:0:0:0
%zax2=%result_x1
%zay2=%result_y1
#3点円作図
t3arc:-%men_sun1:0:%zax2:%zay2:%zax1:%zay1:%sread_col1:%sread_typ1:%sread_lay1

#外側の円弧処理
#外側へx複線
$fukusen_zahyou:0:0:%zax1:%zay1:-%kabeatu1:
%szaxa1=%result_x1
%szaya1=%result_y1
%szaxa2=%result_x2
%szaya2=%result_y2
#外側へy複線
$fukusen_zahyou:-%men_sun1:0:0:0:-%kabeatu1:
%szaxb1=%result_x1
%szayb1=%result_y1
%szaxb2=%result_x2
%szayb2=%result_y2
#外側xy線分の交点
$sen_koten:%szaxa1:%szaya1:%szaxa2:%szaya2:%szaxb1:%szayb1:%szaxb2:%szayb2:

%zaxa=%result_x1
%zaya=%result_y1

%zax0=%szaxb1
%zay0=%szayb1

%zax1=%szaxa2
%zay1=%szaya2
#外側3点円用の頂点座標を求める
$ten3_zusin:%zax0:%zay0:%zax1:%zay1:%zaxa:%zaya:0
%zax2=%result_x1
%zay2=%result_y1
#外側3点円作図
t3arc:%zax0:%zay0:%zax2:%zay2:%zax1:%zay1:%sread_col1:%sread_typ1:%sread_lay1

#ダミー内朱線
line:0:%men_sun1:0:200+%men_sun1:0:10:9:-1
line:-200-%men_sun1:0:-%men_sun1:0:0:10:9:-1

#削除範囲補助線　内用(PenNO2と3指定で線外PenNO2交点位置までのびる)
line:-%men_sun1:-2:-%men_sun1:2:0:2:9:-1
line:-%men_sun1+3:-2:-%men_sun1+3:2:0:3:9:-1
line:-2:%men_sun1:2:%men_sun1:%kaku1:2:9:-1
line:-2:%men_sun1-3:2:%men_sun1-3:%kaku1:3:9:-1
#外用
line:%zax0:-2+%zay0:%zax0:2+%zay0:0:2:9:-1
line:%zax0+3:-2+%zay0:%zax0+3:2+%zay0:0:3:9:-1
line:-15+%zax1:%zay1:15+%zax1:%zay1:0:2:9:-1
line:-15+%zax1:%zay1-6:15+%zax1:%zay1-6:0:3:9:-1