============= c-r-f1.txt 
$$c //連結財務データセクション
$f        //処理対象企業フラグコマンド
<j>==..(201)17163    //業種が鉄鋼業の特殊鋼にフラグｊ
<h>==..(204)11    // 連結決算の上場場部の定義変更．東証１部　101-->11
<g>=:*.(j,h)         //特殊鋼で，かつ東証１部上場の企業にフラグｇ
$n        //企業名コマンド
lst,<g>             //フラグｇの企業のリスト出力
$p        //原数値プリントコマンド
<g>,055,059,061,062,066,086,107,108
$r        //期間限定コマンド
8504,9703           //1985年４月から1997年３月
$t        //時系列作成コマンド
&fl,055,<g>,sales             //連結売上高
&fl,061,<g>,interest income   //連結受取利息・割引料
&fl,062,<g>,dividends income  //連結受取配当金
&fl,066,<g>,interest cost     //連結支払利息・割引料
==============  変量分析セクション
$$v
$a      //変量記号割当コマンド
s,sales
r,interest income
d,dividends income
i,interest cost
$t     //変数変換コマンド
s=&.a(s)4,1     //年率月次を３ヶ月毎の平均をとって四半期に１月始点で編集
r=&.a(r)4,1     //                「&.a」           「4,1」
d=&.a(d)4,1
i=&.a(i)4,1
x=(i-r-d)/s*100    //連結売上高純金利負担率
 =pr*(s,r,d,i,x)   //数値プリント
a=<.a(x)           //移動平均
b=<.d(x)           //移動勾配
P=:ci(x)           //散布点識別文字変量
============== グラフセクション
$$g
$d    //表示範囲指示コマンド
all         //全範囲
$p    //プロットコマンド
xa,b        //連結売上高純金利負担率ｘ，その移動平均ａ，移動勾配ｂ
$c    //散布（相関）図コマンド
b,a, ,P     //縦軸ｂ，横軸ａ，回帰線なし△，印字変量Ｐ（１次元位相図）
============== 終了セクション
$$