last_high_0:=EXTGBDATA('last_high');
last_low_0:=EXTGBDATA('last_low');
kc_price_0:=EXTGBDATA('kc_price');
tx_holding_0:=EXTGBDATA('tx_holding');

high_0:=high;
close_0:=close;
low_0:=low;

if tx_holding_0>0 and high_0>last_high_0 then EXTGBDATASET('last_high',high_0);
if tx_holding_0<0 and low_0<last_low_0 then EXTGBDATASET('last_low',low_0);

if last_high_0=kc_price_0 then last_high_0:=last_high_0+50;
if last_low_0 =kc_price_0 then last_low_0 :=last_low_0-50;

開(kāi)多倉(cāng)后最高漲幅:=(last_high_0-kc_price_0)/kc_price_0;
開(kāi)多漲回撤比例限制:=1/sqrt(開(kāi)多倉(cāng)后最高漲幅*100+止贏系數(shù));
開(kāi)多漲回撤幅度限制:=(last_high_0-kc_price_0)*開(kāi)多漲回撤比例限制;
開(kāi)多漲回撤價(jià)格限制:=last_high_0-開(kāi)多漲回撤幅度限制;
if 開(kāi)多倉(cāng)后最高漲幅<1.5% then  開(kāi)多漲回撤價(jià)格限制:=last_high_0*(1-止損百分比)；

pd_tj_多頭止損:=tx_holding_0>0  and     ( close_0<kc_price_0*(1-止損百分比)  );
pd_tj_多頭止贏:=tx_holding_0>0  and     (  close_0<開(kāi)多漲回撤價(jià)格限制 );

開(kāi)空倉(cāng)后最大跌幅:=(kc_price_0-last_low_0)/kc_price_0;
開(kāi)空跌回撤比例限制:=1/sqrt(開(kāi)空倉(cāng)后最大跌幅*100+止贏系數(shù));
開(kāi)空跌回撤幅度限制:=(kc_price_0-last_low_0)*開(kāi)空跌回撤比例限制;
開(kāi)空跌回撤價(jià)格限制:=last_low_0+開(kāi)空跌回撤幅度限制;
if 開(kāi)空倉(cāng)后最大跌幅<1.5% then  開(kāi)空跌回撤價(jià)格限制:=last_low_0*(1+止損百分比)；

pk_tj_空頭止損:=tx_holding_0<0  and     ( close_0>kc_price_0*(1+止損百分比)  );
pk_tj_空頭止贏:=tx_holding_0<0  and     ( close_0>開(kāi)空跌回撤價(jià)格限制 );

{平多}EXITLONG:    pd_tj_多頭止損  or pd_tj_多頭止贏  ,ORDERQUEUE ;  {  ,TFILTER; }
{平空}EXITSHORT:  pk_tj_空頭止損  or pk_tj_空頭止贏  ,ORDERQUEUE ;  {  ,TFILTER; }
 
{開(kāi)多}ENTERLONG:  KD_TJ    ,ORDERQUEUE        ;  { ,TFILTER;  }
{開(kāi)空}ENTERSHORT: KK_TJ    ,ORDERQUEUE        ;  { ,TFILTER;  }

// 開(kāi)多 保存全局變量
if ( KD_TJ  and tx_holding_0<1  ) then   
                                                      begin  EXTGBDATASET('last_high',high_0);
                                                             EXTGBDATASET('last_low',low_0);
                                                             EXTGBDATASET('tx_holding',1);
                                                             EXTGBDATASET('kc_price',close_0);
                                                           
                                                      end
// 開(kāi)空 保存全局變量                                                     
if ( KK_TJ and tx_holding_0>-1 ) then   
                                                      begin  EXTGBDATASET('last_high',high_0);
                                                             EXTGBDATASET('last_low',low_0);
                                                             EXTGBDATASET('tx_holding',-1);
                                                             EXTGBDATASET('kc_price',close_0);
                                                      end 
              
             

// 平多倉(cāng)后保存全局變量
if (( pd_tj_多頭止損  or pd_tj_多頭止贏 ) and tx_holding_0>0 ) then   
                                                                                                                 begin  EXTGBDATASET('last_high',1);
                                                                                                                        EXTGBDATASET('last_low',1);
                                                                                                                        EXTGBDATASET('tx_holding',0);
                                                                                                                        EXTGBDATASET('kc_price',1);
                                                                                                                  end

// 平空倉(cāng)后保存全局變量                                                                                                                 
if (( pk_tj_空頭止損  or pk_tj_空頭止贏 ) and tx_holding_0<0 )   then   
                                                                                                                 begin  EXTGBDATASET('last_high',1);
                                                                                                                        EXTGBDATASET('last_low',1);
                                                                                                                        EXTGBDATASET('tx_holding',0);
                                                                                                                        EXTGBDATASET('kc_price',1);
                                                                                                                  end

這段公式代碼不是完整的代碼，而只是一段偽代碼，里面很多地方需要用戶自己填寫自己的交易設(shè)置的。

如果你看不懂這些代碼，請(qǐng)用戶認(rèn)真的先從金字塔的最基礎(chǔ)的地方開(kāi)始學(xué)起，不要急躁

《金字塔決策交易系統(tǒng)公式編程》（基礎(chǔ)篇）

下載地址：http://www.weistock.com/download/FormulaHelp1.rar 

《金字塔程式化交易設(shè)計(jì)指南》(高級(jí)篇)

下載地址：http://www.weistock.com/download/FormulaHelp2.rar  

代碼不全。

 KD_TJ  沒(méi)有定義。 KD_TJ  就是開(kāi)多倉(cāng)的條件

 KK_TJ    開(kāi)空條件沒(méi)有定義