缠论中枢主图,不需dll支持(通达信公式 主图 源码 测试图)

 2023-03-21 20:53:33    通达信指标网  

{公式名称: 缠论中枢}
{主图叠加}
MA5:EMA(CLOSE,5),POINTDOT;
MA10:MA(CLOSE,10),POINTDOT,COLORYELLOW,LINETHICK2;
黄金线:EMA(CLOSE,18),COLORYELLOW;
黄金线1:EMA(CLOSE,15),COLORRED;
MA60:MA(CLOSE,60),POINTDOT,COLORRED;
MA90:MA(CLOSE,90),POINTDOT,COLORD89837;
VAR1:=10;
VAR2:=10;
VAR3:=2;
VAR4:=IF(PERIOD=5,1,IF(PERIOD=6,1,IF(PERIOD=7,1,IF(PERIOD=8,1,IF(PERIOD=9,1,IF(PERIOD=10,1,IF(PERIOD=11,2,IF(PERIOD=4,1,IF(PERIOD=3,1,IF(PERIOD=2,1,IF(PERIOD=1,1,1)))))))))))/10;
VAR5:=PEAK(1,VAR4*VAR1,1);
VAR6:=PEAK(1,VAR4*VAR1,2);
VAR7:=PEAKBARS(1,VAR4*VAR1,1);
VAR8:=PEAKBARS(1,VAR4*VAR1,2);
VAR9:=TROUGH(2,VAR4*VAR2,1);
VAR10:=TROUGH(2,VAR4*VAR2,2);
VAR11:=TROUGHBARS(2,VAR4*VAR2,1);
VAR12:=TROUGHBARS(2,VAR4*VAR2,2);
VAR13:=VAR5>VAR9 AND VAR6>VAR10;
VAR14:=MAX(VAR9,VAR10);
VAR15:=MIN(VAR5,VAR6);
VAR16:=MIN(VAR9,VAR10);
VAR17:=MAX(VAR5,VAR6);
VAR18:=FILTER(VAR15>VAR14,2);
VAR19:=VAR15=REF(VAR15,BARSLAST(VAR18)) OR VAR14=REF(VAR14,BARSLAST(VAR18));
VAR20:=VAR13 AND VAR18 AND NOT(VAR19);
VAR21:=BETWEEN(VAR14,REF(VAR14,REF(BARSLAST(VAR20),1)),REF(VAR15,REF(BARSLAST(VAR20),1)));
VAR22:=BETWEEN(VAR15,REF(VAR14,REF(BARSLAST(VAR20),1)),REF(VAR15,REF(BARSLAST(VAR20),1)));
VAR23:=VAR15>REF(VAR15,REF(BARSLAST(VAR20),1)) AND VAR14<REF(VAR14,REF(BARSLAST(VAR20),1));
VAR24:=VAR20 AND NOT(VAR21 OR VAR22 OR VAR23);
VAR25:=IF(VAR24,VAR14,DRAWNULL);
VAR26:=IF(VAR24,VAR15,DRAWNULL);
VAR27:=IF(VAR24,VAR17,DRAWNULL);
VAR28:=IF(VAR24,VAR16,DRAWNULL);
STICKLINE(VAR24,VAR27,VAR28,0,(-1)),COLORMAGENTA;
STICKLINE(VAR24,VAR25,VAR26,IF(VAR3=1,3,0),1),COLORMAGENTA;
DRAWTEXT(VAR3=2,VAR27,174),COLORRED;
中枢高:PLOYLINE(VAR3=2,REF(VAR25,BARSLAST(VAR24))),CROSSDOT,COLORLIRED;
中枢低:PLOYLINE(VAR3=2,REF(VAR26,BARSLAST(VAR24))),CROSSDOT,COLORLIGREEN;
中枢最高:PLOYLINE(VAR3=2,REF(VAR27,BARSLAST(VAR24))),POINTDOT,COLORRED;
中枢最低:PLOYLINE(VAR3=2,REF(VAR28,BARSLAST(VAR24))),POINTDOT,COLORGREEN;
VAR29:=BACKSET(LLV(LOW,5)<REF(LLV(LOW,4),1),4);
VAR30:=BACKSET(VAR29=0 AND REF(VAR29,1)=1,2);
VAR31:=IF(VAR30=1 AND REF(VAR30,1)=0,(-1),0);
VAR32:=BACKSET(HHV(HIGH,5)>REF(HHV(HIGH,4),1),4);
VAR33:=BACKSET(VAR32=0 AND REF(VAR32,1)=1,2);
VAR34:=IF(VAR33=1 AND REF(VAR33,1)=0,1,0);
VAR35:=IF(LOW>REF(HIGH,1),1,IF(HIGH<REF(LOW,1),(-1),0));
VAR36:=BARSLAST(VAR34=1);
VAR37:=BARSLAST(VAR31=(-1));
VAR38:=LOWRANGE(LOW);
VAR39:=TOPRANGE(HIGH);
VAR40:=IF(VAR31=(-1) AND REF(VAR36,1)>REF(VAR37,1) AND LLV(LOW,VAR36+1)<REF(LLV(LOW,VAR36+1),1),(-1),0);
VAR41:=IF(VAR31=(-1) AND REF(VAR36,1)<=REF(VAR37,1) AND (VAR36>=4 OR LLV(VAR35,VAR36)=(-1) OR LLV(LOW,VAR37+2)<REF(LLV(LOW,VAR37+1),1)),(-1),0);
VAR42:=IF(VAR40=(-1) OR VAR41=(-1) AND LOW<REF(HIGH,VAR36+1),(-1),0);
VAR43:=IF(VAR37<4 AND HHV(VAR35,VAR37)!=1 OR REF(VAR42,VAR37)=0,1,0);
VAR44:=IF(VAR34=1 AND REF(VAR37,1)<=REF(VAR36,1) AND VAR43=1 AND VAR39>REF(VAR38,VAR37+1) AND VAR39>REF(VAR38,VAR37) AND VAR39>REF(VAR39,VAR36),1,0);
VAR45:=IF(VAR34=1 AND REF(VAR37,1)>REF(VAR36,1) AND HHV(HIGH,VAR37+1)>REF(HHV(HIGH,VAR37+1),1),1,0);
VAR46:=IF(VAR34=1 AND REF(VAR37,1)<=REF(VAR36,1) AND REF(VAR42,VAR37)=(-1) AND (VAR37>=4 OR HHV(VAR35,VAR37)=1),1,0);
VAR47:=IF(VAR45=1 OR VAR46=1 OR VAR44=1 AND HIGH>REF(LOW,VAR37+1),1,0);
VAR48:=IF(VAR36<4 AND HHV(VAR35,VAR36)!=1 OR REF(VAR47,VAR36)=0,1,0);
VAR49:=IF(VAR31=(-1) AND REF(VAR36,1)<=REF(VAR37,1) AND VAR48=1 AND VAR38>REF(VAR39,VAR36+1) AND VAR38>REF(VAR39,VAR36) AND VAR38>REF(VAR38,VAR37),(-1),0);
VAR50:=IF(VAR31=(-1) AND REF(VAR36,1)>REF(VAR37,1) AND LLV(LOW,VAR36+1)<REF(LLV(LOW,VAR36+1),1),(-1),0);
VAR51:=IF(VAR31=(-1) AND REF(VAR36,1)<=REF(VAR37,1) AND (VAR36>=4 OR LLV(VAR35,VAR36)=(-1) OR VAR49=(-1)),(-1),0);
VAR52:=IF(VAR50=(-1) OR VAR51=(-1) AND LOW<REF(HIGH,VAR36+1),(-1),0);
VAR53:=BARSLAST(VAR47=1);
VAR54:=BARSLAST(VAR52=(-1));
VAR55:=IF(VAR54<4 AND HHV(VAR35,VAR54)!=1 OR REF(VAR52,VAR54)=0,1,0);
VAR56:=IF(VAR34=1 AND REF(VAR54,1)<=REF(VAR53,1) AND VAR55=1 AND VAR39>REF(VAR38,VAR54+1) AND VAR39>REF(VAR38,VAR54) AND VAR39>REF(VAR39,VAR53),1,0);
VAR57:=IF(VAR34=1 AND REF(VAR54,1)>REF(VAR53,1) AND HHV(HIGH,VAR54+1)>REF(HHV(HIGH,VAR54+1),1),1,0);
VAR58:=IF(VAR34=1 AND REF(VAR54,1)<=REF(VAR53,1) AND REF(VAR52,VAR54)=(-1) AND (VAR54>=4 OR HHV(VAR35,VAR54)=1),1,0);
VAR59:=IF(VAR57=1 OR VAR58=1 OR VAR56=1 AND HIGH>REF(LOW,VAR54+1),1,0);
VAR60:=IF(VAR53<4 AND HHV(VAR35,VAR53)!=1 OR REF(VAR57,VAR53)=0,1,0);
VAR61:=IF(VAR31=(-1) AND REF(VAR53,1)<=REF(VAR54,1) AND VAR60=1 AND VAR38>REF(VAR39,VAR53+1) AND VAR38>REF(VAR39,VAR53) AND VAR38>REF(VAR38,VAR54),(-1),0);
VAR62:=IF(VAR31=(-1) AND REF(VAR53,1)>REF(VAR54,1) AND LLV(LOW,VAR53+1)<REF(LLV(LOW,VAR53+1),1),(-1),0);
VAR63:=IF(VAR31=(-1) AND REF(VAR53,1)<=REF(VAR54,1) AND (VAR53>=4 OR LLV(VAR35,VAR53)=(-1) OR VAR61=(-1)),(-1),0);
VAR64:=IF(VAR62=(-1) OR VAR63=(-1) AND LOW<REF(HIGH,VAR53+1),(-1),0);
VAR65:=BARSLAST(VAR59=1);
VAR66:=BARSLAST(VAR64=(-1));
VAR67:=IF(VAR66<4 AND HHV(VAR35,VAR66)!=1 OR REF(VAR64,VAR66)=0,1,0);
VAR68:=IF(VAR34=1 AND REF(VAR66,1)<=REF(VAR65,1) AND VAR67=1 AND VAR39>REF(VAR38,VAR66+1) AND VAR39>REF(VAR38,VAR66) AND VAR39>REF(VAR39,VAR65),1,0);
VAR69:=IF(VAR34=1 AND REF(VAR66,1)>REF(VAR65,1) AND HHV(HIGH,VAR66+1)>REF(HHV(HIGH,VAR66+1),1),1,0);
VAR70:=IF(VAR34=1 AND REF(VAR66,1)<=REF(VAR65,1) AND REF(VAR64,VAR66)=(-1) AND (VAR66>=4 OR HHV(VAR35,VAR66)=1),1,0);
VAR71:=IF(VAR69=1 OR VAR70=1 OR VAR68=1 AND HIGH>REF(LOW,VAR66+1),1,0);
VAR72:=IF(VAR65<4 AND HHV(VAR35,VAR65)!=1 OR REF(VAR69,VAR65)=0,1,0);
VAR73:=IF(VAR31=(-1) AND REF(VAR65,1)<=REF(VAR66,1) AND VAR72=1 AND VAR38>REF(VAR39,VAR65+1) AND VAR38>REF(VAR39,VAR65) AND VAR38>REF(VAR38,VAR66),(-1),0);
VAR74:=IF(VAR31=(-1) AND REF(VAR65,1)>REF(VAR66,1) AND LLV(LOW,VAR65+1)<REF(LLV(LOW,VAR65+1),1),(-1),0);
VAR75:=IF(VAR31=(-1) AND REF(VAR65,1)<=REF(VAR66,1) AND (VAR65>=4 OR LLV(VAR35,VAR65)=(-1) OR VAR73=(-1)),(-1),0);
VAR76:=IF(VAR74=(-1) OR VAR75=(-1) AND LOW<REF(HIGH,VAR65+1),(-1),0);
VAR77:=IF(VAR71=1 AND VAR76=(-1) AND HIGH>REF(HIGH,REF(VAR65,1)+2),1,IF(VAR71=1 AND VAR76=(-1) AND LOW<REF(LOW,REF(VAR66,1)+2),(-1),0));
VAR78:=IF(VAR77=0,VAR71+VAR76,VAR77);
局部极点:IF(VAR78=(-1),LOW,IF(VAR78=1,HIGH,DRAWNULL)),CIRCLEDOT,COLORYELLOW;
DRAWLINE(VAR78=(-1),局部极点,VAR78=1,局部极点,0),COLORLIRED;
DRAWLINE(VAR78=1,局部极点,VAR78=(-1),局部极点,0),COLORYELLOW;
VAR79:=BARSLAST(ABS(VAR78)!=1);
DRAWTEXT(VAR78=1,局部极点,175),COLORGREEN;
DRAWTEXT(VAR78=(-1),局部极点,175),COLORRED;
VAR80:=VOL>=REF(VOL,1)*1.91 AND CLOSE>OPEN;
VAR81:=REF(VOL,1)>=VOL*1.91 AND CLOSE<OPEN;
STICKLINE(VAR80,OPEN,CLOSE,2,0),COLORRED;
STICKLINE(VAR81,OPEN,CLOSE,2,0),COLORGREEN;
VAR82:=REF(CLOSE,1);
VAR83:=IF((CLOSE-VAR82)*100/VAR82>=10-0.01*100/VAR82,1,0);
VAR84:=IF((VAR82-CLOSE)*100/VAR82>=10-0.01*100/VAR82,1,0);
STICKLINE(VAR83,OPEN,CLOSE,2,0),COLORYELLOW;
STICKLINE(VAR84,OPEN,CLOSE,2,0),COLORGREEN;
VAR85:=REFDATE(HHV(HIGH,180),DATE);
VAR86:=REFDATE(LLV(LOW,180),DATE);
VAR87:=VAR85-(VAR85-VAR86)*0.191;
VAR88:=VAR85-(VAR85-VAR86)*0.382;
VAR89:=VAR85-(VAR85-VAR86)*0.5;
VAR90:=VAR85-(VAR85-VAR86)*0.618;
VAR91:=VAR85-(VAR85-VAR86)*0.809;
STICKLINE(CURRBARSCOUNT=13,VAR85,VAR85,100,(-1)),COLORGREEN;
STICKLINE(CURRBARSCOUNT=13,VAR87,VAR87,100,(-1)),COLORCYAN;
STICKLINE(CURRBARSCOUNT=13,VAR88,VAR88,100,(-1)),COLORCCCCCC;
DRAWTEXT(CURRBARSCOUNT=1,VAR85,176),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=1,VAR87,177),COLORCYAN;
DRAWTEXT(CURRBARSCOUNT=1,VAR88,178),COLORWHITE;
DRAWTEXT(CURRBARSCOUNT=1,VAR89,179),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=1,VAR90,180),COLORLIRED;
DRAWTEXT(CURRBARSCOUNT=1,VAR91,181),COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=1,VAR86,182),COLORRED;
STICKLINE(CURRBARSCOUNT=13,VAR89,VAR89,100,(-1)),COLORYELLOW;
STICKLINE(CURRBARSCOUNT=13,VAR90,VAR90,100,(-1)),COLORLIRED;
STICKLINE(CURRBARSCOUNT=13,VAR91,VAR91,100,(-1)),COLORMAGENTA;
STICKLINE(CURRBARSCOUNT=13,VAR86,VAR86,100,(-1)),COLORRED;


