%
O11; (ファナックシステムでは1変数、合計12セグメントの仕上げマクロプログラムを使用しています)
N01 #16=0; (#16はナイフサークルの中心の移動角度の角度を表し、0が初期値です)
N06 G54S400 M03; （速度を指定する座標系を設定し、正転する主軸を指定します）
N07T0101; (指令工具位置番号と工具補正番号)
N08G00X150Z100; （一般スタート地点に到着）
N09 G00Z[50+8.8*COS[#16]]; （Z方向のねじの始点に到達）
N10X[100-17.6*SIN[#16]]; (X方向は工具のねじ山の始点に達します)
N11 G32Z-113 F25; （ナイフを回す）
N12 G00 X140; （ナイフを振り上げる）
N13 #16=#16+8; (2本のナイフの角度間隔△を8として、次のナイフの値を計算します)
N14 IF [#16 LE 180] GOTO 09 (162度を超えない場合は走行を継続)
N15 G00 X150Z100 M05; （主軸が停止し、全退点に戻ります）
N16 M30; （番組終了）
%
