通达信海洋寻底源码附图无未来

SSRCJL:=EMA(VOL,13);
 SSRCJE:=EMA(AMOUNT,13);
 SSRCBJX:=((SSRCJE / SSRCJL) / 100);
 SSRGL:=(((CLOSE - SSRCBJX) / SSRCBJX) * 100);
 P1:=4;
 P2:=5;
绝对底:SSRGL<(0-18),COLORRED;
大底:SSRGL<(0-14),COLORBLUE;
中底:SSRGL<(0-10),COLORYELLOW;
短底:SSRGL<(0-6),COLORWHITE;
 STICKLINE((SSRGL < (0 - 18)),60,80,3,0),COLORRED;
 STICKLINE((SSRGL < (0 - 14)),40,60,3,0),COLORBLUE;
 STICKLINE((SSRGL < (0 - 10)),20,40,3,0),COLORYELLOW;
 STICKLINE((SSRGL < (0 - 6)),0,20,3,0),COLORWHITE;
高卖:80, POINTDOT,COLORRED;
低吸:20, POINTDOT,COLORGREEN;

 VAR1:=LLV(LOW,P1);
 VAR2:=HHV(HIGH,P1);
 K: EMA((CLOSE-VAR1)/(VAR2-VAR1)*100,P2),COLORRED,LINETHICK2;
 D: EMA(0.667*REF(K,1)+0.333*K,2),COLORGREEN,LINETHICK2;