主升量能A

2018-04-06    作者:admin    来源:网络



 DRAWTEXT_FIX (1,0.07,0.28,0,公积金:),COLOR00CCCC,LINETHICK2;

 DRAWNUMBER_FIX(1,0.1,0.28,0,FINANCE(18)),COLOR00CCCC,LINETHICK2;
 DRAWTEXT_FIX(1,0.15,0.28,0,未分配利润:),COLOR0000FF;
 DRAWNUMBER_FIX(1,0.2,0.28,0,FINANCE(32)),COLOR00CCCC,LINETHICK2;
DRAWTEXT_FIX(1,0.16,0.03,0,每股收益:)COLORFF00FF;
DRAWTEXT_FIX(1,0.2,0.03,0,STRCAT(CON2STR(FINANCE(30)/FINANCE(1),2), (元/股)))COLORFF00FF;
DRAWTEXT_FIX(1,0.07,0.03,0,每股净资产(元):)COLORFF00FF;
DRAWTEXT_FIX(1,0.13,0.03,0,CON2STR(FINANCE(34),2))COLORFF00FF;
{www.tzj123.com}
TOTAL:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,240,1)))));
MTIME:=MOD(FROMOPEN,TOTAL);
CTIME:=IF(MTIME<0.5,TOTAL,MTIME);
VVOL:IF(CURRBARSCOUNT=1,VOL*TOTAL/CTIME,DRAWNULL),NODRAW;
STICKLINE(CURRBARSCOUNT=1 && (SETCODE=0 || SETCODE=1),VVOL,0,-1,-1),COLOR00C0C0;
VOLUME1:VOL,VOLSTICK;
VOLUME:VOL,VOLSTICK;
MAVOL11:=MA(VOLUME,5)LINETHICK2;
MAVOL22:=MA(VOLUME,10)LINETHICK2;
V2:IF(CURRBARSCOUNT=1,VOL*240/FROMOPEN/REF(VOL,1)-1,VOL/REF(VOL,1)-1),NODRAW,COLORRED;
STICKLINE(V2>=1,0,VOL,2,0),COLORYELLOW;
TJ1:=120;
涨停:=C/REF(C,1)>1.097;
涨停数:=CONST(COUNT(涨停,TJ1));{页面所见涨停天数}
DRAWTEXT_FIX(ISLASTBAR,0.005,0.06,0,STRCAT(STRCAT(涨停总天数: ,CON2STR(涨停数,0)), 次)),COLORGREEN;
AA:=IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL); VAR1:=HIGH-LOW;
 VAR2:=ABS(OPEN-CLOSE);
 VAR3:=HIGH-IF(CLOSE>OPEN,CLOSE,OPEN);
 VAR4:=IF(CLOSE>OPEN,OPEN,CLOSE)-LOW;
 VAR5:=VAR2/VAR1*VOL;
 VAR6:=VAR3/VAR1*VOL;
 VAR7:=VAR4/VAR1*VOL;
 VAR8:=IF(VOL/CAPITAL>0.001,1,EXP(ABS(LOG(VOL/CAPITAL*100))));
 MA5:=MA(VOL,5),COLORRED;
换手:=V*100/CAPITAL; AAAA:=V;
 BBBB:=CAPITAL;
换手率:=AAAA*100/BBBB;
 BB:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));  VAR12:=(HIGH - LOW);
 VAR13:=ABS((OPEN - CLOSE)); 
 VAR14:=(HIGH - IF((CLOSE > OPEN),CLOSE,OPEN)); 
 VAR15:=(IF((CLOSE > OPEN),OPEN,CLOSE) - LOW); 
 VAR16:=((VAR13 / VAR12) * VOL); 
 VAR17:=((VAR14 / VAR12) * VOL); 
 VAR18:=((VAR15 / VAR12) * VOL); 
 VAR19:=IF(((VOL / CAPITAL) > 0.001),1,EXP(ABS(LOG(((VOL / CAPITAL) * 100)))));
 VARA:=(((CLOSE - MA(CLOSE,5)) / MA(CLOSE,5)) * 100); 
 VARB:=(((MA(CLOSE,5) > MA(CLOSE,10)) AND (MA(CLOSE,10) > MA(CLOSE,30))) AND (MA(CLOSE,30) > MA(CLOSE,60)));
 VARC:=((MA(CLOSE,5) < MA(CLOSE,10)) AND (MA(CLOSE,10) < MA(CLOSE,30))); 
 VARD:=REF(CLOSE,1);
 DRAWTEXT((((((VAR16 > (MA(VOL,5) * 2)) AND (VAR16 >= VAR17)) AND (VAR16 >= VAR18)) AND (CLOSE > OPEN))
 OR ((VOL > (MA(VOL,5) * 3)) AND VARB)),VOL*1.05,黑马)COLORYELLOW;
 HSL:=DYNAINFO(37);
