sdf

x=[0:0.1:2*%pi]';

f=get("default_figure"); // 規範となる図のハンドルを取得

a=get("default_axes");   //  規範となる軸のハンドルを取得

                         // そのプロパティを設定s

f.background=4;

f.auto_resize="off";

f.figure_size=[400 300];

f.axes_size=[600 400];

f.figure_position=[0 -1];

a.x_location="top";

a.y_location="left";

for (i=1:6)

  scf(i); // ID iを指定して図を作成

  plot2d(x,[sin(x) cos(x)],[i -i])

  xclick();

  if i == 4, sdf(); end // 図の規範のデフォルト値を返す

end