通达信暴力主图指标 源码 贴图

VAR1:=EMA(CLOSE,3);
VAR2:=EMA(CLOSE,26);
VAR3:=VAR1-VAR2;{公式网WWW.GPXIAZAI.COM}
牵牛线:EMA(EMA(EMA(CLOSE,3),3),3)+VAR3,COLORWHITE;
寻牛线:MA(MA(LOW,3),3),COLORMAGENTA;
VAR4:=HHV(寻牛线,60);
DRAWBAND(牵牛线,RGB(85,0,0),VAR4,RGB(45,0,140));
DRAWBAND(寻牛线,RGB(0,65,45),VAR4,RGB(0,65,0));
上箱顶:HHV(MA(MA(LOW,3),3),60)LINETHICK3,COLORYELLOW;
下箱底:LLV(寻牛线,20)LINETHICK3,COLORFFBB00;
VAR5:=EMA(CLOSE,6)-EMA(CLOSE,13);
VAR6:=EMA(VAR5,20);
VAR7:=HHV(VAR5,20);
VAR8:=LLV(VAR5,20);
VAR9:=REF(VAR7,1);
VAR10:=REF(VAR8,1);
VAR11:=BARSCOUNT(C)>5;
VAR12:=REF(C,1);
VAR13:=(H-VAR12+0.01)/VAR12*100;
VAR14:=(VAR12-L+0.01)/VAR12*100;
VAR15:=VAR13>=5 AND VAR11 AND C=H;
VAR16:=VAR14>=5 AND VAR11 AND C=L;
VAR17:=VAR13>=10 AND VAR11 AND C=H;
VAR18:=VAR14>=10 AND VAR11 AND C=L;
VAR19:=VAR13>=20 AND VAR11 AND C=H;
VAR20:=VAR14>=20 AND VAR11 AND C=L;
VAR21:=IF(INBLOCK('科创板'),VAR19,IF(INBLOCK('创业板') AND DATE>1200823,VAR19,IF(INBLOCK('ST板块'),VAR15,VAR17)));
VAR22:=IF(INBLOCK('科创板'),VAR20,IF(INBLOCK('创业板') AND DATE>1200823,VAR20,IF(INBLOCK('ST板块'),VAR16,VAR18)));
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
STICKLINE(VAR21,OPEN,CLOSE,2.6,0),COLOR0000E5;
STICKLINE(VAR21,OPEN,CLOSE,2.4,0),COLOR335555;
STICKLINE(VAR21,OPEN,CLOSE,1.8,0),COLOR338888;
STICKLINE(VAR21,OPEN,CLOSE,1.2,0),COLOR33AAAA;
STICKLINE(VAR21,OPEN,CLOSE,0.6,0),COLOR33CCCC;
STICKLINE(VAR21,OPEN,CLOSE,0.1,0),COLOR33EEEE;
STICKLINE(VAR22,C,O,2.5,0),COLOR009900;
STICKLINE(VAR22,C,O,1.5,0),COLOR00BB00;
STICKLINE(VAR22,C,O,0.8,0),COLOR00DD00;
STICKLINE(VAR22,C,O,0.1,0),COLOR00FF00;
VAR23:=MA(CLOSE,1);
VAR24:=SMA(SMA(SMA(VAR23,2,1),2,1),2,1),NODRAW;
VAR25:=MA(VAR24,3),NODRAW;
VAR26:=MA((L+H+C)/3,5);
起飞加速线:HHV(VAR26,60)DOTLINE,COLORLIRED;
VAR27:=EMA(CLOSE,6)-EMA(CLOSE,13) COLORWHITE,LINETHICK2;
VAR28:=EMA(VAR27,5) COLORYELLOW,LINETHICK1;
VAR29:=(VAR27-VAR28)*2;
VAR30:=VAR29<0 AND CROSS(VAR28,VAR27) AND CROSS(起飞加速线,C) AND 起飞加速线=REF(起飞加速线,1);
VAR31:=REF(CLOSE,1);
VAR32:=SMA(MAX(CLOSE-VAR31,0),6,1)/SMA(ABS(CLOSE-VAR31),6,1)*100;
VAR33:=CROSS(84,VAR32) AND 起飞加速线=REF(起飞加速线,1) AND C< REF(L,1);
VAR34:=CROSS(VAR25,VAR24) AND C< 起飞加速线 AND C< REF(L,1);
VAR35:=7*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1) -3*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1),3,1) -SMA(SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1) ,3,1),2,1);
VAR36:=78.89;
DRAWTEXT(CROSS(VAR36,VAR35) AND C< 起飞加速线 AND CROSS(VAR25,VAR24),H*1.06,'↙⊙逃顶'),COLORLIBLUE;
VAR37:=VAR24< REF(VAR24,1) AND VAR25>REF(VAR25,1);
STICKLINE(VAR37 AND (VAR33 OR VAR34),C,O,2.5,0),COLORFF2200;
STICKLINE(VAR37 AND (VAR33 OR VAR34),C,O,1.5,0),COLORFF4400;
STICKLINE(VAR37 AND (VAR33 OR VAR34),C,O,0.8,0),COLORFF6600;
STICKLINE(VAR37 AND (VAR33 OR VAR34),C,O,0.1,0),COLORFF8800;
STICKLINE(VAR37 AND (VAR33 OR VAR34),C,O,0.5,0),COLORFFAA00;
VAR38:=AMOUNT,VOLSTICK;
VAR39:=1.9;
VAR40:=VAR38>=REF(VAR38,1)*VAR39 AND (IF(C< O,C>REF(C,1),1)),COLORYELLOW,NODRAW;
VAR41:=(CLOSE-LLV(LOW,80))/(HHV(HIGH,80)-LLV(LOW,80))*200;
VAR42:=SMA(VAR41,3,1);
VAR43:=SMA(VAR42,3,1);
VAR44:=3*VAR42-2*VAR43;
VAR45:=LLV(LOW,5);
VAR46:=HHV(HIGH,5);
VAR47:=EMA((CLOSE-VAR45)/(VAR46-VAR45)*100,4)*2;
VAR48:=EMA(0.667*REF(VAR47,1)+0.333*VAR47,2);
VAR49:=3*VAR47-2*VAR48;
VAR50:=POW(MA(CLOSE,5),2)+MA(CLOSE,5);
VAR51:=POW(MA(LOW,5),2)+MA(LOW,5);
VAR52:=POW(MA(HIGH,5),2)+MA(HIGH,5);
VAR53:=(VAR50-LLV(VAR51,64))/(HHV(VAR52,64)-LLV(VAR51,64))*150+65-10;
VAR54:=SMA(VAR53,3,1)*1.5-100;
VAR55:=SMA(VAR54,3,1);
VAR56:=3*VAR54-2*VAR55;
VAR57:=(HIGH+LOW+CLOSE*2)/4;
VAR58:=EMA(VAR57,13);
VAR59:=STD(VAR57,13);
VAR60:=(VAR57-VAR58)*100/VAR59;
VAR61:=EMA(VAR60,5);
VAR62:=EMA(VAR61,13)+200-100;
VAR63:=EMA(VAR62,10);
VAR64:=3*VAR62-2*VAR63;
VAR65:=VAR42+VAR47+VAR54+VAR62;
VAR66:=VAR43+VAR48+VAR55+VAR63;
VAR67:=VAR44+VAR49+VAR56+VAR64;
VAR68:=(HIGH+LOW+CLOSE)/3;
VAR69:=(VAR68-MA(VAR68,34))/(0.015*AVEDEV(VAR68,34));
VAR70:=(HIGH+LOW+CLOSE+VAR68)/4;
VAR71:=EMA(VAR70,24);
VAR72:=STD(VAR70,24);
VAR73:=(VAR70-VAR71)/VAR72*100;
VAR74:=(VAR68-MA(VAR68,24))/(0.015*AVEDEV(VAR68,24));
VAR75:=EMA(VAR73,5);
VAR76:=((VAR75+VAR74+VAR69)/3+165)/4;
VAR77:=(VAR65+VAR66+VAR67*30)/32/5-15;
VAR78:=(VAR76+VAR77)/2/1.1;
VAR79:=EMA(VAR78,3)LINETHICK3,COLORRED;
VAR80:=EMA(VAR79,5)LINETHICK3,COLORWHITE;
VAR81:=CROSS(VAR79,VAR80);
VAR82:=REF(C,5);
IF(寻牛线>=REF(上箱顶,1),寻牛线,DRAWNULL),COLORRED,LINETHICK3;
IF(寻牛线<=REF(上箱顶,1),寻牛线,DRAWNULL),COLORGREEN,LINETHICK3;
IF(牵牛线>=REF(下箱底,1),牵牛线,DRAWNULL),COLORWHITE;
IF(牵牛线>=REF(上箱顶,1),牵牛线,DRAWNULL),COLORWHITE,LINETHICK2;
IF(牵牛线<=REF(下箱底,1),牵牛线,DRAWNULL)DOTLINE,COLORWHITE;
STICKLINE(CROSS(牵牛线,上箱顶) AND CROSS(C,上箱顶),OPEN,CLOSE,2,0),COLOR66EEEE;
STICKLINE(CROSS(牵牛线,上箱顶) AND CROSS(C,上箱顶),OPEN,CLOSE,1,0),COLORMAGENTA;
STICKLINE(CROSS(牵牛线,上箱顶) AND CROSS(C,上箱顶),OPEN,CLOSE,0,1),COLOR8B8BFF;
DRAWTEXT(CROSS(牵牛线,下箱底),下箱底,'↖抄底反弹'),COLORRED;
VAR84:=1230923;{公式网WWW.GPXIAZAI.COM}
今涨停:IF(DATE<VAR84,ZTPRICE(REF(C,1),IF(CODELIKE('688'),0.2,IF(NAMEINCLUDE('S'),0.05,0.1))),ZTPRICE(REF(C,1),IF(CODELIKE('688') OR CODELIKE('300'),0.2,IF(NAMEINCLUDE('S'),0.05,0.1)))),NODRAW,COLORRED;
今跌停:IF(DATE<VAR84,DTPRICE(REF(C,1),IF(CODELIKE('688'),0.2,IF(NAMEINCLUDE('S'),0.05,0.1))),DTPRICE(REF(C,1),IF(CODELIKE('688') OR CODELIKE('300'),0.2,IF(NAMEINCLUDE('S'),0.05,0.1)))),NODRAW,COLORGREEN;
明涨停:IF(DATE<VAR84,C*IF(CODELIKE('688'),1.2,IF(NAMEINCLUDE('S'),1.05,1.1)),C*(IF(CODELIKE('688') OR CODELIKE('300'),1.2,IF(NAMEINCLUDE('S'),1.05,1.1)))),NODRAW,COLORMAGENTA;
明跌停:IF(DATE<VAR84,C*IF(CODELIKE('688'),0.8,IF(NAMEINCLUDE('S'),0.45,0.9)),C*(IF(CODELIKE('688') OR CODELIKE('300'),0.8,IF(NAMEINCLUDE('S'),0.45,0.9)))),NODRAW,COLORFFFF00;
VAR85:=(REF(CLOSE,3)-CLOSE)/REF(CLOSE,3)*100>5;
VAR86:=FILTER(VAR85,10);
VAR87:=BARSLAST(VAR86);
VAR88:=REF(HIGH,VAR87+2);
VAR89:=REF(HIGH,VAR87+1);
VAR90:=REF(HIGH,VAR87);
VAR91:=MAX(VAR88,VAR89);
VAR92:=MAX(VAR91,VAR90);
VAR93:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>5;
VAR94:=VAR87<150;
VAR95:=(OPEN-VAR92)/VAR92*100<30;
VAR96:=(CLOSE-LLV(LOW,VAR87))/LLV(LOW,VAR87)*100<50;
VAR97:=(CLOSE-REF(OPEN,5))/REF(OPEN,5)*100<30;
VAR98:=VOL/MA(VOL,5)<3.5;
VAR99:=(CLOSE-REF(CLOSE,89))/REF(CLOSE,89)*100<80;
V1:=VAR93 AND VAR94 AND VAR95 AND VAR96 AND VAR97 AND VAR98 AND VAR99;
V2:=FILTER(V1,15);
VAR100:=MA(CLOSE,10);
VAR101:=MA(CLOSE,54);
VAR102:=(((CLOSE-VAR101)/VAR101)<0.1);
VAR103:=(((CLOSE-VAR100)/VAR100)<0.3);
VAR104:=(((VAR102=1) AND (VAR103=1))*0.2);
VAR105:=((((VAR104=0) AND (REF(VAR104,1)=0.2)) AND (REF((COUNT((VAR104=0.2),10)=10),1)=1))*-0.1);
V3:=VAR105=-0.1;
VAR106:=V2 OR V3;
VAR107:=DYNAINFO(7)/(REF(CLOSE,1))>1.05 AND (DYNAINFO(7)/O>1.05);
VAR108:=(VOL/REF(VOL,1)>1.2 AND COUNT(CLOSE>OPEN,1)) OR (LOW>REF(HIGH,1) AND COUNT(OPEN>CLOSE,1) AND VOL/REF(VOL,1)>1.2);
VAR109:=VAR106 AND VAR21 AND VAR108 AND VAR107,NODRAW;
DRAWICON(VAR109,LOW*0.99,7);