发个主图指标 无未来函数！
C/C++ www.zegu.cn 择股网提供 Code复制内容到剪贴板
- JJ:=(CLOSE+HIGH+LOW)/3;
- A:=EMA(JJ,10);
- B:=REF(A,1);
- STICKLINE(A>B,A,B,5,0),COLORYELLOW;
- STICKLINE(A<B,A,B,5,0),COLORBLUE;
- M1:EMA(CLOSE,5),LINETHICK2;
- M2:EMA(CLOSE,10);
- M3:EMA(M2,13);
- M4:EMA(M2,55);
- VAR1:=EMA(M3,55);
- M5:EMA(M4,81), COLORRED,LINETHICK2;
- VAR2:=(REF(HIGH,1)+REF(LOW,1))/2;
- VAR3:=MA(CLOSE,21)+2*STD(CLOSE,21);
- DRAWICON(CROSS(VAR2,VAR3),HIGH*1.035,2);
- DRAWTEXT(CROSS(VAR2,VAR3),HIGH*1.02,'卖出'), COLORGREEN;
- VAR4:=REF(CLOSE,1);
- VAR5:=SMA(MAX(CLOSE-VAR4,0),7,1)/SMA(ABS(CLOSE-VAR4),7,1)*100;
- VAR6:=CROSS(79,VAR5);
- VAR7:=FILTER(VAR6,4);
- DRAWICON(VAR7,HIGH*1.035,2);
- DRAWTEXT(VAR7,HIGH*1.02,'卖出'), COLORGREEN;
- A7:=(2*C+H+L)/4;
- VAR10:=LLV(LOW,34);
- VAR11:=HHV(HIGH,34);
- SK:=EMA((A7-VAR1)/(VAR2-VAR1)*100,7);
- SD:=EMA(0.667*REF(SK,1)+0.333*SK,5);
- DRAWTEXT(IF(COUNT(CLOSE<REF(CLOSE,1),8)/8>6/10 AND VOL>=1.5*MA(VOL,5) AND
- COUNT(SK>=SD,3) AND REF(LOW,1)=LLV(LOW,120),1,0),LOW,'●买进') ,COLORRED;
- DRAWTEXT(IF(COUNT(CLOSE<REF(CLOSE,1),13)/13>6/10 AND
- COUNT(SK>SD,6) AND REF(LOW,5)=LLV(LOW,120) AND REF(CLOSE>=OPEN,4) AND
- REF(CLOSE>OPEN,3) AND REF(CLOSE>OPEN,2) AND REF(OPEN>CLOSE,1) AND
- OPEN>REF(CLOSE,1),1,0),LOW,'●买进'), COLORRED;
- D:=MA(CLOSE,80)-MA(CLOSE,10)/3;
- DRAWTEXT(IF(CLOSE<D AND VOL/240>MA(VOL,5)/240 AND CLOSE>REF(CLOSE,1)*1.08
- AND CLOSE<MA(CLOSE,13)*1.3,1,0),LOW,'●抄底'),COLORRED;
- 成本价:(MA(CLOSE,60)+MA(CLOSE,70)+MA(CLOSE,90)+MA(CLOSE,108))/4,COLORff9900,LINETHICK0,circledot;
- {所属板块}
- DRAWTEXTREL(1,100,'所属板块:'+BKNAME),ColorAFFF00;
- DRAWTEXTREL(1,220,'每股收益:'+NUMTOSTRN(FINANCE2(3),3)+'元'+' 市盈率:'+NUMTOSTRN(DYNAINFO(39),2)+'元'+' 市净率:'+NUMTOSTRN((CLOSE /FINANCE2(4)),2)+'元'+' 净资产:'+NUMTOSTRN(FINANCE2(4),2)+'元'),Color00C0FF;
- 流通盘亿:CAPITAL/1000000,LINETHICK0,COLORWHITE;
- DRAWTEXTABS(0,80,'流通盘：'+CAPITAL/100+'万股，利润增长：'+FINANCE2(10)+'%。每股收益：'+FINANCE2(3)+'元。' ),color00DDDD;
- {45度异动}
- x1:=(C+L+H)/3;
- bb13:=atan(ema(x1,13)-ref(ema(x1,13),1))*3.1416*10;
- ema8:=ema(c,8);
- DRAWTEXT(filter(bb13>1 and ema(x1,13)>ref(ema(x1,8),1),10),
- ema8,'∠45上升'),coloryellow;
- 平均成本:=COST(50);
- 获利盘:=WINNER(CLOSE)*100;
- DRAWTEXTREL(20,500,'获利盘:'+获利盘+'% '),colormagenta;
- DRAWTEXTREL(20,600,'平均成本:'+平均成本),colormagenta;
- stickline(L>REF(H,1),L,REF(H,1),50,1001),colorred;
- DRAWTEXT(L>REF(H,1),REF(H,1),NUMTOSTRN(REF(H,1),2)+'-'+NUMTOSTRN(L,2)),COLORMAGENTA;
- stickline(REF(L,1)>H,ref(L,1),H,50,1001),colorgreen;
- DRAWTEXT(REF(L,1)>H,REF(L,1),NUMTOSTRN(ref(l,1),2)+'-'+NUMTOSTRN(h,2)),COLORBLUE;
