打印本文
關閉窗口
相關標簽:
?
金牌短線戰法__系列指標(原碼)
{程序化交易 www.tumamayizhan.com }
本技術是一套攻擊力很強，穩定性較高的短線炒作技巧，只要出現標準規范的圖形。2到5天內可獲利10——30%。并且市場運用機會較多，成功率高達90%以上，是輪炒個股的最佳選擇。
選股時間：30分鐘K線圖
一、移動平均線：把30分鐘的移動平均線參數設定為：13、77、99
二、MACD
常規的MACD參數為12、26、9。本技術把30分鐘圖的MACD參數修改為12、26、50
特殊圖形
一、 大前提：以13均線的形態為準，以77均線、99均線基本走平或粘合走平為前提。
二、 圖形分類：
①高低腳：
均線出現雙底形態，以左腳低，右腳高為有效圖形，做右腳時最好無量，試探買入點為在底部形成后，K線以小陰小陽方式運行在13均線之上，同時MACD的DIF已金叉MACD，加倉買入點為出現放量陽線站到三均線之上，MACD的紅柱拉長之時，
②三線粘:
所謂“三線粘”不是一個絕對的粘合概念，在觀察本圖形時請縮小一檔圖形,只要13、77、99 三均線其本上在一個很小的窄幅范圍內水平運行就可，完全粘合最佳，關鍵是“三線粘其間最好是無量做形態”。
本圖形又包括三個類型：
A:線上粘:13平均線在77、99 之上平行、水平運行:
B:線中粘:13均線在77、99 兩均線之間的空隙中基本水平運行:
C:線下粘:13均線在77、99之下平行、水平運行:
本圖形的買入點是在粘合運行(或平行運行)的末期，MACD金叉后紅柱持續拉長，股價出現放量的中小陽線，放量是相對前面的量相對而言，沒有硬指標)，站在三均線之上就可以買進.
{【金牌短線戰法】主圖}
input: 粘合度(10,1,30);//調整參數獲得滿意的粘合度
{-----------------------☆功能開關------------------------}
{線}
短13:ema(C,13),LINETHICK,PRECISION2,COLORWHITE;
中77:ema(C,77),LINETHICK,PRECISION2,ColorF6B7FF;
長99:ema(C,99),LINETHICK,PRECISION2,Color0098FF;
G_x1:=(3*C+2*O+L+H)/7;
MA5:REF(ema(G_x1,5),1),LINETHICK,PRECISION2,COLORYELLOW;
{粘合區}
A:=MAX(MAX(短13,中77),長99);
B:=MIN(MIN(短13,中77),長99);
粘合:=if(RANGE(100*(A-B)/B,0,0.1*粘合度),1,0);
{信號部分}
D_D:=MA(IF(L<=LLV(L,13),1,0),3); C_D1:=(3*C+2*O+L+H)/7; C_D2:=REVERSE(C_D1)+2*WMA(C_D1,5);
C_D3:=3*C_D2-2*SMA(C_D2,2,1); 預選:=CROSS(C,C_D3) and D_D>0;
低吸養馬:=粘合&&預選;
Y_0:=C>REF(C,1)&&C>REF(C,2); Y_1:=C<REF(C,1)&&C<REF(C,2);Y_2:=REF(Y_1,1)&&C>=REF(C,1)&&C<=REF(C,2);
Y_3:=REF(Y_2,1)&&C<=REF(C,1)&&C>=REF(C,2);Y_4:=REF(Y_3,1)&&C>=REF(C,1)&&C<=REF(C,2);Y_5:=REF(Y_4,1)&&C<=REF(C,1)&&C>=REF(C,2);
Y_6:=REF(Y_5,1)&&C>=REF(C,1)&&C<=REF(C,2);Y_7:=REF(Y_6,1)&&C<=REF(C,1)&&C>=REF(C,2);Y_8:=REF(Y_7,1)&&C>=REF(C,1)&&C<=REF(C,2);
Y_9:=REF(Y_8,1)&&C<=REF(C,1)&&C>=REF(C,2);Y_10:=REF(Y_9,1)&&C>=REF(C,1)&&C<=REF(C,2); Y_11:=REF(Y_10,1)&&C<=REF(C,1)&&C>=REF(C,2);
Y_12:=REF(Y_11,1)&&C>=REF(C,1)&&C<=REF(C,2);
Y_13:=Y_0&&REF(Y_1Y_2Y_3Y_4Y_5Y_6Y_7Y_8Y_9Y_10Y_11Y_12,1);
P_1:=INDEXC>REF(sum(INDEXV*(INDEXO+INDEXC*3+INDEXL+INDEXH)/6,5)/sum(INDEXV,5),1);P_2:=((COUNT(P_1,BARSLAST(P_1=0))=1)&&P_1);
P_3:=((COUNT(P_1=0,BARSLAST(P_1))=1)&&P_1=0);P_4:=(SUM(P_3,BARSLAST(P_2))=0)*BARSLAST(P_2);
P_5:=P_4>0&&P_4<3 or P_2 or Y_13;M_1:=中77>=ref(中77,1);M_2:=長99>=ref(長99,1);
DIFF:= EMA(C,12)-EMA(C,26);DEA:=EMA(DIFF,50);MACD:=2*(DIFF-DEA)>=ref(2*(DIFF-DEA),1);
X_1:=(C-MA(C,14))/(0.015*AVEDEV(C,14));X_2:=EMA(EMA(EMA(X_1,2),2),2);X_3:=EMA(EMA(EMA(X_1,3),2),2);
X_4:=(CROSS(X_2,X_3) OR (X_2>=X_3))&&X_2>=-101&&X_2>=REF(X_2,1)&&REF(X_2,1)<-101;
L_1:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9));
L_2:= EMA(EMA(EMA(3*SMA(L_1,3,1)-2*SMA(SMA(L_1,3,1),3,1),2),2),2);L_3:=L_2>REF(L_2,1) ;
追高買進:=粘合&&FILTER((P_5 or CROSS(C,A))&&粘合,5)&&低吸養馬=0&&(M_1M_2)&&MACD&&O<C;
{-----------------【圖解模板】---------------------}
{粘合區}
FILLRGN(粘合,SYSPARAM(4),SYSPARAM(5)),Color004600;
KLINE(o,h,l,c,0);
{線}
PARTLINE(C,長99),Color0098FF;
PARTLINE(C,中77),ColorF6B7FF;
PARTLINE(C,短13),COLORWHITE;
PARTLINE(C,MA5),LINEDOT,COLORYELLOW;
{信號部分}
drawtext(低吸養馬,L,' ↑ \n 養 \n 馬 \n'),ALIGN,PXDN8,COLORGREEN;
drawtext(追高買進&&低吸養馬=0,L,' ↑ \n 訓 \n 馬 \n'),ALIGN,PXDN8,ColorFF95FF;
//
{◆2.金牌短線戰法 — MACD副圖}
DIFF : EMA(CLOSE,12) - EMA(CLOSE,26);
DEA: EMA(DIFF,50);
MACD : 2*(DIFF-DEA), COLORSTICK;
短13:=ema(C,13),LINETHICK,PRECISION2,COLORYELLOW;
中77:=ema(C,77),LINETHICK,PRECISION2,ColorF6B7FF;
長99:=ema(C,99),LINETHICK,PRECISION2,Color0098FF;
{粘合區}
A:=MAX(MAX(短13,中77),長99);
B:=MIN(MIN(短13,中77),長99);
粘合:=if(RANGE(100*(A-B)/B,0,2),1,0);
{信號控制}
M_1:=中77>=ref(中77,1);
M_2:=長99>=ref(長99,1);
趨勢:= DIFF>MACD or MACD>ref(MACD,1);
信號 :=CROSS(C,A)&&粘合&&趨勢&&(M_1M_2)&&O<C;
DRAWTEXT(FILTER(信號,10),0,''),ALIGN,PXDN16,COLORRED;
{選}
X_1:=(C-MA(C,14))/(0.015*AVEDEV(C,14));
X_2:=EMA(EMA(EMA(X_1,2),2),2);
X_3:=EMA(EMA(EMA(X_1,3),2),2);
X_4:=(CROSS(X_2,X_3) OR (X_2>=X_3))&&X_2>=-101&&X_2>=REF(X_2,1)&&REF(X_2,1)<-101;
L_1:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9));
L_2:= EMA(EMA(EMA(3*SMA(L_1,3,1)-2*SMA(SMA(L_1,3,1),3,1),2),2),2);
L_3:=L_2>REF(L_2,1) ;
選:X_4&&L_3&&DIFF>ref(DIFF,1)&&(M_1M_2),LINETHICK;
DRAWTEXT(選,0,''),ALIGN,PXDN16,COLORGREEN;
//
{◆3.三線粘合副圖}
input: 粘合度(10,1,30);//調整參數可以得到需要的粘合度
{粘合區}
短13:=ema(C,13);
中77:=ema(C,77);
長99:=ema(C,99);
A:=MAX(MAX(短13,中77),長99);
B:=MIN(MIN(短13,中77),長99);
三線粘合:if(RANGE(100*(A-B)/B,0,0.1*粘合度),1,0),ColorFFFFFF;
//
?
公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】
?