股海风云

阅读作者：公式网时间 2009-10-21 07:53:25 大智慧公式

C/C++ Code复制内容到剪贴板

Var1:=REF(LOW,1);
Var2:=SMA(ABS(LOW-Var1),3,1)/SMA(MAX(LOW-Var1,0),3,1)*100;
Var3:=EMA(IF(CLOSE*1.2,Var2*10,Var2/10),3);
Var4:=LLV(LOW,38);
Var5:=HHV(Var3,38);
Var6:=IF(LLV(LOW,90),1,0);
Var7:=EMA(IF(LOW<=Var4,(Var3+Var5*2)/2,0),3)/618*Var6;
龍出海: STICKLINE(Var7,0,Var7,6,1),colorwhite ;
v1:=llv(h,240);
飞龙:100*(c-v1)/v1,COLORRED,linethick1;
v2:=hhv(h,240);
海面:100*(v2-c)/c,COLORGREEN,linethick1;
v3:=sum(VOL,5)/CAPITAL;
cyf5:=100-(100/(1+v3));
RSV:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 100);
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
X:=LLV(J,2)=LLV(J,8);
紫微星: IF(CROSS(J,3),65,0),colorFF00FF,linethick3;
VA:=(2*C+H+L)/4;
VB:=LLV(L,5);
VC:=HHV(H,5);
风云:cyf5*3.21,COLORYELLOW,linethick1;
强阻力:=(HIGH+LOW+OPEN+2*CLOSE)/5+H-L;
阻力位:=(HIGH+LOW+OPEN+2*CLOSE)/5*2-L;
平衡点:=(HIGH+LOW+OPEN+2*CLOSE)/5;
支撑位:=(HIGH+LOW+OPEN+2*CLOSE)/5*2-H;
强支撑:=(HIGH+LOW+OPEN+2*CLOSE)/5-H+L;
DRAWTEXTREL(380,880,NUMTOSTRN(平衡点,2)),LINETHICK2,color33ffff;
DRAWTEXTREL(330,900,'平衡点'),color33ffff;
DRAWTEXTREL(380,280,NUMTOSTRN(阻力位,2)),LINETHICK2,color00ff00;
DRAWTEXTREL(330,300,'阻力位'),color00ff00;
DRAWTEXTREL(380,70,NUMTOSTRN(强阻力,2)),LINETHICK2,color0000ff;
DRAWTEXTREL(330,100,'强阻力'),color0000ff;
DRAWTEXTREL(380,490,NUMTOSTRN(支撑位,2)),LINETHICK2,colorffff00;
DRAWTEXTREL(330,500,'支撑位'),colorffff00;
DRAWTEXTREL(380,680,NUMTOSTRN(强支撑,2)),LINETHICK2,color3366ff;
DRAWTEXTREL(330,700,'强支撑'),color3366ff;
DRAWTEXTREL(3,18,'金麟岂是池中物一遇风云便化龙'),color3366ff;
DRAWTEXTREL(3,600,'市净率:'+NUMTOSTRN(DYNAINFO(58),2)+'%'+' 净资产收益率:'+NUMTOSTRN(DYNAINFO(5),2)+'%'),color999999;
DRAWTEXTREL(3,800,'毛利率:'+NUMTOSTRN(FINANCE2(12),2)+'%'+' 每股未分配:'+NUMTOSTRN(FINANCE2(8),2)+'元'),color999999;
DRAWTEXTREL(3,400,'上涨家数: '+NUMTOSTRN(DYNAINFO(69),0)),color0000ff;
DRAWTEXTREL(110,400,'下跌家数: '+NUMTOSTRN(DYNAINFO(70),0)),colorgreen;
DRAWTEXTREL(220,400,'平盘家数: '+NUMTOSTRN(DYNAINFO(71),0)),colorffffff;
DRAWTEXTREL(3,220,'流通A股:'+NUMTOSTRN(FINANCE2(37),0)),color999999;
C0:=INTPART(C*1000)/1000;
B1:=REF(C0,1);B2:=REF(C0,2);
HL:=IF(C0>B1 AND B1>=B2,1,IF(C0B2 AND B2>B1,2,IF(C0
AA:=IF(REF(HL,1)<>0,B2,IF(HL>0,MIN(B1,B2),MAX(B1,B2)));
DRAWTEXTREL(180,220,'敏感价位:'+NUMTOSTRN(AA,2)),colorffff00;
{DRAWTEXTREL(20,140,'所属板块:'+BKNAME);};
DRAWRECTREL(-2,0,440,1055,RGB(1,0,0));