OriginLabTalk のバックアップ(No.10)

• バックアップ一覧
• 差分 を表示
• 現在との差分 を表示
• ソース を表示
• OriginLabTalk へ行く。
  • 1 (2004-05-06 (木) 11:38:53)
  • 2 (2004-05-06 (木) 16:43:47)
  • 3 (2004-05-07 (金) 09:38:14)
  • 4 (2004-05-07 (金) 14:59:50)
  • 5 (2004-05-07 (金) 21:37:55)
  • 6 (2004-05-12 (水) 19:50:46)
  • 7 (2004-05-13 (木) 11:14:09)
  • 8 (2004-05-14 (金) 12:32:26)
  • 9 (2005-01-27 (木) 17:53:27)
  • 10 (2005-03-07 (月) 19:12:19)
  • 11 (2005-03-08 (火) 15:45:01)
  • 12 (2005-03-16 (水) 18:08:58)

---

目次

数値変数

数値変数としてはアルファベットで始まりピリオドを含まない変数名が使える(大文字と小文字は区別されない)。 ただし以下に挙げるシステム変数はOriginが内部で使っているので、不用意に使うと動作が不安定になる。 その他の数値変数は自由に使用してよい。

文字列変数

先頭に%がついたアルファベット1文字でユーザー変数は%K〜%Tと%Wのみ。残りはシステム変数。各文字列変数は105文字(%Zは8192文字)までの文字列を記憶できる。

データセット

データセットとはワークシートの一つのcolumnのことであり、1次元配列を持つオブジェクトである。 データセットは通常WKS_COLという形で指定される。ただし、WKSはワークシート名、COLはcolumn名を表す。

データセットやセルの指定の仕方

• データセットWKS_COLのi番目のセルはWKS_COL[i]というふうに指定される。
• 関数%( )を使ってもデータセットやセルを指定できる。

  %(WKS, i)	ワークシートWKSの i 番目のコラムのデータセット名
  %(WKS, i, j)	ワークシートWKSの i 番目の column、j番目の row のセル

• データセット名を返す関数や文字列にカギ括弧[ ]をつけてセルを指定することもできる。

(例)

代入

• 数値変数への数値の代入
  

  a=10;

• 文字列変数への文字列の代入
  

  %A=''John'';
  (double quotationは省略してもよい。)

• セルへの数値の代入
  

  data1_A[10]=1;
  %(data1,2,3)=2;
  col(C)[20]=3;

• セルへの文字列の代入($に注意)
  

  data1_A[5]$="John";
  col(A)[5]$="Paul";

• データセットへの代入
  WKS_COLというデータセットに他のデータセットまたは配列を代入するときは

  WKS_COL=代入するデータセットまたは配列

  とする。代入先のデータセット名が文字列変数に格納されているときはその変数名に括弧をつけて

  (%A)=代入するデータセットまたは配列

  としなくてはならない。さもなくば、単に文字列の代入になってしまう。

  %(WKS,i)=data_A;

  や

  col(A)=col(B);

  のように、データセット名を返す関数の戻り値に対して代入することもできる。この場合は括弧は必要ない。
  (例)

  data1_a = {1,2,3,4,5,6};       ワークシートdata1のコラムaに1,2,3,4,5,6を代入する。
  data1_a[10] = 5;              ワークシートdata1のコラムaの10番目のセルに5を代入する。
  data1_a = data1_b;          ワークシートdata1のコラムbの内容を全てコラムaにコピーする。
  data1_a = data1_b+5;       ワークシートdata1のコラムbのすべてのセルの内容に5を足してコラムaにコピーする。
  data1_a = 0;                   ワークシートdata1のコラムaの全てのセルに0を代入する。|
  data1_c=data1_a*data1_b; ワークシートdata1のコラムaとコラムbの内容の積をコラムcに書き込む。
  col(B)=col(A) * 2;             現在のワークシートのコラムBにコラムAの内容を2倍にして代入する。

構文

繰り返し構文

• loop( variable, start, end ){ script };
  整数 variable を start から end まで変えながらscriptを実行する。
• for( exp1; exp2; exp3 ){ script };
  使い方はc言語と同じ
• repeat num { script };
  num 回 script を実行する。
• break option arg;
  optionもargもない場合は現在のループを脱出する。
  argに1を指定すると現在のスクリプトを終了する。
  optionをつけることによってメッセージの表示や実行の選択が可能。
  
• continue;
  for文やloop文において次の繰り返しに飛ぶ。

条件分岐構文

• if ( condition ) { script1 } else { script2 };
  使い方はc言語と同じ。else以下は省略できる。
• switch( argument ){ case1: script1; case2 : script2; ... };
  使い方はc言語と同じ。

ワークシートの情報の取得

