相關標簽:通達信生命線主圖源碼 、 通達信分時主圖源碼 、 通達信主圖買賣源碼 、 通達信財神主圖源碼 、 通達信主圖boll源碼 、 通達信雙響炮主圖源碼 、 通達信箱體主圖源碼 、 通達信好主圖源碼 、 通達信逃頂主圖源碼 、 通達信變色主圖源碼 、 通達信主圖波浪源碼 、 通達信漲停板主圖源碼 、 通達信角度主圖源碼 、 通達信木蘭主圖源碼 、

?

主圖1：

?

原理解析：
MAA10賦值:收盤價的10日簡單移動平均 輸出MAA30:收盤價的30日簡單移動平均,畫紅色 輸出KS:如果MAA10>MAA30,返回MAA10,否則返回MAA30,畫藍色 A3賦值:(收盤價-9日內最低價的最低值)/(9日內最高價的最高值-9日內最低價的最低值)*100 A4賦值:A3的3日[1日權重]移動平均 A5賦值:A4的3日[1日權重]移動平均 A6賦值:3*A4-2*A5 A7賦值:收盤價-1日前的收盤價 A8賦值:100*A7的6日指數移動平均的6日指數移動平均/A7的絕對值的6日指數移動平均的6日指數移動平均 買賦值:2日內A8的最低值=7日內A8的最低值 AND 統計2日中滿足A8<0的天數 AND A8上穿A8的2日簡單移動平均 當滿足條件買=1的5日過濾時,在最低價-0.05位置書寫文字,畫黃色 當滿足條件買時,在開盤價和收盤價位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,畫黃色 當滿足條件收盤價>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR000045 當滿足條件收盤價>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為2.5,0不為0則畫空心柱.,COLOR000065 當滿足條件收盤價>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLOR000085 當滿足條件收盤價>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為1.5,0不為0則畫空心柱.,COLOR0000A5 當滿足條件收盤價>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR0000C5 當滿足條件收盤價>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLOR0000E5 當滿足條件收盤價>=開盤價時,在最高價和最低價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,COLOR0000F5 當滿足條件收陰線時,在收盤價和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR353500 當滿足條件收陰線時,在收盤價和開盤價位置之間畫柱狀線,寬度為2.5,0不為0則畫空心柱.,COLOR454500 當滿足條件收陰線時,在收盤價和開盤價位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLOR555500 當滿足條件收陰線時,在收盤價和開盤價位置之間畫柱狀線,寬度為1.5,0不為0則畫空心柱.,COLOR656500 當滿足條件收陰線時,在收盤價和開盤價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR757500 當滿足條件收陰線時,在收盤價和開盤價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLOR858500 當滿足條件收陰線時,在最高價和最低價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,COLOR959500 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賦值:成交量(手)=10日內成交量(手)的最高值 AND 成交量(手)>2*1日前的成交量(手) AND 收盤價>VAR1 立樁量賦值:TJ1的5日過濾 TJ2賦值:如果上次立樁量距今天數=1ANDCLOSE>1日前的最高價,返回1,否則返回如果上次立樁量距今天數=2ANDCLOSE>2日前的最高價,返回1,否則返回如果上次立樁量距今天數=3ANDCLOSE>3日前的最高價,返回1,否則返回0 突破賦值:TJ2=1 當滿足條件收盤價時,在上次立樁量距今天數日前的最高價和上次立樁量距今天數日前的最高價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,畫黃色 當滿足條件收盤價時,在上次立樁量距今天數日前的最低價和上次立樁量距今天數日前的最低價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,畫洋紅色 TJ3賦值:如果上次立樁量距今天數=1ANDCLOSE>1日前的最低價,返回1,否則返回如果上次立樁量距今天數=2ANDCLOSE>2日前的最低價,返回1,否則返回如果上次立樁量距今天數=3ANDCLOSE>3日前的最低價,返回1,否則返回0 三天法則賦值:TJ3=1 成立賦值:三天法則 AND 突破 條件成立賦值:成立的3日過濾 當滿足條件條件成立時,在最低價*0.99位置書寫文字,畫黃色 VAR1F賦值:(21日內最高價的最高值-收盤價)/(21日內最高價的最高值-21日內最低價的最低值)*100-10 HH賦值:3日內最高價的最高值 LL賦值:3日內最低價的最低值 CH1賦值:(HH > 1日前的HHAND 收盤價>1日前的收盤價) CH2賦值:(LL < 1日前的LLAND 收盤價<1日前的收盤價) K3賦值:上次CH1距今天數 K4賦值:上次CH2距今天數 K5賦值:(K3<K4 OR CH1) AND 取反 K6賦值:(K3>K4 OR CH2) AND 取反 ZC賦值:如果HH>1日前的HHANDC>1日前的收盤價,返回LL,否則返回上次HH>1日前的HHANDC>1日前的收盤價距今天數日前的LL YL賦值:如果LL<1日前的LLANDC<1日前的收盤價,返回HH,否則返回上次LL<1日前的LLANDC<1日前的收盤價距今天數日前的HH 輸出SNX:如果K5,返回ZC,否則返回YL VARA1賦值:(最高價+最低價+收盤價)/3 VARA2賦值:(VARA1-VARA1的14日簡單移動平均)/(0.015*VARA1的14日平均絕對偏差) AA賦值:VARA2上穿-100 BB賦值:上次AA距今天數+2 CC賦值:流通市值<4000000000 當滿足條件AAANDCC時,在最低價*0.99位置畫1號圖標 當滿足條件AAANDCC時,在2日前的最低價位置書寫文字 當滿足條件收陽線時,在橫軸0.01縱軸0.9位置書寫文字,畫紅色 當滿足條件收陽線時,在橫軸1縱軸1位置書寫文字,畫紅色

