請(qǐng)老師編寫(xiě)大單資金指標(biāo)選股公式,下面是大單資金指標(biāo)公式源碼,選出數(shù)值在50以上第一個(gè)出現(xiàn)黃柱的公式,謝謝!!
DRAWGBK(CURRBARSCOUNT=1, RGB(0,0,0),RGB(0,0,0),0,'1',0);
頂:90,COLORRED,LINETHICK1;
強(qiáng):80,COLORRED,LINETHICK2;
弱:10,COLORGREEN,LINETHICK3;
DRAWTEXT(ISLASTBAR, 頂,' 頂'),COLORYELLOW;
DRAWTEXT(ISLASTBAR, 強(qiáng),' 強(qiáng)'),COLORRED;
DRAWTEXT(ISLASTBAR, 弱,' 弱'),COLORGREEN;
VAR1:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;
VAR22:=SMA(VAR1,20,1);
VAR33:=SMA(VAR22,15,1);
VAR44:=(3*VAR22+2*VAR33)/4;
VAR55:= REF(VAR44,1);
RSA:SMA(MAX(VAR44-VAR55,0),2,1)/SMA(ABS(VAR44-VAR55),2,1)*100 ,COLORRED,NODRAW ,LINETHICK1;
RSB:MA(RSA,10),NODRAW;
拉升:IF(CROSS(RSA,RSB),20,0),STICK,COLORRED ,LINETHICK2,NODRAW;
落袋:IF(CROSS(RSB,90),20,0),STICK ,LINETHICK2,NODRAW;
DRAWTEXT(CROSS(RSA,RSB),10,'拉升'),COLORRED ;
DRAWTEXT(CROSS(RSB,90),15,'落袋'),COLORGREEN ;
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIFF,9),COLORWHITE;
MACD:=(DIFF-DEA)*2;
A:STICKLINE(MACD>=0 AND MACD>=REF(MACD,1) AND REF(MACD,1)<0
AND MACD>=0.01,90,MACD,1,1) ,COLORRED;
DRAWTEXT(A,90,' 飛天'),COLORYELLOW ;
啟動(dòng)線:=10*SUM(EMA((C+L)/2,2),5)/10.158,NODRAW;
平衡線:=10*LLV(SUM( EMA((C+L)/2,2),5)/10.158,4),NODRAW;
平臺(tái)線:=10*LLV(SUM( EMA((C+L)/2,2),5)/10.158,10),NODRAW;
強(qiáng)弱線:=EMA(啟動(dòng)線,21);
VVAR1:=2*MA(LLV((C+L)/2,8)*1.1,13)-EMA((C+L)/2,3)-((C+L)/2)*0.1;
VVAR2:=IF((EMA((C+L)/2,3)-VVAR1)*5>0,POW((EMA((C+L)/2,3)-VVAR1)*5,2)/10,-1*POW((EMA((C+L)/2,3)-VVAR1)*5,2)/10);
VVAR3:=IF(VVAR2>0,VVAR2-0,0);
STICKLINE(VVAR3>0 AND REF(VVAR3,1)=0 AND (C+L)/2>MA((C+L)/2,8),0,25,1,0),COLORYELLOW;
DRAWTEXT(VVAR3>0 AND REF(VVAR3,1)=0 AND (C+L)/2>MA((C+L)/2,8),30,'動(dòng)');
散戶:= 100*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60));
RSV:=(CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30))*100;
RSV1:=(C-MA(C,4))/MA(C,4)*100;
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);
K:=SMA(RSV,5,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
主力:=EMA(J,6),COLORYELLOW;
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);
走勢(shì):=CEILING(SMA(AA5,13,8)),COLORRED,LINETHICK2;
AA6:=SMA(AA3,21,8);
{買觀注: STICKLINE(走勢(shì)-AA6<-65,0,7,15,2);}
{DRAWICON(FILTER(J>REF(J,1)AND 走勢(shì)>=REF(走勢(shì),1)AND 走勢(shì)<25 ,5),走勢(shì),1);}
{賣觀注: STICKLINE(走勢(shì)-AA6>85,98,90,15,1),COLORFFFF00;}
{DRAWICON(FILTER(J<REF(J,1)AND 走勢(shì)<=REF(走勢(shì),1)AND J>85 ,5),J,2);}
吸:STICKLINE(VAR9>-120,50,50+(VAR9/2),3,1),COLORRED ;
CDMA:EMA(EMA(RSV1,7),7)*4,NODRAW,COLORWHITE;
STICKLINE(CDMA>=0 AND CDMA>=REF(CDMA,1),50,50+CDMA,3.3,0),COLORYELLOW ;{粉色拉升資金塊}
短線:100*(C-LLV(L,10))/(HHV(C,10)-LLV(L,10)),COLORWHITE ,NODRAW ;
{快線:(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100,LINETHICK1,COLORWHITE ;}
散戶線:散戶,COLORGREEN , ;
主力線:主力,COLORMAGENTA,LINETHICK1 ;
拉升線:走勢(shì),COLORYELLOW,LINETHICK1;
DRAWTEXT(ISLASTBAR,散戶線,'←--空方線'),COLORGREEN;
DRAWTEXT(ISLASTBAR,主力線,'←--主力線'),COLORMAGENTA ;
DRAWTEXT(ISLASTBAR,拉升線,'←--拉升線'),COLORYELLOW;
走強(qiáng)線: 20,COLORCYAN ;
關(guān)注低買:IF(90>散戶 AND CROSS(90,散戶) ,98,0),COLORMAGENTA,STICK,NODRAW;
高拋低吸:IF(散戶<10 AND CROSS(10,散戶) ,20,0),COLORGREEN,STICK,NODRAW;
風(fēng)險(xiǎn):COUNT("RSI.RSI1"(6,12,24)>80,3)=3 AND CROSS("RSI.RSI2"(6,12,24),79.5),NODRAW;
觀注頂:(散戶<8 AND 主力>90 AND 走勢(shì)>90 AND CDMA<=REF(CDMA,1)AND 散戶線),COLORGREEN,NODRAW;
DRAWTEXT(觀注頂,-1,'◆'),COLORGREEN;
DRAWTEXT(風(fēng)險(xiǎn),100,'←風(fēng)險(xiǎn)'),COLOR00FFFF;
STICKLINE(關(guān)注低買,0,20,1,1),COLORMAGENTA ;
{STICKLINE(高拋低吸,0,100,0,-1),COLORGREEN;};
A77:=((CLOSE - (MA(CLOSE,13))) / (MA(CLOSE,13))) * -100;
A78:=((CLOSE - (LLV(LOW,13))) / ((HHV(HIGH,13)) - (LLV(LOW,13)))) * 100;
A79:=SMA(A78,3,2);
A80:=SMA(A79,3,2);
A81:=SMA(A80,5,1);
VAK1:=IF(YEAR>=2038 AND MONTH>=1,0,1);
VAK2:=REF(LOW,1)*VAK1;
VAK3:=SMA(ABS(LOW-VAK2),3,1)/SMA(MAX(LOW-VAK2,0),3,1)*100*VAK1;
VAK4:=EMA(IF(CLOSE*1.3,VAK3*10,VAK3/10),3)*VAK1;
VAK5:=LLV(LOW,30)*VAK1;
VAK6:=HHV(VAK4,30)*VAK1;
VAK7:=IF(MA(CLOSE,58),1,0)*VAK1;
VAK8:=EMA(IF(LOW<=VAK5,(VAK4+VAK6*2)/2,0),3)/618*VAK7*VAK1;
吸籌:=IF(VAK8>100,100,VAK8)*VAK1;
跟莊吸:=IF(吸籌<REF(吸籌,1) AND (REF(吸籌,1)>REF(吸籌,2) OR REF(吸籌,1)=100),1,0);
吸籌累計(jì):=SUM(吸籌,60);
莊三吸:=COUNT(跟莊吸,30)=3 AND 跟莊吸=1 AND 吸籌累計(jì)>200;
狠吸籌:=REF(吸籌,1)=100 AND 吸籌<REF(吸籌,1) AND 吸籌累計(jì)>260;
狠吸籌2:=REF(吸籌,1)>REF(吸籌,2) AND 90<REF(吸籌,1) AND 吸籌<REF(吸籌,1) AND 吸籌累計(jì)>260;
跟莊買:STICKLINE(莊三吸=1 OR 狠吸籌=1 OR 狠吸籌2=1,0,30,1,1),COLORFFFFFF;
DRAWTEXT(跟莊買,40.4,'莊'),COLORFFFF00;
股價(jià)趨勢(shì): 3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1),LINETHICK0;
底部警戒: 10,COLORRED,LINETHICK0;
買入警戒:STICKLINE(股價(jià)趨勢(shì)<=10,0,10,3,0),COLORMAGENTA ;
買入信號(hào): STICKLINE(CROSS(股價(jià)趨勢(shì),底部警戒),0,30,1,1),COLORYELLOW ,LINETHICK2;
DRAWICON(CROSS(股價(jià)趨勢(shì),底部警戒),45,24);
N:=9;
M:=14;
N1:=6;
TYP := (HIGH + LOW + CLOSE)/3;
CC1:=(TYP-MA(TYP,M))/(0.015*AVEDEV(TYP,M)),COLORFF00FF;
C1:=SMA(CC1,3,1);
C2:=SMA(C1,3,1);
C3:=3*C1-2*C2;
CB1:=EMA(C3,5);
LC := REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),N1,1)/SMA(ABS(CLOSE-LC),N1,1)*100;
RSI:(RSI1-50)*5,LINETHICK2,COLOR0000FF,NODRAW;
R1:=SMA(RSI,3,1);
DD1:=SMA(R1,3,1);
J1:=3*R1-2*DD1;
RR1:=EMA(J1,5);
RR2:=REF(RR1,1);
RR:=RR1>RR2;
RRSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
KKK:=SMA(RSV,3,1);
KK1:(K-50)*5,COLORFFFF00,NODRAW;
K2:=SMA(KK1,3,1);
D2:=SMA(K2,3,1);
J2:=3*K2-2*D2;
BB1:=EMA(J2,5);
買入:=RR AND NOT(REF(RR,1)) AND (RR1<-100 AND BB1<-100) AND CB1<-100;
DRAWICON(買入,40,9);
https://www.55188.com/thread-9071873-1-1.html
本站僅提供存儲(chǔ)服務(wù),所有內(nèi)容均由用戶發(fā)布,如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容,請(qǐng)
點(diǎn)擊舉報(bào)。