• %() 関数
  

  %(i,@L)	現在のワークシートのi番目のコラムのラベル名
  %(WKS, i)	ワークシートWKSの i 番目のコラムのデータセット名
  %(WKS, i, j)	ワークシートWKSの i 番目の column、j番目の row の値
  %(WKS, @option, i)	ワークシートWKSの i 番目のcolumnのoptionに関する情報

  (オプション)

  @option	戻り値
  @type	i 列の種類 ( 1: Y列 2: 無属性 3 : エラーバー列 4: X列 )
  @colname	i 列の名前
  @data	i 列のデータセット名
  @Xn	i 列に対応するX列の名前
  @X	ワークシート全体のX列の数
  @Y-	i 列より左側(i 列を含む)の最初のY列の番号
  @Y+	i 列より右側(i 列を含む)の最初のY列の番号
  @Y#	i=1の場合、ワークシート全体のY列の数を返し、i=2の場合は選択領域のY列の数を返す。
  @#	ワークシート全体の列の数

• ワークシートプロパティ
  WKS!wks.propertyの形でアクセスする。WKS!を省略すると現在activeなワークシートが対象になる。

  property	戻り値
  nCols	総column数
  nRows	総row数
  maxRows	値のある最大のrow番号

  ワークシートの中のそれぞれのコラムについては、

  wks.col[n].property

  の形でアクセスする([n]はコラム番号)。
  その他のプロパティについてはマニュアル参照

データセット情報の取得

• hasx(dataset)
  datasetが対応するXデータセットを持てば1、持たなければ0を返す。
• xof(dataset)
  datasetに結び付いたXデータセットの名前を返す。
• errof(dataset)
  datasetに結び付いたエラーデータのデータセット名を返す。
• xindex(x,dataset)
  datasetに結びついたXデータセットのセル値がxと同じか、それより小さい最初のセルのインデックス番号を返す。datasetはY属性をもっていなくてはならない。
• xindex1(x,dataset)
  datasetに結びついたXデータセットのセル値がxと同じか、それより大きい最初のセルのインデックス番号を返します。datasetはY属性をもっていなくてはならない。
• list(value,dataset)
  valueが最初に存在するdataset中のインデックス番号を返す。相当するものがない場合は0を返す。

グラフ情報の取得

• layer -c
  現在のレイヤーのグラフに存在するデータセットの数を調べ、システム変数countに格納する。同時に、データセット名を列挙したものをシステム変数%Zに格納する。データセット名は関数%[%Z,i]を使って抜き出すことができる。

よく使うコマンドと関数

入力&表示に関するコマンド

• type
  スクリプトウインドウに文字列を表示する。数値変数の内容を表示したい場合は、関数 $( ) によって文字列に変換する必要がある。
• getnumber (message) val
  messageというダイアログを表示して数値の入力を行い、変数valに格納する。
• getstring (message) initstr
  messageというダイアログを表示して文字列の入力を行い、変数%Bに格納する。initstrは初期文字列。
• getyesno (message ) val
  YesかNoかを問うダイアログを表示して、結果を変数valに格納する。

ワークシートの操作に関するコマンド

• create name -w n c1 c2 ...;
  column名c1,c2,... およびrow数n を持つ名前nameのワークシートを作る
• worksheet -a n;
  現在のワークシートにn列のコラムを追加する。
• worksheet -i n name
  n番目のコラムの右にnameという名前のコラムを挿入する。
• worksheet -d name;
  現在アクティブなワークシートの複製をnameという名前で作成する。
• worksheet -s c1 r1 c2 r2;
  アクティブなワークシートのc1 r1 c2 r2で指定される領域を選択する。c1とc2がゼロの場合は全てのcolumnが対象となり、r1とr2がゼロの場合は全てのrowが対象となる。

データセットの操作に関するコマンドと関数

• create WKS_COL -c n
  row数nのXYデータセットを作る。値は全て0。Xデータの名前はWKS_Aとなる。
• copy dataset1 dataset2
  dataset1の内容をdataset2にコピーする。
• copy -x dataset1 dataset2
  dataset1の内容を別なワークシートにあるdataset2にコピーする。その際、可能ならdtaset1のXデータセットもdataset2のXデータセットにコピーする。(->Xデータセットが複数ある時にはうまく働かない)
• peaks( dataset, width, height )
  データのピークを検出する関数。index幅 2width+1の中で最大値を取るもののうち、indexがi-widthおよびi+widthの点よりもheight以上大きい値を持つ点を探し、そのindex値をリストした配列を返す。

グラフ描画に関するコマンド

• layer -i n dataset
  現在のレイヤーにプロットを追加する。プロットタイプはnで指定する。(worksheetコマンドを参照)
• draw {x1,y1,x2,y2}
  グラフに直線や点線などを描画する。
• worksheet -p n
  アクティブなワークシートの選択領域をプロットする。nはプロットのタイプを指定する。

  n	type
  200	line
  201	scatter
  202	line+symbol