?

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

源碼：

?

MAA10:=MA(C,10);
MAA30:MA(C,30),COLORRED;
KS:IF(MAA10>MAA30,MAA10,MAA30),COLORBLUE;
A3:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
A4:=SMA(A3,3,1);
A5:=SMA(A4,3,1);
A6:=3*A4-2*A5;
A7:=C-REF(C,1);
A8:=100*EMA(EMA(A7,6),6)/EMA(EMA(ABS(A7),6),6);
買:=LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND CROSS(A8,MA(A8,2));
DRAWTEXT(FILTER(買=1,5),LOW-0.05,''),COLORYELLOW;
STICKLINE(買,OPEN,CLOSE,2,0),COLORYELLOW;
STICKLINE(C>=O,C,O,3,0),COLOR000045;
STICKLINE(C>=O,C,O,2.5,0),COLOR000065;
STICKLINE(C>=O,C,O,2,0),COLOR000085;
STICKLINE(C>=O,C,O,1.5,0),COLOR0000A5;
STICKLINE(C>=O,C,O,1,0),COLOR0000C5;
STICKLINE(C>=O,C,O,0.5,0),COLOR0000E5;
STICKLINE(C>=O,H,L,0,0),COLOR0000F5;
STICKLINE(C<O,C,O,3,0),COLOR353500;
STICKLINE(C<O,C,O,2.5,0),COLOR454500;
STICKLINE(C<O,C,O,2,0),COLOR555500;
STICKLINE(C<O,C,O,1.5,0),COLOR656500;
STICKLINE(C<O,C,O,1,0),COLOR757500;
STICKLINE(C<O,C,O,0.5,0),COLOR858500;
STICKLINE(C<O,H,L,0,0),COLOR959500;
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;
DRAWBAND(VAR1,RGB(155,50,50),VAR6,RGB(250,250,0));
短線:VAR1,COLORMAGENTA;
中線:VAR6,COLORYELLOW;
下跌:IF(VAR1=VAR6,VAR6,DRAWNULL),COLORGREEN;
TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR1;
立樁量:=FILTER(TJ1,5);
TJ2:=IF(BARSLAST(立樁量)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(立樁量)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(立樁量)=3 AND CLOSE>REF(HIGH,3),1,0)));
突破:=TJ2=1;
STICKLINE(CLOSE,REF(HIGH,BARSLAST(立樁量)),REF(HIGH,BARSLAST(立樁量)),1,0),COLORYELLOW;
STICKLINE(CLOSE,REF(LOW,BARSLAST(立樁量)),REF(LOW,BARSLAST(立樁量)),1,0),COLORMAGENTA;
TJ3:=IF(BARSLAST(立樁量)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(立樁量)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(立樁量)=3 AND CLOSE>REF(LOW,3),1,0)));
三天法則:=TJ3=1;
成立:=三天法則 AND 突破;
條件成立:=FILTER(成立,3);
DRAWTEXT(條件成立,L*0.99,'成立'),COLORYELLOW;
VAR1F:=(HHV(HIGH,21)-CLOSE)/(HHV(HIGH,21)-LLV(LOW,21))*100-10;
HH:=HHV(HIGH,3);LL:=LLV(LOW,3);
CH1:=(HH > REF(HH,1)AND C>REF(C,1));
CH2:=(LL < REF(LL,1)AND C<REF(C,1));
K3:=BARSLAST(CH1);K4:=BARSLAST(CH2);
K5:=(K3<K4 OR CH1) AND NOT(CH2);
K6:=(K3>K4 OR CH2) AND NOT(CH1);
ZC:=IF(HH>REF(HH,1) AND C>REF(C,1),LL,REF(LL,BARSLAST(HH>REF(HH,1)AND C>REF(C,1))));
YL:=IF(LL<REF(LL,1) AND C<REF(C,1),HH,REF(HH,BARSLAST(LL<REF(LL,1) AND C<REF(C,1))));
SNX:IF(K5,ZC,YL);
VARA1:=(HIGH+LOW+CLOSE)/3;
VARA2:=(VARA1-MA(VARA1,14))/(0.015*AVEDEV(VARA1,14));
AA:=CROSS(VARA2,-100);
BB:=BARSLAST(AA)+2;
CC:=FINANCE(40)<4000000000;DRAWICON(AA AND CC,L*0.99,1);
DRAWTEXT(AA AND CC,REF(L,2),'');DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.kzuj.com.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;




