%>
A1:=FORCAST(EMA(CLOSE,3),6);
A2:=FORCAST(EMA(CLOSE,5),6);
A3:=FORCAST(EMA(CLOSE,7),6);
A4:=FORCAST(EMA(CLOSE,11),6);
A5:=FORCAST(EMA(CLOSE,14),6);
B:=A1+A2+A3+A4-4*A5;
TOWERC:=EMA(B,2);
VAR1:=ABS(TOWERC)+ABS(REF(TOWERC,1));
VAR2:=(3*CLOSE+2*OPEN+LOW+HIGH)/7;
A6:=FORCAST(EMA(VAR2,12),6);
S1:=STICKLINE(TOWERC>=REF(TOWERC,1) AND A6>=REF(A6,1),0,VAR1,2,0);
S2:=STICKLINE(TOWERC<REF(TOWERC,1) AND A6>=REF(A6,1),0,VAR1,2,1);
S3:=STICKLINE(TOWERC<REF(TOWERC,1) AND A6<=REF(A6,1),0,VAR1,2,0);
S4:=STICKLINE(TOWERC>=REF(TOWERC,1) AND A6<REF(A6,1),0,VAR1,2,1);
TDXSTEP131:STICKLINE(TOWERC>=REF(TOWERC,1) AND A6>=REF(A6,1),CLOSE,OPEN,3,0),COLORRED;
TDXSTEP132:STICKLINE(TOWERC<REF(TOWERC,1) AND A6>=REF(A6,1),CLOSE,OPEN,3,0),COLORRED;
TDXSTEP133:STICKLINE(TOWERC>=REF(TOWERC,1) AND A6>=REF(A6,1),HIGH,LOW,0,0.0009),COLORRED;
TDXSTEP134:STICKLINE(TOWERC<REF(TOWERC,1) AND A6>=REF(A6,1),HIGH,LOW,0,0.0009),COLORRED;
TDXSTEP135:STICKLINE(TOWERC<REF(TOWERC,1) AND A6<=REF(A6,1),CLOSE,OPEN,3,0),COLORFFFF54;
TDXSTEP136:STICKLINE(TOWERC>=REF(TOWERC,1) AND A6<REF(A6,1),CLOSE,OPEN,3,0),COLORFFFF54;
TDXSTEP137:STICKLINE(TOWERC<REF(TOWERC,1) AND A6<=REF(A6,1),HIGH,LOW,0,0.0009),COLORFFFF54;
TDXSTEP138:STICKLINE(TOWERC>=REF(TOWERC,1) AND A6<REF(A6,1),HIGH,LOW,0,0.0009),COLORFFFF54;
{股票教程网-http://bkqg.net承接通达信软件和公式破解,普通加密破解,完全加密破解,导入密码破解,时间限制破解,公式编写,可按您的要求写公式指标,价格按难度不同报价,有需要可以找我们}