| |
再同期をまた作ってみました。確率的に動作するタイプです。
現在行と同じ物を上下５５行の範囲で探すだけですが。
// reSync3.mac
// 表示行単位の比較再同期、 ０、１ 画面の現在行の同期点を探す
#hwnd0=hidemaruhandle(0);// 新とする
#hwnd1=hidemaruhandle(1);// 旧
compfile #hwnd1;
if(-1==result){menu "比較対象が？" ;endmacro}
if(0==result){menu "以降は同じです";endmacro}
// 現在行を取得
golinetop2;beginsel;golineend;
$line0=gettext(0,seltopy,selendx,selendy);
escape;golinetop;
setactivehidemaru #hwnd1; #y1=y;
golinetop2;beginsel;down 55;
searchup2 $line0,inselect;
if(result){escape; #match=yes; goto ret0;}
moveto 0,#y1;beginsel;up 55;
searchdown2 $line0,inselect;
if(result){escape; #match=yes; goto ret0;}
escape; #match=no;
ret0:
setactivehidemaru #hwnd0;
if(!#match)menu "同期 失敗";
//compfile 1;
|
|