相關標簽:

?

同花順黃金底副圖指標源碼

?

原理解析：
填充背景 VAR10A賦值:收盤價/收盤價的20日簡單移動平均*100<80 VAR20A賦值:收盤價/收盤價的40日簡單移動平均*100<78 VAR30A賦值:收盤價/收盤價的60日簡單移動平均*100<72 VAR40A賦值:最高價>最低價*1.051 VAR50A賦值:VAR40A AND 統(tǒng)計5日中滿足VAR40A的天數(shù)>1 絕地鷹王賦值:VAR50A AND (VAR10A OR VAR20A OR VAR30A) LC賦值:1日前的收盤價 RSI賦值:收盤價-LC和0的較大值的6日[1日權重]移動平均/收盤價-LC的絕對值的6日[1日權重]移動平均*100 RSI底賦值:RSI<20 MA5賦值:收盤價的5日簡單移動平均 五日乖離率賦值:(收盤價-MA5)/MA5*100,COLORF00FF0,線寬為2 乖離底賦值:五日乖離率<-10 RSV1賦值:(9.8日內最高價的最高值-收盤價)/(9.8日內最高價的最高值-9.8日內最低價的最低值)*101 KK賦值:RSV1的3日[1日權重]移動平均 DD賦值:KK的3日[1日權重]移動平均 JJ賦值:3*KK-2*DD WWQQ賦值:如果JJ>=100,返回100,否則返回如果JJ<=0,返回0,否則返回JJ 加分底賦值:WWQQ=100 XG賦值:絕地鷹王 AND RSI底 AND 乖離底 AND 加分底 當滿足條件XG=1時,在3.5位置書寫文字,畫黃色 當滿足條件XG=1時,在0和2位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,畫黃色 VAR1賦值:如果(收盤價>1日前的收盤價),返回成交量(手),否則返回如果(收盤價<1日前的收盤價),返回0-成交量(手),否則返回0的歷史累和 VAR2賦值:成交量(手)累加至當前流通股本(手)的天數(shù) VAR3賦值:(如果(收盤價>VAR2日內收盤價的最低值),返回1,否則返回0-1)*(如果(VAR1>VAR2日內VAR1的最低值),返回1,否則返回0-1) VAR4賦值:如果(VAR3=0-1),返回1,否則返回0 VAR5賦值:(統(tǒng)計8日中滿足(VAR4=1)的天數(shù)>3) VAR6賦值:((成交額(元)的13日累和)/(((成交額(元))/(成交量(手)))/(100)))/(100) VAR7賦值:以(成交量(手))/(VAR6)為權重(開盤價+最高價+最低價+收盤價)/(4)的動態(tài)移動平均 VAR8賦值:(((收盤價-VAR7)/(VAR7))*(100)<0-17) VAR9賦值:((收盤價-(5日前的收盤價)*(0.82999998)和(21日前的收盤價)*(0.72000002)的較小值)/(收盤價)<0.05) RSW賦值:VAR8 AND VAR9 AND VAR5 輸出黃金:如果(RSW>0),返回1,否則返回0,COLORFFFF00 當滿足條件黃金時,在1位置書寫文字,COLORFFFF00

?

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

源碼：

?

DRAWGBK(V>1,STRIP(RGB(60,100,255),RGB(130,120,255),1));
VAR10A:=CLOSE/MA(CLOSE,20)*100<80;
VAR20A:=CLOSE/MA(CLOSE,40)*100<78;
VAR30A:=CLOSE/MA(CLOSE,60)*100<72;
VAR40A:=HIGH>LOW*1.051;
VAR50A:=VAR40A AND COUNT(VAR40A,5)>1;
絕地鷹王:=VAR50A AND (VAR10A OR VAR20A OR VAR30A);
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
RSI底:=RSI<20;
MA5:=MA(C,5);
五日乖離率:=(C-MA5)/MA5*100,COLORF00FF0,LINETHICK2;
乖離底:=五日乖離率<-10;
RSV1:=(HHV(H,9.8)-C)/(HHV(H,9.8)-LLV(L,9.8))*101;
KK:=SMA(RSV1,3,1);
DD:=SMA(KK,3,1);
JJ:=3*KK-2*DD;
WWQQ:=IF(JJ>=100,100,IF(JJ<=0,0,JJ));
加分底:=WWQQ=100;
XG:=絕地鷹王 AND RSI底 AND 乖離底 AND 加分底;
DRAWTEXT(XG=1,3.5,'底'),coloryellow;
STICKLINE(XG=1,0,2,3,0),coloryellow;
VAR1:=SUM(IF((CLOSE>REF(CLOSE,1)),VOL,IF((CLOSE<REF(CLOSE,1)),0-VOL,0)),0);
VAR2:=SUMBARS(VOL,CAPITAL);
VAR3:=(IF((CLOSE>LLV(CLOSE,VAR2)),1,0-1))*(IF((VAR1>LLV(VAR1,VAR2)),1,0-1));
VAR4:=IF((VAR3=0-1),1,0);
VAR5:=(COUNT((VAR4=1),8)>3);
VAR6:=((SUM(AMOUNT,13))/(((AMOUNT)/(VOL))/(100)))/(100);
VAR7:=DMA((OPEN+HIGH+LOW+CLOSE)/(4),(VOL)/(VAR6));
VAR8:=(((CLOSE-VAR7)/(VAR7))*(100)<0-17);
VAR9:=((CLOSE-MIN((REF(CLOSE,5))*(0.82999998),(REF(CLOSE,21))*(0.72000002)))/(CLOSE)<0.05);
RSW:=VAR8 AND VAR9 AND VAR5;
黃金:IF((RSW>0),1,0),COLORFFFF00;
DRAWTEXT(黃金,1,'黃金'),COLORFFFF00;
TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' www.kzuj.com.cn '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花順程序化交易');

?

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

?