壹瓣杺埖 老师的[简睿分角]指标飞狐版
壹瓣杺埖 老师的[简睿分角]指标我改成飞狐版了,请用飞狐的同学试试看和老师的通达信指标有没有出入。
{[简睿分角]--壹瓣杺埖创作--loy518改飞狐版 }
INPUT:低天(90,1,9999),高天(60,1,999);
CURR:=DATACOUNT-BARPOS+1;
X涨:=(CURR=低天)-1;{1 9999 90}
X跌:=(CURR=高天)-1;{1 9999 60}
X跌H:=REFX(HHV(H,高天),DATACOUNT-BARPOS);
X涨L:=REFX(LLV(L,低天),DATACOUNT-BARPOS);
X涨跌:=LINEVALUE(X涨=0,X涨L,X跌=0,X跌H,0,0);
X跌涨:=LINEVALUE(X涨=0,X跌H,X跌=0,X涨L,0,0);
涨跌X:=LINEVALUE(X跌=0,X跌H,X涨=0,X涨L,0,0);
跌涨X:=LINEVALUE(X跌=0,X涨L,X涨=0,X跌H,0,0);
X涨跌X:=IF(低天 高天,X涨跌,涨跌X);
X跌涨X:=IF(低天 高天,X跌涨,跌涨X);
LXH:=IF(CURR =IF(低天 高天,低天,高天),(X跌H+X涨L)/2,0);
涨跌:=IF(高天 低天,低天-ABS(高天-低天),高天-ABS(低天-高天));
涨X跌:=IF(高天 低天,涨跌-ABS(低天-涨跌),涨跌-ABS(高天-涨跌));
涨X跌X:=IF(高天 低天,涨X跌-ABS(涨跌-涨X跌),涨X跌-ABS(涨跌-涨X跌));
X涨X跌X:=IF(高天 低天,涨X跌X-ABS(涨X跌-涨X跌X),涨X跌X-ABS(涨X跌-涨X跌X));
STICKLINE(CURR=涨跌 OR CURR=涨X跌 OR CURR=涨X跌X OR CURR=X涨X跌X,X跌H,X涨L,0.27,1),COLOR8E009F,LINEDOT;
XA1:1:=LINEVALUE(X涨=0,L,X跌=0,H,0,0);
XA2:1:=LINEVALUE(X涨=0,L,X跌=0,(X跌H+X涨L)/2,0,0);
XA3:1:=LINEVALUE(X涨=0,L,X跌=0,(X跌H-X涨L)/3+X涨L,0,0);
XA4:1:=LINEVALUE(X涨=0,L,X跌=0,(X跌H-X涨L)/4+X涨L,0,0);
XA8:1:=LINEVALUE(X涨=0,L,X跌=0,(X跌H-X涨L)/8+X涨L,0,0);
XA16:1:=LINEVALUE(X涨=0,L,X跌=0,(X跌H-X涨L)/16+X涨L,0,0);
XB1:1:=LINEVALUE(X跌=0,H,X涨=0,L,0,0);
XB2:1:=LINEVALUE(X跌=0,H,X涨=0,(X跌H+X涨L)/2,0,0);
XB3:1:=LINEVALUE(X跌=0,H,X涨=0,X跌H-(X跌H-X涨L)/3,0,0);
XB4:1:=LINEVALUE(X跌=0,H,X涨=0,X跌H-(X跌H-X涨L)/4,0,0);
XB8:1:=LINEVALUE(X跌=0,H,X涨=0,X跌H-(X跌H-X涨L)/8,0,0);
XB16:1:=LINEVALUE(X跌=0,H,X涨=0,X跌H-(X跌H-X涨L)/16,0,0);
涨点:=CURR=低天;
涨H:LINEVALUE(涨点=1,H,REF(涨点,1)=1,REF(H,1),0,0),COLOR8E00E8,LINETHICK;
DRAWLINE(涨点=1,H,REF(涨点,1)=1,REF(H,1),0),COLOR8E00E8,LINETHICK2;
涨L:LINEVALUE(涨点=1,L,REF(涨点,1)=1,REF(L,1),0,0),COLOR8E00E8,LINETHICK;
DRAWLINE(涨点=1,L,REF(涨点,1)=1,REF(L,1),0),COLOR8E00E8,LINETHICK2;
STICKLINE(涨点=1,涨H,涨L,0.27,0),COLOR8E00E8,LINETHICK3;
STICKLINE(REF(涨点,1)=1,涨H,涨L,0.27,0),COLOR8E00E8,LINETHICK3;
A1:1:=LINEVALUE(涨点=1,L,REF(涨点,1)=1,REF(H,1),0,0);
A2:1:=LINEVALUE(涨点=1,L,REF(涨点,1)=1,(涨H+涨L)/2,0,0);
A3:1:=LINEVALUE(涨点=1,L,REF(涨点,1)=1,(涨H-涨L)/3+涨L,0,0);
A4:1:=LINEVALUE(涨点=1,L,REF(涨点,1)=1,(涨H-涨L)/4+涨L,0,0);
A8:1:=LINEVALUE(涨点=1,L,REF(涨点,1)=1,(涨H-涨L)/8+涨L,0,0);
A16:1:=LINEVALUE(涨点=1,L,REF(涨点,1)=1,(涨H-涨L)/16+涨L,0,0);
AX1:1:=LINEVALUE(X涨=0,L,REF(涨点,1)=1,((涨H-涨L)/2)/2+涨L,0,0);
AX2:1:=LINEVALUE(X涨=0,L,REF(涨点,1)=1,((涨H-涨L)/2)/3+涨L,0,0);
AX3:1:=LINEVALUE(X涨=0,L,REF(涨点,1)=1,((涨H-涨L)/2)/4+涨L,0,0);
AX4:1:=LINEVALUE(X涨=0,L,REF(涨点,1)=1,((涨H-涨L)/2)/8+涨L,0,0);
AX8:1:=LINEVALUE(X涨=0,L,REF(涨点,1)=1,((涨H-涨L)/2)/16+涨L,0,0);
AX16:1:=LINEVALUE(X涨=0,L,REF(涨点,1)=1,((涨H-涨L)/2)/32+涨L,0,0);
XXA1:1:=IF(低天 高天,XA1:1,AX1:1);
XXA2:1:=IF(低天 高天,XA2:1,AX2:1);
XXA3:1:=IF(低天 高天,XA3:1,AX3:1);
XXA4:1:=IF(低天 高天,XA4:1,AX4:1);
XXA8:1:=IF(低天 高天,XA8:1,AX8:1);
XXA16:1:=IF(低天 高天,XA16:1,AX16:1);
跌点:=CURR=高天;
跌H:LINEVALUE(跌点=1,H,REF(跌点,1)=1,REF(H,1),0,0),COLOR00FF00,LINETHICK;
DRAWLINE(跌点=1,H,REF(跌点,1)=1,REF(H,1),0),COLOR00FF00,LINETHICK2;
跌L:LINEVALUE(跌点=1,L,REF(跌点,1)=1,REF(L,1),0,0),COLOR00FF00,LINETHICK;
DRAWLINE(跌点=1,L,REF(跌点,1)=1,REF(L,1),0),COLOR00FF00,LINETHICK2;
STICKLINE(跌点=1,跌H,跌L,0.27,0),COLOR00FF00,LINETHICK3;
STICKLINE(REF(跌点,1)=1,跌H,跌L,0.27,0),COLOR00FF00,LINETHICK3;
B1:1:=LINEVALUE(跌点=1,H,REF(跌点,1)=1,REF(L,1),0,0);
B2:1:=LINEVALUE(跌点=1,H,REF(跌点,1)=1,(跌H+跌L)/2,0,0);
B3:1:=LINEVALUE(跌点=1,H,REF(跌点,1)=1,跌H-(跌H-跌L)/3,0,0);
B4:1:=LINEVALUE(跌点=1,H,REF(跌点,1)=1,跌H-(跌H-跌L)/4,0,0);
B8:1:=LINEVALUE(跌点=1,H,REF(跌点,1)=1,跌H-(跌H-跌L)/8,0,0);
B16:1:=LINEVALUE(跌点=1,H,REF(跌点,1)=1,跌H-(跌H-跌L)/16,0,0);
BX1:1:=LINEVALUE(X跌=0,H,REF(跌点,1)=1,跌H-((跌H-跌L)/2)/2,0,0);
BX2:1:=LINEVALUE(X跌=0,H,REF(跌点,1)=1,跌H-((跌H-跌L)/2)/3,0,0);
BX3:1:=LINEVALUE(X跌=0,H,REF(跌点,1)=1,跌H-((跌H-跌L)/2)/4,0,0);
BX4:1:=LINEVALUE(X跌=0,H,REF(跌点,1)=1,跌H-((跌H-跌L)/2)/8,0,0);
BX8:1:=LINEVALUE(X跌=0,H,REF(跌点,1)=1,跌H-((跌H-跌L)/2)/16,0,0);
BX16:1:=LINEVALUE(X跌=0,H,REF(跌点,1)=1,跌H-((跌H-跌L)/2)/32,0,0);
XXB1:1:=IF(高天 低天,XB1:1,BX1:1);
XXB2:1:=IF(高天 低天,XB2:1,BX2:1);
XXB3:1:=IF(高天 低天,XB3:1,BX3:1);
XXB4:1:=IF(高天 低天,XB4:1,BX4:1);
XXB8:1:=IF(高天 低天,XB8:1,BX8:1);
XXB16:1:=IF(高天 低天,XB16:1,BX16:1);
X跌1:1:IF(BETWEEN(XXB1:1,X跌H*1.1,X涨L*0.9),XXB1:1,0),LINETHICK;
PARTLINE(BETWEEN(XXB1:1,X跌H*1.1,X涨L*0.9),XXB1:1);
X跌2:1:IF(BETWEEN(XXB2:1,X跌H*1.1,X涨L*0.9),XXB2:1,0),LINETHICK;
PARTLINE(BETWEEN(XXB2:1,X跌H*1.1,X涨L*0.9),XXB2:1);
X跌3:1:IF(BETWEEN(XXB3:1,X跌H*1.1,X涨L*0.9),XXB3:1,0),LINETHICK;
PARTLINE(BETWEEN(XXB3:1,X跌H*1.1,X涨L*0.9),XXB3:1);
X跌4:1:IF(BETWEEN(XXB4:1,X跌H*1.1,X涨L*0.9),XXB4:1,0),LINETHICK;
PARTLINE(BETWEEN(XXB4:1,X跌H*1.1,X涨L*0.9),XXB4:1);
X跌8:1:IF(BETWEEN(XXB8:1,X跌H*1.1,X涨L*0.9),XXB8:1,0),LINETHICK;
PARTLINE(BETWEEN(XXB8:1,X跌H*1.1,X涨L*0.9),XXB8:1);
X跌16:1:IF(BETWEEN(XXB16:1,X跌H*1.1,X涨L*0.9),XXB16:1,0),LINETHICK;
PARTLINE(BETWEEN(XXB16:1,X跌H*1.1,X涨L*0.9),XXB16:1);
X涨1:1:IF(BETWEEN(XXA1:1,X跌H*1.1,X涨L*0.9),XXA1:1,0),LINETHICK;
PARTLINE(BETWEEN(XXA1:1,X跌H*1.1,X涨L*0.9),XXA1:1);
X涨2:1:IF(BETWEEN(XXA2:1,X跌H*1.1,X涨L*0.9),XXA2:1,0),LINETHICK;
PARTLINE(BETWEEN(XXA2:1,X跌H*1.1,X涨L*0.9),XXA2:1);
X涨3:1:IF(BETWEEN(XXA3:1,X跌H*1.1,X涨L*0.9),XXA3:1,0),LINETHICK;
PARTLINE(BETWEEN(XXA3:1,X跌H*1.1,X涨L*0.9),XXA3:1);
X涨4:1:IF(BETWEEN(XXA4:1,X跌H*1.1,X涨L*0.9),XXA4:1,0),LINETHICK;
PARTLINE(BETWEEN(XXA4:1,X跌H*1.1,X涨L*0.9),XXA4:1);
X涨8:1:IF(BETWEEN(XXA8:1,X跌H*1.1,X涨L*0.9),XXA8:1,0),LINETHICK;
PARTLINE(BETWEEN(XXA8:1,X跌H*1.1,X涨L*0.9),XXA8:1);
X涨16:1:IF(BETWEEN(XXA16:1,X跌H*1.1,X涨L*0.9),XXA16:1,0),LINETHICK;
PARTLINE(BETWEEN(XXA16:1,X跌H*1.1,X涨L*0.9),XXA16:1);
跌1:1:IF(BETWEEN(B1:1,X跌H*1.1,X涨L*0.9),B1:1,0),LINETHICK;
PARTLINE(BETWEEN(B1:1,X跌H*1.1,X涨L*0.9),B1:1);
跌2:1:IF(BETWEEN(B2:1,X跌H*1.1,X涨L*0.9),B2:1,0),LINETHICK;
PARTLINE(BETWEEN(B2:1,X跌H*1.1,X涨L*0.9),B2:1);
跌3:1:IF(BETWEEN(B3:1,X跌H*1.1,X涨L*0.9),B3:1,0),LINETHICK;
PARTLINE(BETWEEN(B3:1,X跌H*1.1,X涨L*0.9),B3:1);
跌4:1:IF(BETWEEN(B4:1,X跌H*1.1,X涨L*0.9),B4:1,0),LINETHICK;
PARTLINE(BETWEEN(B4:1,X跌H*1.1,X涨L*0.9),B4:1);
跌8:1:IF(BETWEEN(B8:1,X跌H*1.1,X涨L*0.9),B8:1,0),LINETHICK;
PARTLINE(BETWEEN(B8:1,X跌H*1.1,X涨L*0.9),B8:1);
跌16:1:IF(BETWEEN(B16:1,X跌H*1.1,X涨L*0.9),B16:1,0),LINETHICK;
PARTLINE(BETWEEN(B16:1,X跌H*1.1,X涨L*0.9),B16:1);
涨1:1:IF(BETWEEN(A1:1,X跌H*1.1,X涨L*0.9),A1:1,0),LINETHICK;
PARTLINE(BETWEEN(A1:1,X跌H*1.1,X涨L*0.9),A1:1);
涨2:1:IF(BETWEEN(A2:1,X跌H*1.1,X涨L*0.9),A2:1,0),LINETHICK;
PARTLINE(BETWEEN(A2:1,X跌H*1.1,X涨L*0.9),A2:1);
涨3:1:IF(BETWEEN(A3:1,X跌H*1.1,X涨L*0.9),A3:1,0),LINETHICK;
PARTLINE(BETWEEN(A3:1,X跌H*1.1,X涨L*0.9),A3:1);
涨4:1:IF(BETWEEN(A4:1,X跌H*1.1,X涨L*0.9),A4:1,0),LINETHICK;
PARTLINE(BETWEEN(A4:1,X跌H*1.1,X涨L*0.9),A4:1);
涨8:1:IF(BETWEEN(A8:1,X跌H*1.1,X涨L*0.9),A8:1,0),LINETHICK;
PARTLINE(BETWEEN(A8:1,X跌H*1.1,X涨L*0.9),A8:1);
涨16:1:IF(BETWEEN(A16:1,X跌H*1.1,X涨L*0.9),A16:1,0),LINETHICK;
PARTLINE(BETWEEN(A16:1,X跌H*1.1,X涨L*0.9),A16:1);