源码
A1:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,3)+EMA((OPEN+HIGH+LOW+CLOSE)/4,6)+EMA((OPEN+HIGH+LOW+CLOSE)/4,9))/3;
A2:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,5)+EMA((OPEN+HIGH+LOW+CLOSE)/4,10)+EMA((OPEN+HIGH+LOW+CLOSE)/4,20))/3;
A3:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,7)+EMA((OPEN+HIGH+LOW+CLOSE)/4,14)+EMA((OPEN+HIGH+LOW+CLOSE)/4,28))/3;
A4:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,9)+EMA((OPEN+HIGH+LOW+CLOSE)/4,18)+EMA((OPEN+HIGH+LOW+CLOSE)/4,36))/3;
A5:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,11)+EMA((OPEN+HIGH+LOW+CLOSE)/4,22)+EMA((OPEN+HIGH+LOW+CLOSE)/4,44))/3;
A6:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,13)+EMA((OPEN+HIGH+LOW+CLOSE)/4,26)+EMA((OPEN+HIGH+LOW+CLOSE)/4,52))/3;
A7:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,21)+EMA((OPEN+HIGH+LOW+CLOSE)/4,34)+EMA((OPEN+HIGH+LOW+CLOSE)/4,68))/3;
VAR1:=FORCAST(A1,6);
VAR2:=FORCAST(A2,6);
VAR3:=FORCAST(A3,6);
VAR4:=FORCAST(A4,6);
VAR5:=FORCAST(A5,6);
VAR6:=FORCAST(A6,6);
VAR7:=FORCAST(A7,6);
PARTLINE(VAR1,VAR1>REF(VAR1,1),RGB(255,0,255),VAR1 PARTLINE(VAR2,VAR2>REF(VAR2,1),RGB(255,0,255),VAR2 PARTLINE(VAR3,VAR3>REF(VAR3,1),RGB(255,0,255),VAR3 PARTLINE(VAR4,VAR4>REF(VAR4,1),RGB(255,0,255),VAR4 PARTLINE(VAR5,VAR5>REF(VAR5,1),RGB(255,0,255),VAR5 PARTLINE(VAR6,VAR6>REF(VAR6,1),RGB(255,0,255),VAR6 PARTLINE(VAR7,VAR7>REF(VAR7,1),RGB(255,0,255),VAR7 TOWERC:=FORCAST(EMA((3*CLOSE+2*OPEN+HIGH+LOW)/7,3),6);///www.9m8.cn DIRECTIONMAX:=MAX(REF(TOWERC,1),REF(TOWERC,1)); DIRECTIONMIN:=MIN(REF(TOWERC,1),REF(TOWERC,1)); M14:STICKLINE(towerc>=REF(towerc,1),towerc,directionmax,8,0),colorred; M15:STICKLINE(towerc M1:STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,DIRECTIONMAX,6,0),colorred; M2:STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,DIRECTIONMAX,5,0),colorred; M3:STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,DIRECTIONMAX,4,0),colorred; M4:STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,DIRECTIONMAX,3,0),colorred; M5:STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,DIRECTIONMAX,2,0),colorred; M6:STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,DIRECTIONMAX,1,0),colorred; M8:STICKLINE(TOWERC M9:STICKLINE(TOWERC M10:STICKLINE(TOWERC M11:STICKLINE(TOWERC M13:STICKLINE(TOWERC M12:STICKLINE(TOWERC
