小天风暴主图 EA

小天风暴主图

rn

觉得不错，与大家分享源码，无来来函数，也不知以前发过没有，若有不适之处就请版主删除即可。谈几点基本功能，见图中。更多使用技巧大家自己体会。

rn

源码

rn

{NN 20  1  30
rnN  6   1  10
rnM  3   2.8  3.1}{参数自行设置}

rn

AAA:=CHECKUSER(0);
rn周K:=STKINDI(STKLABEL,’kdj.k’,0,7);
rn周D:=STKINDI(STKLABEL,’kdj.d’,0,7);
rnRSV:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;
rnK:=SMA(RSV,3,1);
rnD:=SMA(K,3,1);
rnJ:=3*K-2*D;
rnRSV12:=(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100;
rnK12:=SMA(RSV12,3,1);
rnD12:=SMA(K12,3,1);
rnJ12:=3*K12-2*D12;
rnRSV24:=(CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100;
rnK24:=SMA(RSV24,3,1);
rnD24:=SMA(K24,3,1);
rnJ24:=3*K24-2*D24;
rn支撑:IF(CROSS(J,J24),LOW,REF(LOW,BARSLAST(CROSS(J,J24)))),colorFFFF;
rn压力:IF(CROSS(J24,J),HIGH,REF(HIGH,BARSLAST(CROSS(J24,J)))),colorFF;
rnU2L:=IF(CLOSE>=MA(CLOSE,NN),80,50);
rnL2L:=IF(CLOSE>=MA(CLOSE,NN),50,20);
rnRH1:=IF(J<U2L AND REF(J,1)>=U2L,HHV(REF(HIGH,1),BARSLAST(J>=U2L AND REF(J,1)<U2L)-1),REF(HHV(REF(HIGH,1),BARSLAST(J>=U2L AND REF(J,1)<U2L)-1),BARSLAST(J<U2L AND REF(J,1))));
rnRH4:=IF(HIGH>RH1,LOW,REF(LOW,BARSLAST(HIGH>RH1)));
rnRH42:=IF(HIGH>RH1,J,REF(J,BARSLAST(HIGH>RH1)));
rn强压:IF(HIGH>RH4 AND J<RH42 AND J<J24,HIGH,REF(HIGH,BARSLAST(HIGH>RH4 AND J<RH42 AND J<J24))),colorFF00;
rnRL1:=IF(J>L2L AND REF(J,1)<=L2L,LLV(REF(LOW,1),BARSLAST(J<=L2L AND REF(J,1)>L2L)-1),REF(LLV(REF(LOW,1),BARSLAST(J<=L2L AND REF(J,1)>L2L)-1),BARSLAST(J>L2L AND REF(J,1))));
rnRL4:=IF(LOW<RL1,HIGH,REF(HIGH,BARSLAST(LOW<RL1)));
rnRL42:=IF(LOW<RL1,J,REF(J,BARSLAST(LOW<RL1)));
rn强撑:IF(LOW<RL4 AND J>RL42 AND J>J24,LOW,REF(LOW,BARSLAST(LOW<RL4 AND J>RL42 AND J>J24))),colorFF00FF;
rnZ，:(CLOSE-压力)*100/压力,LINETHICK0;
rnX1:=IF(BARSCOUNT(CLOSE)=1,(OPEN+HIGH+LOW+CLOSE)/4,CLOSE);
rnX2:=IF(BARSCOUNT(CLOSE)=1,(OPEN+CLOSE)/2,SMA(REF(X1,1),2,1));
rnX3:=HIGH;
rnX4:=LOW;
rn{STICKLINE(X2<X1,X3,X4,0.1,0),colorFF;
rnSTICKLINE(X2<X1,X1,X2,7,1),colorFF;
rnSTICKLINE(X2>X1,X3,X4,0.1,0),colorFFFF00;
rnSTICKLINE(X2>X1,X1,X2,7,0),colorFFFF00;
rnSTICKLINE(X2=X1 AND X1>=REF(X1,1),X3,X4,0.1,0),colorFF;
rnSTICKLINE(X2=X1 AND X1>=REF(X1,1),X1,X2,7,0),colorFF;
rnSTICKLINE(X2=X1 AND X1<REF(X1,1),X3,X4,0.1,0),colorFF0000;
rnSTICKLINE(X2=X1 AND X1<REF(X1,1),X1,X2,7,0),colorFF0000;
rnSTICKLINE(X2=X1 AND BARSCOUNT(CLOSE),X3,X4,0.1,0),colorFF00FF;
rnSTICKLINE(X2=X1 AND BARSCOUNT(CLOSE),X2,X1,7,0),colorFF00FF;}

rn

CB:=AMOUNT/VOL/100;
rnCD:=CB>HIGH OR CB<LOW;
rnAA:=IF(CLOSE>200,182.60001,1.826);
rnBB:=IF(CLOSE>200,91.3,0.913);
rn大下箱:INTPART(CLOSE/AA)*AA,POINTDOT,LINETHICK3,colorFFFF00;
rn大上箱:大下箱+AA,POINTDOT,LINETHICK3,colorFF;
rn小下箱:INTPART(CLOSE/BB)*BB,POINTDOT,LINETHICK1,colorFF00FF;
rn小上箱:小下箱+BB,POINTDOT,LINETHICK1,colorFFFF;
rnEXPLAIN(1,STKLABEL+STKNAME+’n所属板块:’+BLKNAME);
rnAAA:=CHECKUSER(0);
rnVAR1:=(CLOSE+HIGH+LOW)/3;
rnVAR2:=HIGH-LOW;
rnVAR4:=VAR1+VAR2;
rnVAR5:=VAR1-VAR2;
rnVAR6:=2*VAR1-LOW;
rnVAR7:=2*VAR1-HIGH;
rn【明天最高】:=VAR6;
rn【明天最低】:=VAR7;
rnVAR9:=ISLASTBAR;
rnSTICKLINE(VAR9>0,VAR4,VAR5,0,0),SHIFT1,colorFFFF;
rnSTICKLINE(VAR9>0,VAR6,VAR7,8,0),SHIFT1,colorFFFF;
rnVAR11:=(CLOSE+HIGH+LOW)/3;
rnVAR12:=HIGH-LOW;
rnVAR14:=VAR11+VAR12;
rnVAR15:=VAR11-VAR12;
rnVAR16:=2*VAR11-LOW;
rnVAR17:=2*VAR11-HIGH;
rn明日转:=REF(CLOSE,2)*2-REF(CLOSE,5);
rnEXPLAINEX(VOL>0,’★★【明天生命】=’,明日转,1,0),colorFFFFFF;
rnEXPLAINEX(VOL>0,’【明天最高】=’,VAR14,1,0),colorFFFF;
rnEXPLAINEX(VOL>0,’【范围上限】=’,VAR16,1,0),colorFF00FF;
rnEXPLAINEX(VOL>0,’【范围下限】=’,VAR17,1,0),colorFFFF00;
rnEXPLAINEX(VOL>0,’【明天最低】=’,VAR15,1,0),colorFF00;
rnVAR1:=SPLITDATA(1)+SPLITDATA(2);
rnCAP:=CLOSE;
rnCAP[DATACOUNT]:=1;
rnFOR I=DATACOUNT DOWNTO 2 DO BEGIN
rnCAP[I-1]:=CAP[I]/(1+VAR1[I]/10);
rnEND;
rnCAPI:=CAP*CAPITAL/100;
rnHS:=VOL/CAPI;
rn历史流通盘{万股}:=CAPI;
rnZ，:=(HIGH-LOW)*100/LOW,LINETHICK0;
rnSTZ，:=(CLOSE-OPEN)*100/OPEN;
rnSPZ，:=(CLOSE-LOW)*100/LOW;
rnSTZ，B:=STZ，/Z，;
rnSPZ，B:=SPZ，/Z，;
rn最大震幅:=REF(HHV(Z，,5),1);
rn最小震幅:=REF(LLV(Z，,5),1);
rnXZ，B:=Z，/最大震幅;
rnDZ，B:=Z，/最小震幅;
rnXHSB:=HS/REF(HHV(HS,4),1);
rnDHSB:=HS/REF(LLV(HS,4),1);
rnDY1:=-5*(STZ，B>=0.48 AND SPZ，B>0.5 AND DZ，B>2 AND DHSB>2 AND CLOSE>OPEN);
rnDY2:=-5*(STZ，B>=0.8 AND DZ，B>1.5 AND DHSB>1.5 AND CLOSE>OPEN);
rnDY3:=-5*(STZ，B>=0.82 AND XZ，B>0.9 AND DZ，B>1.5 AND XHSB>0.9 AND DHSB>1.5 AND CLOSE>OPEN);
rn单阳:=FILTER((DY1 OR DY2 OR DY3) AND 周K>周D,N);
rnVV:=单阳*LOW;
rnTS:=BARSLAST(单阳>0)+1>=1 AND BARSLAST(单阳>0)<=13;
rn单阳高:=REF(HHV(HIGH,BARSLAST(单阳>0)),1);
rn单阳攻击:=CROSS(CLOSE,单阳高) AND TS;
rn强势攻击:=IF(单阳=1 AND 单阳攻击=1,1,0);
rn单阳低点:=REF(LOW,BARSLAST(VV));
rn单阳不破:=TS AND LOW>=单阳低点;
rn时间:=IF(LOW>=单阳低点,BARSLAST(单阳<0),0);
rn单阳启稳:=CROSS(HS,Z，) AND CLOSE>OPEN AND TS;
rnAA:MA(1.05*HIGH,21),colorFF0000;
rnBB:MA(0.85*LOW,21),colorFFFF00;
rnPARTLINE(单阳不破=1,BB),LINETHICK1,colorFF;
rnSTICKLINE(单阳=1,BB,1.04*BB,0,0),colorFFFF;
rnSTICKLINE(单阳=1,BB*1.01,1.03*BB,8,0),colorFFFF;
rnDRAWTEXT(单阳=1 AND 周K<50,BB*0.97,’弱’),colorFFFF;
rnDRAWTEXT(单阳=1 AND CROSS(周K,周D) AND 周K<50,BB*1.08,’启’),colorFFFF;
rnDRAWTEXT(单阳=1 AND 周K>50 AND 周K<80,BB*0.97,’强’),colorFFFF;
rnDRAWTEXT(单阳=1 AND 周K>=80,BB*0.97,’冲’),colorFFFF;
rnSTICKLINE(单阳启稳=1,BB,BB*1.03,0,0),colorD36F3E;
rnSTICKLINE(单阳启稳=1,BB*1.02,BB*1.02,8,0),colorD36F3E;
rnDRAWTEXT(单阳启稳=1,BB,’稳’),colorD36F3E;
rnSTICKLINE(单阳攻击=1,BB,BB*1.05,0,1),colorA400FF;
rnSTICKLINE(单阳攻击=1,BB*1.01,BB*1.04,8,1),colorA400FF;
rnDRAWTEXT(单阳攻击=1,BB*1.08,’攻’),colorFF;

rn