SJ:=IF(HOUR<12,(HOUR-9.5)*60+MINUTE,(HOUR-11)*60+MINUTE);
BJ:=IF(HOUR>12,(HOUR-13.5)*60+MINUTE,(HOUR-16)*60+MINUTE);
KB:=IF(HOUR>24,(HOUR-17)*60+MINUTE,(HOUR-21)*60+MINUTE);
DRAWGBK(1,RGB(4,9,9),RGB(30,29,90),0,'01',0);
VAR1:=(HIGH+LOW)/2;
AO:MA(VAR1,5)-MA(VAR1,34),LINETHICK0;
STICKLINE(AO>=REF(AO,1),0,AO,0.1,1),COLORYELLOW;
STICKLINE(AO<REF(AO,1),0,AO,0.1,1),COLORBLUE;
STICKLINE(AO>=REF(AO,1),(AO-AO*0.05),(AO-AO*0.15),5,-1) COLOR0000CC;
STICKLINE(AO>=REF(AO,1),(AO-AO*0.2),(AO-AO*0.35),5,-1) COLOR0066FF;
STICKLINE(AO>=REF(AO,1),(AO-AO*0.4),(AO-AO*0.55),5,-1) COLOR0099FF;
STICKLINE(AO>=REF(AO,1),(AO-AO*0.6),(AO-AO*0.75),5,-1) COLOR00CCFF;
STICKLINE(AO>=REF(AO,1),(AO-AO*0.8),(AO-AO*0.95),5,-1) COLOR00FFFF;
STICKLINE(AO<REF(AO,1),(AO-AO*0.05),(AO-AO*0.15),5,-1) COLORFF3300;
STICKLINE(AO<REF(AO,1),(AO-AO*0.2),(AO-AO*0.35),5,-1) COLORFF6600;
STICKLINE(AO<REF(AO,1),(AO-AO*0.4),(AO-AO*0.55),5,-1) COLORFF9900;
STICKLINE(AO<REF(AO,1),(AO-AO*0.6),(AO-AO*0.75),5,-1) COLORFFCC00;
STICKLINE(AO<REF(AO,1),(AO-AO*0.8),(AO-AO*0.95),5,-1)COLORFFBB00;
A1:=FORCAST(EMA(CLOSE,5),6);
A2:=FORCAST(EMA(CLOSE,8),6);
A3:=FORCAST(EMA(CLOSE,11),6);
A4:=FORCAST(EMA(CLOSE,14),6);
A5:=FORCAST(EMA(CLOSE,17),6);
B:=A1+A2+A3+A4-4*A5;
TOWERC:=EMA(B,2);
FORCAST(EMA(B,3),6),DOTLINE,COLORGRAY;
FORCAST(EMA(B,4),6),DOTLINE,COLORGRAY;
FORCAST(EMA(B,5),6),DOTLINE,COLORGRAY;
FORCAST(EMA(B,6),6),DOTLINE,COLORGRAY;
FORCAST(EMA(B,7),6),DOTLINE,COLORGRAY;
STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,REF(TOWERC,1),3,0),COLORBLUE;
STICKLINE(TOWERC<REF(TOWERC,1),TOWERC,REF(TOWERC,1),3,0),COLORGREEN;
STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,REF(TOWERC,1),3,0),COLORBLUE;
STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,REF(TOWERC,1),3,0),COLORBLUE;
STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,REF(TOWERC,1),0,0),COLORBLUE;
STICKLINE(TOWERC<REF(TOWERC,1),TOWERC,REF(TOWERC,1),3,0),COLORGREEN;
STICKLINE(TOWERC<REF(TOWERC,1),TOWERC,REF(TOWERC,1),3,0),COLORGREEN;
STICKLINE(TOWERC<REF(TOWERC,1),TOWERC,REF(TOWERC,1),2,0),COLORGREEN;
STICKLINE(TOWERC<REF(TOWERC,1),TOWERC,REF(TOWERC,1),0,0),COLORGREEN;
0,COLORWHITE;
GK:STICKLINE(C<MA(C,3),TOWERC,REF(B,1),3,0)COLORGREEN;
GJ:STICKLINE(C>MA(C,3),TOWERC,REF(B,1),3,0)COLORBLUE;
