| |
W.Hiroshiさん，
>ＮＣ制御工作機械のプログラムを編集しています。
前にもＮＣ制禦のことが話題にあったような。
アルビレオさんが，折角perl をお勧めなのにしゃしゃり出るのも気が引けま
すが，秀丸エディタでやるとしたら，こうなるのかなと，とりあえず作ってみま
した。実用的かどうかは別として。
このマクロは浮動小数点（統合版）が必要です。実は私自身，これまで通常版
しか使ったことがなかったのですが，統合版ができたのを機会に今回初めて使用
してみました。
秀丸エディタ Ver.7.0 β2 で試してみました。
//-----------------------------------------------------//
$x = input("X の加算値");
$y = input("Y の加算値");
$z = input("Z の加算値");
if( selecting ) rangeeditin;// 部分編集
setfloatmode 1;
setcompatiblemode 0x020c;
disabledraw;
call Sub "X", $x;
call Sub "Y", $y;
call Sub "Z", $z;
if( rangeeditmode ) rangeeditout;// 部分編集解除
endmacro;
Sub:
gofiletop;
while( 1 ) {
searchdown2 "(?<=" + $$1 + ")[0-9.-]+", regular;
if( !result ) break;
$s = gettext( foundtopx, foundtopy, foundendx, foundendy, 1 );
$a = str( val($s) + val($$2) );
insert $a;
right;
}
return;
//-----------------------------------------------------//
では， (^^)/~
山紫水明
SANSHISUIMEI
|
|