VAR11:=3;
VAR21:=(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));
IF(CROSS(VAR21,VAR11),20,-1),COLORRED,COLOR0000FF,LINETHICK0;
STICKLINE(CROSS(VAR21,VAR11),0,VOL,2.8,0),COLORFF11FF;
STICKLINE(CROSS(VAR21,VAR11),0,VOL,2,0),COLORFF44FF;
STICKLINE(CROSS(VAR21,VAR11),0,VOL,1,0),COLORFF66FF;
百日地量:LLV(VOL,100)==VOL,STICK,COLORRED,LINETHICK1;
DRAWTEXT(百日地量,VOL-16.5,地量),COLORRED;  
DRAWTEXT(CROSS(VAR21,VAR11),VOL,关注)COLORFF44FF; 
相对地量: STICKLINE(VAR8>2 AND VOL<MA(VOL,20)/2,0,VOL,3,0),COLORBLUE;
倍量:STICKLINE(VOL>REF( VOL,1)*2,0,VOL,0.7,0),COLOR00EEFF;
QVAR18:=HHV(HIGH,30);
QVAR19:=LLV(LOW,30);
NL:=EMA((CLOSE-QVAR19)/(QVAR18-QVAR19)*100,5)/8*10;
DRAWTEXT(CROSS(5,NL),30,★做底),COLORWHITE;
VAR44:=REF(CLOSE,1);
VAR45:=SMA(MAX(CLOSE-VAR44,0),6,1)/SMA(ABS(CLOSE-VAR44),6,1)*100;
STICKLINE(CROSS(84,VAR45),0,VAR2*15+3,3,1),COLORGREEN;
DRAWTEXT(CROSS(84,VAR45),80,防空警报),COLORGREEN;
{www.tzj123.com}
{立桩成立判断}
 T12:=V2>=1;
 T0:=BARSLAST(T12);
 L1:=REF(L,T0);
 H1:=REF(H,T0);
 L11:=MIN(REF(L,1),L);
 L10:=MIN(L11,REF(L,2));
 L21:=MAX(REF(L,1),L);
 L20:=MAX(L21,REF(L,2));
 T111:=(REF(V2>=1,3) OR REF(V2>=1,2) OR REF(V2>=1,1)) AND 
 ((L10>L1 AND L20>H1) OR (L11>L1 AND L21>H1) OR (L>H1));
 T11:=T111 AND REF(T111,1)=0;
 STICKLINE(T11,O,VOL,2,0),COLORFF00FF;
 {奔牛}
牛:=CROSS(VAR5,VAR3) AND VAR3<2.1 AND C>O;
 STICKLINE(牛,0,VOL,2,0),COLORRED;
 DRAWTEXT(牛,VOL*1.15,牛),COLORWHITE;
 {突破与破位}
N:=19;
 VARB1:=HHV(HIGH,N); 
 VARB2:=LLV(LOW,N); 
阻力线:=EMA((CLOSE-VARB2)/(VARB1-VARB2),21)-0.5;
操作线:=EMA((CLOSE-VARB2)/(VARB1-VARB2),5)-0.5;
突破:=CROSS(操作线,阻力线) AND 阻力线<0.1;
破位:=CROSS(阻力线,操作线) AND 阻力线>0.25;
 STICKLINE(突破,0,VOL,1,0),COLORBLUE;
 DRAWTEXT(突破,VOL*1,突破),COLORWHITE;
 DRAWICON(突破,VOL*1.2,1);

阅读:552    评论:0

联系我们 - 关于我们 - 网站地图

声明:站内所有文章、公式均来自互联网或网友分享提供,如侵犯您的权利请告知,我们会在24小时内及时删除! 


【电脑版】  【回到顶部】