涨跌我知道主图指标 (源码)

明多阵地:(H+L+3*C)/5 NODRAW;
今多阵地:REF(明多阵地,1)NODRAW,COLORRED,LINETHICK2;
STICKLINE(明多阵地 0.05,明多阵地,明多阵地,6,0),COLORGREEN;
{股票软件下载网-股票公式网站 www.9m8.cn 九毛八公式指标网}
VA1:=操作;
HX1:DRAWLINE(VA1 =HHV(VA1,5)=1,VA1,VA1 =LLV(VA1,5)=1,VA1,1),COLORRED;
VAR2:=((CLOSE REF(CLOSE,1)) AND (CLOSE REF(CLOSE,2)));
VAR3:=((REF(VAR2,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));
VAR4:=((REF(VAR3,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));
VAR5:=((REF(VAR4,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));
VAR6:=((REF(VAR5,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));
VAR7:=((REF(VAR6,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));
VAR8:=((REF(VAR7,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));
VAR9:=((REF(VAR8,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));
VARA:=((REF(VAR9,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));
VARB:=((REF(VARA,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));
VARC:=((REF(VARB,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));
VARD:=((REF(VARC,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));
VARE:=((CLOSE REF(CLOSE,1)) AND (CLOSE REF(CLOSE,2)));
VARF:=((REF(VARE,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));
VAR10:=((REF(VARF,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));
VAR11:=((REF(VAR10,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));
VAR12:=((REF(VAR11,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));
VAR13:=((REF(VAR12,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));
VAR14:=((REF(VAR13,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));
VAR15:=((REF(VAR14,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));
VAR16:=((REF(VAR15,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));
VAR17:=((REF(VAR16,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));
VAR18:=((REF(VAR17,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));
VAR19:=((REF(VAR18,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));
VAR1B:=(REF((((((((((((VARE OR VARF) OR VAR10) OR VAR11) OR VAR12) OR VAR13) OR VAR14) OR VAR15) OR VAR16) OR VAR17) OR VAR18) OR VAR19),1) AND VAR2);
{STICKLINE(VAR1B,O,O+(C-O)/3,3,0),COLOR10D0FF;}
STICKLINE(VAR1B,O,O+(C-O)/3,1,0),COLOR10FFFF;
STICKLINE(VAR1B,O,O+(C-O)/3,1,0),COLOR00FFFF;
AA:=(REF((((((((((((VAR2 OR VAR3) OR VAR4) OR VAR5) OR VAR6) OR VAR7) OR VAR8) OR VAR9) OR VARA) OR VARB) OR VARC) OR VARD),1) AND VARE);
{STICKLINE(AA,O,O+(C-O)/3,3,0),COLOR00DD00;}
STICKLINE(AA,O,O+(C-O)/3,1,0),COLORBLUE;
F:=100*(C-REF(C,1))/REF(C,1);
P1:=IF(C REF(O,1) AND F 0,1,0);
P2:=IF(C REF(O,2) AND F 0,1,0);
STICKLINE(P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1,OPEN,CLOSE,2,0),COLORMAGENTA;
STICKLINE(P1=1 AND REF(P1,1)=0 AND P2=1 AND REF(P2,1)=0,OPEN,CLOSE,2,0),COLORAAAAAA;