当前位置：分析家公式网 → 股票公式 → 通达信公式 → 一键转帖：庄子捉妖记（通达信公式 主图 源码 测试图）
软件名称：[B]庄子捉妖记（通达信公式 主图 源码 测试图）[/B]
软件类型：国产软件
运行环境：Win10/Win9X/Win8/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：11.0 KB
官方主页：Home Page
更新时间：2021-08-20 00:15:36
软件简介:
庄子捉妖记
DRAWGBK(C>0,RGB(0,0,0),RGB(00,0,0),0,'BJT1',0);
DRAWKLINE(H,O,L,C);
{以下是主题特色参数}
N:=100;
高1:=REFDATE(HHV(H,N),DATE);
低1:=REFDATE(LLV(L,N),DATE);
H3:=高1-(高1-低1)*0.5;
DRAWTEXT_FIX(1,0.51,0.3,0,'分析家公式网WWW*70822*COM'),COLORFFFF00;
DRAWTEXT_FIX(1,0,0.3,0,'周期版'),COLORFFFF00;
分水岭:REFDATE(H3,DATE),COLORLIMAGENTA,DOTLINE;
DRAWNUMBER(ISLASTBAR,分水岭,分水岭),COLORWHITE;
月:REF(O,BARSLAST(MONTH!=REF(MONTH,1))),COLORFFFF00,NODRAW,LINETHICK6;
STICKLINE(C>月,月,月,5,0),COLORRED;
STICKLINE(C<月,月,月,5,0),COLORFFFF00;
STICKLINE(C=月,月,月,5,0),COLORWHITE;
高量线:=V=HHV(V,20) AND H=HHV(H,20),NODRAW;
DRAWLINE(高量线,MAX(C,O),REF(高量线,1),REF(MAX(C,O),1),1),COLORYELLOW,LINETHICK2;
MA20PY:REF(MA(C,20),13),DOTLINE,COLORLIGRAY;
现价:REFDATE(C,DATE),DOTLINE,COLORLIGRAY;
振幅:(C-REF(C,1))/REF(C,1)*100,NODRAW,COLORCCCCFF;
WIN:WINNER(C)*100,NODRAW,COLORRED;
TM:=1200823;
涨停:IF(DATE<TM,ZTPRICE(REF(C,1),IF(CODELIKE('688'),0.2,IF(NAMEINCLUDE('S'),0.05,0.1))),ZTPRICE(REF(C,1),IF(CODELIKE('688') OR CODELIKE('300'),0.2,IF(NAMEINCLUDE('S'),0.05,0.1)))),NODRAW,COLORRED;
跌停:IF(DATE<TM,DTPRICE(REF(C,1),IF(CODELIKE('688'),0.2,IF(NAMEINCLUDE('S'),0.05,0.1))),DTPRICE(REF(C,1),IF(CODELIKE('688') OR CODELIKE('300'),0.2,IF(NAMEINCLUDE('S'),0.05,0.1)))),NODRAW,COLORGREEN;
明涨停:IF(DATE<TM,C*IF(CODELIKE('688'),1.2,IF(NAMEINCLUDE('S'),1.05,1.1)),C*(IF(CODELIKE('688') OR CODELIKE('300'),1.2,IF(NAMEINCLUDE('S'),1.05,1.1)))),NODRAW,COLORLIMAGENTA;
明跌停:IF(DATE<TM,C*IF(CODELIKE('688'),0.8,IF(NAMEINCLUDE('S'),0.45,0.9)),C*(IF(CODELIKE('688') OR CODELIKE('300'),0.8,IF(NAMEINCLUDE('S'),0.45,0.9)))),NODRAW,COLORFFFF00;
ZT:=C=涨停 AND PERIOD=5 AND H=C;
ZT1:=H=涨停 AND PERIOD=5 AND H>C;
DT:=C=跌停 AND PERIOD=5 AND L=C;
DT1:=L=跌停 AND PERIOD=5 AND L<C;
{涨停K线颜色设置}
STICKLINE(ZT,C,(O+C)/2,3,0),COLOR000099;
STICKLINE(ZT,C,(O+C)/2,2.2,0),COLOR0000CC;
STICKLINE(ZT,C,(O+C)/2,1.5,0),COLOR0000FF;
STICKLINE(ZT,C,(O+C)/2,0.5,0),COLORCC66FF;
STICKLINE(ZT,O,(O+C)/2,3,0),COLOR999999;
STICKLINE(ZT,O,(O+C)/2,2.2,0),COLORBBBBBB;
STICKLINE(ZT,O,(O+C)/2,1.5,0),COLORDDDDDD;
STICKLINE(ZT,O,(O+C)/2,0.5,0),COLORFFFFFF;
STICKLINE(DT,O,(O+C)/2,3,0),COLOR999999;
STICKLINE(DT,O,(O+C)/2,2.2,0),COLORBBBBBB;
STICKLINE(DT,O,(O+C)/2,1.5,0),COLORDDDDDD;
STICKLINE(DT,O,(O+C)/2,0.5,0),COLORFFFFFF;
STICKLINE(DT,C,(O+C)/2,3,0),COLOR009900;
STICKLINE(DT,C,(O+C)/2,2.2,0),COLOR00BB00;
STICKLINE(DT,C,(O+C)/2,1.5,0),COLOR00DD00;
STICKLINE(DT,C,(O+C)/2,0.5,0),COLOR00FF00;
{曾涨跌停打开K线颜色设置}
STICKLINE(ZT1,C,(O+C)/2,3,0),COLORFF00FF;
STICKLINE(ZT1,C,(O+C)/2,2.2,0),COLORFF00FF;
STICKLINE(ZT1,C,(O+C)/2,1.5,0),COLOR0000FF;
STICKLINE(ZT1,O,(O+C)/2,3,0),COLOR999999;
STICKLINE(ZT1,O,(O+C)/2,2.2,0),COLORBBBBBB;
STICKLINE(ZT1,O,(O+C)/2,1.5,0),COLORDDDDDD;
STICKLINE(DT1,O,(O+C)/2,3,0),COLOR888888;
STICKLINE(DT1,O,(O+C)/2,2.2,0),COLORBBBBBB;
STICKLINE(DT1,O,(O+C)/2,1.5,0),COLORDDDDDD;
STICKLINE(DT1,C,(O+C)/2,3,0),COLOR009900;
STICKLINE(DT1,C,(O+C)/2,2.2,0),COLOR00BB00;
STICKLINE(DT1,C,(O+C)/2,1.5,0),COLOR00DD00;
STICKLINE(DT1,C,(O+C)/2,0.5,0),COLOR00FF00;
DRAWTEXT(ZT AND DT1 AND PERIOD=5,L-0.03,'地天板'),COLORCC00CC;{从跌停到涨停}
DRAWTEXT(DT AND ZT1 AND PERIOD=5,H+0.03,'天地板'),COLOR00CC00;{从涨停到跌停};
DRAWTEXT(DT1,L-0.09,'撬板'),COLORCC00CC;{从涨停到跌停};
DRAWTEXT(ZT1,H+0.03,'炸板'),COLOR00CC00;{从涨停到跌停};
半分:(O+C)/2,NODRAW,COLORWHITE;
高:=REF(HHV(H,72),5);
龙门:REFDATE(高,DATE),COLORWHITE,LINETHICK2;
封成比:IF(涨停,DYNAINFO(58)/DYNAINFO(8),0),NODRAW,COLORYELLOW;
Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,' ');
DRAWTEXT_FIX(ISLASTBAR,0.55,0.9,0,STRCAT(Z3,GNBLOCK)),COLORWHITE;
板块所属:DRAWTEXT_FIX(1,0,0,0,'板块所属：'),COLORYELLOW;
DRAWTEXT_FIX(1,0.06,0,0,FGBLOCK),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0,0.9,0,STRCAT('跟庄概念： ',ZDBLOCK)),COLORFFFF00;
XA_1:=CLOSE*VOL;
XA_2:=EMA((EMA(XA_1,3)/EMA(VOL,3)+EMA(XA_1,6)/EMA(VOL,6)+EMA(XA_1,12)/EMA(VOL,12)+EMA(XA_1,24)/EMA(VOL,24))/4,13);
XA_3:=EMA(CLOSE,9);
妖线:=EMA(XA_3*1.11,5),COLORLIMAGENTA,LINETHICK2;
XA_4:=CLOSE*VOL;
XA_5:=EMA((EXPMA(XA_4,3)/EXPMA(VOL,3)+EXPMA(XA_4,6)/EXPMA(VOL,6)+EXPMA(XA_4,12)/EXPMA(VOL,12)+EXPMA(XA_4,24)/EXPMA(VOL,24))/4,13);
XA_6:=1.13*XA_5;
XA_7:=MA(HIGH,30)*(1+15/100);
XA_8:=CROSS(CLOSE,妖线) AND CLOSE>=REF(CLOSE,1)*1.048;
DRAWICON(CROSS(CLOSE,妖线),LOW*0.99,13);
XA_9:=CROSS(CLOSE,XA_6) AND CLOSE>=REF(CLOSE,1)*1.048;
XA_10:=CROSS(CLOSE,XA_7) AND CLOSE>=REF(CLOSE,1)*1.048;
XA_11:=MA(CLOSE,20);
STICKLINE(CLOSE/REF(CLOSE,1)>=1.09,OPEN,CLOSE,2,0),COLORYELLOW;
STICKLINE((CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>=0.049 AND (CLOSE-REF(CLOSE,1))/REF(CLOSE,1)<0.098,CLOSE,OPEN,2,0),COLORMAGENTA;
XA_12:=MA(CLOSE,5);
XA_13:=MA(CLOSE,8);
XA_14:=MA(CLOSE,13);
XA_15:=MA(CLOSE,21);
XA_16:=MA(CLOSE,34);
XA_17:=MA(CLOSE,50);
XA_18:=OPEN<=XA_12 AND CLOSE>XA_12;
XA_19:=OPEN<=XA_13 AND CLOSE>XA_13;
XA_20:=OPEN<=XA_14 AND CLOSE>XA_14;
XA_21:=OPEN<=XA_15 AND CLOSE>XA_15;
XA_22:=OPEN<=XA_16 AND CLOSE>XA_16;
XA_23:=OPEN<=XA_17 AND CLOSE>XA_17;
XA_24:=XA_18+XA_19+XA_20+XA_21+XA_22+XA_23>4;
XA_25:=CLOSE>OPEN AND CLOSE>REF(CLOSE,1)*1.03 AND CLOSE=HIGH AND XA_24;
DRAWICON(XA_25,LOW*0.98,30);
STICKLINE(XA_25,CLOSE,OPEN,2,0),COLORYELLOW;
STICKLINE(XA_25,CLOSE,OPEN,1.5,0),COLORRED;
STICKLINE(XA_25,CLOSE,LOW,0.02,0),COLORBLACK;
STICKLINE(XA_25,OPEN,LOW,0,0),COLORGREEN;
A:=(3*C+L+O+H)/6;
X:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+REF(A,20))/210;
S2:=SMA(C,3,1);
S6:=SMA(C,5,1);
DK:=2*(S2-S6);
主力成本:=EMA(X,13),LINETHICK1,COLORLIGRAY;
DRAWICON(CROSS(妖线,MA20PY),L,10);
主力线:EMA(COST(90),10),COLORRED,LINETHICK4,POINTDOT;
MA50:=MA(CLOSE,50),COLORYELLOW,LINETHICK4,POINTDOT;
趋势线:((EMA(C,34)+EMA(C,77))/2)*1.2,COLORWHITE,LINETHICK2;
假阴:=REF(C>O,1) AND AMOUNT/V/100>REF(C,1) AND C<O;
假阳:=REF(C<O,1) AND H<REF(O,1) AND C<(REF(O-C,1))/3+REF(C,1) AND AMOUNT/V/100<REF(C,1) AND C&a
[url=http://www.70822.com/soft/sort013/sort05/down-157600.html]庄子捉妖记（通达信公式 主图 源码 测试图）[/url]
[url=http://www.70822.com/soft/sort013/sort05/down-157600.html]庄子捉妖记（通达信公式 主图 源码 测试图）[/url]