大智慧冷暖气带主图指标公式

MA5:MA(CLOSE,5),PRECIS2;

MA10:MA(CLOSE,10),PRECIS2;

MA20:MA(CLOSE,20),PRECIS2;

MA30:MA(CLOSE,30),PRECIS2;

MA60:MA(CLOSE,60),PRECIS2;

MA120:MA(CLOSE,120),PRECIS2;

{彩带}

FILLRGN(MA60,MA120,MA60>MA120,RGB(86,0,0),MA60<MA120,RGB(0,86,0)),LAYER7;

FILLRGN(MA5,MA10,MA5>MA10,RGB(128,0,128),MA5<MA10,RGB(20,92,100)),LAYER7;

{DRAWTEXTREL(0,980,'【细雨无声自用指标】'),Color999933,linethick1;}

A:=BArslAst(DISPSTATUS=1)+1; HH:=HHV(H,A); LL:=LLV(L,A);

上涨:BARSSINCE(BacKSET(DISPSTATUS=2,BARSLAST(L=LL)+1)),COLOR3333CC,linethick0;

↑空间％:(C/REF(L,上涨)-1)*100,COLOR339999,linethick0;

最高％:(HHVALL(HH)/REF(L,上涨)-1)*100,COLORDD66DD,linethick0;

下跌:BARSSINCE(BACKSET(DISPSTATUS=2,BARSLAST(H=HH)+1)),COLOR008800,linethick0;

↓空间％:(C/REF(H,下跌)-1)*100,COLOR998888,linethick0;

最低％:(LLVALL(LL)/REF(H,下跌)-1)*100,COLORFF9900,linethick0;

DRAWTEXTAbs(40,08,'所属板块：'+BKNAME),Color009999,linethick1,LAYER6;

DRAWTEXTABS(40,26,'流通盘：'+CAPITAL/1000000+'亿股，利润增长：'+FINANCE2(10)+'%。每股收益：'+FINANCE2(3)+'元'+' 市盈率：'+DYNAINFO(39)+'%'),ColorFFBB33,linethick1,LAYER6;

{买卖指示}

Var0:=SMA(MAX(CLOSE-ref(c,1),0),12,1)/SMA(ABS(CLOSE-ref(c,1)),15,1)*100;

DRAWTEXT(crOSS(82,Var0),high,'快卖'),colorwhite;

s:=C-REF(C,1);

DX:=100*EMA(EMA(s,6),6)/EMA(EMA(ABS(s),6),6);

买:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0);

DRAWTEXT(filter(买=1,5),LOW-0.03,'拉升'),ColorFFDE00;

da:=(EMA(C,1)+EMA(C,2)+EMA(C,3)+EMA(C,4))/4;

db:=(EMA(C,10)+EMA(C,20)+EMA(C,40)+EMA(C,80))/4;

DRAWTEXT(CROSS(da-db,0),L*0.99,'B'),ALIGN1,VALIGN0,COLOR00FFFF,linethick5;

JH:=SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1)*100;

DRAWTEXT(CROSS(84,JH),H*1.02,'S'),ALIGN1,VALIGN0,COLORGREEN,linethick4;

YC:=REF(CLOSE,1);

止损价位:(YC*1.0035*97+0.2)/99.65,PRECIS2,ColorFFCC33,LINETHICK0;

盘子:CAPITAL/1000000,linethick0;

盘子1:CAPITAL/100,linethick0;

盘子2:FINANCE2(37),linethick0;

{缺口}

STICKLINE(L>REF(H,1),L,REF(H,1),50,1001),Color408080;

STICKLINE(REF(L,1)>H,ref(L,1),H,50,1001),Color808040;

DRAWTEXT(L>REF(H,1),REF(H,1),NUMTOSTRN(REF(H,1),2)+'-'+NUMTOSTRN(L,2)),Color408080;

DRAWTEXT(REF(L,1)>H,REF(L,1),NUMTOSTRN(ref(l,1),2)+'-'+NUMTOSTRN(h,2)),VALIGN2,Color808040;

{压力支撑}

E:=(HIGH+LOW+OPEN+2*CLOSE)/5;

明日阻力:=2*E-LOW;

明日支撑:=2*E-HIGH;

明日突破:=E+(HIGH-LOW);

明日反转:=E-(HIGH-LOW);

今日阻力:=REF(明日阻力,1);

今日支撑:=REF(明日支撑,1);

今日突破:=REF(明日突破,1);

今日反转:=REF(明日反转,1);

STICKLINE(DISPSTATUS=2 and c>=今日阻力,今日阻力,今日阻力,20,0),Color0000EE;

STICKLINE(DISPSTATUS=2 and c<今日阻力,今日阻力,今日阻力,20,0),Color00FF00;

STICKLINE(DISPSTATUS=2 and c>=今日支撑,今日支撑,今日支撑,20,0),ColorFF00FF;

STICKLINE(DISPSTATUS=2 and c<今日支撑,今日支撑,今日支撑,20,0),ColorFF6600;

