相關標簽:同花順主圖指標源碼 、 同花順主圖公式源碼 、 好的炒股指標公式源碼 、 多空趨勢副圖指標源碼 、 同花順使用的副圖指標 、 同花順短線副圖指標 、 同花順主圖指標公式 、 同花順分時指標源碼 、 同花順ddx指標源碼 、 同花順畫線指標源碼 、 同花順籌指標源碼 、 同花順波段指標源碼 、 同花順cyc指標源碼 、 同花順cci指標源碼 、 同花順逃頂指標源碼 、

?

準確好用，上漲下跌趨勢一目了然。

?

原理解析：
輸出長線主力倉位:100*(1-以收盤價計算的獲利盤比例),畫黃色,線寬為1 VAR2賦值:1/以收盤價計算的獲利盤比例 VAR3賦值:收盤價的13日簡單移動平均 VAR4賦值:100-(收盤價-VAR3)/VAR3*100的絕對值 VAR5賦值:120日內最低價的最低值 VAR6賦值:120日內最高價的最高值 VAR7賦值:(VAR6-VAR5)/100 VAR8賦值:(收盤價-VAR5)/VAR7的20日[1日權重]移動平均 VAR9賦值:(開盤價-VAR5)/VAR7的20日[1日權重]移動平均 VARA賦值:3*VAR8-2*VAR8的10日[1日權重]移動平均 VARB賦值:3*VAR9-2*VAR9的10日[1日權重]移動平均 VARC賦值:100-VARB 輸出短線主力倉位: (100-VARA),畫紅色,線寬為3 N賦值:30 M賦值:60 RSV賦值:(收盤價-N日內最低價的最低值)/(N日內最高價的最高值-N日內最低價的最低值)*100 K賦值:RSV的5日[1日權重]移動平均 D賦值:K的3日[1日權重]移動平均 J賦值:3*K-2*D 輸出散戶倉位:J的6日指數移動平均,畫白色,線寬為2 VAR2賦值:1日前的最低價 VAR3賦值:最低價-VAR2的絕對值的3日[1日權重]移動平均/最低價-VAR2和0的較大值的3日[1日權重]移動平均*100 VAR4賦值:如果收盤價*1.3,返回VAR3*10,否則返回VAR3/10的3日指數移動平均 VAR5賦值:30日內最低價的最低值 VAR6賦值:30日內VAR4的最高值 VAR7賦值:如果收盤價的58日簡單移動平均,返回1,否則返回0 VAR8賦值:如果最低價<=VAR5,返回(VAR4+VAR6*2)/2,否則返回0的3日指數移動平均/618*VAR7 VAR9賦值:如果VAR8>100,返回100,否則返回VAR8 AA3賦值:(21日內最高價的最高值-收盤價)/(21日內最高價的最高值-21日內最低價的最低值)*100-10 AA4賦值:(收盤價-21日內最低價的最低值)/(21日內最高價的最高值-21日內最低價的最低值)*100 AA5賦值:AA4的13日[8日權重]移動平均 輸出趨勢線:100*(收盤價-30日內最低價的最低值)/(30日內收盤價的最高值-30日內最低價的最低值),畫淡洋紅色,線寬為3 輸出爆發線: 80 輸出強弱分界線:50 VAR8賦值:成交量(手)>2*成交量(手)的30日簡單移動平均 VARB賦值:收盤價>收盤價的30日簡單移動平均 AND 收盤價<收盤價的30日簡單移動平均*1.04 VARC賦值:收盤價的30日簡單移動平均>1日前的收盤價的30日簡單移動平均 VARD賦值:上次收盤價的5日簡單移動平均上穿收盤價的10日簡單移動平均距今天數<上次收盤價的10日簡單移動平均上穿收盤價的5日簡單移動平均距今天數 VARE賦值:0-"平滑異同平均的DIFF"(7,21,3) VARF賦值:收盤價15%之字轉向的前1個波谷位置<4 VAR10賦值:收盤價的30日指數移動平均>2日前的收盤價的30日指數移動平均 VAR11賦值:如果VARF=1,返回50,否則返回0 0,畫紅色 當滿足條件VARF=1的5日過濾AND多空<-10時,在50和0位置之間畫柱狀線,寬度為15,0不為0則畫空心柱.,畫白色 當滿足條件VARF=1的5日過濾時,在40和0位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,畫紅色 當滿足條件VARF=1的3日過濾時,在45位置書寫文字,畫紅色 V6賦值:收盤價/3日前的收盤價>=1.1 V7賦值:若V6則將最近3周期置為1 輸出買:如果(V7ANDCOUNT(V7,3)=1),返回50,否則返回0,畫洋紅色,線寬為1 當滿足條件買時,在50位置書寫文字,畫洋紅色 V10賦值:收盤價15%之字轉向的前1個波峰位置<10 V12賦值:如果V10=1,返回50,否則返回0 頭部賦值: 如果V12=50,返回100,否則返回0 輸出賣:如果頭部>1日前的頭部,返回40,否則返回0,畫綠色,線寬為3 當滿足條件賣時,在45位置書寫文字,畫綠色 V9賦值:收盤價15%之字轉向的前1個波谷位置<10 V11賦值:如果V9=1,返回50,否則返回0 底部賦值: 如果V11=50,返回50,否則返回0 輸出買:如果底部>1日前的底部,返回-20,否則返回0,畫紅色,線寬為5 當滿足條件買時,在-30位置書寫文字,畫紅色 V7賦值:收盤價15%之字轉向的前1個波谷位置<10 V9賦值:如果V7=1,返回50,否則返回0 VARE賦值:1日前的最低價*0.9 VARF賦值:最低價*0.9 VAR10賦值:(VARF*成交量(手)+VARE*(當前流通股本(手)-成交量(手)))/當前流通股本(手) VAR11賦值:VAR10的30日指數移動平均 VAR12賦值:收盤價-1日前的收盤價 VAR13賦值:VAR12和0的較大值 VAR14賦值:VAR12的絕對值 VAR15賦值:VAR13的7日[1日權重]移動平均/VAR14的7日[1日權重]移動平均*100 VAR16賦值:VAR13的13日[1日權重]移動平均/VAR14的13日[1日權重]移動平均*100 VAR17賦值:收盤價的有效數據周期數 VAR18賦值:VAR12和0的較大值的6日[1日權重]移動平均/VAR12的絕對值的6日[1日權重]移動平均*100 VAR19賦值:(-200)*(60日內最高價的最高值-收盤價)/(60日內最高價的最高值-60日內最低價的最低值)+100 VAR1A賦值:(收盤價-15日內最低價的最低值)/(15日內最高價的最高值-15日內最低價的最低值)*100 VAR1B賦值:(VAR1A的4日[1日權重]移動平均-50)*2的3日[1日權重]移動平均 VAR1C賦值:(大盤的收盤價-14日內大盤的最低價的最低值)/(14日內大盤的最高價的最高值-14日內大盤的最低價的最低值)*100 VAR1D賦值:VAR1C的4日[1日權重]移動平均 VAR1E賦值:VAR1D的3日[1日權重]移動平均 VAR1F賦值:(30日內最高價的最高值-收盤價)/收盤價*100 VAR20賦值:VAR18<=25 AND VAR19<-95 AND VAR1F>20 AND VAR1B<-30 AND VAR1E<30 AND VAR11-收盤價>=-0.25 AND VAR15<22 AND VAR16<28 AND VAR17>50 VAR21賦值:(最高價+最低價+收盤價)/3 VAR22賦值:(VAR21-VAR21的14日簡單移動平均)/(0.015*VAR21的14日平均絕對偏差) VAR23賦值:(VAR21-VAR21的70日簡單移動平均)/(0.015*VAR21的70日平均絕對偏差) VAR24賦值:如果VAR22>=150ANDVAR22<200ANDVAR23>=150ANDVAR23<200,返回10,否則返回0 VAR25賦值:如果VAR22<=-150ANDVAR22>-200ANDVAR23<=-150ANDVAR23>-200,返回-10,否則返回VAR24 當滿足條件VAR20時,在0和80位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,線寬為4,畫紅色 當滿足條件VAR20上穿0.5ANDCOUNT(VAR20=1,10)=1時,在90位置書寫文字,線寬為6 , 畫紅色 VAR2賦值:1日前的最低價 VAR3賦值:最低價-VAR2的絕對值的3日[1日權重]移動平均/最低價-VAR2和0的較大值的3日[1日權重]移動平均*100 VAR4賦值:如果收盤價*1.3,返回VAR3*10,否則返回VAR3/10的3日指數移動平均 VAR5賦值:30日內最低價的最低值 VAR6賦值:30日內VAR4的最高值 VAR7賦值:如果收盤價的58日簡單移動平均,返回1,否則返回0 VAR8賦值:如果最低價<=VAR5,返回(VAR4+VAR6*2)/2,否則返回0的3日指數移動平均/618*VAR7 VAR9賦值:如果VAR8>100,返回100,否則返回VAR8 當滿足條件VAR9>-150時,在0和VAR9位置之間畫柱狀線,寬度為3,0不為0則畫空心柱., COLORFF00FF B賦值:收盤價50/5%的之字轉向*1 G賦值:B的2日簡單移動平均 D賦值:B上穿G*10 W賦值:G上穿B*10 當滿足條件W=10時,在-5位置書寫文字,畫綠色,線寬為3 當滿足條件D=10時,在-5位置書寫文字,畫紅色,線寬為3 輸出安全區:20,COLORFFFF00 AA賦值:(開盤價+最高價+最低價+收盤價)/4 BB賦值:AA的3日簡單移動平均 CC賦值:如果AA>1日前的AA,返回AA*成交量(手),否則返回0的4日累和/如果AA<1日前的AA,返回AA*成交量(手),否則返回0的4日累和 DD賦值:1日前的100-(100/(1+CC)) A1賦值:10日內AA的最高值 A2賦值:30日內AA的最低值 A3賦值:A1-A2 A4賦值:(AA-A2)/A3的1日指數移動平均*100 B1賦值:16日內AA的最高值 B2賦值:90日內AA的最低值 B3賦值:B1-B2 B4賦值:(AA-B2)/B3的1日指數移動平均*100 C1賦值:30日內AA的最高值 C2賦值:240日內AA的最低值 C3賦值:C1-C2 C4賦值:(AA-C2)/C3的1日指數移動平均*100 輸出短期:A4,畫黑色 輸出中期:B4,畫黑色 輸出長期:C4,畫黑色 當滿足條件短期>90AND中期>70時,在86和94位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,畫黃色 當滿足條件短期<5AND中期<30時,在0和8位置之間畫柱狀線,寬度為6,0不為0則畫空心柱. VAR1賦值:(2*收盤價+最高價+最低價+開盤價)/5 VAR2賦值:34日內最低價的最低值 VAR3賦值:34日內最高價的最高值 輸出SK: (VAR1-VAR2)/(VAR3-VAR2)*100的13日指數移動平均,畫黃色 輸出SD: SK的3日指數移動平均,畫綠色 TIPTEXT(ISNULL(1日后的&收盤價),0,' www.kzuj.com.cn '),畫紅色 TIPTEXT(ISNULL(1日前的收盤價),0,'同花順程序化交易')

