showwindow 2; 
replaceallfast "後手の勝ち" , "後手の勝ち" , regular, nocasesense;
if( result==1 ){
                call Sengo_Irekae;//先後の入替
                replaceall "\\n△" , "\\n<p class=\"new-page\"></p>\\n  \\n  \\n  \\n## △" , regular, nocasesense;
                }
                else{
		replaceall "\\n▲" , "\\n<p class=\"new-page\"></p>\\n  \\n  \\n  \\n## ▲" , regular, nocasesense;
                
                }

showwindow 1; // ウインドウを元に戻
	selectall;
	cut;
endmacro;

Sengo_Irekae:

        disabledraw;
        replaceallfast "１一" , "９※九" , regular, nocasesense;
        replaceallfast "１一","９※九" , regular, nocasesense;
        replaceallfast "１二","９※八" , regular, nocasesense;
        replaceallfast "１三","９※七" , regular, nocasesense;
        replaceallfast "１四","９※六" , regular, nocasesense;
        replaceallfast "１五","９※五" , regular, nocasesense;
        replaceallfast "１六","９※四" , regular, nocasesense;
        replaceallfast "１七","９※三" , regular, nocasesense;
        replaceallfast "１八","９※二" , regular, nocasesense;
        replaceallfast "１九","９※一" , regular, nocasesense;
        replaceallfast "２一","８※九" , regular, nocasesense;
        replaceallfast "２二","８※八" , regular, nocasesense;
        replaceallfast "２三","８※七" , regular, nocasesense;
        replaceallfast "２四","８※六" , regular, nocasesense;
        replaceallfast "２五","８※五" , regular, nocasesense;
        replaceallfast "２六","８※四" , regular, nocasesense;
        replaceallfast "２七","８※三" , regular, nocasesense;
        replaceallfast "２八","８※二" , regular, nocasesense;
        replaceallfast "２九","８※一" , regular, nocasesense;
        replaceallfast "３一","７※九" , regular, nocasesense;
        replaceallfast "３二","７※八" , regular, nocasesense;
        replaceallfast "３三","７※七" , regular, nocasesense;
        replaceallfast "３四","７※六" , regular, nocasesense;
        replaceallfast "３五","７※五" , regular, nocasesense;
        replaceallfast "３六","７※四" , regular, nocasesense;
        replaceallfast "３七","７※三" , regular, nocasesense;
        replaceallfast "３八","７※二" , regular, nocasesense;
        replaceallfast "３九","７※一" , regular, nocasesense;
        replaceallfast "４一","６※九" , regular, nocasesense;
        replaceallfast "４二","６※八" , regular, nocasesense;
        replaceallfast "４三","６※七" , regular, nocasesense;
        replaceallfast "４四","６※六" , regular, nocasesense;
        replaceallfast "４五","６※五" , regular, nocasesense;
        replaceallfast "４六","６※四" , regular, nocasesense;
        replaceallfast "４七","６※三" , regular, nocasesense;
        replaceallfast "４八","６※二" , regular, nocasesense;
        replaceallfast "４九","６※一" , regular, nocasesense;
        replaceallfast "５一","５※九" , regular, nocasesense;
        replaceallfast "５二","５※八" , regular, nocasesense;
        replaceallfast "５三","５※七" , regular, nocasesense;
        replaceallfast "５四","５※六" , regular, nocasesense;
        replaceallfast "５五","５※五" , regular, nocasesense;
        replaceallfast "５六","５※四" , regular, nocasesense;
        replaceallfast "５七","５※三" , regular, nocasesense;
        replaceallfast "５八","５※二" , regular, nocasesense;
        replaceallfast "５九","５※一" , regular, nocasesense;
        replaceallfast "６一","４※九" , regular, nocasesense;
        replaceallfast "６二","４※八" , regular, nocasesense;
        replaceallfast "６三","４※七" , regular, nocasesense;
        replaceallfast "６四","４※六" , regular, nocasesense;
        replaceallfast "６五","４※五" , regular, nocasesense;
        replaceallfast "６六","４※四" , regular, nocasesense;
        replaceallfast "６七","４※三" , regular, nocasesense;
        replaceallfast "６八","４※二" , regular, nocasesense;
        replaceallfast "６九","４※一" , regular, nocasesense;
        replaceallfast "７一","３※九" , regular, nocasesense;
        replaceallfast "７二","３※八" , regular, nocasesense;
        replaceallfast "７三","３※七" , regular, nocasesense;
        replaceallfast "７四","３※六" , regular, nocasesense;
        replaceallfast "７五","３※五" , regular, nocasesense;
        replaceallfast "７六","３※四" , regular, nocasesense;
        replaceallfast "７七","３※三" , regular, nocasesense;
        replaceallfast "７八","３※二" , regular, nocasesense;
        replaceallfast "７九","３※一" , regular, nocasesense;
        replaceallfast "８一","２※九" , regular, nocasesense;
        replaceallfast "８二","２※八" , regular, nocasesense;
        replaceallfast "８三","２※七" , regular, nocasesense;
        replaceallfast "８四","２※六" , regular, nocasesense;
        replaceallfast "８五","２※五" , regular, nocasesense;
        replaceallfast "８六","２※四" , regular, nocasesense;
        replaceallfast "８七","２※三" , regular, nocasesense;
        replaceallfast "８八","２※二" , regular, nocasesense;
        replaceallfast "８九","２※一" , regular, nocasesense;
        replaceallfast "９一","１※九" , regular, nocasesense;
        replaceallfast "９二","１※八" , regular, nocasesense;
        replaceallfast "９三","１※七" , regular, nocasesense;
        replaceallfast "９四","１※六" , regular, nocasesense;
        replaceallfast "９五","１※五" , regular, nocasesense;
        replaceallfast "９六","１※四" , regular, nocasesense;
        replaceallfast "９七","１※三" , regular, nocasesense; 
        replaceallfast "９八","１※二" , regular, nocasesense;
        replaceallfast "９九","１※一" , regular, nocasesense;
        replaceallfast "※","" , regular, nocasesense;
        replaceallfast "△","△△" , regular, nocasesense;
        replaceallfast "▲","△" , regular, nocasesense;
        replaceallfast "△△","▲" , regular, nocasesense;
        if( ! result )  beep;

return;