|
安久津さん、こんにちは。YKです。
コメントありがとうございました。
deleteの削除、さっそく試してみました。ところが、1ステップ減ったに
しては、以外にも時間短縮できていませんでした。
そこで、処理時間がどうなっているか、確認してみました。
以下にその報告をします。
下のマクロを実行してみました。その結果は、次の通りです。単位ミリ秒
#tm1,#tm2,#tm3,#tm4,#tm5,#tm6,#tm7,#tm8
delete有り1767,1699,3616,1597,3683,4008,5679,778
delete無し1737,1632,3706,1692,3781, 779,8402,761
結論、deleteを削除した場合は、insertの文がdeleteで行った処理を代
行するようだ。私の環境で、42秒程度かかる今回の処理での削減時間は、
約0.5秒だった。
以上、御参考までに。(自分の参考かな)
//−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−
////こんにちはYKです。
disabledraw;
#tm1=0; #tm2=0; #tm3=0; #tm4=0; #tm5=0; #tm6=0; #tm7=0;
#tm0=tickcount; #tm82=tickcount;
while(#i<10000){#tm11=tickcount; #tm1=#tm11-#tm82+#tm1;#tm12=tickcount;
#i=#i+1;#tm21=tickcount; #tm2=#tm21-#tm12+#tm2;#tm22=tickcount;
moveto 6, y;#tm31=tickcount; #tm3=#tm31-#tm22+#tm3;#tm32=tickcount;
beginsel;#tm41=tickcount; #tm4=#tm41-#tm32+#tm4;#tm42=tickcount;
moveto 0, y;#tm51=tickcount; #tm5=#tm51-#tm42+#tm5;#tm52=tickcount;
// delete;
#tm61=tickcount; #tm6=#tm61-#tm52+#tm6;#tm62=tickcount;
insert "////"; #tm71=tickcount; #tm7=#tm71-#tm62+#tm7;#tm72=tickcount;
#tm81=tickcount; #tm8=#tm81-#tm72+#tm8;#tm82=tickcount;
}
#tm9=tickcount;
message str(#tm9-#tm0)+"//"+str(#tm1)+"/"+str(#tm2)+"/"+str(#tm3)+"/"+str(#t
m4)+"/"+str(#tm5)+"/"+str(#tm6)+"/"+str(#tm7)+"/"+str(#tm8);
enabledraw;
endmacro;
|
|