FO:=OPEN;
FH:=HIGH;
FL:=LOW;
FC:=CLOSE;
<%
vo=ffl.vardata("fo")
vh=ffl.vardata("fh")
vl=ffl.vardata("fl")
vc=ffl.vardata("fc")
last=ubound(vc)
vc(0)=(vh(0)+vl(0)+2*vc(0))/4
for i=1 to last
vo(i)=(vo(i-1)+vc(i-1))/2
if vo(i)>vh(i) then vh(i)=vo(i) else vh(i)=vh(i)
if vo(i)<vl(i) then vl(i)=vo(i) else vl(i)=vl(i)
vc(i)=(2*vc(i)+vh(i)+vl(i))/4
next
ffl.vardata("fo")=vo
ffl.vardata("fh")=vh
ffl.vardata("fl")=vl
ffl.vardata("fc")=vc
%>
KK:=IF(FC>=FO AND (FC>=REF(FC,1) OR REF(FC,1)>=REF(FO,1)),1,IF(FC<FO AND (FC<REF(FO,1) OR REF(FC,1)<REF(FO,1)),-1,0));
明:=(FO+FC)/2;
转:=IF(KK=1,MIN(FC,FO),IF(KK=-1,MAX(FC,FO),IF(REF(KK,1)=1,MIN(FC,FO),IF(REF(KK,1)=-1,MAX(FC,FO),(FC+FO)/2))));
STICKLINE(FC>FO,FH,FL,0.4,0),colorFF;
STICKLINE(FO>FC,FH,FL,0.4,0),colorFFFF00;
STICKLINE(KK=1 AND FC>=FO,FO,FC,8,0),colorFF;
STICKLINE(KK=1 AND FC<FO,FO,FC,8,0),colorFF;
STICKLINE(KK=-1 AND FC>=FO,FO,FC,8,0),colorFF0000;
STICKLINE(KK=-1 AND FC<FO,FO,FC,8,0),colorFF0000;
STICKLINE(KK=0 AND FC>=FO,FO,FC,8,0),colorFF;
STICKLINE(KK=0 AND FC<FO,FO,FC,8,0),colorFF;
VAR6:=(2*CLOSE+HIGH+LOW)/4;
VAR7:=LLV(LOW,21);
VAR8:=HHV(HIGH,21);
VAR9:=EMA((VAR6-VAR7)/(VAR8-VAR7)*100,13);
VARA:=EMA(0.667*REF(VAR9,1)+0.333*VAR9,2);
A1:=EMA(HHV(FH,2),2);
A2:=EMA(LLV(FL,2),2);
A3:=IF(VAR9>=VARA,A2,A1);
PARTLINE(VAR9>=VARA,A3),LINETHICK3,colorFF00FF;
PARTLINE(VAR9<VARA,A3),LINETHICK3,colorFF00; |