STICKLINE(DISPSTATUS=2,今日突破,今日突破,30,0),Color00EEEE;

STICKLINE(DISPSTATUS=2,今日反转,今日反转,30,0),ColorFFCC33;

DRAWTEXT(DISPSTATUS=2, 今日阻力,' '+NUMTOSTRN(今日阻力,2 )+' 阻力'),ColorCCCCCC,VALIGN1,ALIGN0;

DRAWTEXT(DISPSTATUS=2, 今日支撑,' '+NUMTOSTRN(今日支撑,2 )+' 支撑'),ColorCCCCCC,VALIGN0,ALIGN0;

DRAWTEXT(DISPSTATUS=2, 今日突破,' '+NUMTOSTRN(今日突破,2 )+' 突破'),Color999999,VALIGN1,ALIGN0;

DRAWTEXT(DISPSTATUS=2, 今日反转,' '+NUMTOSTRN(今日反转,2 )+' 反转'),Color999999,VALIGN0,ALIGN0;

{指标网-股票公式网站 www.gupAng.com}

{k线}

STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0),COLOR5454FF;

STICKLINE(CLOSE<OPEN,CLOSE,OPEN,7,0),COLORFFFF00;

STICKLINE(CLOSE>OPEN,HIGH,CLOSE,0.1,0),COLOR5454FF;

STICKLINE(CLOSE>OPEN,LOW,OPEN,0.1,0),COLOR5454FF;

STICKLINE(CLOSE<OPEN,HIGH,OPEN,0.1,0),COLORFFFF00;

STICKLINE(CLOSE<OPEN,LOW,CLOSE,0.1,0),COLORFFFF00;

STICKLINE(CLOSE=OPEN AND CLOSE>REF(CLOSE,1),CLOSE,OPEN,7,0),COLOR5454FF;

STICKLINE(CLOSE=OPEN AND CLOSE<=REF(CLOSE,1),CLOSE,OPEN,7,0),COLORFFFF00;

STICKLINE(CLOSE=OPEN AND CLOSE>REF(CLOSE,1),HIGH,LOW,0.1,0),COLOR5454FF;

STICKLINE(CLOSE=OPEN AND CLOSE<=REF(CLOSE,1),HIGH,LOW,0.1,0),COLORFFFF00;

{操作提示}

均价:=(3*C+H+L+O)/6;

VAR1:=(8*均价+7*REF(均价,1)+6*REF(均价,2)+5*REF(均价,3)+

4*REF(均价,4)+3*REF(均价,5)+2*REF(均价,6)+REF(均价,8))/36;

VAR2:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3;

SZ1:=REF(VAR1,1)=REF(VAR2,1) AND VAR1>VAR2 AND CLOSE>VAR1;

SZ2:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>REF(VAR2,1)

AND H/VAR1<1.1 AND L>VAR2 AND CLOSE>VAR1;

SZ3:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>=REF(VAR2,1) AND H/VAR1>1.1;

SZ4:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>REF(VAR2,1)

AND CLOSE>VAR2 AND CLOSE<VAR1;

SZ5:=(VAR1>VAR2 AND VAR2>REF(VAR2,1) AND VAR1<>REF(VAR1,1)

AND CLOSE<VAR2) OR (VAR1>VAR2 AND VAR1<REF(VAR1,1)

AND VAR2<REF(VAR2,1) AND CLOSE<VAR2);;

SZ6:=REF(VAR1,1)>REF(VAR2,1) AND VAR1=VAR2 AND CLOSE<VAR2;

XD1:=VAR1=VAR2 AND CLOSE<VAR2 OR (VAR1<REF(VAR1,1) AND VAR2<REF(VAR2,1)

AND REF(VAR1,1)=REF(VAR2,1) AND CLOSE<VAR2);

XD2:=VAR1=VAR2 AND CLOSE>VAR1;

SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));

量能饱和度:=IF(SAT>1,1,SAT)*100;

IF BARSTATUS=2 AND SZ1 THEN BEGIN

DRAWTEXTABS(40,48,'操作提示：调整结束短线介入'),COLORRED,linethick3;

END

ELSE

IF BARSTATUS=2 AND SZ2 THEN BEGIN

DRAWTEXTABS(40,48,'操作提示：上升通道走势良好'),COLORRED,linethick3;

END

ELSE

IF BARSTATUS=2 AND SZ3 THEN BEGIN

DRAWTEXTABS(40,48,'操作提示：股价偏离注意调整'),COLORRED,linethick3;

END

ELSE

IF BARSTATUS=2 AND SZ4 THEN BEGIN

DRAWTEXTABS(40,48,'操作提示：上升通道调整洗盘'),COLORGREEN,linethick3;

END

ELSE

IF BARSTATUS=2 AND SZ5 THEN BEGIN

DRAWTEXTABS(40,48,'操作提示：转向特征注意离场'),COLORGREEN,linethick3;

END

ELSE

IF BARSTATUS=2 AND SZ6 THEN BEGIN

