全仓买入大智慧L2[大智慧公式]

相关标签:

原理解析：
N赋值:21 M赋值:5 输出天:400,POINTDOT,画蓝色,线宽为4 输出海:100,POINTDOT,画红色,线宽为4 TH赋值:如果收盘价>1日前的收盘价,返回成交量(手),否则返回0的N日累和 TL赋值:如果收盘价<1日前的收盘价,返回成交量(手),否则返回0的N日累和 TQ赋值:如果收盘价=1日前的收盘价,返回成交量(手),否则返回0的N日累和 输出VAR0:100*(TH*2+TQ)/(TL*2+TQ),COLOR0000FF,线宽为2 输出VAR1:VAR0的M日简单移动平均,COLOR00FFFF,线宽为2 W赋值:VAR0上穿VAR1 WL1赋值:VAR1<100 WL2赋值:VAR1<150 AND VAR1>1日前的VAR1 WLT1赋值:W AND WL1 WLT2赋值:W AND WL2 TJ1赋值:WLT1的5日过滤 TJ2赋值:WLT2的8日过滤 当满足条件TJ1时,在0和80位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR000099 当满足条件TJ1时,在0和80位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR0000BB 当满足条件TJ1时,在0和80位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR0000DD 当满足条件TJ1时,在0和80位置之间画柱状线,宽度为0.3,0不为0则画空心柱.,COLOR0000FF 当满足条件TJ1时,在83位置书写文字,COLOR00FFFF 当满足条件TJ2时,在0和50位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR990099 当满足条件TJ2时,在0和50位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLORBB00BB 当满足条件TJ2时,在0和50位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLORDD00DD 当满足条件TJ2时,在0和50位置之间画柱状线,宽度为0.3,0不为0则画空心柱.,COLORFF00FF 当满足条件TJ2时,在53位置书写文字,COLOR00FFFF 输出SAL1:VAR1上穿VAR0 AND VAR1>250 输出SAL2:VAR0>400 输出SAL:SAL1ORSAL2的5日过滤 当满足条件SAL时,在VAR0位置画15号图标

 来源:程序化99（ WWW.CXH99.COM ）

源码：

N:=21; M:=5;
天:400,POINTDOT,COLORBLUE,LINETHICK4;
海:100,POINTDOT,COLORRED,LINETHICK4;
TH:=SUM(IF(CLOSE>REF(CLOSE,1),VOL,0),N);
TL:=SUM(IF(CLOSE<REF(CLOSE,1),VOL,0),N);
TQ:=SUM(IF(CLOSE=REF(CLOSE,1),VOL,0),N);
VAR0:100*(TH*2+TQ)/(TL*2+TQ),COLOR0000FF,LINETHICK2;
VAR1:MA(VAR0,M),COLOR00FFFF,LINETHICK2;
{DRAWBAND(VAR0,RGB(255,0,0),VAR1,RGB(0,0,220));}
W:=CROSS(VAR0,VAR1);
WL1:=VAR1<100;
WL2:=VAR1<150 AND VAR1>REF(VAR1,1);
WLT1:=W AND WL1;
WLT2:=W AND WL2;
TJ1:=FILTER(WLT1,5);
TJ2:=FILTER(WLT2,8);
STICKLINE(TJ1,0,80,4,0),COLOR000099;
STICKLINE(TJ1,0,80,2,0),COLOR0000BB;
STICKLINE(TJ1,0,80,1,0),COLOR0000DD;
STICKLINE(TJ1,0,80,0.3,0),COLOR0000FF;
DRAWTEXT(TJ1,83,'全仓'),COLOR00FFFF;
STICKLINE(TJ2,0,50,4,0),COLOR990099;
STICKLINE(TJ2,0,50,2,0),COLORBB00BB;
STICKLINE(TJ2,0,50,1,0),COLORDD00DD;
STICKLINE(TJ2,0,50,0.3,0),COLORFF00FF;
DRAWTEXT(TJ2,53,'追买'),COLOR00FFFF;
SAL1:CROSS(VAR1,VAR0) AND VAR1>250;
SAL2:VAR0>400;
SAL:FILTER(SAL1 OR SAL2,5);
DRAWICON(SAL,VAR0,15);

公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程】