{成交量指标综合副图}
净买量:=(BUYVOL-SELLVOL);
内外比:BUYVOL/SELLVOL;
紫电青霜:VOL,VOLSTICK;
JL:=LLV(L,27);
DRAWBAND(MA(VOL*内外比,5),RGB(155,50,50),MA(VOL*内外比,13),RGB(0,100,50));
IF(MA(VOL*内外比,5)<REF(MA(VOL*内外比,5),1),MA(VOL*内外比,5),DRAWNULL),COLORGREEN,LINETHICK3;
ZDQS:=110<VOL*内外比/100>80 AND VOL<SMA(VOL,3,1);
LOWD:=MA(L,5)<=JL*1.025;
DRAWTEXT(LOWD AND 净买量>0,VOL*1.9,'买入'),COLOR3305FF;
净买量1:=IF(LOWD,净买量*1.39,净买量);
资金流量1:=(2*C+H+L+O)/5*净买量1/C;
资金流量:=MA(资金流量1,3);
Z:=MA(资金流量1,23);
STICKLINE(LOWD AND 净买量>0,VOL,VOL*5,3,1),COLOR00FBFF;
STICKLINE(LOWD AND 净买量>0,VOL,VOL*5,1.6,1),COLORBB22FF;
STICKLINE(LOWD AND 净买量>0,VOL,VOL*5,0.8,1),COLOREE3399;
STICKLINE(资金流量>Z AND 净买量>0,0,紫电青霜/2*内外比,3,0),COLORD000FF;
STICKLINE(Z>资金流量 AND 净买量>0,紫电青霜/2*内外比,0,3,0),COLORA2FF00;
STICKLINE(净买量<0 AND 资金流量<Z,紫电青霜,紫电青霜/2*内外比,3,0),COLOR30FF00;
STICKLINE(净买量<0 AND Z<资金流量,紫电青霜/2*内外比,紫电青霜,3,0),COLORFF21FF;
{DMI}
TR:=EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),N);
HD:=HIGH-REF(HIGH,1);
LD:=REF(LOW,1)-LOW;
DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),N);
DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),N);
PDI:=DMP*100/TR;
MDI:=DMM*100/TR;
ADX:=EXPMEMA(ABS(MDI-PDI)/(MDI+PDI)*100,M);
ADXR:=EXPMEMA(ADX,M);
DRAWICON(CROSS(ADX,ADXR),VOL*2.66,1);
{DMA N1 2 60 10 N2 2 250 50 M 2 100 10}
DIF:=MA(CLOSE,10)-MA(CLOSE,50);
AMA:=MA(DIF,10);
DRAWTEXT(CROSS(DIF,AMA),VOL*2.942,'DMA B'),COLORMAGENTA;
DRAWTEXT(CROSS(AMA,DIF),VOL*2.942,'DMA S'),COLOR119911;
{FSL}
SWL:=(EXPMA(CLOSE,5)*7+EXPMA(CLOSE,10)*3)/10;
SWS:=DMA(EMA(CLOSE,12),MAX(1,100*(SUM(VOL,5)/(3*CAPITAL))));
DRAWTEXT(CROSS(SWL,SWS),VOL*1.32,'FSL B'),COLOR2211FF;
{TRIX N 1 100 12 M 1 100 9}
TR1:=EMA(EMA(EMA(CLOSE,12),12),12);
TRIX:=(TR1-REF(TR1,1))/REF(TR1,1)*100;
MATRIX:=MA(TRIX,9);
DRAWTEXT(CROSS(TRIX,MATRIX),VOL*1.09,'TRIX B'),COLOR2211EE;
{CR}
MID0:=REF(HIGH+LOW,1)/2;
CR:=SUM(MAX(0,HIGH-MID0),26)/SUM(MAX(0,MID0-LOW),26)*100;
MA1:=REF(MA(CR,13),1+10/2.5);
MA2:=REF(MA(CR,20),1+20/2.5);
MA30:=REF(MA(CR,40),1+40/2.5);
MA40:=REF(MA(CR,62),1+62/2.5);
DRAWTEXT(CROSS(CR,MA1),VOL*3.00,'CR B'),COLOR0011DD;
DRAWTEXT(CROSS(MA1,CR),VOL*3.00,'CR S'),COLOR22EE00;
{VR N=26 M=6}
TH:=SUM(IF(CLOSE>REF(CLOSE,1),VOL,0),26);
TL:=SUM(IF(CLOSE<REF(CLOSE,1),VOL,0),26);
TQ:=SUM(IF(CLOSE=REF(CLOSE,1),VOL,0),26);
VR:100*(TH*2+TQ)/(TL*2+TQ);
{VR1:MEMA(VR,2);}
MAVR:MA(VR,6);
DRAWTEXT(CROSS(MAVR,VR),VOL*3.23,'VR 卖'),COLOR22FF11;
{OBV}
OBV:=SUM(IF(C>REF(C,1),VOL,IF(C<REF(C,1),-VOL,0)),0);
OBV1:=EMA(OBV,3);
OBV2:=EMA(OBV1,30);
DRAWTEXT(CROSS(OBV1,OBV2),VOL*3.41,'OBV B'),COLOR6611DD;
DRAWTEXT(CROSS(OBV2,OBV1),VOL*3.41,'OBV S'),COLOR00F100;
{ASI N=6}
A:=ABS(HIGH-REF(CLOSE,1));
B:=ABS(LOW-REF(CLOSE,1));
C1:=ABS(HIGH-REF(LOW,1));
D:=ABS(REF(CLOSE,1)-REF(OPEN,1));
E:=CLOSE-REF(CLOSE,1);
F:=CLOSE-OPEN;
G:=REF(CLOSE,1)-REF(OPEN,1);
X:=E+1/2*F+G;
K:=MAX(A,B);
DD:=IFF(A>B&&A>C1,A,MAX(B,C1));
RA:=IFF(DD=A,A+1/2*B+1/4*D,-1000);
RB:=IFF(DD=B,B+1/2*A+1/4*D,-2000);
RC:=IFF(DD=C1,C1+1/4*D,-1500);
R:=IFF(RA>RB&&RA>RC,RA,MAX(RB,RC));
SI:=50*X/R*K/3;
ASII:=SUM(SI,0);
MAASI:=MA(ASII,6);
DRAWTEXT(CROSS(ASII,MAASI),VOL*2.30,'ASI B'),COLOR2200CC;
DRAWTEXT(CROSS(MAASI,ASII),VOL*2.30,'ASI S'),COLOR22BB00;
{EMV N=14 M=9}
VOLUME:=MA(VOL,N)/VOL;
MID:=100*(HIGH+LOW-REF(HIGH+LOW,1))/(HIGH+LOW);
EMV:=MA(MID*VOLUME*(HIGH-LOW)/MA(HIGH-LOW,N),14);
MAEMV:=MA(EMV,9);
DRAWTEXT(CROSS(EMV,MAEMV),VOL*2.53,'EMV B'),COLOR3311E6;
DRAWTEXT(CROSS(MAEMV,EMV),VOL*2.53,'EMV S'),COLOR22EE00;
{RSI N1=6 N2=12 N3=24}
LC:=REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;
RSI3:=SMA(MAX(CLOSE-LC,0),24,1)/SMA(ABS(CLOSE-LC),24,1)*100;
DRAWTEXT(CROSS(RSI1,RSI2),VOL*1.223,'RSI B'),COLOR120199;
DRAWTEXT(CROSS(RSI2,RSI1),VOL*1.223,'RSI S'),COLOR22B900;
{KDJ N=9 M1=3 M2=3}
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K0:=SMA(RSV,3,1);
D0:=SMA(K0,3,1);
J0:=3*K0-2*D0;
DRAWTEXT(CROSS(K0,D0),VOL*1.55,'KDJ B'),COLOR2211EE;
DRAWTEXT(CROSS(D0,K0),VOL*1.55,'KDJ S'),COLOR00F502;
{CCI N=14}
TYP:=(HIGH+LOW+CLOSE)/3;
CCI:=(TYP-MA(TYP,N))/(0.015*AVEDEV(TYP,N));
DRAWTEXT(CROSS(CCI,-155),VOL*1.853,'CCI B'),COLOR2200E9;
DRAWTEXT(CROSS(155,CCI),VOL*1.83,'CCI S'),COLOR22F600;
{ROC N=12 M=6}
ROC:=100*(CLOSE-REF(CLOSE,12))/REF(CLOSE,12);
MAROC8:=MA(ROC,6);
DRAWTEXT(CROSS(ROC,MAROC8),VOL*1.13,'ROC B'),COLOR2211AA;
DRAWTEXT(CROSS(MAROC8,ROC),VOL*1.13,'ROC S'),COLOR22AA00;
{MTM N=12 M=6}
MTM:=CLOSE-REF(CLOSE,12);
MAT8:=MA(MTM,6);
DRAWTEXT(CROSS(MTM,MAT8),VOL*2.73,'MTM B'),COLOR1213E9;
DRAWTEXT(CROSS(MAT8,MTM),VOL*2.73,'MTM S'),COLOR229900;
{PSY N=12 M=6}
PSY:=COUNT(CLOSE>REF(CLOSE,1),12)/12*100;
PSYMA:=MA(PSY,6);
DRAWTEXT(CROSS(PSY,PSYMA),VOL*1.93,'PSY B'),COLOR2201B9;
DRAWTEXT(CROSS(PSYMA,PSY),VOL*1.93,'PSY S'),COLOR22FF11;
{趋势线}
趋势:=SMA(((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100),3,1);
{DRAWBAND(趋势,RGB(155,50,50),50,RGB(0,100,50));}
判断:=SMA(趋势,3,1);
DIFF:=EMA(CLOSE,2)-EMA(CLOSE,55);
DEA:=EMA(DIFF,6);
转点:=IF(K0>D0 AND CCI>0 AND DIFF>DEA AND MACD>0,1,0);
顶部:=90;
底部:=12;
DRAWICON(CROSS(趋势,判断),VOL*2,11);
DRAWICON(CROSS(趋势,顶部),VOL*1.82,12);
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
D1:=(2*C+L+H)/4;
D2:=EMA(D1,6);
D3:=EMA(D2,5);
BBUY:=CROSS(D2,D3);
风险区:=80;
安全区:=20;
天线:=100;
强弱线:=50;
DRAWTEXT(BBUY,(VOL*1.5),'趋势短买');
VARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;
DRAWICON(CROSS(82,VARR1),VOL*1.6,15);
DRAWTEXT(CROSS(82,VARR1),VOL*1.8,'逃'),COLORYELLOW;
{一招定乾坤}KD:=CROSS(K0,D0) AND CROSS(J0,D0);
MA5:=MA(D1,5);
MA10:=MA(D1,10);
JG:=CROSS(MA5,MA10);
MAVOL20:=MA(VOLUME,10);
NL:=CROSS(MA(VOL,5),MA(VOL,10));
DIF0:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA0:=EMA(DIF0,9);
MACD11:=(DIF0-DEA0)*2;
NA:=CROSS(DIF0,DEA0);
一招定乾坤:DRAWTEXT((JG AND NL AND NA) OR (JG AND NL AND KD) OR
(JG AND NA AND KD) OR (NL AND NA AND KD),VOL*1.86,'一招定乾坤'),COLORYELLOW;
X0:=LLV(J0,2)=LLV(J0,8);
Y:=IF(CROSS(J0,REF(J0+0.01,1)) AND X0 AND J0<20,30,0);
DRAWTEXT(CROSS(J0,REF(J0+0.01,1)) AND X0 AND J0<20,LOW*0.98,'★短进'),COLORLIMAGENTA;
JH9:=SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1)*100;
DRAWTEXT(CROSS(84,JH9),VOL*2.02,'★S'),COLORGREEN;
空:=EMA(C,5);
均衡:=EMA(空,5);
中轨:=HHV(MA(H,13),13);
VAR50:=FILTER(均衡>REF(均衡,1)AND 中轨<REF(中轨,1)AND C>REF(C,1),11);
DRAWTEXT(VAR50,VOL*1.12,'追涨');
{点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
