相關標簽:趨勢彩帶主圖指標源碼 、 boll主圖指標公式源碼 、 macd主圖指標源碼公式 、 主圖買賣指標公式源碼 、 大智慧ddx指標源碼 、 超宏主圖指標公式源碼 、 資金趨勢指標公式源碼 、 趨勢通道指標公式源碼 、 大智慧主圖箱體指標 、 大智慧主圖指標大全 、 趨勢買賣指標公式源碼 、 文華趨勢指標公式源碼 、 大智慧波段主圖指標 、 趨勢跟蹤源碼指標公式 、 趨勢線主圖指標公式 、

?

?

?

原理解析：
P1賦值:3 輸出短線多頭:收盤價的5日指數移動平均,COLORFF00FF XXX1賦值:(開盤價+收盤價+最低價+最高價)/4 輸出短線空頭:XXX1的10日指數移動平均 輸出MA20:收盤價的20日簡單移動平均,畫藍色 輸出MA30:收盤價的30日簡單移動平均,畫綠色 輸出MA60:收盤價的60日簡單移動平均 VAR2賦值:(最高價+最低價+收盤價*2)/4 VAR3賦值:VAR2的21日指數移動平均 VAR4賦值:VAR2的21日估算標準差 VAR5賦值:((VAR2-VAR3)/VAR4*100+200)/4 VAR6賦值:(VAR5的5日指數移動平均-25)*1.56 AK賦值:VAR6的2日指數移動平均*1.22 AD賦值:AK的2日指數移動平均 AJ賦值:3*AK-2*AD 當滿足條件AK上穿AD時,在最低價和最低價-0.09位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,畫紅色 VAR1111賦值:若2日前的最高價=5日內最高價的最高值則將最近3周期置為1 VAR2222賦值:VAR1111上穿0.9 輸出壓力: 上次VAR2222距今天數日前的最高價, POINTDOT,COLOREA91B5 當滿足條件收盤價時,在上次VAR2222距今天數日前的最高價和上次VAR2222距今天數日前的最高價位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOREA91B5 N賦值:13 A賦值:N日內最高價的最高值=最高價 AND 最高價>1日前的最高價 A1賦值:A的N-1日過濾 B賦值:N日內最低價的最低值=最低價 AND 最低價<1日前的最低價 B1賦值:B的N-1日過濾 TS1賦值:上次A1距今天數 箱頂賦值:TS1日前的最高價 當滿足條件1時,在箱頂和箱頂位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,畫紅色 TS11賦值:上次B1距今天數 箱底賦值:TS11日前的最低價 當滿足條件收盤價上穿箱頂時,在最高價*1.01位置畫4號圖標 當滿足條件箱底上穿收盤價時,在最低價*0.99位置畫5號圖標 WN賦值:P1 WA1賦值:WN日前的最高價=2*WN+1日內最高價的最高值 WB1賦值:WA1的WN日過濾 WC1賦值:若WB1則將最近WN+1周期置為1 WD1賦值:WC1的WN日過濾 WA2賦值:WN日前的最低價=2*WN+1日內最低價的最低值 WB2賦值:WA2的WN日過濾 WC2賦值:若WB2則將最近WN+1周期置為1 WD2賦值:WC2的WN日過濾 WE1賦值:(1日前的2*WN日內最低價的最低值+1日前的2*WN日內最高價的最高值)/2 WE2賦值:(最高價+最低價)/2 WH1賦值:(WD1 AND 取反) OR DISPSTATUS=2 OR 收盤價的有效數據周期數=1 WL1賦值:(WD2 AND 取反) WH2賦值:WD1 AND 取反 WX1賦值:1日前的上次WH1距今天數+1 WF1賦值:若WH1ANDCOUNT(WL1,WX1)>0則將最近WX1日內如果WL1,返回最低價,否則返回10000距今天數周期置為1 WG1賦值:WF1>1日前的WF1 WI1賦值:若WG1則將最近2周期置為1 WLD賦值:WI1>1日前的WI1 WL2賦值:WLD OR DISPSTATUS=2 OR 收盤價的有效數據周期數=1 WX2賦值:1日前的上次WL2距今天數+1 WF2賦值:若WL2ANDCOUNT(WH2,WX2)>0則將最近WX2日內如果WH2,返回最高價,否則返回0距今天數周期置為1 WG2賦值:WF2>1日前的WF2 WI2賦值:若WG2則將最近2周期置為1 WHD賦值:WI2>1日前的WI2 WR1賦值:若DISPSTATUS=2則將最近上次WHD距今天數+1周期置為1 WS1賦值:WR1>1日前的WR1 WT1賦值:若DISPSTATUS=2則將最近上次WLD距今天數+1周期置為1 WU1賦值:WT1>1日前的WT1 WR2賦值:若WS1則將最近1日前的上次WHD距今天數+2周期置為1 WS2賦值:WR2>1日前的WR2 WT2賦值:若WU1則將最近1日前的上次WLD距今天數+2周期置為1 WU2賦值:WT2>1日前的WT2 WT3賦值:若WU2則將最近1日前的上次WLD距今天數+2周期置為1 WU3賦值:WT3>1日前的WT3 WT4賦值:若WU3則將最近1日前的上次WLD距今天數+2周期置為1 WU4賦值:WT4>1日前的WT4 WR3賦值:若WS2則將最近1日前的上次WHD距今天數+2周期置為1 WS3賦值:WR3>1日前的WR3 WR4賦值:若WS3則將最近1日前的上次WHD距今天數+2周期置為1 WS4賦值:WR4>1日前的WR4 當滿足條件WS2時,在最高價位置畫直線起點，當滿足條件WS1時,在最高價位置畫直線終點,1表示是否延長.,COLOR008888 當滿足條件WU2時,在最低價位置畫直線起點，當滿足條件WU1時,在最低價位置畫直線終點,1表示是否延長.,POINTDOT,COLOR008888 當滿足條件WS3時,在最高價位置畫直線起點，當滿足條件WS2時,在最高價位置畫直線終點,1表示是否延長.,COLOR888000 當滿足條件WU3時,在最低價位置畫直線起點，當滿足條件WU2時,在最低價位置畫直線終點,1表示是否延長.,POINTDOT,COLOR888000 當滿足條件WS4時,在最高價位置畫直線起點，當滿足條件WS3時,在最高價位置畫直線終點,1表示是否延長.,COLOR0000CC 當滿足條件WU4時,在最低價位置畫直線起點，當滿足條件WU3時,在最低價位置畫直線終點,1表示是否延長.,POINTDOT,COLOR0000CC LTA賦值:FINANCE2(37) SY賦值:FINANCE2(3) WF賦值:FINANCE2(10) 輸出輸出輸出CW賦值: '流通A:'+LTA+' 收益:'+SY+' 凈利潤增長:'+WF DRAWTEXTREL(20,900,BKNAME),COLOR0055FF DRAWTEXTREL(20,960,CW),COLOR0055FF VAR52賦值:如果月份<12,返回1,否則返回1 VAR53賦值:(2*收盤價+最高價+最低價)/4 VAR54賦值:34日內最低價的最低值 VAR55賦值:34日內最高價的最高值 主力賦值:(VAR53-VAR54)/(VAR55-VAR54)*100的13日指數移動平均*VAR52 散戶賦值:0.667*1日前的主力+0.333*主力的2日指數移動平均 小心被套賦值:如果主力上穿75AND散戶<主力,返回75,否則返回62 沖頂賦值:如果主力上穿65AND散戶<主力,返回61,否則返回49 當滿足條件主力上穿65AND散戶<主力時,在(最高價*1.01)位置書寫文字,線寬為2,COLOR9933FF 當滿足條件主力上穿75AND散戶<主力時,在(最高價*1.01)位置書寫文字,線寬為2,COLOR009900 LC賦值:1日前的收盤價 JH賦值:收盤價-LC和0的較大值的6日[1日權重]移動平均/收盤價-LC的絕對值的6日[1日權重]移動平均*100 當滿足條件84上穿JH時,在最高價*1.02位置書寫文字,COLORFFFF34 CXH賦值:STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1)) 輸出WARNING('HTTP://www.kzuj.com.cn',CURRENTTIME>180000 AND (CXH=1 OR CXH=6)) DRAWTEXTREL(10 ,10 ,'指標公式')

