当前位置：分析家公式网 → 股票公式 → 通达信公式 → 一键转帖：跟庄月开主图（通达信公式 主图 源码 测试图）
软件名称：[B]跟庄月开主图（通达信公式 主图 源码 测试图）[/B]
软件类型：国产软件
运行环境：Win10/Win9X/Win8/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：13.0 KB
官方主页：Home Page
更新时间：2021-08-20 00:15:36
软件简介:
跟庄月开主图
需要L2行情支持
请设置计算参数:
P: Param#0 (0.00--500.00)
N: Param#1 (0.00--100.00)
TJ360:=C=HHV(C,150);{黑马线}
TS360:=BARSLAST(TJ360);
HHC360:=REF(C,TS360);
RHHC360:=REF(HHC360,1);
TJ1360:=H>L AND C>RHHC360 ;
CS1360:=BARSLASTCOUNT(TJ1360);
CSS:=COUNT(CS1360=1,60);
MR:=CS1360=1 AND CSS=1;
HMXTS:=BARSLAST(MR);
黑马线:CONST(REF(C,HMXTS)),COLORFFFF00,LINETHICK2;
高:=REF(HHV(H,72),5);
龙门:REFDATE(高,DATE),COLORFFFFFF,LINETHICK2;
大周期:=MA(C,389),COLORWHITE,LINETHICK2;
现价:REFDATE(C,DATE),DOTLINE,COLORLIGRAY;
STICKLINE((BARSLAST(MONTH!=REF(MONTH,1) OR DATETODAY(DATE)=1))+1=1,H#MONTH,L#MONTH,0,-1),COLORGREEN;
月开:REF(O,BARSLAST(MONTH!=REF(MONTH,1))),COLORRED,NODRAW;
月线:=MA(C,21);
MN1:=REF(MONTH,1)=IF(MONTH=1,12,MONTH-1);
月开票:=MN1 AND 年庄模型.周线差>80 AND BETWEEN(C,月线*0.9,月线*1.3);
月高:=DRAWLINE(月开票,H,REF(月开票,1),REF(H,1),-1),DOTLINE,COLORLIGREEN;
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;{从涨停到跌停};
WIN:=IF(WINNER(CLOSE),WINNER(CLOSE)*100,0),NODRAW;
STICKLINE(C>月开,月开,月开,5,0),COLORRED;
STICKLINE(C<月开,月开,月开,5,0),COLORFFFF00;
STICKLINE(C=月开,月开,月开,5,0),COLORWHITE;
小月线:=MA(C,20);
DRAWBAND(月线,RGB(0,200,0),小月线,RGB(250,0,0));
MCST:=DMA(AMOUNT/(100*V),V/CAPITAL),COLORFC9F99;
妖线:=EMA(EMA(C,9)*1.11,5),COLORYELLOW,DOTLINE;
XA8:=CROSS(C,妖线) AND C>=REF(C,1)*1.048;
DRAWICON(XA8,L*0.99,13);
连阴:=COUNT((C<REF(C,1) OR L<REF(L,1)),10)>=5;
间谍柱:=REF(连阴,1) AND (DT OR DT1);
卧龙根价:=DRAWLINE(间谍柱,(C+O)/2,REF(间谍柱,1),REF((C+O)/2,1),1),COLOR55FFCC;
CC:=DRAWLINE(间谍柱,C,REF(间谍柱,1),REF(C,1),1),DOTLINE,COLOR09FFCF;
月开乖离:H/月开,COLORGREEN,NODRAW;
MA5:=MA(C,5);
乖离5:H/MA5,COLORRED,NODRAW;
高低比:HHV(H,20)/LLV(L,20),NODRAW;
DRAWICON(高低比>=1.6 AND 乖离5>1.35,H*0.99,2);
DRAWTEXT(FILTER(月开乖离>=1.72,5),H*1.039,'山'),COLORGREEN;
LB:=REF(EVERY(ZT,3),2) AND REF(H=HHV(H,20),1) AND H<REF(H,1);
LBQ:=BARSLAST(LB);
打折:REF(H,LBQ+1)*0.7,NODRAW,COLORWHITE;
SLB:=EVERY(ZT,3);
KK2:=SUMBARS(REFX(SLB,1),1);
STICKLINE(KK2,REF(C,KK2-1),REF(C,KK2-1),5,0),COLORFFCC99;
龙回头天数:=SUMBARS(REFX(SLB,1),1)-2,NODRAW,COLORFF00FF;
半分:(C+O)/2,NODRAW;
DRAWTEXT(REFX(NOT(ZT),1) AND SLB,REF(C,1),'回头线');
STICKLINE(打折,打折,打折,5,0),COLORFFFF44;
Q3:=STRCAT(CON2STR(打折,2),'打折线');
DRAWTEXT(ISLASTBAR,打折,VARCAT(VARCAT('打折价',VAR2STR(打折,2)),'元'))COLORFFFF00;
STICKLINE(CURRBARSCOUNT=4,C,C,25,0),COLORWHITE;
DRAWTEXT(CURRBARSCOUNT=5,REF(L-0.02,1),' ◇'),COLORWHITE;
DRAWNUMBER(CURRBARSCOUNT=4,L*0.99,C),COLORWHITE;
阴:=AMOUNT/V/100>REF(C,1) AND C<O;
阳:=H<REF(O,1) AND C<(REF(O-C,1))/3+REF(C,1) AND AMOUNT/V/100<REF(C,1) AND C>O;
假阴:=AMOUNT/V/100>REF(C,1) AND C<O;
假阳:=AMOUNT/V/100<REF(C,1) AND C>O;
STICKLINE(假阴,O,C,0.2,0),COLORRED;{假阴柱};
STICKLINE(假阳,O,C,0.7,0),COLORLIGREEN;{假阳};
收阴:=(C<REF(C,1) OR L<REF(L,1) OR AMOUNT/V/100<REF((C+O)/2,1)) AND O<=REF(C,1);
多阴:=EVERY(收阴,2);
小阳:=O-L<=0.03 AND H>C AND C>O AND O<REF(C,1) AND C<REF(MAX(C,O),1) AND V<REF(V,1);
宝莲灯:=REF(多阴,1) AND 小阳;
STICKLINE(宝莲灯,O,C,2.5,0),COLORCC22FF;
STICKLINE(宝莲灯,(O+C)/2,(O+C)/2+0.02,1.8,0),COLORWHITE;
SY:=H/MAX(C,O);
必跌形态:=EVERY((L>REF(L,1) OR H>REF(H,1)) AND SY>1.02,4);
DRAWTEXT(必跌形态,H*0.98,'卖'),COLORCCFF00;
A:=BARSLAST(WEEKOFYEAR!=REF(WEEKOFYEAR,1));
DRAWTEXT(A+1,H,'Z');
DRAWTEXT(CROSS(C,月高) OR (REF(月开票,1) AND C>REF(C,1)),L*0.98,'牛');
DFL:=L=LLV(L,10) AND L<REF(L,1) AND L<REFX(L,1) AND REFX(C,1)>REF(C,1) AND REFX(C>O,1);
DRAWTEXT(DF
[url=http://www.70822.com/soft/sort013/sort05/down-157598.html]跟庄月开主图（通达信公式 主图 源码 测试图）[/url]
[url=http://www.70822.com/soft/sort013/sort05/down-157598.html]跟庄月开主图（通达信公式 主图 源码 测试图）[/url]