股市中没有一定的技术是不可以的,但技术不是万能的。运用之妙在于领悟。支持理想,愿飞狐能为大家带来快乐! rc:=DYNAINFO(3);//前收 q:=datacount; hh:=DYNAINFO(5);//最高 LL:=DYNAINFO(6);//最低 f:=max(hh-rc,rc-LL); ff:=f/rc*100;//最大半振幅 q2h:=if(ff<1,0.9797*rc,rc-2*f*1.016);//分时副图2最高位置 q2l:=if(ff<1,0.9697*rc,rc-3*f*1.011);//分时副图2最低位置 //以下清除原始的指标线,并画横坐标线 FILLRGN(1,q2h,q2l),colorblack; cz:=(q2h-q2l)/6; q2l,POINTDOT,,COLORWHITE; q2l+cz,POINTDOT,color0000cc; q2l+2*cz,POINTDOT,color0000cc; q2l+3*cz,POINTDOT,color0000cc; q2l+4*cz,POINTDOT,color0000cc; q2l+5*cz,POINTDOT,color0000cc; a1:="macd.diff"; a2:="macd.dea"; a3:="macd.macd"; a4:="rsi.rsi1"; a5:="rsi.rsi2"; mh:=hhv(max(a1,a3),0); mL:=LLv(min(a3,a1),0); ch:=hhv(max(a4,a5),0); cL:=LLv(min(a5,a4),0); mc:=(q2h-q2l)/(cH[q]-cL[q]); md:=(q2h+q2l-mc*(cH[q]+cL[q]))/2; mb:=(q2h-q2l)/(mH[q]-mL[q]);//缩放比例,选macd或diff来计算缩放比例 my:=(q2h+q2l-mb*(mH[q]+mL[q]))/2;//平移值 diff:a1*mb+my,COLORWHITE;//副图2显示原来的diff指标线 dea:a2*mb+my,COLORYELLOW;//副图2显示原来的dea指标线 macd:=a3*mb+my;//副图2显示原来的macd指标线 STICKLINE(macd>my,my,macd,1,1),COLORRED; STICKLINE(macd<my,my,macd,1,1),COLOR00FF00; obv:a4*mc+md,COLORFFEE00; k1:=hhv(h,0); k2:=llv(l,0); k3:=barslast(OPENMINUTES(TIME)<=240); t1:=barslast(OPENMINUTES(TIME)<=60); DRAWSL(OPENMINUTES(TIME)>=60,ref(k1,t1),0,k3,2),LINEDOT; DRAWSL(OPENMINUTES(TIME)>=60,ref(k2,t1),0,k3,2),LINEDOT; DRAWICON(OPENMINUTES(TIME)>60 and cross(c,ref(k1,t1)+0.001),ref(k1,t1),1); PK:=VOL*(OPEN+CLOSE+HIGH+LOW)/4; PK1:=IF(VOL>0,PK/VOL,(OPEN+CLOSE+HIGH+LOW)/4); C11:=PK1; A01:=(C11-LLV(C11,75))/(HHV(C11,75)-LLV(C11,75)); A11:=SMA(A01,13,1); A21:=SMA(A11,13,1); A31:=3*A11-2*A21; A41:=2*A31-0.5; ZS:=DYNAINFO(3)*0.95; 选1:=C11*(1-(A41-A21)/40); 选2:=CROSS(C11,选1) AND CLOSE/REF(CLOSE,1)<1.03; 选3:IF(选2,ZS*1.03,ZS),colorFF00;{点击看本软件截图: 58股票 公式网 http://www. 58gu. com 整理} |