进出自如

001

进出自如
input:n(75,1,100);
VAR1:=3*SMA((CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,20,1)-2*SMA(SMA((CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,20,1),15,1);
VAR2:=3*SMA((OPEN-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,20,1)-2*SMA(SMA((OPEN-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,20,1),15,1);
VAR3:=100-VAR2;
VAR4:=100-VAR1;
VAR5:=REF(CLOSE,1);
VAR6:=100*VOL/CAPITAL*10;
STICKLINE(VAR4<REF(VAR3,1),(-1)*VAR4,(-1)*VAR3,VAR6,1),COLORRED;
VAR7:=MA(VAR3,3);
STICKLINE((-1)*VAR4>VAR7,(-1)*VAR4,(-1)*VAR3,VAR6,1),COLORGREEN;
STICKLINE(VAR4>=REF(VAR3,1),(-1)*VAR4,(-1)*VAR3,VAR6,1),COLORGREEN;
FORCAST((-1)*VAR3,21),COLORRED;
-100;
0,COLORGREEN;
-70;