距今:BARSSINCE(CLOSE)+1,NODRAW;
VAR92:=距今<100;
VAR93:=TESTSKIP(VAR92=0);
首日中枢:(REF(HIGH,距今-1)+REF(LOW,距今-1))/2,NODRAW;
首日中枢支撑:首日中枢/1.5,COLORFFAAFF;
DRAWTEXT_FIX(1,0,0,0,119),COLORYELLOW;
DRAWTEXT_FIX(1,0.05,0,0,DYBLOCK),COLORYELLOW;
DRAWTEXT_FIX(1,0.1,0,0,HYBLOCK),COLORYELLOW;
DRAWTEXT_FIX(1,0.16,0,0,GNBLOCK),COLORYELLOW;
DRAWTEXT_FIX(1,0,0.06,0,120),COLOR0080FF;
DRAWTEXT_FIX(1,0.05,0.06,0,STRCAT(CON2STR(CAPITAL/1000000,2),121)),COLOR0080FF;
DRAWTEXT_FIX(1,0,0.12,0,122),COLORMAGENTA;
DRAWTEXT_FIX(1,0.05,0.12,0,STRCAT(CON2STR(FINANCE(30)/FINANCE(1),2),123)),COLORMAGENTA;
 


  •  标签:  

原文链接:https://www.tdxzb.com/?id=1133

本文版权:如无特别标注,本站文章均为原创。

相关文章

服务热线

18020657357

微信客服

微信客服