{圣灵石股海明灯}
圣灵石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);}

{圣灵石股海神灯指标用法：
1： 圣灵石线上穿圣灵石仙线，是买入时机！反之死叉是卖出！
2 ： 股海神灯出现，就是资金活跃的地方。
3： 第（2）条服从第（1）条！
4：永恒的圣灵石！};

Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,' ');
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLOR00C0C0;