分形頂底策略（TBQ版）一、交易邏輯思路分形頂底策略是一種基于技術分析的交易策略，主要通過識別價格圖表中的頂分型和底分型來制定交易決策。這種策略的核心在于利用市場價格的波動特征，結合均線系統，來判斷市場的趨勢和反轉點。1.頂分型與底分型的識別：-頂分型：在三個連續的K線中，中間K線的高點是最高的，同時低點不低于兩側K線的低點。-底分型：在三個連續的K線中，中間K線的低點是最低的，同時高點不高于兩側K線的高點。策略通過比較K線的高低點來識別這些分型結構。2.均線系統的應用：-策略中使用了60均線（MA60）作為趨勢判斷的重要參考。當價格位于60均線之上時，市場被視為上升趨勢；反之，則視為下降趨勢。3.交易信號的生成：-做多信號：當市場價格在60均線之上，并且出現底分型時，策略會生成做多信號，即買入合約。-平多信號：對于已持有多頭倉位的投資者，如果市場價格跌破預設的止損點（MQ），或者出現頂分型，策略會生成平多信號，即賣出合約。-做空信號：當市場價格在60均線之下，并且出現頂分型時，策略會生成做空信號，即賣出合約。-平空信號：對于已持有空頭倉位的投資者，如果市場價格上漲超過預設的止損點（MW），或者出現底分型，策略會生成平空信號，即買入合約。二、策略特點1.結構化與系統性：-分形頂底策略具有明確的交易規則和結構化的交易流程。從分型的識別到交易信號的生成，再到倉位的調整，整個過程都是系統化和自動化的，減少了人為干預和主觀判斷的影響。2.趨勢跟蹤與反轉捕捉：-該策略既能夠跟蹤市場的趨勢，又能夠在趨勢反轉時及時捕捉并作出反應。通過結合均線系統和分型結構，策略能夠在不同的市場環境下保持較高的靈活性和適應性。3.風險管理與控制：-策略在開倉時即設定止損點，有效控制了潛在的風險。同時，通過嚴格的交易條件和信號執行，避免了過度交易和情緒化決策的可能性。4.適用性與靈活性：-分形頂底策略適用于多種金融衍生品市場，如期貨、期權等。通過調整參數和優化模型，策略可以適應不同市場和品種的交易特性，提高交易的成功率和盈利能力。綜上所述，分形頂底策略以其結構化、系統化和靈活性的特點，在技術分析領域中占據了一席之地。它能夠幫助投資者更加客觀、理性地面對市場波動，實現穩健的投資回報。函數一:SymbolReplace//函數可不用貼入//把合約代碼替換成指定的合約代碼ParamsStringSymbolz;//合約名稱StringStrz("");//替換的字符VarsArray<String>AB;StringSymCode;StringSymExch;BeginIf(StringSplit(Symbolz,".",AB)<>2){ReturnInvalidString;}//分離合約交易所代碼SymCode=AB[0];//獲取合約代碼部分SymExch=AB[1];If(IsStringEx(SymCode,"9999"))//查找字符串部分含有9999{StringReplace(SymCode,"9999","9"+Strz);}ElseIf(IsStringEx(SymCode,"9000"))//查找字符串部分含有9000{StringReplace(SymCode,"9000","9"+Strz);}ElseIf(IsStringEx(SymCode,"9888"))//查找字符串部分含有9888{StringReplace(SymCode,"9888","9"+Strz);}Else{//檢查指數000還是指數999If(IsStringEx(SymCode,"000")){StringReplace(SymCode,"000",Strz);}ElseIf(IsStringEx(SymCode,"999")){StringReplace(SymCode,"999",Strz);}ElseIf(IsStringEx(SymCode,"888")){StringReplace(SymCode,"888",Strz);}}If(IsStringEx(SymCode,"999")){ReturnSymCode+".TBFT";}ReturnSymCode+"."+SymExch;End函數二:IsStringExParamsStringStr;//原字符串Stringdes;//查找的字符串VarsStringStrz;Begin//Strz=Lower(Str);//轉換成小寫字母Strz=Str;If(FindFirstOf(Strz,des)<>InvalidInteger){ReturnTrue;}ReturnFalse;End策略代碼注解:ParamsNumericLots(1);VarsNumericMA60;NumericMinPoint;//最小變動單位NumericMQ;NumericMW;BoolDIFX(False);//底分型BoolDFX(False);//頂分型EventsOnBar(ArrayRef<Integer>indexs){MA60=Average(Close[1],60);PlotNumeric("MA60",MA60,0,Yellow,0);MinPoint=MinMove*PriceScale;MQ=AvgEntryPrice-30*MinPoint;MW=AvgEntryPrice+30*MinPoint;DIFX=Low[2]<Low[1]AndLow[2]<Low[3]ANDHIGH[2]<HIGH[1]ANDHIGH[2]<HIGH[3];DFX=High[2]>High[1]AndHigh[2]>High[3]ANDLOW[2]>LOW[1]ANDLOW[2]>LOW[3];

