相關標簽:

?

原理解析：
輸出INPUT:N( 5,1,100) 填充背景 當滿足條件收陽線時,在開盤價和最低價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLOR0000FF 當滿足條件收陽線時,在收盤價和最高價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLOR0000FF 當滿足條件開盤價>=收盤價時,在收盤價和最低價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLOR00FF00 當滿足條件開盤價>=收盤價時,在開盤價和最高價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLOR00FF00 當滿足條件開盤價>=收盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,COLORFF7700 當滿足條件開盤價>=收盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLORFF9900 當滿足條件開盤價>=收盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLORFFBB00 當滿足條件開盤價>=收盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLORFFCC00 當滿足條件開盤價>=收盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLORFFDD00 當滿足條件開盤價>=收盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLORFFEE00 當滿足條件開盤價>=收盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLORFFFF00 當滿足條件收陽線時,在收盤價和開盤價位置之間畫柱狀線,寬度為7,0不為0則畫空心柱. ,COLOR000055 當滿足條件收陽線時,在收盤價和開盤價位置之間畫柱狀線,寬度為6,0不為0則畫空心柱. ,COLOR000066 當滿足條件收陽線時,在收盤價和開盤價位置之間畫柱狀線,寬度為5,0不為0則畫空心柱. ,COLOR000077 當滿足條件收陽線時,在收盤價和開盤價位置之間畫柱狀線,寬度為4,0不為0則畫空心柱. ,COLOR000099 當滿足條件收陽線時,在收盤價和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱. ,COLOR0000BB 當滿足條件收陽線時,在收盤價和開盤價位置之間畫柱狀線,寬度為2,0不為0則畫空心柱. ,COLOR0000DD 當滿足條件收陽線時,在收盤價和開盤價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱. ,COLOR0000FF A1賦值:N日前的最高價=2*N+1日內最高價的最高值 B1賦值:A1的N日過濾 C1賦值:若B1則將最近N+1周期置為1 D1賦值:C1的N日過濾 A2賦值:N日前的最低價=2*N+1日內最低價的最低值 B2賦值:A2的N日過濾 C2賦值:若B2則將最近N+1周期置為1 D2賦值:C2的N日過濾 E1賦值:(1日前的2*N日內最低價的最低值+1日前的2*N日內最高價的最高值)/2 E2賦值:(最高價+最低價)/2 H1賦值:(D1 AND 取反) OR 是否最后一個周期 OR 收盤價的有效數據周期數=1 L1賦值:(D2 AND 取反) H2賦值:D1 AND 取反 X1賦值:1日前的上次H1距今天數+1 F1賦值:若H1ANDCOUNT(L1,X1)>0則將最近X1日內如果L1,返回最低價,否則返回10000距今天數周期置為1 G1賦值:F1>1日前的F1 I1賦值:若G1則將最近2周期置為1 LD賦值:I1>1日前的I1 L2賦值:LD OR 是否最后一個周期 OR 收盤價的有效數據周期數=1 X2賦值:1日前的上次L2距今天數+1 F2賦值:若L2ANDCOUNT(H2,X2)>0則將最近X2日內如果H2,返回最高價,否則返回0距今天數周期置為1 G2賦值:F2>1日前的F2 I2賦值:若G2則將最近2周期置為1 HD賦值:I2>1日前的I2 R1賦值:若是否最后一個周期則將最近上次HD距今天數+1周期置為1 S1賦值:R1>1日前的R1 T1賦值:若是否最后一個周期則將最近上次LD距今天數+1周期置為1 U1賦值:T1>1日前的T1 R2賦值:若S1則將最近1日前的上次HD距今天數+2周期置為1 S2賦值:R2>1日前的R2 T2賦值:若U1則將最近1日前的上次LD距今天數+2周期置為1 U2賦值:T2>1日前的T2 T3賦值:若U2則將最近1日前的上次LD距今天數+2周期置為1 U3賦值:T3>1日前的T3 T4賦值:若U3則將最近1日前的上次LD距今天數+2周期置為1 U4賦值:T4>1日前的T4 R3賦值:若S2則將最近1日前的上次HD距今天數+2周期置為1 S3賦值:R3>1日前的R3 R4賦值:若S3則將最近1日前的上次HD距今天數+2周期置為1 S4賦值:R4>1日前的R4 輸出 短期壓力:當滿足條件S2時,在最高價位置畫直線起點，當滿足條件S1時,在最高價位置畫直線終點,1表示是否延長.,畫紅色 輸出短期支撐:當滿足條件U2時,在最低價位置畫直線起點，當滿足條件U1時,在最低價位置畫直線終點,1表示是否延長.,畫綠色 輸出中期壓力:當滿足條件S3時,在最高價位置畫直線起點，當滿足條件S2時,在最高價位置畫直線終點,1表示是否延長.,畫黃色 輸出中期支撐:當滿足條件U3時,在最低價位置畫直線起點，當滿足條件U2時,在最低價位置畫直線終點,0表示是否延長.,畫綠色 輸出長期壓力:當滿足條件S4時,在最高價位置畫直線起點，當滿足條件S3時,在最高價位置畫直線終點,1表示是否延長.,COLORFF00FF 輸出長期支撐:當滿足條件U4時,在最低價位置畫直線起點，當滿足條件U3時,在最低價位置畫直線終點,0表示是否延長.,畫綠色 當滿足條件S1時,在最高價*1.01位置畫6號圖標 當滿足條件S2時,在最高價*1.01位置畫6號圖標 當滿足條件S3時,在最高價*1.01位置畫6號圖標 當滿足條件S4時,在最高價*1.01位置畫6號圖標 當滿足條件U1時,在最低價*0.99位置畫9號圖標 當滿足條件U2時,在最低價*0.99位置畫9號圖標 當滿足條件U3時,在最低價*0.99位置畫9號圖標 當滿足條件U4時,在最低價*0.99位置畫9號圖標 填充背景 輸出白色: 最高價的21日[2日權重]移動平均*1.05,畫白色 輸出黃色: 最低價的21日[2日權重]移動平均*0.95,畫黃色 輸出粉色: 最低價的5日[1日權重]移動平均,畫洋紅色 輸出綠色: 收盤價的2日[1日權重]移動平均,畫綠色 輸出波段買入:如果綠色上穿粉色,返回白色*1.05,否則返回粉色,,畫洋紅色 輸出領頭羊:如果綠色上穿白色,返回白色*1.10,否則返回黃色,,畫黃色

