Notice : 内容無保証。禁無断転載。リンク自由。

t2x.txt

// Text to XHTML

disabledraw ;
call Lib "toXHTML" ;
replaceallfast "(t2x.mac)", "(t2x.mac)" ;
saveas filename2 + ".html" ;
gofiletop ;
endmacro ;

// -- sub --

Lib:
$$target = filename2 ;
$$lib = macrodir + "\\lib.mac" ;

if (findhidemaru($$lib) == -1) {
openfile $$lib ;
}

setactivehidemaru findhidemaru($$lib) ;
gofiletop ;
down ;
deleteline ;
insert "call " + $$1 + " ;\n" ;
save ;

setactivehidemaru findhidemaru($$target) ;
closehidemaru findhidemaru($$lib) ;

execmacro "lib.mac" ;
disabledraw ;
return ;


戻る
トップページへ戻る