量学主图+自用成交量主图+副图源码 通达信 贴图
指标功能：[B]国产软件[/B]
指标类型：简体中文
所需积分：0
推荐星级：
授权方式：共享版
公式大小：3.00 KB
更新时间：2018-01-18 19:56:00
公式简介:
超牛主图：
所属地区: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;
自用成交量：
VOLUME:=VOL,VOLSTICK;
V5:MA(VOLUME,5),COLORRED,LINETHICK1;
V35:MA(VOLUME,35),COLORYELLOW,LINETHICK2;
V135:MA(VOLUME,135),COLORWHITE,LINETHICK2;
X_1:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,TOTALFZNUM,1)))));
X_2:=MOD(FROMOPEN,X_1);
X_3:=IF(X_2<0.5,X_1,X_2);
VVOL:IF(CURRBARSCOUNT=1 AND DYNAINFO(8)>1,VOL*X_1/X_3,DRAWNULL),NODRAW;
STICKLINE(CURRBARSCOUNT=1 AND DYNAINFO(8)>1,VVOL,0,(-1),(-1)),COLOR00C0C0;
今日:VOL,VOLSTICK;X_4:=MA(VOL,5);
X_5:=MA(VOL,10);X_6:=MA(VOL,20);
X_7:=MA(VOL,60);
倍量:VOL/REF(VOL,1)>2 AND COUNT(CLOSE>OPEN,1) OR (LOW>REF(HIGH,1) AND COUNT(OPEN>CLOSE,1) AND VOL/REF(VOL,1)>2),COLORCYAN;
STICKLINE(倍量,0,VOL,3,0),COLOR686FFF;
三十地量:LLV(VOL,30)=VOL,COLOR003300;STICKLINE(三十地量,0,VOL,2.4,0),COLOR003300;六十地量:
LLV(VOL,60)=VOL,COLORFFC789;
STICKLINE(六十地量,0,VOL,2.6,0),COLORFFC789;
百日地量:LLV(VOL,100)=VOL,COLORWHITE;
STICKLINE(百日地量,0,VOL,5,0),COLORWHITE;
倍缩量:VOL/REF(VOL,1)<0.5,COLORYELLOW;
STICKLINE(倍缩量,0,VOL,3,0),COLORYELLOW;
缩量涨:COUNT(CLOSE>REF(CLOSE,1),2)=2 AND COUNT(VOL<REF(VOL,1),2)=2,COLORGREEN;
STICKLINE(缩量涨,0,VOL,1.2,0),COLORGREEN;
黑阳:IF(LOW>REF(HIGH,1) AND COUNT(OPEN>CLOSE,1),0.5,0),COLORBLACK;
STICKLINE(黑阳,0,VOL,3,0),COLORBLACK;
红阳:IF(LOW>REF(HIGH,1) AND COUNT(OPEN<CLOSE,1),0.5,0),COLORRED;
STICKLINE(红阳,0,VOL,3,0),COLORRED;
X_8:=DYNAINFO(7);
X_9:=BARSCOUNT(CLOSE);
X_10:=SMA(CLOSE/HHV(HIGH,120),3,1)*100;
X_11:=IF(X_9>20,X_10,0);
X_12:=IF(LOW>X_8,0,IF(HIGH<X_8,1,(X_8-LOW+0.009)/(HIGH-LOW+0.009)));
X_13:=DMA(X_12,VOL/CAPITAL)*60;
X_14:=IF(X_13>0 AND X_13>REF(X_13,1) AND X_11<=88,X_13,0);
X_15:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1);
X_16:=EMA(X_15,8);
X_17:=3*SMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,5,1),3,1);
X_18:=EMA(X_17,3)-10;STICKLINE(X_14>0 AND X_18<40,0,VOL/4,2,0),COLORMAGENTA;
X_19:=DYNAINFO(5);
X_20:=BARSCOUNT(HIGH);
X_21:=SMA(HIGH/HHV(CLOSE,120),3,1)*100;
X_22:=IF(X_20>20,X_21,0);
X_23:=IF(HIGH<X_19,0,IF(LOW>X_19,1,(X_19-HIGH+0.009)/(LOW-HIGH+0.009)));
阳倍量:=1.9;
X_24:=DMA(X_23,VOL/CAPITAL)*60;
X_25:=IF(X_24>0 AND X_24>REF(X_24,1) AND X_22>=88,X_24,0);
X_26:=3*SMA((CLOSE-HHV(HIGH,27))/(LLV(LOW,27)-HHV(HIGH,27))*100,5,1)-2*SMA(SMA((HIGH-HHV(HIGH,27))/(LLV(LOW,27)-HHV(HIGH,27))*100,5,1),3,1);
X_27:=EMA(X_26,8);
X_28:=3*SMA((HIGH-HHV(HIGH,55))/(LLV(LOW,55)-HHV(HIGH,55))*100,5,1)-2*SMA(SMA((HIGH-HHV(HIGH,55))/(LLV(LOW,55)-HHV(HIGH,55))*100,5,1),3,1);
X_29:=EMA(X_28,3)-10;STICKLINE(X_25>0 AND (X_29<20 OR X_29>REF(X_29,1) AND X_29<50),0,VOL/4,2,0),COLORBLUE;
{B2:DRAWICON(CROSS(ZIG(3,6),REF(ZIG(3,6),1)),VOL,1);S2:DRAWICON(CROSS(REF(ZIG(3,4),1),ZIG(3,4)),VOL,2);}
X_30:=MIN(REF(VOL,1),REF(VOL,2));
X_31:=MIN(REF(VOL,3),REF(VOL,4));
X_32:=MIN(REF(VOL,5),REF(VOL,6));
X_33:=MIN(REF(VOL,7),REF(VOL,8));
X_34:=MIN(REF(VOL,9),REF(VOL,10));
X_35:=MIN(REF(VOL,11),REF(VOL,12));
X_36:=MIN(REF(VOL,13),REF(VOL,14));
X_37:=MIN(REF(VOL,15),REF(VOL,16));
X_38:=MIN(MIN(X_30,X_31),MIN(X_32,X_33));
X_39:=MIN(MIN(X_34,X_35),MIN(X_36,X_37));
X_40:=MIN(X_38,X_39);芝麻量:X_40,COLORGREEN;
X_41:=CLOSE>REF(CLOSE,1)*1.093?AND LOW<CLOSE;
X_42:=EXIST(今日<X_40,N);ZT1:今日>X_7;X_43:=DYNAINFO(17)>0;
XG:(X_41 AND X_42 AND ZT1 AND X_43)*VOL*1.3,COLORRED,LINETHICK2;
XG2:(百日地量 AND X_43)*VOL*6,COLORWHITE,LINETHICK2;
XG3:(六十地量 AND X_43)*VOL*4,COLORFFC789,LINETHICK2;
[url=http://www.goodgupiao.com/gupiaogongshi/48880.html][B]量学主图+自用成交量主图+副图源码 通达信 贴图[/B][/url]