量学主图+自用成交量源码 主图+副图 通达信 贴图

所属地区:DRAWTEXT_FIX(1,0,0,0,'地区：'),COLORYELLOW;DRAWTEXT_FIX(1,0.05,0,0,DYBLOCK),COLORYELLOW;
所属行业:DRAWTEXT_FIX(1,0,0.08,0,'行业：'),COLORYELLOW;DRAWTEXT_FIX(1,0.05,0.08,0,HYBLOCK),COLORYELLOW;
所属概念:DRAWTEXT_FIX(1,0,0.16,0,'概念：'),COLORYELLOW;DRAWTEXT_FIX(1,0.05,0.16,0,GNBLOCK),COLORYELLOW;
所属风格:DRAWTEXT_FIX(1,0,0.24,0,'风格：'),COLORYELLOW;DRAWTEXT_FIX(1,0.05,0.24,0,FGBLOCK),COLORYELLOW;


{当前价咯线}
收盘价:REFDATE(C,DATE),DOTLINE,COLORLIGREEN;

{确定基柱}
JZ:=V/REF(V,1)>=1.9 AND C>O ;

{确定将军柱}
A1:=O<MIN(MIN(REFX(L,1),REFX(L,2)),REFX(L,3)) OR O<(REFX(L,1)+REFX(L,2)+REFX(L,3))/3;
JJZ:=JZ AND A1;
STICKLINE(JJZ,C,O,3,0),COLORRED;
DD:=MIN(MIN(REFX(L,1),REFX(L,2)),REFX(L,3));

{确定黄金柱}

A2:=V>REFX(V,1) AND REFX(V,1)>REFX(V,2) AND REFX(V,2)>REFX(V,3);
A3:=C<REFX(L,1) AND REFX(L,1)<REFX(L,2) AND REFX(L,2)<REFX(L,3) AND REFX(C,3)>REFX(O,3);
DRAWICON(JZ AND A2 AND A3,L,1);
STICKLINE(JZ AND A2 AND A3,C,O,3,0),COLORYELLOW;

{画出黄金线}
AA:=REF(DD,BARSLAST(JJZ));
{必杀线}
T1B:=CONST(LLVBARS(LOW,10));
T1HIGH:=CONST(REF(HIGH,T1B));
CC:=CONST(CURRBARSCOUNT);
T2B:=CONST(BARSLAST(CURRBARSCOUNT>CC+T1B AND H>T1HIGH));
T2HIGH:=CONST(REF(HIGH,T2B));
T3:=CONST(BARSLAST(CURRBARSCOUNT>CC+T2B AND HIGH>T2HIGH));
T3HIGH:=CONST(REF(HIGH,T3));
必杀线:DRAWLINE(CURRBARSCOUNT=T3+1, T3HIGH, ISLASTBAR, T3HIGH, 1),COLORRED,LINETHICK3;{,LINETHICK2,COLOR0000FF;}
DRAWTEXT(ISLASTBAR, T3HIGH, '必杀线')LINETHICK1,COLORWHITE;

MA5K:必杀线,COLORYELLOW,LINETHICK1;
EXP7:EMA(CLOSE,7);
VAR2:EMA(C,21),COLORRED,LINETHICK1;
上翘:IF(VAR2>REF(VAR2,1),VAR2,DRAWNULL),,COLORRED,LINETHICK1;
下拐:IF(VAR2<REF(VAR2,1),VAR2,DRAWNULL),COLORGREEN,LINETHICK1; 

VAR1:MA(C,105),COLORRED;
上升:IF(VAR1>REF(VAR1,1),VAR1,DRAWNULL),LINETHICK2,COLORRED;
下降:IF(VAR1<REF(VAR1,1),VAR1,DRAWNULL),LINETHICK2,COLORGREEN;

年线:MA(C,360),COLORWHITE POINTDOT;
IF(年线>=REF(年线,1),年线,DRAWNULL),LINETHICK3,COLORRED;
IF(年线<=REF(年线,1),年线,DRAWNULL),LINETHICK3,COLORGREEN;

P:=8;
KE:=V*(H-L)/REF(C,1);
KEP:=KE=HHV(KE,P);
KUD:=BARSLAST(KEP);
{红评台收:IF(IF(KUD=0,C>REF(C,1),REF(C,KUD)>REF(REF(C,1),KUD)),IF(KUD=0,C,REF(C,KUD)),DRAWNULL),POINTDOT,COLORYELLOW;}
红评台低:IF(IF(KUD=0,C>REF(C,1),REF(C,KUD)>REF(REF(C,1),KUD)),IF(KUD=0,L,REF(L,KUD)),DRAWNULL),POINTDOT,COLORWHITE;
回调警戒:IF(IF(KUD=0,C>REF(C,1),REF(C,KUD)>REF(REF(C,1),KUD)),IF(KUD=0,C-(C-REF(C,1))*0.618,REF(C-(C-REF(C,1))*0.618,KUD)),DRAWNULL),POINTDOT,COLORBLUE;
绿评台收:IF(IF(KUD=0,C<REF(C,1),REF(C,KUD)<REF(REF(C,1),KUD)),IF(KUD=0,C,REF(C,KUD)),DRAWNULL),POINTDOT,COLORGREEN;
企稳警戒:IF(IF(KUD=0,C<REF(C,1),REF(C,KUD)<REF(REF(C,1),KUD)),IF(KUD=0,C+(REF(C,1)-C)*0.618,REF(C+(REF(C,1)-C)*0.618,KUD)),DRAWNULL),POINTDOT,COLORLIRED;
{STICKLINE(IF(KUD=0,C>REF(C,1),REF(C,KUD)>REF(REF(C,1),KUD)),红评台收,红评台收,6,1),COLORYELLOW;}
STICKLINE(IF(KUD=0,C>REF(C,1),REF(C,KUD)>REF(REF(C,1),KUD)),红评台低,红评台低,6,1),COLORWHITE;
STICKLINE(IF(KUD=0,C>REF(C,1),REF(C,KUD)>REF(REF(C,1),KUD)),回调警戒,回调警戒,6,1),COLORBLUE;
STICKLINE(IF(KUD=0,C<REF(C,1),REF(C,KUD)<REF(REF(C,1),KUD)),绿评台收,绿评台收,6,1),COLORGREEN;
STICKLINE(IF(KUD=0,C<REF(C,1),REF(C,KUD)<REF(REF(C,1),KUD)),企稳警戒,企稳警戒,6,1),COLORLIRED;