?

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

源碼：

?

P1:=3;短線多頭:EMA(CLOSE,5),COLORFF00FF;xxx1:=(O+C+L+H)/4;短線空頭:EMA(xxx1,10);ma20:ma(close,20),COLORblue;ma30:ma(close,30),COLORgreen;ma60:ma(close,60);VAR2:=(HIGH+LOW+CLOSE*2)/4;VAR3:=EMA(VAR2,21);VAR4:=STD(VAR2,21);VAR5:=((VAR2-VAR3)/VAR4*100+200)/4;VAR6:=(EMA(VAR5,5)-25)*1.56;AK:=EMA(VAR6,2)*1.22;AD:=EMA(AK,2);AJ:=3*AK-2*AD;STICKLINE(CROSS(AK,AD),LOW,LOW-0.09,8,0),COLORRED;{短線買};VAR1111:=BACKSET(REF(HIGH,2)=HHV(HIGH,5),3);VAR2222:=CROSS(VAR1111,0.9);壓力: REF(HIGH,BARSLAST(Var2222)), POINTDOT,ColorEA91B5;STICKLINE(CLOSE,REF(HIGH,BARSLAST(Var2222)),REF(HIGH,BARSLAST(Var2222)),5,0),ColorEA91B5;N:=13;A:=HHV(HIGH,N)=HIGH AND HIGH>REF(HIGH,1);A1:=FILTER(A,N-1);B:=LLV(LOW,N)=LOW AND LOW<REF(LOW,1);B1:=FILTER(B,N-1);TS1:=BARSLAST(A1);箱頂:=REF(HIGH,TS1);STICKLINE(1,箱頂,箱頂,7,0),COLORred;TS11:=BARSLAST(B1);箱底:=REF(LOW,TS11);DRAWICON(CROSS(CLOSE,箱頂),HIGH*1.01,4);DRAWICON(CROSS(箱底,CLOSE),LOW*0.99,5);wN:=p1;{原碼 N:=3;}wA1:=REF(H,wN)=HHV(H,2*wN+1); wB1:=FILTER(wA1,wN); wC1:=BACKSET(wB1,wN+1); wD1:=FILTER(wC1,wN);{高點}wA2:=REF(L,wN)=LLV(L,2*wN+1); wB2:=FILTER(wA2,wN); wC2:=BACKSET(wB2,wN+1); wD2:=FILTER(wC2,wN);{低點}wE1:=(REF(LLV(L,2*wN),1)+REF(HHV(H,2*wN),1))/2; wE2:=(H+L)/2;{高低點出現在同一K線上時可作取舍}wH1:=(wD1 AND NOT(wD2 AND wE1>=wE2)) OR DISPSTATUS=2 OR BARSCOUNT(C)=1;wL1:=(wD2 AND NOT(wD1 AND wE1<wE2)); wH2:=wD1 AND NOT(wD2 AND wE1>=wE2);wX1:=REF(BARSLAST(wH1),1)+1; wF1:=BACKSET(wH1 AND COUNT(wL1,wX1)>0,LLVBARS(IF(wL1,L,10000),wX1));wG1:=wF1>REF(wF1,1); wI1:=BACKSET(wG1,2); wLD:=wI1>REF(wI1,1);{過濾后低點}wL2:=wLD OR DISPSTATUS=2 OR BARSCOUNT(C)=1;wX2:=REF(BARSLAST(wL2),1)+1; wF2:=BACKSET(wL2 AND COUNT(wH2,wX2)>0,HHVBARS(IF(wH2,H,0),wX2));wG2:=wF2>REF(wF2,1); wI2:=BACKSET(wG2,2); wHD:=wI2>REF(wI2,1);{過濾后高點}wR1:=BACKSET(DISPSTATUS=2,BARSLAST(wHD)+1); wS1:=wR1>REF(wR1,1); {前一高}wT1:=BACKSET(DISPSTATUS=2,BARSLAST(wLD)+1); wU1:=wT1>REF(wT1,1); {前一低}wR2:=BACKSET(wS1,REF(BARSLAST(wHD),1)+2); wS2:=wR2>REF(wR2,1); {前二高}wT2:=BACKSET(wU1,REF(BARSLAST(wLD),1)+2); wU2:=wT2>REF(wT2,1); {前二低}wT3:=BACKSET(wU2,REF(BARSLAST(wLD),1)+2); wU3:=wT3>REF(wT3,1); {前三低}wT4:=BACKSET(wU3,REF(BARSLAST(wLD),1)+2); wU4:=wT4>REF(wT4,1); {前四低}wR3:=BACKSET(wS2,REF(BARSLAST(wHD),1)+2); wS3:=wR3>REF(wR3,1); {前三高}wR4:=BACKSET(wS3,REF(BARSLAST(wHD),1)+2); wS4:=wR4>REF(wR4,1); {前四高}DRAWLINE(wS2,H,wS1,H,1),Color008888; {壓力１:}DRAWLINE(wU2,L,wU1,L,1),POINTDOT,Color008888;{支撐１:}DRAWLINE(wS3,H,wS2,H,1),Color888000; {壓力２:}DRAWLINE(wU3,L,wU2,L,1),POINTDOT,Color888000;{支撐２:}DRAWLINE(wS4,H,wS3,H,1),Color0000CC;{壓力３:}DRAWLINE(wU4,L,wU3,L,1),POINTDOT,Color0000CC;{支撐３:};lta:=FINANCE2(37);{流通A}sy:=FINANCE2(3);{收益}wf:=FINANCE2(10);{凈利潤增長}cw:= '流通A:'+lta+' 收益:'+sy+' 凈利潤增長:'+wf ;DRAWTEXTREL(20,900,BKNAME),COLOR0055FF;DRAWTEXTREL(20,960,cw),COLOR0055FF;Var52:=IF(MONTH<12,1,1);Var53:=(2*CLOSE+HIGH+LOW)/4;Var54:=LLV(LOW,34);Var55:=HHV(HIGH,34);主力:=EMA((Var53-Var54)/(Var55-Var54)*100,13)*Var52;散戶:=EMA(0.667*REF(主力,1)+0.333*主力,2);小心被套:=if(CROSS(主力,75) AND 散戶<主力,75,62);沖頂:=if(CROSS(主力,65) AND 散戶<主力,61,49);DRAWTEXT(CROSS(主力,65) AND 散戶<主力,(high*1.01),'○沖頂 '),LINETHICK2,COLOR9933ff;DRAWTEXT(CROSS(主力,75) AND 散戶<主力,(high*1.01),'●小心被套'),LINETHICK2,color009900;LC:=REF(CLOSE,1);JH:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;DRAWTEXT(CROSS(84,JH),HIGH*1.02,'☆小心'),colorFFFF34;CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.kzuj.com.cn',CURRENTTIME>180000 and (CXH=1 OR CXH=6));
DRAWTEXTREL(10 ,10 ,'指標公式');

?

?

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

?