polish using macro

README

@@ -2,9 +2,15 @@
 
 This scripts are followed MIT except for setk.run which belongs to Salvador Arias(Instituto Miguel Lillo, San Miguel de Tucumán, Argentina).
 
-## tnt.run
+## Usage
 
-- `file.tnt` must be changed to your own file;
+- OS: Arch Linux;
+
+- `tnt run guoyi.run file.tnt`, `file.tnt` is your data;
+
+- Type `;` and enter;
+
+## Options
 
 - `trees.tre`, `bt.tre` are trees with taxaname;
 
@@ -14,8 +20,3 @@ This scripts are followed MIT except for setk.run which belongs to Salvador Aria
 
 - `boot` can be replaced by `jack`;
 
-## setk_tnt.run
-
-- `file.tnt` must be changed to your own file;
-
-- You can find the recommended k from `setk.log` and then change in `piwe=` `tnt.run`;

guoyi.run

@@ -0,0 +1,33 @@
+log tnt.log;
+macro=;
+taxname=;
+mxram 10240;
+nstates 32;
+nstates NOGAPS;
+
+procedure %1;
+setk.run;
+
+procedure %1;
+hold 1000;
+xpiwe(*;
+mult=replic 1000 tbr hold 1;
+xpiwe&;piwe&;
+export= trees.tre;
+taxname-;
+export= trees_no.tre;
+taxname=;
+
+bbreak=tbr;
+majority *;
+
+ttags=;
+resample boot replications 1000;
+ttags & bt.svg thickness 7 italics fontsize 15;
+export < bt.tre;
+taxname-;
+export - bt_no.tre;
+
+length *;
+stats.run;
+quit ;

setk_tnt.run

@@ -1,4 +0,0 @@
-log setk.log;
-p file.tnt;
-setk.run;
-quit;

tnt.run

@@ -1,32 +0,0 @@
-mxram 10240 ;
-nstates 32 ;
-nstates NOGAPS ;
-
-piwe=12;
-
-procedure file.tnt ;
-log tnt.log ;
-taxname= ;
-
-hold 100000 ;
-xpiwe(*; mult=replic 1000 tbr hold 10;
-xpiwe&; piwe&;
-export= trees.tre ;
-taxname- ;
-export= trees_no.tre ;
-taxname= ;
-
-bbreak=tbr ;
-majority * ;
-
-ttags= ;
-resample boot replications 1000;
-ttags & bt.svg thickness 7 italics fontsize 15;
-export < bt.tre ;
-taxname- ;
-export - bt_no.tre;
-
-length * ;
-stats.run;
-
-quit ;