• set dataset -c [color]
  プロットの色を[color]に変える。

  [color]	色
  1	黒
  2	赤
  3	緑
  4	青
  ...	など

• set dataset -d [style]
  プロットの線のスタイルを[style]に変える。

  [style]
  0	solid
  1	dash
  ...	など

• set dataset -k [type]
  プロットのシンボルを[type]に変える。

  [type]	symbol
  0	なし
  1	square
  2	circle
  ...	など

文字列を返す関数

• col(COL)
  現在のワークシートのCOLという名前のコラムのデータセット名をWKS_COLの形で返す。
• wcol(i)
  現在のワークシートのi番目のコラムのデータセット名をWKS_COLの形で返す。
• $(num)
  数値などを文字列に変換する。フォーマットも指定可能。
  (例)

  $(x,*5)	xの値を有効桁5桁で文字列に変換
  $(x,.3)	xの値を小数点以下3桁で文字列に変換
  $(x,fmt)	xの値をC言語のフォーマットfmtを用いて文字列に変換
  $(x,Efmt)	xの値を工業表示文字列に変換
  $(x,Sfmt)	xの値を科学表示で文字列に変換

  注)コンマと*,E,Sの間にスペースをいれてはいけない

%[ ] 関数

%[ ]関数によって文字列の操作ができる。

数値を返す関数

• exist(name)
  名前nameをもつオブジェクトが存在すればそのオブジェクトの型を番号で返す。

  戻値	意味
  0	存在しない
  1	dataset
  2	worksheet
  3	graph window
  4	variable
  5	matrix
  6	macro
  7	tool
  9	notes window

• その他、sin, cos, expなどの数学関数はほとんど使える。

datasetに代入できる配列を返す関数

• data( v1, v2, inc )
  v1からv2までincステップの配列を作る。 incを省略するとステップは1になる。
• {v1, v2, ... , vn}
  配列を実際の値を使って作る。
• Fit(dataset)
  直前のフィッティングの結果を用いて、datasetをX値とした配列を作る。

データセットを関数として使う。

dateset名に関数のように丸括弧をつけて、

data1_A(x)

のようにすると、data1_Aに結び付いているXデータセットからxを探し、対応するdata1_Aのセルの値を返す。Xデータセットにxが見つからない場合は最も近い２つのセルから直線で内挿したものを返す。

オブジェクトについて

Originの内部はすべてオブジェクトによって構築されている。これらのオブジェクトを直接操作することによって、より細かな制御を行うことができる。
オブジェクトの操作にはMethod(操作)、Set(値の設定)、Read(値の読み出し)があり、 Methodを実行する場合は

objName.Method( param )

とする。ただしobjNameやMethodは実際のオブジェクト名やメソッド名に置き換わる。
オブジェクトのプロパティーに値を設定する場合は

objName.Property=value  (数値の場合)
objName.Property$=string (文字列の場合)

とする。値の読み出しも同様である。

value=objName.Property  (数値の場合)
%K=objName.Property$    (文字列の場合)

Originで扱っているオブジェクトにはwindowオブジェクト、utilityオブジェクト、外部オブジェクトの3種類がある。

windowオブジェクト

ワークシートやグラフなどの画面上のwindowを操作するオブジェクト。 winName!objName.propertyの形でアクセスする。winName!を省略すると現在アクティブなwindowについて操作が行われる。

layerオブジェクトはサブオブジェクトとして、[axis]オブジェクトを持ち、wksオブジェクトはサブオブジェクトとしてcol, export, importを持つ。

さらにlayer.[axis]オブジェクトはサブオブジェクトとしてbreak, grid, labelを持つ。

utilityオブジェクト

特定のwindowとは結び付かないOriginのプロパティーを操作する。

外部オブジェクト

外部DLLに存在するオブジェクト

スクリプトの例

• モーメント解析(スペクトルの強度、重心、分散を求める)
• スペクトルのピークと幅を実測する。
• シフトプロット(複数のデータを適当な間隔で縦に並べて作図)
• カスケードプロット(現在のプロットを上下にずらして再描画する。シフトプロットの改良版)
• 規格化(現在のプロットを規格化して表示する)

付録

解析メニューの指数関数フィットでy0を強制的に0にする方法

Originの解析メニューはlabtalkスクリプトで実現されているので、これに適当な改造を加えることによって、動作を変えることができる。 指数関数フィットには1次,2次,3次があるが、fit.ogsに以下の変更を加えることで、全ての次数において、y0を強制的に0にすることができる。

94行目付近の

y0 = limit.ymin;

を

y0 = 0;

へ変更.

273行目からの

y0=limit.ymin
if(abs(y0/(limit.ymax-y0)) < minoffset)
  y0 = 0;

を

y0 = 0;

へ変更。

---