阴阳太极(通达信公式 主图 源码 测试图)

[复制链接]
查看56 | 回复0 | 2022-6-27 19:06:14 | 显示全部楼层 |阅读模式
{公式名称: 阴阳太极}
{公式描述: 黄线+红线上持股}
{主图叠加}
 
分析家公式网:DRAWNULL,COLORCCCCCC;
VAR1:=(CLOSE+LOW+HIGH)/3;
VAR2:=IF(VAR1>REF(VAR1,1),(CLOSE+LOW+HIGH)/3,REF((CLOSE+LOW+HIGH)/3,1));
VAR3:=IF(VAR1<REF(VAR1,1),(CLOSE+LOW+HIGH)/3,REF((CLOSE+LOW+HIGH)/3,1));
VAR4:=VAR2;
VAR5:=(VAR2+VAR3)/2;
VAR6:=VAR3;
上线:IF(ISLASTBAR,REF(VAR4,1),DRAWNULL),NODRAW,COLORRED;
中线:IF(ISLASTBAR,REF(VAR6,1),DRAWNULL),NODRAW,COLORYELLOW;
下线:IF(ISLASTBAR,REF(VAR5,1),DRAWNULL),NODRAW,COLORLIBLUE;
VAR7:=1;
VAR8:=CURRBARSCOUNT<2;
VAR9:=CURRBARSCOUNT<13;
VAR10:=IF(VAR8,上线,DRAWNULL);
VAR11:=IF(VAR8,中线,DRAWNULL);
VAR12:=IF(VAR8,下线,DRAWNULL);
VAR13:=IF(VAR9,VAR10,DRAWNULL);
VAR14:=IF(VAR9,VAR11,DRAWNULL);
VAR15:=IF(VAR9,VAR12,DRAWNULL);
STICKLINE(VAR9,VAR13,VAR13,20,(-1)),COLOR0000CC;
STICKLINE(VAR9,VAR14,VAR14,20,(-1)),COLOR00CCCC;
STICKLINE(VAR9,VAR15,VAR15,20,(-1)),COLORCCCC00;
VAR16:=TDXDLL8(2007,HIGH,CLOSE,LOW);
VAR17:=CLOSE/VAR16>=1.098 AND CLOSE=HIGH;
STICKLINE(VAR17,CLOSE,OPEN,0.3,0),COLORYELLOW;
VAR18:=MA(CLOSE,13);
VAR19:=MA(CLOSE,21);
VAR20:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
VAR21:=REF(VAR20,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR22:=REF(VAR21,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR23:=REF(VAR22,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR24:=REF(VAR23,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR25:=REF(VAR24,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR26:=REF(VAR25,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR27:=REF(VAR26,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR28:=REF(VAR27,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR29:=REF(VAR28,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR30:=REF(VAR29,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR31:=REF(VAR30,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR32:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
VAR33:=REF(VAR32,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR34:=REF(VAR33,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR35:=REF(VAR34,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR36:=REF(VAR35,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR37:=REF(VAR36,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR38:=REF(VAR37,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR39:=REF(VAR38,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR40:=REF(VAR39,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR41:=REF(VAR40,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR42:=REF(VAR41,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR43:=REF(VAR42,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR44:=REF(VAR32 OR VAR33 OR VAR34 OR VAR35 OR VAR36 OR VAR37 OR VAR38 OR VAR39 OR VAR40 OR VAR41 OR VAR42 OR VAR43,1) AND VAR20;
VAR45:=REF(VAR20 OR VAR21 OR VAR22 OR VAR23 OR VAR24 OR VAR25 OR VAR26 OR VAR27 OR VAR28 OR VAR29 OR VAR30 OR VAR31,1) AND VAR32;
VAR46:=IF(CLOSE<200,MA(COST(80),3),2500);
VAR47:=(HIGH+LOW+CLOSE)/3;
VAR48:=EMA((OPEN+HIGH+LOW+CLOSE)/4,2330);
{分析家公式网WWW.70822.COM}
VAR49:=VAR48+VAR48*6/100;
VAR50:=VAR20 OR VAR21 OR VAR22 OR VAR23 OR VAR24 OR VAR25 OR VAR26 OR VAR27 OR VAR28 OR VAR29 OR VAR30 OR VAR31;
VAR51:=VAR32 OR VAR33 OR VAR34 OR VAR35 OR VAR36 OR VAR37 OR VAR38 OR VAR39 OR VAR40 OR VAR41 OR VAR42 OR VAR43;
VAR52:=HHV(CLOSE,2);
VAR53:=LLV(CLOSE,2);
VAR54:=IF(VAR50,VAR53,DRAWNULL);
VAR55:=VAR54;
VAR56:=REF(VAR54,1);
VAR57:=IF(VAR51,VAR52,DRAWNULL);
VAR58:=VAR57;
VAR59:=REF(VAR58,1);
VAR60:=IF(VAR59!=DRAWNULL,VAR59,IF(VAR56!=DRAWNULL,VAR56,DRAWNULL));
STICKLINE(ISLASTBAR AND VAR60,VAR60,VAR60,6,0),COLORGREEN;
VAR61:=VAR7;
VAR62:=VAR61;
NOTEXT4:IF(VAR7!=1,0,VAR60),COLOR0000CC,LINETHICK3;
离场线:IF(CLOSE<=VAR60,VAR60,DRAWNULL),COLOR00CC00,LINETHICK3;
IF(CLOSE>VAR60,VAR60,DRAWNULL),COLOR0000CC,LINETHICK3;
VAR63:=EMA(CLOSE,8);
VAR64:=EMA(CLOSE,18);
VAR65:=IF(VAR61!=1,0,EMA(VAR63-VAR64,9));
阴鱼:9*REF(VAR65,1)-7*REF(VAR63,1)+8*REF(VAR64,1),COLORFF8000,LINETHICK2;
阳鱼:IF(CLOSE>=阴鱼,阴鱼,DRAWNULL),COLORYELLOW,LINETHICK2;
鱼眼:IF(ISLASTBAR,阴鱼,DRAWNULL),POINTDOT,COLORRED,LINETHICK6;
VAR66:=VAR60>阳鱼 AND LOW<VAR60;
STICKLINE(VAR66,LOW,MIN(VAR60,HIGH),0,0),COLORMAGENTA;
 

p2020215227315686.jpg

p2020215227315686.jpg

20202152271126540.rar

4.93 KB, 下载次数: 0

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

20202152271126540.rar

回复

使用道具 举报

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

本版积分规则