原理解析：
当满足条件1时,在横轴0纵轴0位置书写文字
当满足条件1时,在横轴0.05纵轴0位置书写文字
当满足条件1时,在横轴0纵轴0.08位置书写文字
当满足条件1时,在横轴0.05纵轴0.08位置书写文字
当满足条件1时,在横轴0纵轴0.16位置书写文字
当满足条件1时,在横轴0.05纵轴0.16位置书写文字
当满足条件1时,在横轴0纵轴0.24位置书写文字
当满足条件1时,在横轴0.05纵轴0.24位置书写文字

输出{当前价咯线}
收盘价:REFDATE(C,DATE),DOTLINE,COLORLIGREEN

{确定基柱}
JZ赋值:V/1日前的V>=1.9 AND C>O

{确定将军柱}
A1赋值:O JJZ赋值:JZ AND A1
当满足条件JJZ时,在C和O之间画柱状线
DD赋值:MIN(MIN(REFX(L,1),REFX(L,2)),REFX(L,3))

{确定黄金柱}

A2赋值:V>REFX(V,1) AND REFX(V,1)>REFX(V,2) AND REFX(V,2)>REFX(V,3)
A3赋值:CREFX(O,3)
当满足条件JZ AND A2 AND A3时,在L和1之间画图标
当满足条件JZ AND A2 AND A3时,在C和O之间画柱状线

{画出黄金线}
AA赋值:REF(DD,上次JJZ距今天数)
{必杀线}
T1B赋值:CONST(LLVBARS(最低价,10))
T1HIGH赋值:CONST(T1B日前的最高价)
CC赋值:CONST( 到最后交易的周期)
T2B赋值:CONST(上次 到最后交易的周期>CC+T1B AND H>T1HIGH距今天数)
T2HIGH赋值:CONST(T2B日前的最高价)
T3赋值:CONST(上次 到最后交易的周期>CC+T2B AND 最高价>T2HIGH距今天数)
T3最高价:=CONST(T3日前的最高价)
输出必杀线:DRAWLINE( 到最后交易的周期=T3+1, T3最高价, ISLASTBAR, T3最高价, 1),画红色, 线宽为3
{, 线宽为2,COLOR0000FF
当满足条件ISLASTBAR时,在 T3最高价和 '必杀线'位置书写文字

输出MA5K:必杀线,画黄色,LINETHICK1
输出EXP7:收盘价的7日指数移动平均
输出VAR2:C的21日指数移动平均,画红色,LINETHICK1
输出上翘:IF(VAR2>1日前的VAR2,VAR2,DRAWNULL),,画红色,LINETHICK1
输出下拐:IF(VAR2<1日前的VAR2,VAR2,DRAWNULL),画绿色,LINETHICK1

输出VAR1:C的105日简单移动平均,画红色
输出上升:IF(VAR1>1日前的VAR1,VAR1,DRAWNULL), 线宽为2,画红色
输出下降:IF(VAR1<1日前的VAR1,VAR1,DRAWNULL), 线宽为2,画绿色

输出年线:C的360日简单移动平均,画白色 POINTDOT
IF(年线>=1日前的年线,年线,DRAWNULL), 线宽为3,画红色
IF(年线<=1日前的年线,年线,DRAWNULL), 线宽为3,画绿色

P赋值:8
KE赋值:V*(H-L)/1日前的C
KEP赋值:KE=P日内KE最高值
KUD赋值:上次KEP距今天数
输出{红评台收:IF(IF(KUD=0,C>1日前的C,KUD日前的C>KUD日前的1日前的C),IF(KUD=0,C,KUD日前的C),DRAWNULL),POINTDOT,画黄色
输出}
红评台低:IF(IF(KUD=0,C>1日前的C,KUD日前的C>KUD日前的1日前的C),IF(KUD=0,L,KUD日前的L),DRAWNULL),POINTDOT,画白色
输出回调警戒:IF(IF(KUD=0,C>1日前的C,KUD日前的C>KUD日前的1日前的C),IF(KUD=0,C-(C-1日前的C)*0.618,REF(C-(C-1日前的C)*0.618,KUD)),DRAWNULL),POINTDOT, 画蓝色
输出绿评台收:IF(IF(KUD=0,C<1日前的C,KUD日前的C 输出企稳警戒:IF(IF(KUD=0,C<1日前的C,KUD日前的C {STICKLINE(IF(KUD=0,C>1日前的C,KUD日前的C>KUD日前的1日前的C),红评台收,红评台收,6,1),画黄色
}
STICKLINE(IF(KUD=0,C>1日前的C,KUD日前的C>KUD日前的1日前的C),红评台低,红评台低,6,1),画白色
STICKLINE(IF(KUD=0,C>1日前的C,KUD日前的C>KUD日前的1日前的C),回调警戒,回调警戒,6,1), 画蓝色
STICKLINE(IF(KUD=0,C<1日前的C,KUD日前的C STICKLINE(IF(KUD=0,C<1日前的C,KUD日前的C