通达信量线龙虎榜主图指标源码

[复制链接]
查看315 | 回复0 | 2021-8-28 02:31:42 | 显示全部楼层 |阅读模式

以下是通达信量线龙虎榜主图指标源码(无源码的请下载附件导入)

DRAWTEXT_FIX(ISLASTBAR,0,0,0,HYBLOCK),COLORRED;
 DRAWTEXT_FIX(ISLASTBAR,0.05,0,0,DYBLOCK),COLORRED;
 DRAWTEXT_FIX(ISLASTBAR,0.1,0,0,GNBLOCK),COLORRED;
 X_1:=REF(CLOSE,1);
 X_2:=CLOSE/REF(CLOSE,1)>1.099 AND HIGH>LOW;
 X_3:=IF(CLOSE>=1,10000,100000);
 X_4:=1.1*X_1-49/X_3;
 X_5:=1.05*X_1-49/X_3;
 X_6:=0.9*X_1+51/X_3;
 X_7:=0.95*X_1+51/X_3;
 X_8:=NAMELIKE(2) OR NAMELIKE(3);
 X_9:=IF(X_8,CLOSE>=X_5,CLOSE>=X_4);
 X_10:=IF(X_8,CLOSE<=X_7,CLOSE<=X_6);
 X_11:=IF(X_8,HIGH>=X_5,HIGH>=X_4);
 X_12:=IF(X_8,LOW<=X_7,LOW<=X_6);
 STICKLINE(X_11,HIGH,MAX(CLOSE,OPEN),0,0),COLORYELLOW;
 STICKLINE(X_12,LOW,MIN(CLOSE,OPEN),0,0),COLORLICYAN;
 STICKLINE(X_9,OPEN,CLOSE,1,0),COLORYELLOW;
 STICKLINE(X_10,OPEN,CLOSE,1,0),COLORLICYAN;
 X_13:=UPNDAY(CLOSE,4);
 X_14:=DOWNNDAY(VOL,3);
 X_15:=LLV(LOW,3);
 X_16:=X_13 AND X_14 AND REF(VOL,3)/REF(VOL,4)>=1.9 AND REF(CLOSE,3)>REF(OPEN,4) AND X_15>REF(LOW,3);
 X_17:=REFXV(X_16,3);
 DRAWTEXT(X_17,LOW*0.97,4),COLORMAGENTA;
 X_18:=SUM(CLOSE,3)/3>REF(CLOSE,3) AND REF(CLOSE,3)>REF(OPEN,4) AND REF(CLOSE,3)>REF(CLOSE,4) AND X_15>REF(LOW,3);
 X_19:=SUM(VOL,3)/3<REF(VOL,3) AND REF(VOL,3)>REF(VOL,4);
 X_20:=FILTER(X_18 AND X_19 AND HIGH>LOW,3);
 X_21:=REFXV(X_20,3);
 DRAWTEXT(X_21,LOW*0.99,5),COLORYELLOW;
 STICKLINE(X_21,OPEN,CLOSE,0.8,0),COLORYELLOW;
 X_22:=LOW>REF(HIGH,1) AND X_21 AND HIGH>LOW AND REF(CLOSE,1)>REF(CLOSE,2);
 X_23:=REFXV(X_22,1);
 DRAWTEXT(X_23,LOW*0.99,6),COLORMAGENTA;
 STICKLINE(X_23,OPEN,CLOSE,0.8,0),COLORMAGENTA;
 X_24:=LOW>REF(HIGH,1) AND X_21 AND HIGH>LOW AND REF(CLOSE,1)<REF(CLOSE,2);
 X_25:=REFXV(X_24,1);
 DRAWTEXT(X_25,LOW*0.99,7),COLORLIMAGENTA;
 X_26:=SUM(CLOSE,3)/3>REF(CLOSE,3) AND REF(CLOSE,3)>REF(OPEN,4) AND REF(CLOSE,3)>REF(CLOSE,4) AND X_15>REF(LOW,3);
 X_27:=SUM(VOL,3)/3>REF(VOL,3) AND REF(VOL,3)>REF(VOL,4);
 X_28:=FILTER(X_26 AND X_27 AND HIGH>LOW,3);
 X_29:=REFXV(X_28,3);
 STICKLINE(X_28,X_15,X_15,32,(-1)),COLORYELLOW;
 X_30:=SUM(CLOSE,3)/3<REF(CLOSE,3) AND REF(CLOSE,3)>REF(OPEN,4) AND REF(CLOSE,3)>REF(CLOSE,4) AND X_15>REF(LOW,3);
 X_31:=SUM(VOL,3)/3<REF(VOL,3) AND REF(VOL,3)>REF(VOL,4);
 X_32:=FILTER(X_30 AND X_31 AND HIGH>LOW,3);
 X_33:=REFXV(X_32,3);
 DRAWTEXT(X_33,LOW*0.99,8),COLORGREEN;
 X_34:=AMOUNT/VOL/100;
