通达信顶部概率指标(源码)

N:=72;
M:=15;
N2:=3;
RSV1:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100;
K1:=SMA(RSV1,3,1);
D1:=SMA(K1,3,1);
J1:3*K1-2*D1,NODRAW;
J值:=IF(J1>100 AND J1<REF(J1,1),100,J1);
RSV:=((CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9)))*(100);
TJ:=IF((RSV<5),0,RSV);
操作:IF((TJ>95),100,TJ),NODRAW;
危量:IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,
(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100),NODRAW;
走势1:=EMA(CLOSE,6);
白线:(走势1-REF(走势1,1))/REF(走势1,1)*10000,NODRAW;
BX:=IF(白线>100,100,白线);
多方:100-(100*(HHV(HIGH,N2)-CLOSE)/(HHV(HIGH,N2)-LLV(LOW,N2))),NODRAW;
DL:=IF(多方<REF(多方,1) AND REF(多方,1)>90,100,多方);
RE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)+20;
乖离:IF(RE>100,100,0);
概率:(J值+操作+危量+DL+BX+乖离)/6,NODRAW;
STICKLINE(概率>75 AND 危量>90
AND (J值<REF(J值,1) OR 操作<REF(操作,1) OR 多方<REF(多方,1) ),0,概率,3,0),COLORRED;
STICKLINE(IF(危量=100 AND 操作=100,100,0 ),100,0,2,0),COLORYELLOW;
VARA:=((AMOUNT)/(VOL))/(100);
VARB:=((3)*(HIGH)+LOW+OPEN+(2)*(CLOSE))/(7);
VARC:=((SUM(AMOUNT,7))/(VARA))/(100);
VARD:=DMA(VARB,(VOL)/(VARC));
VARE:=((CLOSE-VARD)/(VARD))*(100);
VARF:=((CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)))*(100);
VARJ:=MA(VARE,20)+STD(VARE,20);
BIAS18:=((CLOSE-MA(CLOSE,18))/(MA(CLOSE,18)))*(100);
AA:=SMA(VARF,3,1);
SS:=(REF(BIAS18,1)>=5) AND CROSS(VARJ,VARE) AND (AA>79);
DRAWTEXT((REF(BIAS18,1)>=5) AND CROSS(VARJ,VARE) AND (AA>SS),50,'回落');