?

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

源碼：

?

?

長線主力倉位:100*(1-WINNER(CLOSE)),coloryellow,LINETHICK1;
VAR2:=1/WINNER(CLOSE);
VAR3:=MA(CLOSE,13);
VAR4:=100-ABS((CLOSE-VAR3)/VAR3*100);
VAR5:=LLV(LOW,120);
VAR6:=HHV(HIGH,120);
VAR7:=(VAR6-VAR5)/100;
VAR8:=SMA((CLOSE-VAR5)/VAR7,20,1);
VAR9:=SMA((OPEN-VAR5)/VAR7,20,1);
VARA:=3*VAR8-2*SMA(VAR8,10,1);
VARB:=3*VAR9-2*SMA(VAR9,10,1);
VARC:=100-VARB;
短線主力倉位: (100-VARA),colorred,LINETHICK3;
N:=30;M:=60;
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
K:=SMA(RSV,5,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
散戶倉位:EMA(J,6),colorwhite,LINETHICK2;
VAR2:=REF(LOW,1);
VAR3:=SMA(ABS(LOW-VAR2),3,1)/SMA(MAX(LOW-VAR2,0),3,1)*100;
VAR4:=EMA(IF(CLOSE*1.3,VAR3*10,VAR3/10),3);
VAR5:=LLV(LOW,30);
VAR6:=HHV(VAR4,30);
VAR7:=IF(MA(CLOSE,58),1,0);
VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7;
VAR9:=IF(VAR8>100,100,VAR8);
AA3:=(HHV(HIGH,21)-CLOSE)/(HHV(HIGH,21)-LLV(LOW,21))*100-10;
AA4:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
AA5:=SMA(AA4,13,8);
趨勢線:100*(C-LLV(L,30))/(HHV(C,30)-LLV(L,30)),colorlimagenta,LINETHICK3;
爆發線: 80;
強弱分界線:50;
VAR8:=VOL>2*MA(VOL,30);
VARB:=CLOSE>MA(CLOSE,30) AND CLOSE<MA(CLOSE,30)*1.04;
VARC:=MA(CLOSE,30)>REF(MA(CLOSE,30),1);
VARD:=BARSLAST(CROSS(MA(CLOSE,5),MA(CLOSE,10)))<BARSLAST(CROSS(MA(CLOSE,10),MA(CLOSE,5)));
VARE:=0-"MACD.DIFF"(7,21,3);
VARF:=TROUGHBARS(3,15,1)<4;
VAR10:=EMA(CLOSE,30)>REF(EMA(CLOSE,30),2);
VAR11:=IF(VARF=1,50,0);
0,colorred;
STICKLINE(FILTER(VARF=1,5) AND 多空<-10,50,0,15,0),colorwhite;
STICKLINE(FILTER(VARF=1,5),40,0,8,0),colorred;
DRAWTEXT(FILTER(VARF=1,3),45,'大黑馬'),colorred ;
V6:=CLOSE/REF(CLOSE,3)>=1.1;
V7:=BACKSET(V6,3);
買:IF((V7 AND COUNT(V7,3)=1),50,0),colormagenta,LINETHICK1;
DRAWTEXT(買,50,'買 '),colormagenta;
V10:=PEAKBARS(3,15,1)<10; V12:=IF(V10=1,50,0);
頭部:= IF(V12=50,100,0);
賣:IF(頭部>REF(頭部,1),40,0),colorgreen,LINETHICK3;
DRAWTEXT(賣,45,'高頂出貨 '),colorgreen;
V9:=TROUGHBARS(3,15,1)<10; V11:=IF(V9=1,50,0);
底部:= IF(V11=50,50,0);
買:IF( 底部>REF(底部,1),-20,0),colorred,LINETHICK5;
DRAWTEXT(買,-30,'主力抄底 '),colorred;
V7:=TROUGHBARS(3,15,1)<10; V9:=IF(V7=1,50,0);
VARE:=REF(LOW,1)*0.9;
VARF:=LOW*0.9;
VAR10:=(VARF*VOL+VARE*(CAPITAL-VOL))/CAPITAL;
VAR11:=EMA(VAR10,30);
VAR12:=CLOSE-REF(CLOSE,1);
VAR13:=MAX(VAR12,0);
VAR14:=ABS(VAR12);
VAR15:=SMA(VAR13,7,1)/SMA(VAR14,7,1)*100;
VAR16:=SMA(VAR13,13,1)/SMA(VAR14,13,1)*100;
VAR17:=BARSCOUNT(CLOSE);
VAR18:=SMA(MAX(VAR12,0),6,1)/SMA(ABS(VAR12),6,1)*100;
VAR19:=(-200)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+100;
VAR1A:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
VAR1B:=SMA((SMA(VAR1A,4,1)-50)*2,3,1);
VAR1C:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100;
VAR1D:=SMA(VAR1C,4,1);
VAR1E:=SMA(VAR1D,3,1);
VAR1F:=(HHV(HIGH,30)-CLOSE)/CLOSE*100;
VAR20:=VAR18<=25 AND VAR19<-95 AND VAR1F>20 AND VAR1B<-30 AND VAR1E<30 AND VAR11-CLOSE>=-0.25 AND VAR15<22 AND VAR16<28 AND VAR17>50;
VAR21:=(HIGH+LOW+CLOSE)/3;
VAR22:=(VAR21-MA(VAR21,14))/(0.015*AVEDEV(VAR21,14));
VAR23:=(VAR21-MA(VAR21,70))/(0.015*AVEDEV(VAR21,70));
VAR24:=IF(VAR22>=150 AND VAR22<200 AND VAR23>=150 AND VAR23<200,10,0);
VAR25:=IF(VAR22<=-150 AND VAR22>-200 AND VAR23<=-150 AND VAR23>-200,-10,VAR24);
STICKLINE(VAR20,0,80,5,0),LINETHICK4,colorred;
DRAWTEXT(CROSS(VAR20,0.5) AND COUNT(VAR20=1,10)=1,90,'主力建倉!'),LINETHICK6 , colorred;
Var2:=REF(LOW,1);Var3:=SMA(ABS(LOW-Var2),3,1)/SMA(MAX(LOW-Var2,0),3,1)*100;
Var4:=EMA(IF(CLOSE*1.3,Var3*10,Var3/10),3);
Var5:=LLV(LOW,30);
Var6:=HHV(Var4,30);
Var7:=IF(MA(CLOSE,58),1,0);
Var8:=EMA(IF(LOW<=Var5,(Var4+Var6*2)/2,0),3)/618*Var7;
Var9:=IF(Var8>100,100,Var8);
STICKLINE(Var9>-150,0,Var9,3,0), colorff00ff;
B:=ZIG(3,50/5)*1;
G:=MA(B,2);
D:=CROSS(B,G)*10;
W:=CROSS(G,B)*10;
DRAWTEXT(W=10,-5,'↓跌勢確立' ),colorgreen,LINETHICK3;
DRAWTEXT(D=10,-5,'↑漲勢確立'),colorred,LINETHICK3;
安全區:20,ColorFFFF00;
AA:=(O+H+L+C)/4;
BB:=MA(AA,3);
CC:=SUM(IF(AA>REF(AA,1),AA*VOL,0),4)/SUM(IF(AA<REF(AA,1),AA*VOL,0),4);
DD:=REF(100-(100/(1+CC)),1);
a1:=HHV(AA,10);
a2:=LLV(AA,30);
a3:=a1-a2;
a4:=EMA((AA-a2)/a3,1)*100;
b1:=HHV(AA,16);
b2:=LLV(AA,90);
b3:=b1-b2;
b4:=EMA((AA-b2)/b3,1)*100;
C1:=HHV(AA,30);
C2:=LLV(AA,240);
C3:=C1-C2;
C4:=EMA((AA-C2)/C3,1)*100;
短期:a4,colorblack;
中期:b4,colorblack;
長期:C4,colorblack;
STICKLINE(短期>90 AND 中期>70,86,94,6,0),coloryellow;
STICKLINE(短期<5 AND 中期<30,0,8,6,0);
Var1:=(2*CLOSE+HIGH+LOW+OPEN)/5;
Var2:=LLV(LOW,34);
Var3:=HHV(HIGH,34);
SK: EMA((Var1-Var2)/(Var3-Var2)*100,13),coloryellow;
SD: EMA(SK,3),colorgreen;TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' www.kzuj.com.cn '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花順程序化交易');

?

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

?