Y:=((HIGH + LOW) / 2);
BLUE:=SMA(Y,13,1);
RED:=SMA(Y,8,1);
GREEN:=SMA(Y,5,1);
B2:=REF(BLUE,8);
R2:=REF(RED,5);
G2:=REF(GREEN,3);
KU1:=IF((HIGH = HHV(HIGH,3)),1,0);
kd1:=IF((LOW = LLV(LOW,3)),1,0);
UL:=IF((((REF(KU1,2) = 1) AND (REF(KU1,1) = 0)) AND (KU1 = 0)),REF(HIGH,2),REF(HIGH,(2 + BArslAST((((REF(KU1,2) = 1) AND (REF(KU1,1) = 0)) AND (KU1 = 0))))));
DL:=IF((((REF(KD1,2) = 1) AND (REF(KD1,1) = 0)) AND (KD1 = 0)),REF(LOW,2),REF(LOW,(2 + BARSLAST((((REF(KD1,2) = 1) AND (REF(KD1,1) = 0)) AND (KD1 = 0))))));
KU:=IF((((CLOSE B2) AND (CLOSE R2)) AND (CLOSE G2)),1,0);
KD:=IF((((CLOSE B2) AND (CLOSE R2)) AND (CLOSE G2)),(0 - 1),0);
KK:=IF((BARSLAST(((KU = 1) AND (REF(KU,1) = 0))) BARSLAST(((KD = (0 - 1)) AND (REF(KD,1) = 0)))),1,(0 - 1));
ao:=(MA(Y,5) - MA(Y,34));
ac:=MA((AO - MA(AO,5)),5);
AC1:=REF(AC,1);
AO1:=REF(AO,1);
{股旁网-股票公式网站 www.GupaNg.com}
KAC:=IF(((AC AC1) AND (AO AO1)),1,0);
KAO:=IF(((AC AC1) AND (AO AO1)),(0 - 1),0);
蓝:SMA(REF(Y,8),13,1),COLORFF0000;
红:SMA(REF(Y,5),8,1),COLOR0000FF;
绿:SMA(REF(Y,3),5,1),COLOR00FF00;
上碎型:IF((HIGH = R2),UL,REF(UL,BARSLAST((HIGH R2)))),POINTDOT,COLORFF00FF,LINETHICK2;
下碎型:IF((LOW = R2),DL,REF(DL,BARSLAST((LOW = R2)))),POINTDOT,COLOR00FFFF,LINETHICK2;
STICKLINE((BARSLAST(Abs((上碎型 - REF(上碎型,1)))) BARSLAST(((CLOSE 上碎型) AND (REF(CLOSE,1) REF(上碎型,1))))),上碎型,上碎型,3,1),COLORFF00FF;
STICKLINE((BARSLAST(ABS((下碎型 - REF(下碎型,1)))) BARSLAST(((CLOSE 下碎型) AND (REF(CLOSE,1) REF(下碎型,1))))),下碎型,下碎型,3,1),COLOR00FFFF;
H1:=REF(HIGH,4);
H2:=REF(HIGH,3);
H3:=REF(HIGH,2);
H4:=REF(HIGH,1);
H5:=HIGH;
L1:=REF(LOW,4);
L2:=REF(LOW,3);
L3:=REF(LOW,2);
L4:=REF(LOW,1);
L5:=LOW;
‖:=((((H3 H2) AND (H3 H1)) AND (H3 H4)) AND (H3 H5));
‖FRACTAL:=IF(‖,1,0);
‖VAR1:=BACKSET(‖FRACTAL,3);
‖VAR2:=FILTER(‖VAR1,2);
‖VAR3:=BACKSET(‖FRACTAL,5);
∣:=((((L3 L2) AND (L3 L1)) AND (L3 L4)) AND (L3 L5));
∣FRACTAL:=IF(∣,1,0);
∣VAR1:=BACKSET(∣FRACTAL,3);
∣VAR2:=FILTER(∣VAR1,2);
∣VAR3:=BACKSET(∣FRACTAL,5);
{DRAWTEXT(‖VAR2,(HIGH +0.15),'●'),COLORRED;
DRAWTEXT(∣VAR2,LOW-0.05,'●'),COLORFF0000;}
DRAWICON(‖VAR2,H*1.015,2);
DRAWICON(∣VAR2,L*0.985,1);
DRAWTEXT(((CLOSE 上碎型) AND (REF(CLOSE,1) REF(上碎型,1))),(HIGH +0.15),' '),COLORRED;
DRAWTEXT(((CLOSE 下碎型) AND (REF(CLOSE,1) REF(下碎型,1))),(LOW * 0.99),' '),COLOR33FF33;
DRAWTEXT((((KU = 1) AND (REF(KU,1) = 0)) AND (CLOSE 0)),LOW* 0.99,' '),COLORRED;
DRAWTEXT((((KD = (0 - 1)) AND (REF(KD,1) = 0)) AND (CLOSE 0)),(HIGH * 1.01),' '),COLOR33FF33;
DRAWTEXT((((KU = 0) AND (REF(KU,1) = 1)) AND (CLOSE 0)),(HIGH * 1.01),'▼'),COLOR33FF33;
DRAWTEXT((((KD = 0) AND (REF(KD,1) = (0 - 1))) AND (CLOSE 0)),LOW,'△'),COLORRED;
STICKLINE(((KAC = 1) AND (CLOSE = OPEN)),OPEN,CLOSE,3,1),COLOR0000FF;
STICKLINE(((KAO = (0 - 1)) AND (CLOSE = OPEN)),OPEN,CLOSE,3,1),COLOR33FF33;
STICKLINE((((KAO = 0) AND (KAC = 0)) AND (CLOSE = OPEN)),OPEN,CLOSE,3,1),COLOR808080;
STICKLINE((CLOSE = OPEN),HIGH,CLOSE,0,0),COLOR0000FF;
STICKLINE((CLOSE = OPEN),OPEN,LOW,0,0),COLOR0000FF;
STICKLINE(((KAC = 1) AND (CLOSE OPEN)),OPEN,CLOSE,3,0),COLOR0000FF;
STICKLINE(((KAO = (0 - 1)) AND (CLOSE OPEN)),OPEN,CLOSE,3,0),COLOR33FF33;
STICKLINE((((KAO = 0) AND (KAC = 0)) AND (CLOSE OPEN)),OPEN,CLOSE,3,0),COLOR808080;
STICKLINE((OPEN CLOSE),HIGH,OPEN,0,0 ),COLORFFFF00;
STICKLINE((OPEN CLOSE),CLOSE,LOW,0,0 ),COLORFFFF00;