DRAWTEXTABS(40,48,'操作提示：通道改变坚决离场'),COLORGREEN,linethick3;

END

ELSE

IF BARSTATUS=2 AND XD1 THEN BEGIN

DRAWTEXTABS(40,48,'操作提示：下跌通道只宜观望'),COLORGREEN,linethick3;

END

ELSE

IF BARSTATUS=2 AND XD2 THEN BEGIN

DRAWTEXTABS(40,48,'操作提示：短期底部准备进入'),COLORYELLOW,linethick3;

END;

{右下角的短线精灵数据}

{第一行：买卖总单数}

DRAWTEXTREL( 640,835,'买入单数:'+DYNAINFO(91)),PRECIS2,colorred;

DRAWTEXTREL( 770,835,'卖出单数:'+DYNAINFO(92)),color008800;

IF(DYNAINFO(91)<DYNAINFO(92)) THEN BEGIN

DRAWTEXTREL( 900,835,'单数差:'+DYNAINFO(92)-DYNAINFO(91)),COLORred;END;

IF(DYNAINFO(91)>=DYNAINFO(92)) THEN BEGIN

DRAWTEXTREL( 900,835,'单数差:'+DYNAINFO(92)-DYNAINFO(91)),COLOR008800; END;

{第二行：机构买卖单吃货数}

DRAWTEXTREL( 640,870,'机构买单吃货数:'+DYNAINFO(99)),Color006AFF;

DRAWTEXTREL( 770,870,'机构卖单吃货数:'+DYNAINFO(100)),Color008080;

IF(DYNAINFO(99)>DYNAINFO(100)) THEN BEGIN

DRAWTEXTREL( 900,870,'机构单数差:'+DYNAINFO(99)-DYNAINFO(100)),COLORRED;END;

IF(DYNAINFO(99)<DYNAINFO(100)) THEN BEGIN

DRAWTEXTREL( 900,870,'机构单数差:'+DYNAINFO(99)-DYNAINFO(100)),COLOR008800;END;

IF(DYNAINFO(99)=DYNAINFO(100)) THEN BEGIN

DRAWTEXTREL( 900,870,'机构单数差:'+DYNAINFO(99)-DYNAINFO(100)),COLORGRAY;END;

{第三行：买卖总单数}

DRAWTEXTREL( 640,905,'机构吃货数:'+DYNAINFO(102)),colorred;

DRAWTEXTREL( 770,905,'机构吐货数:'+DYNAINFO(103)),color008800;

IF(DYNAINFO(102)>DYNAINFO(103)) THEN BEGIN

DRAWTEXTREL( 900,905,'吃吐数差:'+DYNAINFO(102)-DYNAINFO(103)),COLORred;END;

IF(DYNAINFO(102)<DYNAINFO(103)) THEN BEGIN

DRAWTEXTREL( 900,905,'吃吐数差:'+DYNAINFO(102)-DYNAINFO(103)),COLOR008800; END;

IF(DYNAINFO(102)=DYNAINFO(103)) THEN BEGIN

DRAWTEXTREL( 900,905,'吃吐数差:'+DYNAINFO(102)-DYNAINFO(103)),COLORgray;END;

{第四行：机构吃货吐货量}

DRAWTEXTREL( 640,940,'机构吃货量:'+DYNAINFO(104)),colorFF00FF;

DRAWTEXTREL( 770,940,'机构吐货量:'+DYNAINFO(105)),color00FF00;

IF(DYNAINFO(104)>=DYNAINFO(105)) THEN BEGIN

DRAWTEXTREL( 900,940,'吃吐量差:'+DYNAINFO(104)-DYNAINFO(105)),COLORRED;END;

IF(DYNAINFO(104)<DYNAINFO(105)) THEN BEGIN

DRAWTEXTREL( 900,940,'吃吐量差:'+DYNAINFO(104)-DYNAINFO(105)),COLOR008800;END;

IF(DYNAINFO(104)=DYNAINFO(105)) THEN BEGIN

DRAWTEXTREL( 900,940,'吃吐量差:'+DYNAINFO(104)-DYNAINFO(105)),COLORGRAY;END;

{第五行：机构吃货吐货均量}

DRAWTEXTREL( 640,975,'机构吃货均量:'+DYNAINFO(106)),colorred;

DRAWTEXTREL( 770,975,'机构吐货均量:'+DYNAINFO(107)),color008800;

IF(DYNAINFO(106)>DYNAINFO(107)) THEN BEGIN

DRAWTEXTREL( 900,975,'均额差:'+DYNAINFO(106)-DYNAINFO(107)),COLORRED;END;

IF(DYNAINFO(106)<DYNAINFO(107)) THEN BEGIN

DRAWTEXTREL( 900,975,'均额差:'+DYNAINFO(106)-DYNAINFO(107)),COLOR008800;END;

IF(DYNAINFO(106)=DYNAINFO(107)) THEN BEGIN

DRAWTEXTREL( 900,975,'均额差:'+DYNAINFO(106)-DYNAINFO(107)),COLORGRAY;END;