ZGL分时主图(九转分时) 转载和谐完全加密通达信指标!

[复制链接]
查看48 | 回复0 | 2022-6-27 22:11:19 | 显示全部楼层 |阅读模式

 {公式名称: ZGL分时主图

公式描述: ZGL分时主图}
 
VAR1:=CLOSE>REF(CLOSE,4);
VAR2:=BARSLASTCOUNT(VAR1);
VAR3:=VAR2=9;
VAR4:=ISLASTBAR AND BETWEEN(VAR2,1,8);
VAR5:=(BACKSET(VAR3>0,9) OR BACKSET(VAR4>0,VAR2))*VAR2;
DRAWTEXT(VAR5>0,HIGH*1.02,VAR2STR(VAR5,0)),COLORMAGENTA;
DRAWNUMBER(VAR2=9,HIGH*1.02,9),COLORGREEN;
VAR6:=CLOSE<REF(CLOSE,4);
VAR7:=BARSLASTCOUNT(VAR6);
VAR8:=VAR7=9;{www.70822.com}
VAR9:=ISLASTBAR AND BETWEEN(VAR7,1,8);
VAR10:=(BACKSET(VAR8>0,9) OR BACKSET(VAR9>0,VAR7))*VAR7;
DRAWTEXT(VAR10>0,LOW*0.98,VAR2STR(VAR10,0)),COLORMAGENTA;
DRAWNUMBER(VAR7=9,LOW*0.98,9),COLORGREEN;
VAR11:=CONST(MA2.MA1#DAY);
VAR12:=CONST(MA2.MA2#DAY);
VAR13:=CONST(MA2.MA3#DAY);
VAR14:=CONST(MA2.MA4#DAY);
VAR15:=CONST(MA2.MA5#DAY);
VAR16:=CONST(MA2.MA6#DAY);
VAR17:=CONST(MA2.MA7#DAY);
VAR18:=(-0.015);
VAR19:=0.015;
VAR20:=DYNAINFO(3);
VAR21:=(VAR20-VAR11)/VAR20;
VAR22:=(VAR20-VAR12)/VAR20;
VAR23:=(VAR20-VAR13)/VAR20;
VAR24:=(VAR20-VAR14)/VAR20;
VAR25:=(VAR20-VAR15)/VAR20;
VAR26:=(VAR20-VAR16)/VAR20;
VAR27:=(VAR20-VAR17)/VAR20;
VAR28:=(-0.02);
VAR29:=0.02;
VAR30:=DYNAINFO(5);
VAR31:=(VAR30-VAR11)/VAR30;
VAR32:=(VAR30-VAR12)/VAR30;
VAR33:=(VAR30-VAR13)/VAR30;
VAR34:=(VAR30-VAR14)/VAR30;
VAR35:=(VAR30-VAR15)/VAR30;
VAR36:=(VAR30-VAR16)/VAR30;
VAR37:=(VAR30-VAR17)/VAR30;
压力5:IF(RANGE(VAR21,0,VAR19)=1 OR RANGE(VAR31,0,VAR29)=1,VAR11,DRAWNULL),COLORGREEN;
支撑5:IF(RANGE(VAR21,VAR18,0)=1 OR RANGE(VAR31,VAR28,0)=1,VAR11,DRAWNULL),COLORMAGENTA;
压力10:IF(RANGE(VAR22,0,VAR19)=1 OR RANGE(VAR32,0,VAR29)=1,VAR12,DRAWNULL),COLORGREEN;
支撑10:IF(RANGE(VAR22,VAR18,0)=1 OR RANGE(VAR32,VAR28,0)=1,VAR12,DRAWNULL),COLORMAGENTA;
压力20:IF(RANGE(VAR23,0,VAR19)=1 OR RANGE(VAR33,0,VAR29)=1,VAR13,DRAWNULL),COLORGREEN;
支撑20:IF(RANGE(VAR23,VAR18,0)=1 OR RANGE(VAR33,VAR28,0)=1,VAR13,DRAWNULL),COLORMAGENTA;
压力30:IF(RANGE(VAR24,0,VAR19)=1 OR RANGE(VAR34,0,VAR29)=1,VAR14,DRAWNULL),COLORGREEN;
支撑30:IF(RANGE(VAR24,VAR18,0)=1 OR RANGE(VAR34,VAR28,0)=1,VAR14,DRAWNULL),COLORMAGENTA;
压力60:IF(RANGE(VAR25,0,VAR19)=1 OR RANGE(VAR35,0,VAR29)=1,VAR15,DRAWNULL),COLORGREEN;
支撑60:IF(RANGE(VAR25,VAR18,0)=1 OR RANGE(VAR35,VAR28,0)=1,VAR15,DRAWNULL),COLORMAGENTA;
压力120:IF(RANGE(VAR26,0,VAR19)=1 OR RANGE(VAR36,0,VAR29)=1,VAR16,DRAWNULL),COLORGREEN;
支撑120:IF(RANGE(VAR26,VAR18,0)=1 OR RANGE(VAR36,VAR28,0)=1,VAR16,DRAWNULL),COLORMAGENTA;
压力250:IF(RANGE(VAR27,0,VAR19)=1 OR RANGE(VAR37,0,VAR29)=1,VAR17,DRAWNULL),COLORGREEN;
支撑250:IF(RANGE(VAR27,VAR18,0)=1 OR RANGE(VAR37,VAR28,0)=1,VAR17,DRAWNULL),COLORMAGENTA;
VAR38:=CONST(MA2.MA1#WEEK);
VAR39:=CONST(MA2.MA2#WEEK);
VAR40:=CONST(MA2.MA3#WEEK);
VAR41:=CONST(MA2.MA4#WEEK);
VAR42:=CONST(MA2.MA5#WEEK);
VAR43:=CONST(MA2.MA6#WEEK);
VAR44:=CONST(MA2.MA7#WEEK);
VAR45:=(VAR30-VAR38)/VAR30;
VAR46:=(VAR30-VAR39)/VAR30;
VAR47:=(VAR30-VAR40)/VAR30;
VAR48:=(VAR30-VAR41)/VAR30;
VAR49:=(VAR30-VAR42)/VAR30;
VAR50:=(VAR30-VAR43)/VAR30;
VAR51:=(VAR30-VAR44)/VAR30;
VAR52:=(VAR20-VAR38)/VAR20;
VAR53:=(VAR20-VAR39)/VAR20;
VAR54:=(VAR20-VAR40)/VAR20;
VAR55:=(VAR20-VAR41)/VAR20;
VAR56:=(VAR20-VAR42)/VAR20;
VAR57:=(VAR20-VAR43)/VAR20;
VAR58:=(VAR20-VAR44)/VAR20;
压力250Z:IF(RANGE(VAR58,0,VAR19)=1 OR RANGE(VAR51,0,VAR29)=1,VAR44,DRAWNULL),COLORWHITE;
支撑250Z:IF(RANGE(VAR58,VAR18,0)=1 OR RANGE(VAR51,VAR28,0)=1,VAR44,DRAWNULL),COLORYELLOW;
压力120Z:IF(RANGE(VAR57,0,VAR19)=1 OR RANGE(VAR50,0,VAR29)=1,VAR43,DRAWNULL),COLORWHITE;
支撑120Z:IF(RANGE(VAR57,VAR18,0)=1 OR RANGE(VAR50,VAR28,0)=1,VAR43,DRAWNULL),COLORYELLOW;
压力60Z:IF(RANGE(VAR56,0,VAR19)=1 OR RANGE(VAR49,0,VAR29)=1,VAR42,DRAWNULL),COLORWHITE;
支撑60Z:IF(RANGE(VAR56,VAR18,0)=1 OR RANGE(VAR49,VAR28,0)=1,VAR42,DRAWNULL),COLORYELLOW;
压力30Z:IF(RANGE(VAR55,0,VAR19)=1 OR RANGE(VAR48,0,VAR29)=1,VAR41,DRAWNULL),COLORWHITE;
支撑30Z:IF(RANGE(VAR55,VAR18,0)=1 OR RANGE(VAR48,VAR28,0)=1,VAR41,DRAWNULL),COLORYELLOW;
压力20Z:IF(RANGE(VAR54,0,VAR19)=1 OR RANGE(VAR47,0,VAR29)=1,VAR40,DRAWNULL),COLORWHITE;
支撑20Z:IF(RANGE(VAR54,VAR18,0)=1 OR RANGE(VAR47,VAR28,0)=1,VAR40,DRAWNULL),COLORYELLOW;
压力10Z:IF(RANGE(VAR53,0,VAR19)=1 OR RANGE(VAR46,0,VAR29)=1,VAR39,DRAWNULL),COLORWHITE;
支撑10Z:IF(RANGE(VAR53,VAR18,0)=1 OR RANGE(VAR46,VAR28,0)=1,VAR39,DRAWNULL),COLORYELLOW;
压力5Z:IF(RANGE(VAR52,0,VAR19)=1 OR RANGE(VAR45,0,VAR29)=1,VAR38,DRAWNULL),COLORWHITE;
支撑5Z:IF(RANGE(VAR52,VAR18,0)=1 OR RANGE(VAR45,VAR28,0)=1,VAR38,DRAWNULL),COLORYELLOW;
VAR59:=CONST(DYNAINFO(3));
DIF:5*(EMA(CLOSE,12)-EMA(CLOSE,26))+VAR59,DOTLINE,COLORMAGENTA;
DEA:EMA(DIF,9),DOTLINE,COLORLIBLUE;
VAR60:=MACD.MACD;
VAR61:=VAR60>0 AND VAR60<REF(VAR60,1);
VAR62:=VAR60<0 AND VAR60>REF(VAR60,1);
VAR63:=SUM(CLOSE*VOL,240)/SUM(VOL,240);
VAR64:=(CLOSE-VAR63)/VAR63;
VAR65:=VAR64*100;
STICKLINE(VAR64>0,DYNAINFO(3),DYNAINFO(3)*(1+VAR64),0.5,0),COLORRED;
STICKLINE(VAR64<0,DYNAINFO(3),DYNAINFO(3)*(1+VAR64),0.5,0),COLORGREEN;
DRAWNUMBER(ISLASTBAR,CLOSE*1.005,CONST(VAR65)),COLORMAGENTA;
VAR66:=VAR65>1;
VAR67:=VAR65<(-1);
VAR68:=100-100*(HHV(HIGH,12)-CLOSE)/(HHV(HIGH,12)-LLV(LOW,12));
VAR69:=REF(VAR68,1)>95;
VAR70:=REF(VAR68,1)<5;
VAR71:=REF(VAR68,1)=100 AND VAR68<100;
VAR72:=REF(VAR68,1)=0 AND VAR68>0;
VAR73:=MA(CLOSE,5)>0;
VAR74:=WINNER(CLOSE)*100;
DRAWNUMBER(ISLASTBAR,CLOSE,CONST(WINNER(CLOSE)*100)),COLORGREEN;
VAR75:=REF(VAR74,1)>95 AND VAR74<REF(VAR74,1) AND REF(VAR74,1)>REF(VAR74,2);
VAR76:=REF(VAR74,1)<5 AND VAR74>REF(VAR74,1) AND REF(VAR74,1)<REF(VAR74,2);
DRAWNUMBER(ISLASTBAR,CLOSE*0.995,CONST(DYNAINFO(13)*100)),COLORYELLOW;
VAR77:=DYNAINFO(13)*100;
VAR78:=VAR77>2;
VAR79:=LLV(LOW,100);
VAR80:=HHV(HIGH,250);
VAR81:=EMA((CLOSE-VAR79)/(VAR80-VAR79)*4,4);
VAR82:=0.3;
VAR83:=3.5;
VAR84:=REF(VAR81,1)>3.5;
VAR85:=REF(VAR81,1)<0.5;
VAR86:=(HIGH+LOW+CLOSE)/3;
VAR87:=(VAR86-MA(VAR86,10))/(0.015*AVEDEV(VAR86,10));
VAR88:=REF(VAR87,1)>100;
{www.70822.com}
VAR89:=REF(VAR87,1)<(-100);
VAR90:=CLOSE<REF(CLOSE,1) AND REF(CLOSE,1)>REF(CLOSE,2) AND REF(CLOSE,1)=HHV(HIGH,5);
VAR91:=CLOSE>REF(CLOSE,1) AND REF(CLOSE,1)<REF(CLOSE,2) AND REF(CLOSE,1)=LLV(LOW,5);
DRAWICON(VAR73 AND REF(VAR74,1)=0 AND VAR74>REF(VAR74,1) AND VAR65<=(-2),CLOSE*0.98,26),COLORRED;
DRAWICON(VAR73 AND REF(VAR74,1)=100 AND VAR74<REF(VAR74,1) AND VAR65>=2,CLOSE*1.02,27),COLORGREEN;
DRAWICON(VAR73 AND VAR70 AND VAR62 AND VAR85 AND VAR76 AND VAR89 AND VAR67 AND VAR91,CLOSE*0.99,1),COLORMAGENTA;

p20185111464144914.jpg

p20185111464144914.jpg

20185111465167156.rar

6.71 KB, 下载次数: 0

售价: 3 金钱  [记录]  [购买]

20185111465167156.rar

回复

使用道具 举报

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

本版积分规则