假阴:OPEN>CLOSE AND X_34>REF(CLOSE,1),NODRAW,COLORRED;
 STICKLINE(假阴,OPEN,CLOSE,1,0),NODRAW,COLORGREEN;
长阴短柱:CLOSE/REF(CLOSE,1)<=0.96 AND VOL<HHV(VOL,30)/1.9,NODRAW,COLORGREEN;
净买入:SIGNALS_USER(299,0),NODRAW;
 DRAWTEXT(净买入>0,LOW*0.965,VARCAT(VARCAT(9,VAR2STR(净买入,0)),10)),COLORYELLOW;
 DRAWTEXT(净买入<0,LOW*0.965,VARCAT(VARCAT(9,VAR2STR(净买入,0)),10)),COLORGREEN;
 X_35:=SIGNALS_USER(352,0);
 DRAWTEXT(X_35>0 OR X_35<0,LOW*1.08,VARCAT(VARCAT(11,VAR2STR(X_35,0)),10)),COLORMAGENTA;
 X_36:=SIGNALS_USER(301,0);
 DRAWTEXT(X_36>0 OR X_36<0,LOW*1.05,VARCAT(VARCAT(12,VAR2STR(X_36,0)),10)),COLORMAGENTA;
 X_37:=SIGNALS_USER(302,0);
 DRAWTEXT(X_37>0 OR X_37<0,LOW*1.08,VARCAT(VARCAT(13,VAR2STR(X_37,0)),10)),COLORMAGENTA;
 X_38:=SIGNALS_USER(303,0);
 DRAWTEXT(X_38>0 OR X_38<0,LOW*1.07,VARCAT(VARCAT(14,VAR2STR(X_38,0)),10)),COLORMAGENTA;
 X_39:=SIGNALS_USER(304,0);
 DRAWTEXT(X_39>0 OR X_39<0,LOW*1.02,VARCAT(VARCAT(15,VAR2STR(X_39,0)),10)),COLORMAGENTA;
 X_40:=SIGNALS_USER(305,0);
 DRAWTEXT(X_40>0 OR X_40<0,LOW,VARCAT(VARCAT(16,VAR2STR(X_40,0)),10)),COLORMAGENTA;
 X_41:=SIGNALS_USER(306,0);
 DRAWTEXT(X_41>0 OR X_41<0,LOW*1.02,VARCAT(VARCAT(17,VAR2STR(X_41,0)),10)),COLORMAGENTA;
 X_42:=SIGNALS_USER(307,0);
 DRAWTEXT(X_42>0 OR X_42<0,LOW*1.04,VARCAT(VARCAT(18,VAR2STR(X_42,0)),10)),COLORMAGENTA;
 X_43:=SIGNALS_USER(308,0);
 DRAWTEXT(X_43>0 OR X_43<0,LOW*1.055,VARCAT(VARCAT(19,VAR2STR(X_43,0)),10)),COLORMAGENTA;
 X_44:=SIGNALS_USER(309,0);
 DRAWTEXT(X_44>0 OR X_44<0,LOW*1.04,VARCAT(VARCAT(20,VAR2STR(X_44,0)),10)),COLORMAGENTA;
 X_45:=SIGNALS_USER(310,0);
 DRAWTEXT(X_45>0 OR X_45<0,LOW*1.04,VARCAT(VARCAT(21,VAR2STR(X_45,0)),10)),COLORMAGENTA;
 X_46:=SIGNALS_USER(311,0);
 DRAWTEXT(X_46>0 OR X_46<0,LOW*1.055,VARCAT(VARCAT(22,VAR2STR(X_46,0)),10)),COLORMAGENTA;
 X_47:=SIGNALS_USER(315,0);
 DRAWTEXT(X_47>0 OR X_47<0,LOW*1.065,VARCAT(VARCAT(23,VAR2STR(X_47,0)),10)),COLORMAGENTA;
 X_48:=SIGNALS_USER(316,0);
 DRAWTEXT(X_48>0 OR X_48<0,LOW*1.075,VARCAT(VARCAT(24,VAR2STR(X_48,0)),10)),COLORMAGENTA;
 X_49:=SIGNALS_USER(318,0);
 DRAWTEXT(X_49>0 OR X_49<0,LOW*1.03,VARCAT(VARCAT(25,VAR2STR(X_49,0)),10)),COLORMAGENTA;
 X_50:=SIGNALS_USER(319,0);
 DRAWTEXT(X_50>0 OR X_50<0,LOW*1.02,VARCAT(VARCAT(26,VAR2STR(X_50,0)),10)),COLORMAGENTA;
 X_51:=SIGNALS_USER(320,0);
 DRAWTEXT(X_51>0 OR X_51<0,LOW*1.03,VARCAT(VARCAT(27,VAR2STR(X_51,0)),10)),COLORMAGENTA;
 X_52:=SIGNALS_USER(321,0);
 DRAWTEXT(X_52>0 OR X_52<0,LOW*1.025,VARCAT(VARCAT(28,VAR2STR(X_52,0)),10)),COLORMAGENTA;
 X_53:=SIGNALS_USER(322,0);
 DRAWTEXT(X_53>0 OR X_53<0,LOW*1.045,VARCAT(VARCAT(29,VAR2STR(X_53,0)),10)),COLORMAGENTA;
 X_54:=SIGNALS_USER(323,0);
 DRAWTEXT(X_54>0 OR X_54<0,LOW*1.01,VARCAT(VARCAT(30,VAR2STR(X_54,0)),10)),COLORMAGENTA;
 X_55:=SIGNALS_USER(324,0);
 DRAWTEXT(X_55>0 OR X_55<0,LOW*1.02,VARCAT(VARCAT(31,VAR2STR(X_55,0)),10)),COLORMAGENTA;
 X_56:=SIGNALS_USER(326,0);
 DRAWTEXT(X_56>0 OR X_56<0,LOW*1.02,VARCAT(VARCAT(32,VAR2STR(X_56,0)),10)),COLORMAGENTA;
 X_57:=SIGNALS_USER(327,0);
 DRAWTEXT(X_57>0 OR X_57<0,LOW*1.02,VARCAT(VARCAT(33,VAR2STR(X_57,0)),10)),COLORMAGENTA;
 X_58:=SIGNALS_USER(328,0);
 DRAWTEXT(X_58>0 OR X_58<0,LOW*1.02,VARCAT(VARCAT(34,VAR2STR(X_58,0)),10)),COLORMAGENTA;
 X_59:=SIGNALS_USER(331,0);
 DRAWTEXT(X_59>0 OR X_59<0,LOW*1.01,VARCAT(VARCAT(35,VAR2STR(X_59,0)),10)),COLORMAGENTA;
 X_60:=SIGNALS_USER(500,0);
 DRAWTEXT(X_60>0 OR X_60<0,LOW*1.09,VARCAT(VARCAT(36,VAR2STR(X_60,0)),10)),COLORMAGENTA;
 X_61:=SIGNALS_USER(501,0);
 DRAWTEXT(X_61>0 OR X_61<0,LOW*1.085,VARCAT(VARCAT(37,VAR2STR(X_61,0)),10)),COLORMAGENTA;
 X_62:=SIGNALS_USER(502,0);
 DRAWTEXT(X_62>0 OR X_62<0,LOW*1.065,VARCAT(VARCAT(38,VAR2STR(X_62,0)),10)),COLORMAGENTA;
 X_63:=SIGNALS_USER(503,0);
 DRAWTEXT(X_63>0 OR X_63<0,LOW*1.045,VARCAT(VARCAT(39,VAR2STR(X_63,0)),10)),COLORMAGENTA;
 X_64:=SIGNALS_USER(504,0);
 DRAWTEXT(X_64>0 OR X_64<0,LOW*1.03,VARCAT(VARCAT(40,VAR2STR(X_64,0)),10)),COLORMAGENTA;
 X_65:=SIGNALS_USER(505,0);
 DRAWTEXT(X_65>0 OR X_65<0,LOW*1.08,VARCAT(VARCAT(41,VAR2STR(X_65,0)),10)),COLORMAGENTA;
 X_66:=SIGNALS_USER(506,0);
 DRAWTEXT(X_66>0 OR X_66<0,LOW*1.085,VARCAT(VARCAT(42,VAR2STR(X_66,0)),10)),COLORMAGENTA;
 X_67:=SIGNALS_USER(507,0);
 DRAWTEXT(X_67>0 OR X_67<0,LOW*1.015,VARCAT(VARCAT(43,VAR2STR(X_67,0)),10)),COLORMAGENTA;
 X_68:=SIGNALS_USER(508,0);
 DRAWTEXT(X_68>0 OR X_68<0,LOW*1.012,VARCAT(VARCAT(44,VAR2STR(X_68,0)),10)),COLORMAGENTA;
 X_69:=SIGNALS_USER(510,0);
 DRAWTEXT(X_69>0 OR X_69<0,LOW*1.01,VARCAT(VARCAT(45,VAR2STR(X_69,0)),10)),COLORMAGENTA;
 X_70:=SIGNALS_USER(511,0);
 DRAWTEXT(X_70>0 OR X_70<0,LOW*1.018,VARCAT(VARCAT(46,VAR2STR(X_70,0)),10)),COLORMAGENTA;
 X_71:=SIGNALS_USER(512,0);
 DRAWTEXT(X_71>0 OR X_71<0,LOW*1.018,VARCAT(VARCAT(47,VAR2STR(X_71,0)),10)),COLORMAGENTA;
 X_72:=SIGNALS_USER(513,0);
 DRAWTEXT(X_72>0 OR X_72<0,LOW*1.023,VARCAT(VARCAT(48,VAR2STR(X_72,0)),10)),COLORMAGENTA;
 X_73:=SIGNALS_USER(514,0);
 DRAWTEXT(X_73>0 OR X_73<0,LOW*1.028,VARCAT(VARCAT(49,VAR2STR(X_73,0)),10)),COLORMAGENTA;
 X_74:=SIGNALS_USER(515,0);
 DRAWTEXT(X_74>0 OR X_74<0,LOW*1.038,VARCAT(VARCAT(50,VAR2STR(X_74,0)),10)),COLORMAGENTA;
 X_75:=SIGNALS_USER(516,0);
 DRAWTEXT(X_75>0 OR X_75<0,LOW*1.048,VARCAT(VARCAT(51,VAR2STR(X_75,0)),10)),COLORMAGENTA;
 X_76:=SIGNALS_USER(517,0);
 DRAWTEXT(X_76>0 OR X_76<0,LOW*1.058,VARCAT(VARCAT(52,VAR2STR(X_76,0)),10)),COLORMAGENTA;
 X_77:=SIGNALS_USER(518,0);
 DRAWTEXT(X_77>0 OR X_77<0,LOW*1.085,VARCAT(VARCAT(53,VAR2STR(X_77,0)),10)),COLORMAGENTA;
 X_78:=SIGNALS_USER(519,0);
 DRAWTEXT(X_78>0 OR X_78<0,LOW*1.078,VARCAT(VARCAT(54,VAR2STR(X_78,0)),10)),COLORMAGENTA;
 X_79:=SIGNALS_USER(520,0);
 DRAWTEXT(X_79>0 OR X_79<0,LOW*1.088,VARCAT(VARCAT(55,VAR2STR(X_79,0)),10)),COLORMAGENTA;
 

83388565.png

83388565.png

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则