大盘上窜下跳 分享个指标给大家 压力支撑 源码不加密，喜欢就拿去用吧
 input: N(5,1,100);
VAR1:=BACKSET(REF(C,2)=HHV(C,10),3);
VAR2:=CROSS(VAR1,0.9);
VAR3:=BACKSET(REF(LOW,2)=LLV(LOW,5),3);
VAR4:=CROSS(VAR3,0.9);
压力1:REF(H,BARSLAST(Var2)),LINETHICK0;
支撑:=REF(LOW,BARSLAST(Var4));
周期:=BARSLAST(Var4);
周期2:=BARSLAST(Var2);
bb:=BACKSET(C<=REF(C,1)AND REF(C,1)>=REF(C,2) and REF(C=hhv(c,周期),1),1);
CC:=BACKSET(L>REF(L,1)AND REF(L,1)<REF(L,2)and REF(L=LLV(L,周期2),1) ,1);
压力2:REF(H,BARSLAST(bb)+1),LINETHICK0;
短走:REF(L,BARSLAST(CC)+1),LINETHICK0;
DRAWTEXT(BARSTATUS=2,压力1,'___________________'),color22CCFF,VALIGN2,ALIGN2;
DRAWTEXT(BARSTATUS=2,压力1,'① '+压力1),COLORred,VALIGN2,ALIGN2,LINETHICK2;
DRAWTEXT(BARSTATUS=2,压力2,'___________________'),color22CCFF,VALIGN2,ALIGN2;
DRAWTEXT(BARSTATUS=2,压力2,'②'+压力2),COLORred,VALIGN2,ALIGN2,LINETHICK2;
DRAWTEXT(BARSTATUS=2,短走,'___________________________________'),color22CCFF,VALIGN2,ALIGN2;
DRAWTEXT(BARSTATUS=2,短走,''+短走),COLORred,VALIGN2,ALIGN2,LINETHICK2;
ZDF:=(C-REF(C,1))/REF(C,1)*100;
{www.fxjgsw.com}
STICKLINE(ZDF>9.8,O,C,7,0),COLOR0000B5;
STICKLINE(ZDF<-9.8,O,C,6,0),COLORGREEN;
DRAWTEXTABS(0,60,'■流通盘【亿】：'+NUMTOSTRN(CAPITAL/1000000,3)),LINETHICK1,colorDDDDDD;
DRAWTEXTABS(0,45,'■'+'B买入，S卖出。'+'。业绩：'+SELFSTRING('业绩') ){,COLOR525252},colorDDDDDD;;
DRAWTEXTABS(0,30,'■主题库：'+SELFSTRING('主题投资')),COLORYELLOW;
DRAWTEXTABS(0,0,'■'+BKNAME ),colorDDDDDD;
DRAWTEXTABS(0,15,'■利润增长：'+FINANCE2(10)+'%。每股收益：'+FINANCE2(3)+'元。' ),colorDDDDDD;
|
