相關標簽:

?

?

原理解析：
輸出MA5:收盤價的5日簡單移動平均,COLORFF00FF,線寬為1 輸出MA10:收盤價的10日簡單移動平均,COLOR00FFFF,線寬為1 輸出MA21:收盤價的21日簡單移動平均,COLORC0FF7F,線寬為1 輸出MA55:收盤價的55日簡單移動平均,COLORFFFFFF,線寬為1 輸出黃金線:收盤價的10日簡單移動平均,COLOR00FFFF,線寬為2 VAR11賦值:1 VAR12賦值:((((2*收盤價)+最高價)+最低價) / 4) VAR14賦值:5日內最低價的最低值 VAR15賦值:4日內最高價的最高值 C1賦值:((((VAR12-VAR14)/(VAR15-VAR14))*100)的4日指數移動平均*VAR11),畫紅色,線寬為2 C2賦值:(((0.667*1日前的C1)+(0.333*C1))的2日指數移動平均*VAR11),COLORFFFFFF,線寬為2 AA賦值:C1>=C2 BB賦值:C2>C1 當滿足條件C1上穿C2時,在最低價-0.1位置畫1號圖標 當滿足條件C2上穿C1時,在最高價+0.1位置畫2號圖標 當滿足條件AA時,在收盤價和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,畫紅色 當滿足條件AA時,在最高價和最低價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,畫紅色 當滿足條件BB時,在收盤價和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR00FF00 當滿足條件BB時,在最高價和最低價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLOR00FF00 當滿足條件AA時,在收盤價和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR000099 當滿足條件AA時,在收盤價和開盤價位置之間畫柱狀線,寬度為2.2,0不為0則畫空心柱.,COLOR0000CC 當滿足條件AA時,在收盤價和開盤價位置之間畫柱狀線,寬度為1.5,0不為0則畫空心柱.,COLOR0000FF 當滿足條件AA時,在收盤價和開盤價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLORCC66FF 當滿足條件BB時,在收盤價和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLORFF7700 當滿足條件BB時,在收盤價和開盤價位置之間畫柱狀線,寬度為2.2,0不為0則畫空心柱.,COLORFF9900 當滿足條件BB時,在收盤價和開盤價位置之間畫柱狀線,寬度為1.5,0不為0則畫空心柱.,COLORFFBB00 當滿足條件BB時,在收盤價和開盤價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,畫青色 輸出AAF:34日內最低價的最低值,線寬為1,COLORFFFFCC 輸出BBF:AAF的4日簡單移動平均,線寬為1,畫黃色 賦值: (最高價 + 最低價 + 收盤價)/3 CCI1賦值:(TYP-TYP的6日簡單移動平均)/(0.015*TYP的5日平均絕對偏差) 差值1賦值:1日前的CCI1-CCI1的絕對值,線寬為0 CCI2賦值:(TYP-TYP的10日簡單移動平均)/(0.015*TYP的10日平均絕對偏差) 差值2賦值:1日前的CCI2-CCI2的絕對值,線寬為0 CCI3賦值:(TYP-TYP的20日簡單移動平均)/(0.015*TYP的20日平均絕對偏差) 差值3賦值:1日前的CCI3-CCI3的絕對值,線寬為0 CCI4賦值:(TYP-TYP的30日簡單移動平均)/(0.015*TYP的30日平均絕對偏差) 差值4賦值:1日前的CCI4-CCI4的絕對值,線寬為0 CCI5賦值:(TYP-TYP的60日簡單移動平均)/(0.015*TYP的60日平均絕對偏差) 差值5賦值:1日前的CCI5-CCI5的絕對值,線寬為0 CCI賦值:CCI1+CCI2+CCI3+CCI4+CCI5 AAA賦值:(3*收盤價+最高價+最低價+開盤價)/6 VAR1賦值:(8*AAA+7*1日前的AAA+6*2日前的AAA+5*3日前的AAA+4*4日前的AAA+3*5日前的AAA+2*6日前的AAA+8日前的AAA)/36 VAR2賦值:(5日內VAR1的最高值+10日內VAR1的最高值+20日內VAR1的最高值)/3 VAR3賦值:(5日內VAR1的最低值+10日內VAR1的最低值+20日內VAR1的最低值)/3 VAR4賦值:(5日內VAR2的最高值+10日內VAR2的最高值+20日內VAR2的最高值)/3 VAR5賦值:(5日內VAR3的最低值+10日內VAR3的最低值+20日內VAR3的最低值)/3 VAR6賦值:(2日內VAR1的最低值+4日內VAR1的最低值+6日內VAR1的最低值)/3 輸出短線:VAR1,畫白色 輸出中線:VAR6,畫紅色 輸出下跌:如果VAR1=VAR6,返回VAR6,否則返回無效數,畫綠色 TJ1賦值: CCI1>差值4 立樁量賦值:TJ1的歷史過濾,NODRAW TJ2賦值:如果上次立樁量距今天數=1,返回1,否則返回0 當滿足條件立樁量不等于1時,在上次立樁量距今天數日前的最高價和上次立樁量距今天數日前的最高價位置之間畫柱狀線,寬度為1,1不為0則畫空心柱.,畫青色 成立1賦值:TJ2=1 條件成立1賦值:成立1的5日過濾 當滿足條件條件成立1時,在上次立樁量距今天數日前的最高價位置書寫文字,畫淡藍色 TJ11賦值: CCI1<-差值4 立樁量2賦值:TJ11的歷史過濾,NODRAW TJ22賦值:如果上次立樁量2距今天數=1ANDCLOSE>1日前的最高價,返回1,否則返回0 突破2賦值:TJ22=1 當滿足條件CLOSEAND下跌不等于VAR6時,在上次立樁量2距今天數日前的最低價和上次立樁量2距今天數日前的最低價位置之間畫柱狀線,寬度為1,1不為0則畫空心柱.,畫黃色 TJ賦值:如果上次立樁量2距今天數=1ANDCLOSE>1日前的最低價,返回1,否則返回0 成立2賦值:TJ=1 條件成立2賦值:成立2的5日過濾 當滿足條件條件成立2時,在上次立樁量2距今天數日前的最低價位置書寫文字,畫淡洋紅色 TJ111賦值:CCI1的絕對值>CCI AND 差值1的絕對值> 差值5的絕對值 立樁量3賦值:TJ111的3日過濾 TJ3賦值:如果上次立樁量3距今天數=1ANDCLOSE>1日前的最低價,返回1,否則返回如果上次立樁量3距今天數=2ANDCLOSE>2日前的最低價,返回1,否則返回如果上次立樁量3距今天數=3ANDCLOSE>3日前的最低價,返回1,否則返回0 成立賦值:TJ3=1 條件成立賦值:成立的5日過濾 當滿足條件條件成立AND下跌不等于VAR6時,在最低價*0.97位置書寫文字 LC賦值:1日前的收盤價 RSI賦值:(((收盤價-LC)和0的較大值的3日[1日權重]移動平均 / (收盤價-LC)的絕對值的3日[1日權重]移動平均) * 100) FF賦值:收盤價的3日指數移動平均 MA15賦值:收盤價的21日指數移動平均 當滿足條件FF上穿MA15時,在BBF位置書寫文字,COLORA6E500 當滿足條件88上穿RSI時,在(最高價*1.02)位置書寫文字,COLOR1880FF X1賦值:(收盤價+最低價+最高價)/3 BB13賦值:X1的13日指數移動平均-1日前的X1的13日指數移動平均的反正切*3.1416*10 EMA8賦值:收盤價的8日指數移動平均 當滿足條件BB13>1ANDEMA(X1,13)>1日前的X1的8日指數移動平均的10日過濾時,在EMA8位置書寫文字,畫白色 當滿足條件1時,在收盤價和開盤價位置之間畫柱狀線,寬度為2.8,0不為0則畫空心柱.,COLOR666600 當滿足條件立樁量時,在收盤價和開盤價位置之間畫柱狀線,寬度為2.8,0不為0則畫空心柱.,COLOR0000FF 當滿足條件1時,在收盤價和開盤價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,COLORCCCCCC