?

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

源碼：

?

{籌碼突破}
INPUT:N( 5,1,100);
DRAWGBK(c>0,COLORRGB(10,60,0),COLORRGB(10,10,0),1);
STICKLINE(CLOSE>OPEN,OPEN,LOW,0.5,0 ),COLOR0000FF;
STICKLINE(CLOSE>OPEN,CLOSE,HIGH,0.5 ,0 ),COLOR0000FF;
STICKLINE(OPEN>=CLOSE,CLOSE,LOW,0.5 ,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE,OPEN,HIGH,0.5 ,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,7,0 ),COLORff7700;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLORff9900;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLORffbb00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,4,0 ),COLORffcc00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLORffdd00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),COLORffee00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLORffFF00;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLOR000055;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLOR000066;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLOR000077;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLOR000099;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLOR0000bb;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLOR0000dd;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLOR0000ff;
A1:=REF(H,N)=HHV(H,2*N+1);
B1:=FILTER(A1,N);
C1:=BACKSET(B1,N+1);
D1:=FILTER(C1,N);{高點}
A2:=REF(L,N)=LLV(L,2*N+1);
B2:=FILTER(A2,N);
C2:=BACKSET(B2,N+1);
D2:=FILTER(C2,N);{低點}
E1:=(REF(LLV(L,2*N),1)+REF(HHV(H,2*N),1))/2; E2:=(H+L)/2;{高低點出現在同一K線上時可作取舍}
H1:=(D1 AND NOT(D2 AND E1>=E2)) OR ISLASTBAR OR BARSCOUNT(C)=1;
L1:=(D2 AND NOT(D1 AND E1<E2));H2:=D1 AND NOT(D2 AND E1>=E2);
X1:=REF(BARSLAST(H1),1)+1; F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS
(IF(L1,L,10000),X1));
G1:=F1>REF(F1,1); I1:=BACKSET(G1,2); LD:=I1>REF(I1,1);{過濾后低點}
L2:=LD OR ISLASTBAR OR BARSCOUNT(C)=1;
X2:=REF(BARSLAST(L2),1)+1; F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS
(IF(H2,H,0),X2));
G2:=F2>REF(F2,1); I2:=BACKSET(G2,2); HD:=I2>REF(I2,1);{過濾后高點}
R1:=BACKSET(ISLASTBAR,BARSLAST(HD)+1); S1:=R1>REF(R1,1); {前一高}
T1:=BACKSET(ISLASTBAR,BARSLAST(LD)+1); U1:=T1>REF(T1,1); {前一低}
R2:=BACKSET(S1,REF(BARSLAST(HD),1)+2); S2:=R2>REF(R2,1); {前二高}
T2:=BACKSET(U1,REF(BARSLAST(LD),1)+2); U2:=T2>REF(T2,1); {前二低}
T3:=BACKSET(U2,REF(BARSLAST(LD),1)+2); U3:=T3>REF(T3,1); {前三低}
T4:=BACKSET(U3,REF(BARSLAST(LD),1)+2); U4:=T4>REF(T4,1); {前四低}
R3:=BACKSET(S2,REF(BARSLAST(HD),1)+2); S3:=R3>REF(R3,1); {前三高}
R4:=BACKSET(S3,REF(BARSLAST(HD),1)+2); S4:=R4>REF(R4,1); {前四高}
短期壓力:DRAWLINE(S2,H,S1,H,1),COLORRED;
短期支撐:DRAWLINE(U2,L,U1,L,1),COLORGREEN;
中期壓力:DRAWLINE(S3,H,S2,H,1),COLORYELLOW;
中期支撐:DRAWLINE(U3,L,U2,L,0),COLORGREEN;
長期壓力:DRAWLINE(S4,H,S3,H,1),COLORFF00FF;
長期支撐:DRAWLINE(U4,L,U3,L,0),COLORGREEN;
DRAWICON(S1,H*1.01,6);
DRAWICON(S2,H*1.01,6);
DRAWICON(S3,H*1.01,6);
DRAWICON(S4,H*1.01,6);
DRAWICON(U1,L*0.99,9);
DRAWICON(U2,L*0.99,9);
DRAWICON(U3,L*0.99,9);
DRAWICON(U4,L*0.99,9);
{領頭羊附圖}
{ 綠線上穿紫線時，可作波段買入，綠線上穿白線時很可能是大牛股。}
DRAWGBK(c>0,COLORRGB(10,60,0),COLORRGB(10,10,0),1);
白色: SMA(HIGH,21,2)*1.05,COLORWHITE;
黃色: SMA(LOW,21,2)*0.95,COLORYELLOW;
粉色: SMA(LOW,5,1),COLORMAGENTA;
綠色: SMA(CLOSE,2,1),COLORGREEN;
波段買入:IF(CROSS(綠色,粉色),白色*1.05,粉色),,COLORMAGENTA;
領頭羊:IF(CROSS(綠色,白色),白色*1.10,黃色),,COLORYELLOW;

?

?

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

?