软件名称：[B]波段顶底主图（通达信公式 源码 K线图）[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：5.00 KB
官方主页：Home Page
更新时间：2019-05-24 01:00:14
软件简介:

通达信公式波段顶底主图

{背景色}
DRAWGBK(O>0,RGB(33,47,58),RGB(0,0,0),0,"02",0);
{现价游标}
现价:CONST(C),COLORCYAN,DOTLINE;
{持股线}
持币:=MA(C,5);持股:IF(持币>=REF(持币,1),持币,DRAWNULL),COLORRED;
{标缺口}
LL:=REF(L,1);HH:=REF(H,1);上跳:=L>HH;下跳:=H<LL;
STICKLINE(L>REF(H,1),L,REF(H,1),2.1,-1),COLORRED;
STICKLINE(REF(L,1)>H,REF(L,1),H,1.8,-1),COLORGREEN;
{多空波段分界线}{股票公式下载70822.com}
买线:=EMA(C,2);多空:EMA(SLOPE(C,30)*20+C,51),COLORWHITE;
涨家数:INDEXADV,NODRAW,COLORLIMAGENTA;
跌家数:INDEXDEC,NODRAW,COLORGREEN;
{阳K线}
STICKLINE(买线>=多空,L,H,0,0),COLORWHITE;
STICKLINE(买线>=多空,C,O,2.1,1),COLORWHITE;
{阴K线}
STICKLINE(买线<多空,L,H,0,0),COLOR668800;
STICKLINE(买线<多空,C,O,2.1,1),COLOR668800;
{线上阳K线}
STICKLINE(CROSS(买线,多空*0.991),O,C,2.1,0),COLOR000066;
STICKLINE(CROSS(买线,多空*0.991),O,C,1.9,0),COLOR000088;
STICKLINE(CROSS(买线,多空*0.991),O,C,1.6,0),COLOR0000AA;
STICKLINE(CROSS(买线,多空*0.991),O,C,1.2,0),COLOR0000BB;
STICKLINE(CROSS(买线,多空*0.991),O,C,0.6,0),COLOR0000CC;
STICKLINE(CROSS(买线,多空*0.991),O,C,0.1,0),COLOR0000DD;
{线上阴K线}
STICKLINE(CROSS(多空*1.009,买线),O,C,2.1,0),COLOR006600;
STICKLINE(CROSS(多空*1.009,买线),O,C,1.9,0),COLOR008800;
STICKLINE(CROSS(多空*1.009,买线),O,C,1.6,0),COLOR00AA00;
STICKLINE(CROSS(多空*1.009,买线),O,C,1.2,0),COLOR00BB00;
STICKLINE(CROSS(多空*1.009,买线),O,C,0.6,0),COLOR00CC00;
STICKLINE(CROSS(多空*1.009,买线),O,C,0.1,0),COLOR00DD00;
{线下阳K线}
STICKLINE(CROSS(买线,多空*0.999),O,C,2.1,0),COLOR000066;
STICKLINE(CROSS(买线,多空*0.999),O,C,1.9,0),COLOR000088;
STICKLINE(CROSS(买线,多空*0.999),O,C,1.6,0),COLOR0000AA;
STICKLINE(CROSS(买线,多空*0.999),O,C,1.2,0),COLOR0000BB;
STICKLINE(CROSS(买线,多空*0.999),O,C,0.6,0),COLOR0000CC;
STICKLINE(CROSS(买线,多空*0.999),O,C,0.1,0),COLOR0000DD;
{线下阴K线}
STICKLINE(CROSS(多空*1.001,买线),O,C,2.1,0),COLOR006600;
STICKLINE(CROSS(多空*1.001,买线),O,C,1.9,0),COLOR008800;
STICKLINE(CROSS(多空*1.001,买线),O,C,1.6,0),COLOR00AA00;
STICKLINE(CROSS(多空*1.001,买线),O,C,1.2,0),COLOR00BB00;
STICKLINE(CROSS(多空*1.001,买线),O,C,0.6,0),COLOR00CC00;
STICKLINE(CROSS(多空*1.001,买线),O,C,0.1,0),COLOR00DD00;
{主图标释}
DRAWTEXT_FIX(1,0.6,0.02,0,"【名称】"),COLORGREEN;
DRAWTEXT_FIX(1,0.675,0.02,0,STKNAME),COLORYELLOW;
DRAWTEXT_FIX(1,0.6,0.07,0,"【代码】"),COLORGREEN;
DRAWTEXT_FIX(1,0.675,0.07,0,CODE),COLOR0080FF;
DRAWTEXT_FIX(1,0.6,0.12,0,"【现价】"),COLORGREEN;
DRAWNUMBER_FIX(1,0.675,0.12,0,现价),COLORCYAN;
DRAWTEXT_FIX(1,0.6,0.17,0,"【均价】"),COLORGREEN;
DRAWNUMBER_FIX(1,0.675,0.17,0,DYNAINFO(11)),COLORWHITE;
{多空转换点}
FX1:=100*(HHV(H,25)-C)/(HHV(H,25)-LLV(L,25));FX2:=100*(HHV(H,60)-C)/(HHV(H,60)-LLV(L,60));
VARBT:=EMA((C-LLV(L,15))/(HHV(H,25)-LLV(L,15))*4,5);DY:=CROSS(90,FX1) AND CROSS(90,FX2)
AND COUNT(ABS(FX1-FX2)/FX2<0.15,1)=1,NODRAW;
{紫色空方关键点}
STICKLINE(CROSS(3,VARBT),O,(O+C)/2,2.1,0),COLOR5E005E;
STICKLINE(CROSS(3,VARBT),O,(O+C)/2,1.9,0),COLOR750075;
STICKLINE(CROSS(3,VARBT),O,(O+C)/2,1.6,0),COLOR930093;
STICKLINE(CROSS(3,VARBT),O,(O+C)/2,1.2,0),COLORAE00AE;
STICKLINE(CROSS(3,VARBT),O,(O+C)/2,0.6,0),COLORD200D2;
STICKLINE(CROSS(3,VARBT),O,(O+C)/2,0.1,0),COLORE800E8;
{红色多方关键点}
STICKLINE(DY,O,(O+C)/2,1.9,0),COLOR000055;
STICKLINE(DY,O,(O+C)/2,1.6,0),COLOR000077;
STICKLINE(DY,O,(O+C)/2,1.3,0),COLOR000099;
STICKLINE(DY,O,(O+C)/2,0.9,0),COLOR0000BB;
STICKLINE(DY,O,(O+C)/2,0.6,0),COLOR0000DD;
STICKLINE(DY,O,(O+C)/2,0.1,0),COLOR0000FF;
{波段顶底预警}
N2:=7;LC:=REF(C,1);RSI:=SMA(MAX(C-LC,0),N2,1)/SMA(ABS(C-LC),N2,1)*100;
{青顶预警}
STICKLINE((REF(RSI,1)>=80 AND RSI<80),H,(O+H)/2,2.1,0),COLOR999900;
STICKLINE((REF(RSI,1)>=80 AND RSI<80),H,(O+H)/2,1.6,0),COLORAAAA00;
STICKLINE((REF(RSI,1)>=80 AND RSI<80),H,(O+H)/2,1.2,0),COLORBBBB00;
STICKLINE((REF(RSI,1)>=80 AND RSI<80),H,(O+H)/2,0.8,0),COLORCCCC00;
STICKLINE((REF(RSI,1)>=80 AND RSI<80),H,(O+H)/2,0.2,0),COLORDDDD00;
{橘底预警}
STICKLINE((REF(RSI,1)<=20 AND RSI>20),L,(O+L)/2,1.9,0),COLOR002288;
STICKLINE((REF(RSI,1)<=20 AND RSI>20),L,(O+L)/2,1.6,0),COLOR0033AA;
STICKLINE((REF(RSI,1)<=20 AND RSI>20),L,(O+L)/2,1.2,0),COLOR0044CC;
STICKLINE((REF(RSI,1)<=20 AND RSI>20),L,(O+L)/2,0.8,0),COLOR0055EE;
STICKLINE((REF(RSI,1)<=20 AND RSI>20),L,(O+L)/2,0.2,0),COLOR0088FF;
{顶底K线分型}
ZXX:=(H+L+O+C*3)/6;NX:=(3*C+L+O+H)/6;
ZNX:=(20*NX+19*REF(NX,1)+18*REF(NX,2)+17*REF(NX,3)+16*REF(NX,4)
+15*REF(NX,5)+14*REF(NX,6)+13*REF(NX,7)+12*REF(NX,8)+11*REF(NX,9)
+10*REF(NX,10)+9*REF(NX,11)+8*REF(NX,12)+7*REF(NX,13)+6*REF(NX,14)
+5*REF(NX,15)+4*REF(NX,16)+3*REF(NX,17)+2*REF(NX,18)+REF(NX,20))/210;
NXX:=MA(ZNX,6);
 

[url=http://www.70822.com/soft/sort013/sort05/down-137007.html]波段顶底主图（通达信公式 源码 K线图）[/url]