通达信股市灯塔及未加密选股指标公式源码

通达信股市灯塔及未加密选股指标公式源码

源码正文：

N:=10{XG51};
F:=25{XG51};
VAR1:=HHV(HIGH,9)-LLV(LOW,9){XG51};
VAR2:=HHV(HIGH,9)-CLOSE{XG51};
VAR3:=CLOSE-LLV(LOW,9){XG51};
VAR4:=VAR2/VAR1*100-70{XG51};
VAR5:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100{XG51};
VAR6:=(HIGH+LOW+OPEN+CLOSE)/4{XG51};
VAR7:=SMA(VAR3/VAR1*100,3,1){XG51};
VAR8:=LLV(LOW,34){XG51};
VAR9:=Sma(VAR7,3,1)-SMA(VAR4,9,1){XG51};
VARA:=IF(VAR9>100,VAR9-100,0){XG51};
VARB:=HHV(HIGH,34){XG51};
VARC:=ema((VAR6-VAR8)/(VARB-VAR8)*100,13){XG51};
VARD:=EMA(0.667*REF(VARC,1)+0.333*VARC,2){XG51};
VARE:=SMA(MAX(CLOSE-REF(CLOSE,1),0)/CLOSE,8,1)/SMA(Abs(INDEXC-REF(INDEXC,1))/INDEXC,8,1)*100-25{XG51};
VARF:=MA(VARE,3){XG51};
VAR10:=REF(VARF,1){XG51};
生命线:EMA(VARD,N), COLORFFAA00{XG51};
VAR11:=(CLOSE-LLV(LOW,F))/(HHV(HIGH,F)-LLV(LOW,F))*100{XG51};
K:=SMA(VAR11,3,1){XG51};
D:=SMA(K,3,1){XG51};
红灯亮买: stICKLINE(crOSS(VARC,VARD) AND VARC>VARD AND VARC<18,36,0,1,0), COLORWHITE{XG51};
见红:IF(VARC>18,0,IF(CROSS(VARC,VARD) AND VARC>VARD AND VARC<18,37,0)),COLOR3355FF{XG51};
PLOYLINE(25,CROSS(VARC,VARD) AND VARC>VARD AND VARC<18),COLOR0000FF{XG51};
PLOYLINE(38,CROSS(VARC,VARD) AND VARC>VARD AND VARC<18),POINTDOT,LINETHICK7,COLOR0000FF{XG51};
PLOYLINE(38,CROSS(VARC,VARD) AND VARC>VARD AND VARC<18),POINTDOT,LINETHICK4,COLORFFFFFF{XG51};
浪尖: STICKLINE(CROSS(VARD,VARC) AND VARC<VARD AND VARC>60,90,100,12,1),COLORYELLOW{XG51};
IF(VARC<79,100,IF(CROSS(VARD,VARC) AND VARD>79 AND VARC>79,70,100)),COLOR00FF00{XG51};
卖: STICKLINE(FILTER(CROSS(VARD,VARC),10) AND VARD>79 AND VARC>79,100,95,4,0),COLORCYAN{XG51};
STICKLINE(VARC-VARD>0,VARC,VARD,8,1),COLOR0000FF{XG51};
STICKLINE(VARC-VARD<0,VARC,VARD,8,0),COLOR00FF00{XG51};
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){XG51};
KAR2:=(CLOSE-LLV(LOW,26))/(HHV(HIGH,26)-LLV(LOW,26))*100{XG51};
KAR3:=SMA(SMA(KAR2,3,1),3,1){XG51};
KAR4:=EMA(KAR3,5){XG51};
KAR5:=LLV(LOW,26){XG51};
KAR6:=HHV(HIGH,34){XG51};
KAR7:=EMA((CLOSE-KAR5)/(KAR6-KAR5)*4,4)*25{XG51};
KAR8:=100-KAR1{XG51};
KAR9:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
KAR10:=SMA(KAR9,3,1){XG51};
KAR11:=SMA(KAR10,3,1){XG51};
KAR12:=EMA(3*KAR10-2*KAR11,3){XG51};
KAR13:=(-1)*(EMA(KAR8,1)-50)+50{XG51};
KAR14:=EMA(100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14)),6){XG51};
底部:STICKLINE(CROSS(KAR4,10) AND KAR4>10,50,0,10,0),COLORBLUE{XG51};
建仓:IF((KAR7<10),18,0), COLORCC00FF{X~G.5!1~C~N~{};

通达信波峰波谷黄金分割主图未加密选股指标公式源码

源码正文：

N:=34{XG51};
高:IF (HIGH>PEAK(1,N,1),HHV(HIGH,N),PEAK(1,N,1)),COLORCYAN{XG51};
低:IF (LOW<TROUGH(2,N,1),LLV(LOW,N),TROUGH(2,N,1)),COLORmaGENTA{XG51};
F0.191:(高-低)*0.191+低,DOTLINE,COLORLIMAGENTA{XG51};
F0.382:(高-低)*0.382+低,DOTLINE,COLORGREEN{XG51};
F0.500:(高-低)*0.500+低,DOTLINE,COLORRED{XG51};
F0.618:(高-低)*0.618+低,DOTLINE,COLORGREEN{XG51};
F0.809:(高-低)*0.809+低,DOTLINE,COLORBLUE{XG51};
波谷↑:=TROUGHBARS(2,N,1){XG51};
波峰↓:=PEAKBARS(1,N,1){XG51};
ZHSJ:=IF(波峰↓<波谷↑,BacKSET(ISLAstBAR,波峰↓),IF(波谷↑<波峰↓,BACKSET(ISLASTBAR,波谷↑),0)){XG51};
DRAWTEXT(波峰↓<波谷↑ AND crOSS(ZHSJ,0.1),高*1.003,'重要阻力')COLORCYAN{XG51};
DRAWTEXT(波峰↓<波谷↑ AND CROSS(ZHSJ,0.1),F0.191*1.003,' 80.9%'),COLORBLUE{XG51};
DRAWTEXT(波峰↓<波谷↑ AND CROSS(ZHSJ,0.1),F0.382*1.003,' 61.8%'),COLORGREEN{XG51};
DRAWTEXT(波峰↓<波谷↑ AND CROSS(ZHSJ,0.1),F0.500*1.003,' 50.0%'),COLORRED{XG51};
DRAWTEXT(波峰↓<波谷↑ AND CROSS(ZHSJ,0.1),F0.618*1.003,' 38.2%'),COLORCYAN{XG51};
DRAWTEXT(波峰↓<波谷↑ AND CROSS(ZHSJ,0.1),F0.809*1.003,' 19.1%'),COLORWHITE{XG51};
DRAWTEXT(波峰↓<波谷↑ AND CROSS(ZHSJ,0.1),低*1.003,' 近期低点')COLORWHITE{XG51};
DRAWNUMBER(波峰↓<波谷↑ AND CROSS(ZHSJ,0.1),高,高)COLORCYAN{XG51};
DRAWNUMBER(波峰↓<波谷↑ AND CROSS(ZHSJ,0.1),F0.809,F0.809)COLORLIMAGENTA{XG51};
DRAWNUMBER(波峰↓<波谷↑ AND CROSS(ZHSJ,0.1),F0.618,F0.618)COLORGREEN{XG51};
DRAWNUMBER(波峰↓<波谷↑ AND CROSS(ZHSJ,0.1),F0.500,F0.500)COLORRED{XG51};
DRAWNUMBER(波峰↓<波谷↑ AND CROSS(ZHSJ,0.1),F0.382,F0.382)COLORGREEN{XG51};
DRAWNUMBER(波峰↓<波谷↑ AND CROSS(ZHSJ,0.1),F0.191,F0.191)COLORBLUE{XG51};
DRAWNUMBER(波峰↓<波谷↑ AND CROSS(ZHSJ,0.1),低,低)COLORWHITE{XG51};
DRAWTEXT(波峰↓>波谷↑ AND CROSS(ZHSJ,0.1),高*1.003,' 重要阻力')COLORCYAN{XG51};
DRAWTEXT(波峰↓>波谷↑ AND CROSS(ZHSJ,0.1),F0.191*1.003,' 19.1%'),COLORWHITE{XG51};
DRAWTEXT(波峰↓>波谷↑ AND CROSS(ZHSJ,0.1),F0.382*1.003,' 38.2%'),COLORCYAN{XG51};
DRAWTEXT(波峰↓>波谷↑ AND CROSS(ZHSJ,0.1),F0.500*1.003,' 50.0%'),COLORRED{XG51};
DRAWTEXT(波峰↓>波谷↑ AND CROSS(ZHSJ,0.1),F0.618*1.003,' 61.8%'),COLORGREEN{XG51};
DRAWTEXT(波峰↓>波谷↑ AND CROSS(ZHSJ,0.1),F0.809*1.003,' 80.9%'),COLORBLUE{XG51};
DRAWTEXT(波峰↓>波谷↑ AND CROSS(ZHSJ,0.1),低*1.003,' 近期低点')COLORWHITE{XG51};
DRAWNUMBER(波峰↓>波谷↑ AND CROSS(ZHSJ,0.1),高,高)COLORCYAN{XG51};
DRAWNUMBER(波峰↓>波谷↑ AND CROSS(ZHSJ,0.1),F0.809,F0.809)COLORBLUE{XG51};
DRAWNUMBER(波峰↓>波谷↑ AND CROSS(ZHSJ,0.1),F0.618,F0.618)COLORGREEN{XG51};
DRAWNUMBER(波峰↓>波谷↑ AND CROSS(ZHSJ,0.1),F0.500,F0.500)COLORRED{XG51};
DRAWNUMBER(波峰↓>波谷↑ AND CROSS(ZHSJ,0.1),F0.382,F0.382)COLORGREEN{XG51};
DRAWNUMBER(波峰↓>波谷↑ AND CROSS(ZHSJ,0.1),F0.191,F0.191)COLORLIMAGENTA{XG51};
DRAWNUMBER(波峰↓>波谷↑ AND CROSS(ZHSJ,0.1),低,低)COLORWHITE{XG51};
MA21:MA(CLOSE,21)COLORMAGENTA,CROSSDOT{XG51};

IF(MA21<REF(MA21,5),MA21,DRAWNULL)COLORGREEN,CROSSDOT{X_G!5.1_C_N_{};