If(MarketPosition

<>

1

And

Close[1]

>

MA60

And

DIFX)

//60均線之上，出現底分型形態做多Buy(Lots,Open);//做多//If(MarketPosition==1And((Close<MQ)OrDFX))//開倉即設止損（固定止損30跳）,出現頂分型形態平多If(MarketPosition==1And((Close[1]<MQ)OrDFX)&&BarsSinceEntry>0)//開倉即設止損（固定止損30跳）,出現頂分型形態平多Sell(Lots,Open);

If(MarketPosition

<>

-1

And

Close[1]

<

MA60

And

DFX)

//60均線之下，出現頂分型形態做空SellShort(Lots,Open);//做空//If(MarketPosition==-1And((Close>MW)OrDIFX))//開倉即設止損（固定止損30跳）,出現底分型形態平空If(MarketPosition==-1And((Close[1]>MW)OrDIFX)&&BarsSinceEntry>0)//開倉即設止損（固定止損30跳）,出現底分型形態平空BuyToCover(Lots,Open);//開平條件Booll4e=False;//多進Booll4x=False;//賣平Bools4e=False;//空進Bools4x=False;//買平//進出場價格Numericl4e_price=Open;//開多價格Numericl4x_price=Open;//平多價格Numerics4e_price=Open;//開空價格Numerics4x_price=Open;//平空價格//頭寸Numericlots=1;//開平處理If(MarketPosition!=1&&l4e){Buy(lots,l4e_price);}If(MarketPosition!=-1&&s4e){SellShort(lots,s4e_price);}If(MarketPosition==1&&BarsSinceEntry>0&&l4x){Sell(0,l4x_price);}If(MarketPosition==-1&&BarsSinceEntry>0&&s4x){BuyToCover(0,s4x_price);}}函數一代碼:SymbolReplaceParamsStringSymbolz;StringStrz("");VarsArrayAB;StringSymCode;StringSymExch;BeginIf(StringSplit(Symbolz,".",AB)<>2){ReturnInvalidString;}SymCode=AB[0];SymExch=AB[1];If(IsStringEx(SymCode,"9999")){StringReplace(SymCode,"9999","9"+Strz);}ElseIf(IsStringEx(SymCode,"9000")){StringReplace(SymCode,"9000","9"+Strz);}ElseIf(IsStringEx(SymCode,"9888")){StringReplace(SymCode,"9888","9"+Strz);}Else{If(IsStringEx(SymCode,"000")){StringReplace(SymCode,"000",Strz);}ElseIf(IsStringEx(SymCode,"999")){StringReplace(SymCode,"999",Strz);}ElseIf(IsStringEx(SymCode,"888")){StringReplace(SymCode,"888",Strz);}}If(IsStringEx(SymCode,"999")){ReturnSymCode+".TBFT";}ReturnSymCode+"."+SymExch;End函數二代碼:IsStringExParamsStringStr;Stringdes;VarsStringStrz;BeginStrz=Str;If(FindFirstOf(Strz,des)<>InvalidInteger){ReturnTrue;}ReturnFalse;End策略信號代碼:ParamsNumericLots(1);VarsNumericMA60;NumericMinPoint;NumericMQ;NumericMW;BoolDIFX(False);BoolDFX(False);EventsOnBar(ArrayRef<Integer>indexs){MA60=Average(Close[1],60);PlotNumeric("MA60",MA60,0,Yellow,0);MinPoint=MinMove*PriceScale;MQ=AvgEntryPrice-30*MinPoint;MW=AvgEntryPrice+30*MinPoint;DIFX=Low[2]<Low[1]AndLow[2]<Low[3]ANDHIGH[2]<HIGH[1]ANDHIGH[2]<HIGH[3];DFX=High[2]>High[1]AndHigh[2]>High[3]ANDLOW[2]>LOW[1]ANDLOW[2]>LOW[3];If(MarketPosition<>1AndClose[1]>MA60AndDIFX)Buy(Lots,Open);If(MarketPosition==1And((Close[1]<MQ)OrDFX)&&BarsSinceEntry>0)Sell(Lots,Open);If(MarketP