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)
  xset("window",i) // ID iを指定して図を作成
  plot2d(x,[sin(x) cos(x)],[i -i])
  xclick();
  if i == 4, sdf(); end // 図の規範のデフォルト値を返す
end