大智慧海底火山指标公式程序源码及编程思路破译

编程思路破译

LC赋值:1日前的收盘价

快线1赋值:(((收盘价-LC)和0的较大值的5日[1日权重]移动平均 / (收盘价-LC)的绝对值的5日[1日权重]移动平均) * 100)

慢线1赋值:(((收盘价-LC)和0的较大值的12日[1日权重]移动平均 / (收盘价-LC)的绝对值的12日[1日权重]移动平均) * 100)

输出快线:快线1的1日简单移动平均,COLORCCCC66

输出慢线:慢线1的8日简单移动平均,COLORBFBFBF

SSRCJL赋值:成交量(手)的13日指数移动平均

SSRCJE赋值:成交额(元)的13日指数移动平均

SSRCBJX赋值:((SSRCJE / SSRCJL) / 100)

SSRGL赋值:(((收盘价 - SSRCBJX) / SSRCBJX) * 100)

输出大底:如果(SSRGL<(0-18)),返回80,否则返回0,STICK,画红色

输出深底:如果(SSRGL<(0-14)),返回60,否则返回0,STICK,画绿色

输出中底:如果(SSRGL<(0-10)),返回40,否则返回0,STICK,画黄色

输出浅底:如果(SSRGL<(0-6)),返回20,否则返回0,STICK,COLOR99CCFF

LC1赋值:1日前的收盘价

RSI5赋值:(((收盘价-LC)和0的较大值的5日[1日权重]移动平均 / (收盘价-LC1)的绝对值的5日[1日权重]移动平均) * 100)

R赋值:(((收盘价 - 9日内最低价的最低值) / (9日内最高价的最高值 - 9日内最低价的最低值)) * 100)

A赋值:R的3日[1日权重]移动平均

B赋值:A的3日[1日权重]移动平均

CCC赋值:(((B / 2) + 40) * 1.1)

落袋为安D赋值:CCC的3日[1日权重]移动平均

输出落袋为安:如果落袋为安D上穿RSI5,返回58,否则返回0

RSV赋值:(((收盘价 - 29日内最低价的最低值) / (29日内最高价的最高值 - 29日内最低价的最低值)) * 100)

K赋值:RSV的5日简单移动平均

D赋值:K的2日简单移动平均

J赋值:((3 * K) - (2 * D))

输出海底火山:如果(J<5),返回75,否则返回0,画洋红色

程序源码

LC:=REF(CLOSE,1);

快线1:=((SMA(MAX((CLOSE - LC),0),5,1) / SMA(ABS((CLOSE - LC)),5,1)) * 100);

慢线1:=((SMA(MAX((CLOSE - LC),0),12,1) / SMA(ABS((CLOSE - LC)),12,1)) * 100);

快线:MA(快线1,1),COLORCCCC66{808080};

慢线:MA(慢线1,8),COLORBFBFBF{80};

SSRCJL:=EMA(VOL,13);

SSRCJE:=EMA(AMOUNT,13);

SSRCBJX:=((SSRCJE / SSRCJL) / 100);

SSRGL:=(((CLOSE - SSRCBJX) / SSRCBJX) * 100);

大底:IF((SSRGL < (0 - 18)),80,0),STICK,COLORRED;

深底:IF((SSRGL < (0 - 14)),60,0),STICK,COLORGREEN;

中底:IF((SSRGL < (0 - 10)),40,0),STICK,COLORYELLOW;

浅底:IF((SSRGL < (0 - 6)),20,0),STICK,COLOR99CCFF;

LC1:=REF(CLOSE,1);

RSI5:=((SMA(MAX((CLOSE - LC),0),5,1) / SMA(ABS((CLOSE - LC1)),5,1)) * 100);

R:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 100);

A:=SMA(R,3,1);

B:=SMA(A,3,1);

CCC:=(((B / 2) + 40) * 1.1);

落袋为安D:=SMA(CCC,3,1);

落袋为安:IF(CROSS(落袋为安D,RSI5),58,0);

RSV:=(((CLOSE - LLV(LOW,29)) / (HHV(HIGH,29) - LLV(LOW,29))) * 100);

K:=MA(RSV,5);

D:=MA(K,2);

J:=((3 * K) - (2 * D));

海底火山:IF((J < 5),75,0),COLORMAGENTA;