相關標簽:同花順使用的副圖指標 、 同花順短線副圖指標 、 同花順主圖指標公式 、 同花順分時指標源碼 、 同花順ddx指標源碼 、 同花順畫線指標源碼 、 同花順籌指標源碼 、 同花順波段指標源碼 、 同花順cyc指標源碼 、 同花順cci指標源碼 、 同花順逃頂指標源碼 、 同花順pvi指標源碼 、 同花順成交量指標源碼 、

?

使用說明：使用時請疊加在主圖K線上。出現黃色柱狀線為多頭市場，后勢上漲概率較大；出現藍色柱狀線為空頭市場，后勢下跌風險較大。上升趨勢對于持股階段，下跌階段對應持幣階段。

?

?

原理解析：
N賦值:20 M賦值:32 P1賦值:80 P2賦值:100 VAR1賦值:(收盤價+最高價+開盤價+最低價)/4 MA1賦值:VAR1的3日簡單移動平均 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日簡單移動平均 當滿足條件買時,在開盤價和收盤價位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,畫黃色 JJ賦值:(收盤價+最高價+最低價)/3 A賦值:JJ的10日指數移動平均 B賦值:1日前的A 當滿足條件A>B時,在A和B位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,畫黃色 當滿足條件A<B時,在A和B位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,畫綠色 B賦值:收盤價的21日線性回歸預測值 VAR10賦值:(3*收盤價+最低價+開盤價+最高價)/6 輸出天:(20*VAR10+19*1日前的VAR10+18*2日前的VAR10+17*3日前的VAR10+16*4日前的VAR10+15*5日前的VAR10+14*6日前的VAR10+13*7日前的VAR10+12*8日前的VAR10+11*9日前的VAR10+10*10日前的VAR10+9*11日前的VAR10+8*12日前的VAR10+7*13日前的VAR10+6*14日前的VAR10+5*15日前的VAR10+4*16日前的VAR10+3*17日前的VAR10+2*18日前的VAR10+20日前的VAR10)/210,畫白色 輸出地:天的13日簡單移動平均,畫白色 輸出合:天的7日指數移動平均,畫白色 X賦值:((收盤價的21日線性回歸斜率*20)+收盤價)的68日指數移動平均 Y賦值:收盤價的10日指數移動平均 LL賦值:2日前的收盤價 MM賦值:(((收盤價-LL)和0的較大值的6日[1日權重]移動平均 / (收盤價-LL)的絕對值的6日[1日權重]移動平均) * 100) DB賦值:如果((MM<1日前的MM)AND(MM>79)),返回MM,否則返回0 當滿足條件Y上穿X時,在(最低價*0.985)位置書寫文字,畫紅色 當滿足條件X上穿Y時,在(最高價*1.015)位置書寫文字,COLORFF6699 VAR1賦值:21日內最低價的最低值 VAR2賦值:21日內最高價的最高值 AK1賦值:(((收盤價-VAR1)/(VAR2-VAR1))*100)的5日指數移動平均 AK賦值:(((收盤價-VAR1)/(VAR2-VAR1))*50)的13日指數移動平均 DD賦值:((0.667*1日前的AK1)+(0.333*AK1))的2日指數移動平均 VAR3賦值:55日內最低價的最低值 VAR4賦值:34日內最高價的最高值 VAR5賦值:(((收盤價-VAR3)/(VAR4-VAR3))*100)的3日指數移動平均 VAR6賦值:((AK + VAR5) / 2) VAR7賦值:((0.667*1日前的VAR5)+(0.333*AK1))的2日指數移動平均 VAR8賦值:VAR6的5日指數移動平均 BB賦值:((0.667*1日前的VAR8)+(0.333*VAR8))的2日指數移動平均 AB賦值:AK1上穿AK BB1賦值:(AK1上穿BB AND (BB < 30)) CD賦值:(BB1 * 0.6) 當滿足條件(CD=0.6)時,在(最低價*0.99)位置書寫文字,線寬為5,COLORFFFFFF 當滿足條件(AB=1)時,在(最低價*0.99)位置書寫文字,線寬為5,COLOR33CC99 買線賦值:收盤價的2日指數移動平均 賣線賦值:收盤價的21日線性回歸斜率*20+收盤價的42日指數移動平均 BU賦值:買線上穿賣線 SEL賦值:賣線上穿買線 當滿足條件BU時,在最低價位置書寫文字,ALIGN1,VALIGN0,COLOR208FFF TIPTEXT(ISNULL(1日后的&收盤價),0,' www.kzuj.com.cn '),畫紅色 TIPTEXT(ISNULL(1日前的收盤價),0,'同花順程序化交易')