主圖2：
N:=74;
M:=3;
PC:(C+REF(C,1)+O)/3;
高:=REF(HHV(H,N),M);
低:=REF(LLV(L,N),M);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;
STICKLINE(VAR1>VAR6,VAR1,VAR6,0.5,0),COLORYELLOW;
STICKLINE(C>=O,C,O,3,0),COLOR000045;
STICKLINE(C>=O,C,O,2,0),COLOR000085;
STICKLINE(C>=O,C,O,1,0),COLOR0000E5;
STICKLINE(C>=O,H,L,0,0),COLOR0000F5;
STICKLINE(C<O,C,O,3,0),COLOR353500;
STICKLINE(C<O,C,O,2,0),COLOR555500;
STICKLINE(C<O,C,O,1,0),COLOR858500;
STICKLINE(C<O,H,L,0,0),COLOR959500;
短線:VAR1,COLORYELLOW;
中線:VAR6,COLORYELLOW;
下跌:IF(VAR1=VAR6,VAR6,DRAWNULL),COLORBLUE;T1:=CONST(HHVBARS(V,20));
T0:IF(CURRBARSCOUNT<=10+7,CONST(IF(T1=0,C,REF(C,T1))),DRAWNULL);
IF(CURRBARSCOUNT=T1+1,T0,DRAWNULL),CIRCLEDOT;
DRAWTEXT(ISLASTBAR,T0,' 量能平臺');VARA1:=(HIGH+LOW+CLOSE)/3;
VARA2:=(VARA1-MA(VARA1,14))/(0.015*AVEDEV(VARA1,14));
AA:=CROSS(VARA2,-100);
BB:=BARSLAST(AA)+2;
CC:=FINANCE(40)<4000000000;DRAWICON(AA AND CC,L*0.99,1);
DRAWTEXT(AA AND CC,REF(L,2),'');VAR1F:=(HHV(HIGH,21)-CLOSE)/(HHV(HIGH,21)-LLV(LOW,21))*100-10;
HH:=HHV(HIGH,3);LL:=LLV(LOW,3);
CH1:=(HH > REF(HH,1)AND C>REF(C,1));
CH2:=(LL < REF(LL,1)AND C<REF(C,1));
K3:=BARSLAST(CH1);K4:=BARSLAST(CH2);
K5:=(K3<K4 OR CH1) AND NOT(CH2);
K6:=(K3>K4 OR CH2) AND NOT(CH1);
ZC:=IF(HH>REF(HH,1) AND C>REF(C,1),LL,REF(LL,BARSLAST(HH>REF(HH,1)AND C>REF(C,1))));
YL:=IF(LL<REF(LL,1) AND C<REF(C,1),HH,REF(HH,BARSLAST(LL<REF(LL,1) AND C<REF(C,1))));
SNX:IF(K5,ZC,YL);DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.kzuj.com.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

?

?

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

?