当前位置:分析家公式网 → 股票公式 → 通达信公式 → 一键转帖:短线黄蓝带(通达信公式 主图 源码 测试图)
软件名称:[B]短线黄蓝带(通达信公式 主图 源码 测试图)[/B]
软件类型:国产软件
运行环境:Win10/Win9X/Win8/Win2000/WinXP/Win2003/Win7/
软件语言:简体中文
授权方式:免费版
软件大小:20.0 KB
官方主页:Home Page
更新时间:2021-08-22 00:15:41
软件简介:
{短线黄蓝带}
STICKLINE(CLOSE>=MA(CLOSE,10),REFDATE(HHV(H,0),DATE),REFDATE(LLV(L,0),DATE),6,0),COLOR220080;{多色柱}
STICKLINE(CLOSE<MA(CLOSE,10),REFDATE(HHV(H,0),DATE),REFDATE(LLV(L,0),DATE),6,0),COLOR408048;{空色柱}
VAR1:=(2*CLOSE+HIGH+LOW)/4;
DRAWBAND(MA(VAR1,3),RGB(245,250,0),MA(VAR1,7),RGB(0,200,250));
买:=CROSS(MA(C,3),MA(C,7));
卖:=CROSS(MA(C,7),MA(C,3));
MA5:MA(CLOSE,5),COLORFF00FF,LINETHICK3;
绿降:IF(MA5<=REF(MA5,1),MA5,DRAWNULL),COLORGREEN,LINETHICK3;
DRAWICON((REF(MA5,1)<REF(MA5,2)) AND (MA5>REF(MA5,1)),LOW*0.999,11);{图标 黄食指向上}
DRAWICON((REF(MA5,1)>REF(MA5,2)) AND (MA5<=REF(MA5,1)),HIGH*1.001,12);{图标 黄食指向下}
X_54:=MA(CLOSE,5);{MA5角度取自量学太极线}
MA5角度:ATAN((X_54/REF(X_54,1)-1)*100)*180/3.1416,NODRAW;
{MA5乖离率:(C-MA5)/MA5*100,COLORWHITE,NODRAW;}
{黄蓝带 对照世基软件}
MA10:MA(C,10),COLORWHITE;
STICKLINE(C>=MA10,MA10,REF(MA10,1),5,0),COLOR00BBFF;
STICKLINE(C<MA10,REF(MA10,1),MA10,5,0),COLORBLUE;
DRAWICON(CROSS(C,MA10),LOW*0.99,34);{黄底勾向上}
DRAWICON(CROSS(MA10,C),HIGH*1.025,35);{绿底勾向下}
强弱界:MA(CLOSE,20),COLORCYAN,LINETHICK3;
上升趋势:IF(MA(CLOSE,20)>=REF(MA(CLOSE,20),1),MA(CLOSE,20),DRAWNULL),COLORYELLOW,LINETHICK3;
MA30:MA(C,30),COLORMAGENTA;
MA60:MA(C,60),COLORCYAN;
MA60平升:IF(MA(CLOSE,60)>=REF(MA(CLOSE,60),1),MA(CLOSE,60),DRAWNULL),COLORYELLOW;
MA120:MA(C,120),COLORBLUE;
MA250:MA(C,250),COLOR00FF00;
MA250升:IF(MA(C,250)>=REF(MA(C,250),1),MA(C,250),DRAWNULL),COLORRED;
{CYC∞}
JJJ:=IF(DYNAINFO(8)>0.01,0.01*DYNAINFO(10)/DYNAINFO(8),DYNAINFO(3));
DDD:=(DYNAINFO(5)<0.01 || DYNAINFO(6)<0.01);
JJJT:=IF(DDD,1,(JJJ<(DYNAINFO(5)+0.01) && JJJ>(DYNAINFO(6)-0.01)));
CYC∞:IF(JJJT,DMA(AMOUNT/(100*VOL),100*VOL/FINANCE(7)),EMA((HIGH+LOW+CLOSE)/3,120)),COLORYELLOW,CIRCLEDOT;
半分位:(REF(C,1)+REF(O,1))/2,COLORWHITE,DOTLINE;
STICKLINE(半分位,半分位,半分位,4,0),COLORWHITE;
{波段顶底,属未来,大马路123}
VAR111:=ZIG(3,10);
DRAWICON((REF(VAR111,2) > REF(VAR111,1)) AND (VAR111 > REF(VAR111,1)),LOW*0.95,5);{黄笑脸}
DRAWICON((REF(VAR111,2) < REF(VAR111,1)) AND (VAR111 < REF(VAR111,1)),HIGH*1.05,6);{蓝哭脸}
DRAWKLINE(H,O,L,C);{画K线}
{以下为资金情况}
换手率:VOL/CAPITAL*100,COLORRED,NODRAW;
预换手:IF(CURRBARSCOUNT=1 AND PERIOD=5,换手率*240/FROMOPEN,DRAWNULL),COLORWHITE,NODRAW;
量比:V/REF(MA(V,5),1),NODRAW,COLORWHITE;
{预量比:DYNAINFO(17),NODRAW,COLORWHITE;}
机构:(L2_VOL(0,0) - L2_VOL(0,1))*10000/FINANCE(7),NODRAW,COLORYELLOW;
大户:(L2_VOL(1,0) - L2_VOL(1,1))*10000/FINANCE(7),NODRAW,COLORRED;
中户:(L2_VOL(2,0) - L2_VOL(2,1))*10000/FINANCE(7),NODRAW,COLORMAGENTA;
散户:(L2_VOL(3,0) - L2_VOL(3,1))*10000/FINANCE(7),NODRAW,COLORGREEN;
主力:机构+大户,NODRAW,COLORYELLOW;
主力占比:主力/换手率*100,NODRAW,COLORMAGENTA;
三日主力:SUM(主力,3),COLORYELLOW,NODRAW;
五日主力:SUM(主力,5),COLORRED,NODRAW;
十日主力:SUM(主力,10),COLORMAGENTA,NODRAW;
廿日主力:SUM(主力,20),COLORWHITE,NODRAW;
STICKLINE(主力>0,O,C,2,1),COLORYELLOW;
STICKLINE(主力<0,O,C,2,1),COLORLIBLUE;
STICKLINE(机构>0,O,C,1,0),COLORYELLOW;
STICKLINE(机构<0,O,C,1,0),COLORBLUE;
STICKLINE(大户>0,O,(O+C)/2,1,0),COLORRED;
STICKLINE(大户<0,O,(O+C)/2,1,0),COLORGREEN;
DRAWTEXT(买=1,L,'←买'),COLORLIRED;{三日上穿7日}
DRAWTEXT(卖=1,H*1.01,'↓←卖'),COLORGREEN;{三日下穿7日}
DRAWNUMBER(ISLASTBAR ,C,C),COLORFF00FF;
N1:=10;
N2:=10;
DISP:=2;
K1:=IF(PERIOD=5,1,{日}
IF(PERIOD=6,1,{周}
IF(PERIOD=7,1,{月}
IF(PERIOD=8,1,{多分钟}
IF(PERIOD=9,1,{多日}
IF(PERIOD=10,1,{季}
IF(PERIOD=11,2,{年}
IF(PERIOD=4,1,{60F}
IF(PERIOD=3,1,{30F}
IF(PERIOD=2,1,{15F}
IF(PERIOD=1,1{5F},1{1F})))))))))))/10;
P1:=PEAK(1,K1*N1,1);
P2:=PEAK(1,K1*N1,2);
WP1:=PEAKBARS(1,K1*N1,1);
WP2:=PEAKBARS(1,K1*N1,2);
T1:=TROUGH(2,K1*N2,1);
T2:=TROUGH(2,K1*N2,2);
WT1:=TROUGHBARS(2,K1*N2,1);
WT2:=TROUGHBARS(2,K1*N2,2);
TJ1:=P1>T1 AND P2>T2 ;
ZD:=MAX(T1,T2);
ZG:=MIN(P1,P2);
LL:=MIN(T1,T2);
HH:=MAX(P1,P2);
TJ2:=FILTER(ZG>ZD,2);
TJ3:=ZG=REF(ZG,BARSLAST(TJ2)) OR ZD=REF(ZD,BARSLAST(TJ2));
TJ4:=TJ1&&TJ2&&NOT(TJ3);
TJ5:=BETWEEN(ZD,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,REF(BARSLAST(TJ4),1)));
TJ6:=BETWEEN(ZG,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,REF(BARSLAST(TJ4),1)));
TJ7:=ZG>REF(ZG,REF(BARSLAST(TJ4),1))&&ZD<REF(ZD,REF(BARSLAST(TJ4),1));
TJ8:=TJ4&&NOT(TJ5 OR TJ6 OR TJ7);
ZSD:=IF(TJ8,ZD,DRAWNULL);
ZSG:=IF(TJ8,ZG,DRAWNULL);
ZSH:=IF(TJ8,HH,DRAWNULL);
ZSL:=IF(TJ8,LL,DRAWNULL);
STICKLINE(TJ8,ZSH,ZSL,0,-1),COLORMAGENTA;
STICKLINE(TJ8,ZSD,ZSG,IF(DISP=1,3,0),1),COLORMAGENTA;
{ DRAWTEXT(DISP=2,ZSH,'中枢'),COLORWHITE;不显示中枢二字}
{中枢高:PLOYLINE(DISP=2,REF(ZSD,BARSLAST(TJ8))),CIRCLEDOT,COLORLIRED;看不见折线段,停用
中枢低:PLOYLINE(DISP=2,REF(ZSG,BARSLAST(TJ8))),CIRCLEDOT,COLORLIGREEN;}
{中枢最高:PLOYLINE(DISP=2,REF(ZSH,BARSLAST(TJ8))),POINTDOT,COLORRED;原来就没用
中枢最低:PLOYLINE(DISP=2,REF(ZSL,BARSLAST(TJ8))),POINTDOT,COLORGREEN;}
{趋势高:PLOYLINE(DISP=3,ZIG(1,K1*N1)),COLORLIBLUE;看不见折线段,停用
趋势低:PLOYLINE(DISP=3,ZIG(2,K1*N2)),COLORLIBLUE;}
局部低点预选A:=BACKSET(LLV(L,5)<REF(LLV(L,4),1),4);
局部低点预选B:=BACKSET(局部低点预选A=0 AND REF(局部低点预选A,1)=1,2);
局部低点预选C:=IF(局部低点预选B=1 AND REF(局部低点预选B,1)=0,-1,0);
局部高点预选A:=BACKSET(HHV(H,5)>REF(HHV(H,4),1),4);
局部高点预选B:=BACKSET(局部高点预选A=0 AND REF(局部高点预选A,1)=1,2);
局部高点预选C:=IF(局部高点预选B=1 AND REF(局部高点预选B,1)=0,1,0);
缺口判断:=IF(L>REF(H,1),1,IF(H<REF(L,1),-1,0));
距前高天:=BARSLAST(局部高点预选C=1);
距前低天:=BARSLAST(局部低点预选C=-1);
小值周期:=LOWRANGE(L);
大值周期:=TOPRANGE(H);
低保留AA:=IF(局部低点预选C=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)<REF(LLV(L,距前高天+1),1),-1,0);
低保留AB:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判断,距前高天)=-1 OR LLV(L,距前低天+2)<REF(LLV(L,距前低天+1),1)),-1,0);
低保留S:=IF((低保留AA=-1 OR 低保留AB=-1) AND L<REF(H,距前高天+1),-1,0);
预判:=IF((距前低天<4 AND HHV(缺口判断,距前低天)!=1) OR REF(低
[url=http://www.70822.com/soft/sort013/sort05/down-157641.html]短线黄蓝带(通达信公式 主图 源码 测试图)[/url]
[url=http://www.70822.com/soft/sort013/sort05/down-157641.html]短线黄蓝带(通达信公式 主图 源码 测试图)[/url]