公式源码：

{圣灵石股海明灯}

圣灵石1:EMA(C,3),LINETHICK2;

圣灵石仙1:EMA(C,7),LINETHICK2;

圣2:=IF((EMA((C*2+H+L)/4,1)-EMA((C*2+H+L)/4,40)-EMA(EMA((C*2+H+L)/4,1)-EMA((C*2+H+L)/4,40),5))*100<-20,-20,IF((EMA((C*2+H+L)/4,1)-EMA((C*2+H+L)/4,40)-EMA(EMA((C*2+H+L)/4,1)-EMA((C*2+H+L)/4,40),5))*100>100,100,(EMA((C*2+H+L)/4,1)-EMA((C*2+H+L)/4,40)-EMA(EMA((C*2+H+L)/4,1)-EMA((C*2+H+L)/4,40),5))*100));

灵2:=IF((3*(HHV(HIGH,5)-CLOSE)/(HHV(HIGH,5)-LLV(LOW,5))*20-2*SMA((HHV(HIGH,5)-CLOSE)/(HHV(HIGH,5)-LLV(LOW,5))*20,3,1))*1>100,100,IF((3*(HHV(HIGH,5)-CLOSE)/(HHV(HIGH,5)-LLV(LOW,5))*20-2*SMA((HHV(HIGH,5)-CLOSE)/(HHV(HIGH,5)-LLV(LOW,5))*20,3,1))*1<-5,-5,(3*(HHV(HIGH,5)-CLOSE)/(HHV(HIGH,5)-LLV(LOW,5))*20-2*SMA((HHV(HIGH,5)-CLOSE)/(HHV(HIGH,5)-LLV(LOW,5))*20,3,1))*1));

石2:=IF((HHV(HIGH,13)-CLOSE)/(HHV(HIGH,13)-LLV(LOW,13))*120>100,100,(HHV(HIGH,13)-CLOSE)/(HHV(HIGH,13)-LLV(LOW,13))*120);

股海神灯:=CROSS(圣2,灵2) AND CROSS(80,石2);

DRAWICON(股海神灯,L*0.98,1);

DRAWTEXT(股海神灯,LOW *0.98,'股海神灯' ),COLORYELLOW;

{STICKLINE(股海神灯,H,L,6,0),LINETHICK1,COLORRED;

STICKLINE(股海神灯,H,L,0.2,0),COLORYELLOW;

STICKLINE(股海神灯,O,C,2,0),LINETHICK1,COLORYELLOW;

DRAWICON(股海神灯,(H+L)/2,7);}

Z1:=STRCAT(HYBLOCK,' ');

Z2:=STRCAT(Z1,DYBLOCK);

Z3:=STRCAT(Z2,' ');

DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLOR00C0C0;

{圣灵石股海神灯指标用法：

1： 圣灵石线上穿圣灵石仙线，是买入时机！反之死叉是卖出！

2 ： 股海神灯出现，就是资金活跃的地方。

3： 第（2）条服从第（1）条！

4：永恒的圣灵石！};