通达信江恩百分比主图未加密选股指标公式源码

源码正文：

N:=6000{XG51};
高:=REFDATE(HHV(H,N),DATE);
低:=REFDATE(LLV(L,N),DATE){XG51};
H1:=高-(高-低)*1.000{XG51};
H2:=高-(高-低)*0.875{XG51};
H3:=高-(高-低)*0.750{XG51};
H4:=高-(高-低)*0.666{XG51};
H5:=高-(高-低)*0.625{XG51};
H6:=高-(高-低)*0.500{XG51};
H7:=高-(高-低)*0.375{XG51};
H8:=高-(高-低)*0.333{XG51};
H9:=高-(高-低)*0.250{XG51};
H10:=高-(高-低)*0.125{XG51};
H11:=高-(高-低)*0.000{XG51};
stICKLINE(CURRBARSCOUNT=13,高,高,100,1),COLORCYAN{XG51};
STICKLINE(CURRBARSCOUNT=13,H1,H1,100,1),COLORGREEN{XG51};
STICKLINE(CURRBARSCOUNT=13,H2,H2,100,1),COLORCCCCCC{XG51};
DRAWTEXT(CURRBARSCOUNT=1,H1,'0.000'),COLORGREEN{XG51};
DRAWTEXT(CURRBARSCOUNT=1,H2,' 0.125'),COLORFFFFFF{XG51};
DRAWTEXT(CURRBARSCOUNT=1,H3,' 0.250'),COLORBLUE{XG51};
DRAWTEXT(CURRBARSCOUNT=1,H4,' 0.333'),COLORLICYAN{XG51};
DRAWTEXT(CURRBARSCOUNT=1,H5,' 0.375'),COLORCYAN{XG51};
DRAWTEXT(CURRBARSCOUNT=1,H6,' 0.500'),COLORmaGENTA{XG51};
DRAWTEXT(CURRBARSCOUNT=1,H7,' 0.625'),COLORWHITE{XG51};
DRAWTEXT(CURRBARSCOUNT=1,H8,' 0.666'),COLORWHITE{XG51};
DRAWTEXT(CURRBARSCOUNT=1,H9,' 0.750'),COLORCYAN{XG51};
DRAWTEXT(CURRBARSCOUNT=1,H10,' 0.875'),COLORLIMAGENTA{XG51};
DRAWTEXT(CURRBARSCOUNT=1,H11,' 1.000'),COLORCYAN{XG51};
STICKLINE(CURRBARSCOUNT=13,H3,H3,100,1),COLORBLUE{XG51};
STICKLINE(CURRBARSCOUNT=13,H4,H4,100,1),COLORLICYAN{XG51};
STICKLINE(CURRBARSCOUNT=13,H6,H6,100,1),COLORCYAN{XG51};
STICKLINE(CURRBARSCOUNT=13,H5,H5,100,1),COLORLIMAGENTA{XG51};
STICKLINE(CURRBARSCOUNT=13,低,低,100,1),COLORWHITE{XG51};
STICKLINE(CURRBARSCOUNT=13,H7,H7,100,1),COLORWHITE{XG51};
STICKLINE(CURRBARSCOUNT=13,H8,H8,100,1),COLORWHITE{XG51};
STICKLINE(CURRBARSCOUNT=13,H9,H9,100,1),COLORWHITE{XG51};
STICKLINE(CURRBARSCOUNT=13,H10,H10,100,1),COLORWHITE{XG51};
DRAWTEXT(CURRBARSCOUNT=25,高*0.99,CON2STR(高,2)),COLORCYAN{XG51};
DRAWTEXT(CURRBARSCOUNT=25,H10,CON2STR(H10,2)),COLORLICYAN{XG51};
DRAWTEXT(CURRBARSCOUNT=25,H9,CON2STR(H9,2)),COLORLIMAGENTA{XG51};
DRAWTEXT(CURRBARSCOUNT=25,H8,CON2STR(H8,2)),COLORWHITE{XG51};
DRAWTEXT(CURRBARSCOUNT=25,H1,CON2STR(H1,2)),COLORGREEN{XG51};
DRAWTEXT(CURRBARSCOUNT=25,H2,CON2STR(H2,2)),COLORFFFFFF{XG51};
DRAWTEXT(CURRBARSCOUNT=25,H3,CON2STR(H3,2)),COLORBLUE{XG51};
DRAWTEXT(CURRBARSCOUNT=25,H6,CON2STR(H6,2)),COLORCYAN{XG51};
DRAWTEXT(CURRBARSCOUNT=25,H4,CON2STR(H4,2)),COLORLICYAN{XG51};
DRAWTEXT(CURRBARSCOUNT=25,H5,CON2STR(H5,2)),COLORLIMAGENTA{XG51};
DRAWTEXT(CURRBARSCOUNT=25,H7,CON2STR(H7,2)),COLORWHITE{XG51};
DRAWTEXT(CURRBARSCOUNT=25,低*1.01,CON2STR(低,2)),COLORWHITE{X.G~5_1.C.N.{};

源码正文：

V1:=(C*2+H+L)/4*10{XG51};
V2:=ema(V1,13)-Ema(V1,34){XG51};
V3:=EMA(V2,5){XG51};
V4:=2*(V2-V3)*5.5{XG51};
主力撤: IF(V4<=0,V4,0),COLORYELLOW{XG51};
主力进: IF(V4>=0,V4,0),COLORFF00FF{XG51};
V5:=(HHV(INDEXH,8)-INDEXC)/(HHV(INDEXH,8)-LLV(INDEXL,8))*8{XG51};
V6:=EMA(3*V5-2*SMA(V5,18,1),5){XG51};
V7:=(INDEXC-LLV(INDEXL,8))/(HHV(INDEXH,8)-LLV(INDEXL,8))*10{XG51};
V8:=(INDEXC*2+INDEXH+INDEXL)/4{XG51};
V9:=EMA(V8,13)-EMA(V8,34){XG51};
VA:=EMA(V9,3){XG51};
VB:=(V9-VA)/2{XG51};
大盘资金进场:IF(VB>=0,VB,0),COLORWHITE{XG51};
大盘资金撤走:IF(VB<=0,VB,0),COLORCYAN{XG51};
V11:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1){XG51};
趋势:=EMA(V3,3)-10{XG51};
趋势线: EMA(V11,3){XG51};
V12:=(趋势线-REF(趋势线,1))/REF(趋势线,1)*100{XG51};
准备现金: stICKLINE(趋势线<=13,0,20,5,0),COLORCC9900{XG51};
AA:=(趋势线<=13) AND FILTER((趋势线<=13),15){XG51};
DRAWTEXT (AA,30,'准备现金'),COLORCC9900{XG51};
买入股票: STICKLINE(趋势线<=13 AND V12>13,0,50,4,0),COLOR0099FF{XG51};
BB:= (趋势线<=13 AND V12>13) AND FILTER((趋势线<=13 AND V12>13),10) {XG51};
DRAWTEXT (BB,60,'买入股票'),COLOR0099FF{XG51};
卖临界: STICKLINE(趋势线>90 AND 趋势线>REF(趋势线,1),100,95,15,1),COLORFFFF00{XG51};
顶:FILTER(趋势线>90 AND 趋势线<REF(趋势线,1) AND 主力进<REF(主力进,1),8){XG51};
DRAWTEXT( 顶,60,'逃顶'),COLORBLUE{XG51};
CC:=(趋势线>=90 AND V12) AND FILTER((趋势线>=90 AND V12),10){XG51};
STICKLINE(大盘资金进场 AND 趋势线<13,0,30,4,0),COLORWHITE{XG51};
STICKLINE(大盘资金撤走 AND 趋势线>90,0,30,4,0),COLORCYAN{XG51};
STICKLINE(主力进 AND 趋势线<13,0,40,4,0),COLORFF00FF{XG51};
STICKLINE(主力撤 AND 趋势线>90,0,40,4,0),COLORYELLOW{XG51};
V13:=(MA(C,1)+MA(C,3)+MA(C,5)+MA(C,7)+MA(C,9))/5{XG51};
V14:=(MA(C,2)+MA(C,4)+MA(C,6)+MA(C,8)+MA(C,10))/5{XG51};
V15:=MAX(EMA(V13,2)-EMA(V14,5),0)*200{XG51};
V16:=EMA(V15,5){XG51};
波浪峰:V16,STICK,COLORFF00FF{XG51};
STICKLINE(V16<REF(V16,1),0,V16,1,0),COLOR00FF00{XG51};
VAR1:=EMA(HHV(HIGH,500),21){XG51};
VAR2:=EMA(HHV(HIGH,250),21){XG51};
VAR3:=EMA(HHV(HIGH,90),21){XG51};
VAR4:=EMA(LLV(LOW,500),21){XG51};
VAR5:=EMA(LLV(LOW,250),21){XG51};
VAR6:=EMA(LLV(LOW,90),21){XG51};
VAR7:=EMA((VAR4*0.96+VAR5*0.96+VAR6*0.96+VAR1*0.558+VAR2*0.558+VAR3*0.558)/6,21){XG51};
VAR8:=EMA((VAR4*1.25+VAR5*1.23+VAR6*1.2+VAR1*0.55+VAR2*0.55+VAR3*0.65)/6,21){XG51};
VAR9:=EMA((VAR4*1.3+VAR5*1.3+VAR6*1.3+VAR1*0.68+VAR2*0.68+VAR3*0.68)/6,21){XG51};
VAR10:=IF(MA(CLOSE,58),1,0){XG51};
VARA:=EMA((VAR7*3+VAR8*2+VAR9)/6*1.738,21){XG51};
VARB:=REF(LOW,1){XG51};
VARC:=SMA(Abs(LOW-VARB),3,1)/SMA(MAX(LOW-VARB,0),3,1)*100{XG51};
VARD:=EMA(IF(CLOSE*1.35<=VARA,VARC*10,VARC/10),3){XG51};
VARE:=LLV(LOW,30){XG51};
VARF:=HHV(VARD,30){XG51};
火焰山: EMA(IF(LOW<=VARE,(VARD+VARF*2)/2,0),3)/618*VAR10,COLORWHITE{XG51};
火焰: STICKLINE(火焰山>0,0,火焰山,4,1){XG51};
今量:火焰山{XG51};
STICKLINE(火焰山>0,0,今量*1.2,8,0), COLOR0000FF{XG51};
STICKLINE(火焰山>0,0,今量*0.8,8,0), COLOR0066FF{XG51};
STICKLINE(火焰山>0,0,今量*0.6,8,0),COLOR0099FF{XG51};
STICKLINE(火焰山>0,0,今量*0.4,8,0), COLOR00CCFF{XG51};
STICKLINE(火焰山>0,0,今量*0.2,8,0), COLOR00FFFF{XG51};
VAR28:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100{XG51};
VAR29:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100{XG51};
VAR30:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100{XG51};
VAR31:=REF(CLOSE,1){XG51};
VAR32:=SMA(MAX(CLOSE-VAR31,0),5,1)/SMA(ABS(CLOSE-VAR31),5,1)*100{XG51};
VAR33:=(HIGH+LOW+CLOSE)/3{XG51};
VAR34:=(VAR33-MA(VAR33,14))/(0.015*AVEDEV(VAR33,14)){XG51};
VA1:=REF(CLOSE,1){XG51};
VA2:=SMA(MAX(CLOSE-VA1,0),7,1)/SMA(ABS(CLOSE-VA1),7,1)*100,COLORBLUE{XG51};
地:IF(VA2<20,40,20),COLORWHITE{XG51};
天:IF(VA2>80,60,80),COLORFFFF50{XG51};
VAR2↑:STICKLINE(FILTER(REF(VA2,1)<20 AND VA2>REF(VA2,1),5),20,-20,4,0),COLORWHITE{XG51};
VAR2↓:STICKLINE(FILTER(REF(VA2,1)>80 AND VA2<REF(VA2,1),5),60,80,3,0),COLORFFFF50{XG51};
DRAWTEXT(FILTER(REF(VA2,1)<20 AND VA2>REF(VA2,1),5),-10 ,'买入' ),COLORFFFFFF{XG51};
DRAWTEXT(FILTER(REF(VA2,1)>80 AND VA2<REF(VA2,1),5),100 ,'卖出' ),COLORFFFFFF{XG51};
80,COLORCYAN{XG51};
20,COLORWHITE{X_G+5-1_C_N_{};