sakura editor 调用JS

replace.js

var objWS = new ActiveXObject("WScript.Shell");
function sakuraReplace(str00) {
 var i=0;
 var lines="";
 var str01="";

 lines = str00.split(/(\r|\n|\r\n)/); // 改行コードで分割して変数に代入

 for (i in lines) // 分割したライン数をループ
 {
     if (i % 2 == 1){
         str01 +=  lines[i]+ "\r\n";
     }else{
         str01 +=  lines[i]+ "\t";
     }
    
 }
 return(str01);
}

var str00 = Editor.GetSelectedString(0); // 選択部分を変数に代入

//objWS.Popup("oushu:    "+lines[i], 0, "title", 0);
if ( str00 != "" ) Editor.InsText(sakuraReplace(str00));