?

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

源碼：

?

N:=20;M:=32;P1:=80;P2:=100;
VAR1:=(C+H+O+L)/4;
MA1:=MA(VAR1,3);
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));
STICKLINE(買,OPEN,CLOSE,2,0),coloryellow;
JJ:=(CLOSE+HIGH+LOW)/3;
A:=EMA(JJ,10);
B:=REF(A,1);
STICKLINE(A>B,A,B,2,0),coloryellow;
STICKLINE(A<B,A,B,2,0),colorgreen;
B:=FORCAST(C,21);
Var10:=(3*CLOSE+LOW+OPEN+HIGH)/6;
天:(20*Var10+19*REF(Var10,1)+18*REF(Var10,2)+17*REF(Var10,3)+16*REF(Var10,4)+15*REF(Var10,5)+14*REF(Var10,6)+13*REF(Var10,7)+12*REF(Var10,8)+11*REF(Var10,9)+10*REF(Var10,10)+9*REF(Var10,11)+8*REF(Var10,12)+7*REF(Var10,13)+6*REF(Var10,14)+5*REF(Var10,15)+4*REF(Var10,16)+3*REF(Var10,17)+2*REF(Var10,18)+REF(Var10,20))/210,colorwhite;
地:MA(天,13),colorwhite;
合:EMA(天,7),colorwhite;
X:=EMA(((SLOPE(CLOSE,21) * 20) + CLOSE),68);
Y:=EMA(CLOSE,10);
LL:=REF(CLOSE,2);
MM:=((SMA(MAX((CLOSE - LL),0),6,1) / SMA(ABS((CLOSE - LL)),6,1)) * 100);
DB:=IF(((MM < REF(MM,1)) AND (MM > 79)),MM,0);
DRAWTEXT(CROSS(Y,X),(LOW * 0.985),'▲'),colorred;
DRAWTEXT(CROSS(X,Y),(HIGH * 1.015),''),colorFF6699;
VAR1:=LLV(LOW,21);
VAR2:=HHV(HIGH,21);
AK1:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 100),5);
AK:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 50),13);
DD:=EMA(((0.667 * REF(AK1,1)) + (0.333 * AK1)),2);
VAR3:=LLV(LOW,55);
VAR4:=HHV(HIGH,34);
VAR5:=EMA((((CLOSE - VAR3) / (VAR4 - VAR3)) * 100),3);
VAR6:=((AK + VAR5) / 2);
VAR7:=EMA(((0.667 * REF(VAR5,1)) + (0.333 * AK1)),2);
VAR8:=EMA(VAR6,5);
BB:=EMA(((0.667 * REF(VAR8,1)) + (0.333 * VAR8)),2);
AB:=CROSS(AK1,AK);
BB1:=(CROSS(AK1,BB) AND (BB < 30));
CD:=(BB1 * 0.6);
DRAWTEXT((CD = 0.6),(LOW * 0.99),''),LINETHICK5,colorFFFFFF;
DRAWTEXT((AB = 1),(LOW * 0.99),''),LINETHICK5,color33CC99;
買線:=EMA(C,2);
賣線:=EMA(SLOPE(C,21)*20+C,42);
BU:=CROSS(買線,賣線);
SEL:=CROSS(賣線,買線);
DRAWTEXT(bu,LOW,''),ALIGN1,VALIGN0,Color208FFF;
TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' www.kzuj.com.cn '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花順程序化交易');

?

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

?