emath BBS

新規発言一覧最新記事過去一覧検索HOME

No.5478  Re[8]:perlとの連携
発言者: 田中徹
発言日: 2007 01/09 21:54
発言元: 218.110.28.13
> デフォルトでshell escape -t- にする方法をご存知の方,
> tdb先生以外の方もよろしくお願いします

デフォルトは危険だからという理由がかかれていたはずですね.....

私のテスト環境で確認しました。
(普段は hidemaru を使用していませんので私の勘違いもあるかもしれません。)

55 さんの hidemaru macro フォルダ にある comile.mac を一旦リネームし
次のテキストを complile.mac として保存してください。

%---------------------------------- これ以降が compile.mac ------------------
$TeXfile = leftstr(basename2,strlen(basename2)-3) + "tex";
$dvifile = leftstr(filename2,strlen(filename2)-3) + "dvi";
$src = "-src-specials=cr,display,hbox,math,par,parend";
$shell = "-shell-escape";
$commandline = "platex";
$menuline[0] = "&normal compile";
$menuline[1] = "with -s&rc-specials";
$menuline[2] = "with -s&hell-escape";
$menuline[3] = "&both";

if ( ! basename2 == $TeXfile ) {
        message "拡張子が tex ではありません!\n処理を中断します.";
        endmacro;
}

menu:
if ( updated ) {
        question "ファイルが更新されています.\n上書き保存しますか?";
        if ( result == yes ) {
                save;
        }
}
#times = val(input("何回コンパイルしますか?","1"));
if ( result == 0 ) endmacro;

menuarray $menuline,4;
if ( result == 0 ) {
        endmacro;
} else if ( result == 1 ) {
        
} else if ( result == 2 ) {
        $commandline = $commandline + " " + $src;
} else if ( result == 3 ) {
        $commandline = $commandline + " " + $shell;
} else if ( result == 4 ) {
        $commandline = $commandline + " " + $src + " " + $shell;
} else {
        endmacro;
}

#num = 0;
compile:
while ( #num < #times ) {
        runsync2 $commandline + " " + $TeXfile;
        #num = #num + 1;
}

dviout:
if ( selecting )
        $SrcWord = "/" + gettext(seltopx,seltopy,selendx,selendy);
else $SrcWord="";
ddeinitiate "dviout", "dviout";
if( !result ) {
        run "dviout -1 " + $dvifile + " # "+ str(lineno) + $SrcWord + " " + $TeXfile;
} else {
        $curdvifile = dderequest("dvifile");
        ddeexecute "[WinNormal]";
        ddeexecute "[PageOpen(# " + str(lineno) + $SrcWord + " '" + $TeXfile + "')]";
        if ( ! $curdvifile == $dvifile ) {
                ddeexecute "[FileOpen(" + $dvifile + ")]";
        }
        ddeterminate;
}
endmacro;


▼関連発言

5468:perlとの連携 [55] 01/08 13:23
 └5470:Re:perlとの連携 [tDB] 01/08 13:50
  └5471:Re[2]:perlとの連携 [55] 01/08 14:07
   └5472:Re[3]:perlとの連携 [tDB] 01/08 14:43
    └5473:Re[4]:perlとの連携 [55] 01/08 14:51
     └5474:Re[5]:perlとの連携 [tDB] 01/08 14:58
      └5475:Re[6]:perlとの連携 [55] 01/08 15:12
       └5476:Re[7]:perlとの連携 [55] 01/09 21:12
        ├5477:Re[8]:perlとの連携 [ban] 01/09 21:51
        │└5493:--- [---] 01/11 23:56
        └5478:Re[8]:perlとの連携 [田中徹] 01/09 21:54
         └5479:Re[9]:perlとの連携 [飯島 徹] 01/09 23:18
          └5480:Re[10]:perlとの連携 [田中徹] 01/10 00:16
           └5494:Re[11]:perlとの連携 [55] 01/12 00:10<-last

Pass 保存


CGIROOM