通达信绝色主图未加密选股指标公式源码

通达信绝色主图未加密选股指标公式源码

源码正文：

GJ:=(C+H+L+O)/4{XG51};
阻:=L+(GJ-L)+(C-L){XG51};
支:=L+(C-GJ){XG51};
压力:REF(阻 , 1),NODRAW,COLOR00FF00{XG51};
支撑:REF(支 , 1),NODRAW,COLORBLUE{XG51};
N:=8{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};
DRAWBAND(低,RGB(0,0,0),F0.191,RGB(150,0,0)){XG51};
DRAWBAND(F0.191,RGB(0,0,0),F0.382,RGB(150,0,150)){XG51};
DRAWBAND(F0.382,RGB(0,0,0),F0.500,RGB(100,100,0)){XG51};
DRAWBAND(F0.500,RGB(0,0,0),F0.618,RGB(0,100,100)){XG51};
DRAWBAND(F0.618,RGB(0,0,0),F0.809,RGB(0,0,150)){XG51};
DRAWBAND(F0.809,RGB(0,0,0),高,RGB(0,100,0)){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.002,' 80.9%'),COLORBLUE{XG51};
DRAWTEXT(波峰↓<波谷↑ AND CROSS(ZHSJ,0.1),F0.382*1.002,' 61.8%'),COLORGREEN{XG51};
DRAWTEXT(波峰↓<波谷↑ AND CROSS(ZHSJ,0.1),F0.500*1.002,' 50.0%'),COLORRED{XG51};
DRAWTEXT(波峰↓<波谷↑ AND CROSS(ZHSJ,0.1),F0.618*1.002,' 38.2%'),COLORCYAN{XG51};
DRAWTEXT(波峰↓<波谷↑ AND CROSS(ZHSJ,0.1),F0.809*1.002,' 19.1%'),COLORWHITE{XG51};
DRAWTEXT(波峰↓<波谷↑ AND CROSS(ZHSJ,0.1),低*1.002,'低')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.002,' 19.1%'),COLORWHITE{XG51};
DRAWTEXT(波峰↓>波谷↑ AND CROSS(ZHSJ,0.1),F0.382*1.002,' 38.2%'),COLORCYAN{XG51};
DRAWTEXT(波峰↓>波谷↑ AND CROSS(ZHSJ,0.1),F0.500*1.002,' 50.0%'),COLORRED{XG51};
DRAWTEXT(波峰↓>波谷↑ AND CROSS(ZHSJ,0.1),F0.618*1.002,' 61.8%'),COLORGREEN{XG51};
DRAWTEXT(波峰↓>波谷↑ AND CROSS(ZHSJ,0.1),F0.809*1.002,' 80.9%'),COLORBLUE{XG51};
DRAWTEXT(波峰↓>波谷↑ AND CROSS(ZHSJ,0.1),低*1.002,'低')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};
XG2:=O>=C{XG51};
STICKLINE(XG2,L,H,0,0),COLORFF9900{XG51};
STICKLINE(XG2,CLOSE,OPEN,3,0),COLORFF5500{XG51};
STICKLINE(XG2,CLOSE,OPEN,2.8,0),COLORFF6600{XG51};
STICKLINE(XG2,CLOSE,OPEN,2.5,0),COLORFF7700{XG51};
STICKLINE(XG2,CLOSE,OPEN,2.2,0),COLORFF8800{XG51};
STICKLINE(XG2,CLOSE,OPEN,1.7,0),COLORFF9900{XG51};
STICKLINE(XG2,CLOSE,OPEN,1.2,0),COLORFFAA00{XG51};
STICKLINE(XG2,CLOSE,OPEN,0.7,0),COLORFFCC00{XG51};
STICKLINE(XG2,CLOSE,OPEN,0.2,0),COLORFFFF00{XG51};
XG1:=C>O{XG51};
STICKLINE(XG1,L,H,0,0),COLOR0088EE{XG51};
STICKLINE(XG1,CLOSE,OPEN,3,0),COLOR0055AA{XG51};
STICKLINE(XG1,CLOSE,OPEN,2.8,0),COLOR0066BB{XG51};
STICKLINE(XG1,CLOSE,OPEN,2.5,0),COLOR0077CC{XG51};
STICKLINE(XG1,CLOSE,OPEN,2.2,0),COLOR0088DD{XG51};
STICKLINE(XG1,CLOSE,OPEN,1.7,0),COLOR0099EE{XG51};
STICKLINE(XG1,CLOSE,OPEN,1.2,0),COLOR00AAFF{XG51};
STICKLINE(XG1,CLOSE,OPEN,0.7,0),COLOR00CCFF{XG51};
STICKLINE(XG1,CLOSE,OPEN,0.2,0),COLOR00FFFF{XG51};
实体80.9%:=(MAX(O,C)-MIN(O,C))*0.809+MIN(O,C) {XG51};
实体61.8%:=(MAX(O,C)-MIN(O,C))*0.618+MIN(O,C) {XG51};
实体38.2%:=(MAX(O,C)-MIN(O,C))*0.382+MIN(O,C) {XG51};
实体19.1%:=(MAX(O,C)-MIN(O,C))*0.191+MIN(O,C) {XG51};
实体50.0%:=(O+C)/2,COLORRED NODRAW{XG51};
STICKLINE(O<>C,实体80.9%,实体19.1%,2,0),COLORBROWN{XG51};
STICKLINE(O<>C,实体61.8%,实体38.2%,1,0),COLORYELLOW{XG51};
STICKLINE(O<>C,实体50.0%,实体50.0%,4,0),COLORBLUE{XG51};
超B:=L2_AMO(0,2)/10000.0{XG51};
大B:=L2_AMO(1,2)/10000.0{XG51};
超S:=L2_AMO(0,3)/10000.0{XG51};
大S:=L2_AMO(1,3)/10000.0{XG51};
超大单:=(超B)-(超S){XG51};
大单:=(大B)-(大S){XG51};
大资金流向:=超大单+大单 {XG51};
STICKLINE(大资金流向>0,实体61.8%,实体38.2%,1.2,0),COLORBB00BB{XG51};
STICKLINE(大资金流向>0,实体61.8%,实体38.2%,0.7,0),COLORDD00DD{XG51};
STICKLINE(大资金流向>0,实体61.8%,实体38.2%,0.2,0),COLORFF33FF{XG51};
STICKLINE(大资金流向<0,实体61.8%,实体38.2%,1.2,0),COLOR00BB00{XG51};
STICKLINE(大资金流向<0,实体61.8%,实体38.2%,0.7,0),COLOR00DD00{XG51};
STICKLINE(大资金流向<0,实体61.8%,实体38.2%,0.2,0),COLOR00FF00{XG51};
TL:=1000000+160526;DRAWTEXT(DATE=TL ,L*0.997,'DA')COLORGREEN{XG51};
TH:=1000000+160606;DRAWTEXT(DATE=TH ,H,'DB')COLORGREEN,DRAWAbovE{XG51};
TC:=1000000+160624;DRAWTEXT(DATE=TC ,L*0.997,'DC')COLORGREEN{XG51};
TO:=1000000+160413;DRAWTEXT(DATE=TO ,H,'DO')COLORGREEN DRAWABOVE{XG51};
IF(DATE=TO ,H,DRAWNULL),COLORGREEN,LINETHICK5,CIRCLEDOT{XG51};
IF(DATE=TC ,L,DRAWNULL),COLORWHITE,LINETHICK5,CIRCLEDOT{XG51};
AL:=IF(REFDATE(CLOSE,TL)>REFDATE(CLOSE,TH),REFDATE(HIGH,TL),REFDATE(LOW,TL)){XG51};
BH:=IF(REFDATE(CLOSE,TL)>REFDATE(CLOSE,TH),REFDATE(LOW,TH),REFDATE(HIGH,TH)){XG51};
CZF:=IF(REFDATE(CLOSE,TL)>REFDATE(CLOSE,TH),REFDATE(HIGH,TC),REFDATE(LOW,TC)){XG51};
DJB:=IF(REFDATE(CLOSE,TL)>REFDATE(CLOSE,TH),REFDATE(LOW,TO),REFDATE(HIGH,TO)){XG51};
OP:=BH-AL+CZF{XG51};
COP:=0.618*(BH-AL)+CZF{XG51};
XOP:=IF((1.618*(BH-AL)+CZF)<0,OP,1.618*(BH-AL)+CZF){XG51};
TODAY:=DATE{XG51};
STICKLINE(DATE=TC,CZF,XOP,0,-1),COLORBLUE{XG51};
DRAWLINE(DATE=TC,COP,DATE=TODAY,COP,1),DOTLINE,COLORBLUE{XG51};
DRAWLINE(DATE=TC,OP,DATE=TODAY,OP,1),DOTLINE,COLORBLUE{XG51};
DRAWLINE(DATE=TC,XOP,DATE=TODAY,XOP,1),DOTLINE,COLORBLUE{XG51};
DRAWTEXT(DATE=TC,COP*1.002,'COP=0.618'),COLORBLUE {XG51};
DRAWTEXT(DATE=TC,OP*1.002,'OP=1.000'),COLORBLUE;
DRAWTEXT(DATE=TC,XOP*1.002,'XOP=1.618'),COLORBLUE {XG51};
DRAWNUMBER(DATE=TC,COP,COP),COLORBLUE{XG51};
DRAWNUMBER(DATE=TC,OP,OP),COLORBLUE{XG51};
DRAWNUMBER(DATE=TC,XOP,XOP),COLORBLUE{XG51};
DRAWLINE(DATE=TO,DJB,DATE=TL,AL,0) ,COLORBLUE{XG51};
DRAWLINE(DATE=TL,AL,DATE=TH,BH,0) ,COLORBLUE{XG51};
DRAWLINE(DATE=TH,BH,DATE=TC,CZF,0) ,COLORBLUE{X~G_5+1~C~N~{};

通达信大盘分析未加密选股指标公式源码

源码正文：

X_1:=(C-ma(C,20))/MA(C,20)*100{XG51};
X_2:=(C-REF(C,1))/REF(C,1)*100{XG51};
X_3:=BArslAst(BARSLAST(X_1>0 AND REF(X_1,1)>0)>0){XG51};
X_4:=BARSLAST(BARSLAST(X_1<0 AND REF(X_1,1)<0)>0){XG51};
利润:IF(X_3>0,SUM(X_2,X_3),0),STICK{XG51};
买入:IF(REF(X_4,1)>0 AND X_4=0,5,0),STICK,COLORLIMAGENTA{XG51};
卖出:IF(REF(X_3,1)>0 AND X_3=0,5,0),STICK,COLORGREEN{XG51};
持币:IF(X_4>0,(-5),0),STICK{XG51};
STICKLINE(利润>0,利润,0,2,0),COLORWHITE{XG51};
STICKLINE(利润<=0,利润,0,2,0),COLORCYAN{XG51};
STICKLINE(X_4>0,(-5),0,2,0),COLORBLUE{XG51};
STICKLINE(买入>0,5,0,2,0),COLORLICYAN{XG51};
STICKLINE(卖出>0,5,0,2,0),COLORLIGREEN{X_G_5_1_C_N_{};