{qcf求财富}
n:=90;
rsv90:=(CLOSE-LLV(LOW,n))/(HHV(HIGH,n)-LLV(LOW,n))*100;
k90:=LLVBARS(rsv90,n),colorred;
d90:HHVBARS(rsv90,n),color00ffff,linestick;
rsv5:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100;
k5:SMA(rsv5,3,1),coloraaaadd;
d5:SMA(k5,3,1),coloraaaaaa;
vv5:STICKLINE(k5>d5,k5,d5,5,0),coloraaaadd;
rsv60:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
k60:SMA(rsv60,3,1);
d60:SMA(k60,3,1);
vv60:STICKLINE(k60>d60,k60,d60,10,0),colorff00ff;
rsv89:=(CLOSE-LLV(LOW,89))/(HHV(HIGH,89)-LLV(LOW,89))*100;
k89:SMA(rsv89,13,1);
d89:SMA(k89,3,1);
vv89:STICKLINE(k89>d89,k89,d89,10,0),colorffff00;
var3:=100-3*sma((close-llv(low,75))/(hhv(high,75)-llv(low,75))*100,20,1)+2*sma(sma((close-llv(low,75))/(hhv(high,75)-llv(low,75))*100,20,1),15,1);
底部线: var3;
stickline(底部线>=ref(底部线,1),底部线,ref(底部线,1),3,0),color00ffff,
linethick2;
stickline(底部线<ref(底部线,1),底部线,ref(底部线,1),3,0),colorff9900,
linethick2;
v0:0,color00ff00;
v20:20,color00ff00,pointdot;
v50:50,color00ff00;
v80:80,color00ff00,pointdot;
v100:100,color00ff00;