【股票指标公式】-【通达信】灯塔(生命线、红灯亮买、灯塔脉冲).docVIP

【通达信】灯塔（生命线、红灯亮买、灯塔脉冲）-指标公式源码 N:=10; F:=25; VAR1:=HHV(HIGH,9)-LLV(LOW,9); VAR2:=HHV(HIGH,9)-CLOSE; VAR3:=CLOSE-LLV(LOW,9); VAR4:=VAR2/VAR1*100-70; VAR5:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100; VAR6:=(HIGH+LOW+OPEN+CLOSE)/4; VAR7:=SMA(VAR3/VAR1*100,3,1); VAR8:=LLV(LOW,34); VAR9:=SMA(VAR7,3,1)-SMA(VAR4,9,1); VARA:=IF(VAR9100,VAR9-100,0); VARB:=HHV(HIGH,34); VARC:=EMA((VAR6-VAR8)/(VARB-VAR8)*100,13); VARD:=EMA(0.667*REF(VARC,1)+0.333*VARC,2); VARE:=SMA(MAX(CLOSE-REF(CLOSE,1),0)/CLOSE,8,1)/SMA(ABS(INDEXC-REF(INDEXC,1))/INDEXC,8,1)*100-25; VARF:=MA(VARE,3); VAR10:=REF(VARF,1); 生命线:EMA(VARD,N), COLORFFAA00; VAR11:=(CLOSE-LLV(LOW,F))/(HHV(HIGH,F)-LLV(LOW,F))*100; K:=SMA(VAR11,3,1); D:=SMA(K,3,1); 红灯亮买: STICKLINE(CROSS(VARC,VARD) AND VARCVARD AND VARC18,36,0,1,0), COLORRED; 见红:IF(VARC18,0,IF(CROSS(VARC,VARD) AND VARCVARD AND VARC18,37,0)),COLOR3355FF;{灯塔脉冲} PLOYLINE(25,CROSS(VARC,VARD) AND VARCVARD AND VARC18),COLOR0000FF;{画红色灯桩} PLOYLINE(38,CROSS(VARC,VARD) AND VARCVARD AND VARC18),POINTDOT,LINETHICK7,COLOR0000FF;{画浅蓝色灯辉} PLOYLINE(38,CROSS(VARC,VARD) AND VARCVARD AND VARC18),POINTDOT,LINETHICK4,COLORFFFFFF;{画白色灯芯} 浪尖: STICKLINE(CROSS(VARD,VARC) AND VARCVARD AND VARC60,90,100,12,1),COLORBLUE; IF(VARC79,100,IF(CROSS(VARD,VARC) AND VARD79 AND VARC79,70,100)),COLOR00FF00;{灯塔脉冲} { 卖: STICKLINE(FILTER(CROSS(VARD,VARC),10) AND VARD79 AND VARC79,100,95,4,0),COLORGREEN;{画绿色倒灯桩} { PARTLINE(68,CROSS(VARD,VARC) AND VARD79 AND VARC79),POINTDOT,LINETHICK7,COLOR00FF00;{画绿色灯辉} {PARTLINE(68,CROSS(VARD,VARC) AND VARD79 AND VARC79),POINTDOT,LINETHICK4,COLORFFFFFF;{画白色灯芯} STICKLINE(VARC-VARD0,VARC,VARD,8,1),COLOR0000FF;{多头行情显出红柱状} STICKLINE(VARC-VARD0,VARC,VARD,8,0),COLOR00FF00;{空头行情显出绿色柱状} KAR1:=3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)-2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1); KAR2:=(CLOSE-LLV(LOW,26))/(HHV(HIGH,26)-LLV(LOW,26))*100; KAR3:=SMA(SMA(KAR2,3,1),3,1); KAR4:=EMA(KAR3,5); KAR5:=LLV(LOW,26); KAR6:=HHV(HIGH,34); KAR7:=