?

?來源:程序化99（ www.kzuj.com.cn ）

源碼：

?

?

MA5:MA(C,5),COLORFF00FF,LINETHICK1;
MA10:MA(C,10),COLOR00FFFF,LINETHICK1;
MA21:MA(C,21),COLORC0FF7F,LINETHICK1;
MA55:MA(C,55),COLORFFFFFF,LINETHICK1;
黃金線:MA(C,10),COLOR00FFFF,LINETHICK2;
VAR11:=1;
VAR12:=((((2*CLOSE)+HIGH)+LOW) / 4);
VAR14:=LLV(LOW,5);
VAR15:=HHV(HIGH,4);
C1:=(EMA((((VAR12-VAR14)/(VAR15-VAR14))*100),4)*VAR11),COLORRED,LINETHICK2;
C2:=(EMA(((0.667*REF(C1,1))+(0.333*C1)),2)*VAR11),COLORFFFFFF,LINETHICK2;
AA:=C1>=C2 ;
BB:=C2>C1 ;
DRAWICON(CROSS(C1,C2),L-0.1,1);
DRAWICON(CROSS(C2,C1),H+0.1,2);
STICKLINE(AA,C,O,3,0),COLORRED;
STICKLINE(AA,H,L,0.5,0),COLORRED;
STICKLINE(BB,C,O,3,0),COLOR00FF00;
STICKLINE(BB,H,L,0.5,0),COLOR00FF00;
{紅}
STICKLINE(AA,CLOSE,OPEN,3,0),COLOR000099;
STICKLINE(AA,CLOSE,OPEN,2.2,0),COLOR0000CC;
STICKLINE(AA,CLOSE,OPEN,1.5,0),COLOR0000FF;
STICKLINE(AA,CLOSE,OPEN,0.5,0),COLORCC66FF;
{藍}
STICKLINE(BB,CLOSE,OPEN,3,0),COLORFF7700;
STICKLINE(BB,CLOSE,OPEN,2.2,0),COLORFF9900;
STICKLINE(BB,CLOSE,OPEN,1.5,0),COLORFFBB00;
STICKLINE(BB,CLOSE,OPEN,0.5,0),COLORCYAN;
AAF:LLV(LOW,34),LINETHICK1,COLORFFFFCC;
BBF:MA(AAF,4),LINETHICK1,COLORYELLOW;
TYP := (HIGH + LOW + CLOSE)/3;
CCI1:=(TYP-MA(TYP,6))/(0.015*AVEDEV(TYP,5));
差值1:=ABS(REF(CCI1,1)-CCI1),LINETHICK0;
CCI2:=(TYP-MA(TYP,10))/(0.015*AVEDEV(TYP,10));
差值2:=ABS(REF(CCI2,1)-CCI2),LINETHICK0;
CCI3:=(TYP-MA(TYP,20))/(0.015*AVEDEV(TYP,20));
差值3:=ABS(REF(CCI3,1)-CCI3),LINETHICK0;
CCI4:=(TYP-MA(TYP,30))/(0.015*AVEDEV(TYP,30));
差值4:=ABS(REF(CCI4,1)-CCI4),LINETHICK0;
CCI5:=(TYP-MA(TYP,60))/(0.015*AVEDEV(TYP,60));
差值5:=ABS(REF(CCI5,1)-CCI5),LINETHICK0;
CCI:=CCI1+CCI2+CCI3+CCI4+CCI5;
AAA:=(3*C+H+L+O)/6;
VAR1:=(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)
+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36;
VAR2:=(HHV(VAR1,5)+HHV(VAR1,10)+HHV(VAR1,20))/3;
VAR3:=(LLV(VAR1,5)+LLV(VAR1,10)+LLV(VAR1,20))/3;
VAR4:=(HHV(VAR2,5)+HHV(VAR2,10)+HHV(VAR2,20))/3;
VAR5:=(LLV(VAR3,5)+LLV(VAR3,10)+LLV(VAR3,20))/3;
VAR6:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3;
短線:VAR1,COLORWHITE;
中線:VAR6,COLORRED;
下跌:IF(VAR1=VAR6,VAR6, DRAWNULL),COLORGREEN;
TJ1:= CCI1>差值4;
立樁量:=FILTER(TJ1,0),NODRAW;
TJ2:=IF(BARSLAST(立樁量)=1 ,1,0);
STICKLINE(立樁量 !=1,REF(HIGH,BARSLAST(立樁量)),
REF(HIGH,BARSLAST(立樁量)),1,1),COLORCYAN;
{STICKLINE(立樁量 !=1,REF(LOW,BARSLAST(立樁量)),
REF(LOW,BARSLAST(立樁量)),1,1),COLORCYAN;}
成立1:=TJ2=1;
條件成立1:=FILTER(成立1,5);
DRAWTEXT(條件成立1, REF(HIGH,BARSLAST(立樁量)),'看跌'),COLORLIBLUE;
TJ11:= CCI1<-差值4 ;
立樁量2:=FILTER(TJ11,0),NODRAW;
TJ22:=IF(BARSLAST(立樁量2)=1 AND CLOSE>REF(HIGH,1),1,0);
突破2:=TJ22=1;
{STICKLINE(CLOSE AND 下跌!= VAR6,REF(HIGH,BARSLAST(立樁量2)),
REF(HIGH,BARSLAST(立樁量2)),1,1),COLORYELLOW;}
STICKLINE(CLOSE AND 下跌!= VAR6,REF(LOW,BARSLAST(立樁量2)),
REF(LOW,BARSLAST(立樁量2)),1,1),COLORYELLOW;
TJ:=IF(BARSLAST(立樁量2)=1 AND CLOSE>REF(LOW,1),1,0);
成立2:=TJ=1;
條件成立2:=FILTER(成立2,5);
DRAWTEXT(條件成立2,REF(LOW,BARSLAST(立樁量2)),'看漲'),COLORLIMAGENTA;
TJ111:=ABS(CCI1)>CCI AND ABS( 差值1)> ABS(差值5);
立樁量3:=FILTER(TJ111,3);
TJ3:=IF(BARSLAST(立樁量3)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(立樁量3)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(立樁量3)=3 AND CLOSE>REF(LOW,3),1,0)));
成立:=TJ3=1;
條件成立:=FILTER(成立,5);
DRAWTEXT(條件成立 AND 下跌!= VAR6,L*0.97,'☆成立');
LC:=REF(CLOSE,1);
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
FF:=EMA(CLOSE,3);
MA15:=EMA(CLOSE,21);
DRAWTEXT(CROSS(FF,MA15),BBF,'底背離'),COLORA6E500;
DRAWTEXT(CROSS(88,RSI),(HIGH * 1.02),'頂背離'),COLOR1880FF;
X1:=(C+L+H)/3;
BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;
EMA8:=EMA(C,8);
DRAWTEXT(FILTER(BB13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10),
EMA8,'∠45'),COLORWHITE;
STICKLINE(1,C,O,2.8,0),COLOR666600;
STICKLINE(立樁量,C,O,2.8,0),COLOR0000FF;
STICKLINE(1,C,O,0,0),COLORCCCCCC;

?

公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】

?