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

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

源码正文：

N:=30{XG51};
TS:=BArslAst(L=LLV(L,N)){XG51};
开始信号:=FILTERX(TS=0,BARSSINCE(C)){XG51};
开始天数:=BARSLAST(开始信号){XG51};
天数横线:=CONST(开始天数){XG51};
低点: DRAWLINE(L=LLV(L,N),L,ISLASTBAR,REF(L,TS),1),COLOR00CC00{XG51};
高点: DRAWLINE(L=LLV(L,N),CONST(HHV(H,天数横线)),ISLASTBAR,REF(CONST(HHV(H,天数横线)),
TS),1),COLOR00CCCC{XG51};
STICKLINE(开始信号,L,CONST(HHV(H,天数横线)),0,0),COLOR00AA00{XG51};
STICKLINE(ISLASTBAR,低点,高点,0,0),COLOR00AA00{XG51};
C2:=REF(C,1){XG51};
差:=(高点-低点)/天数横线{XG51};
收盘差:=CONST(C)-低点{XG51};
对角差:=高点-低点{XG51};
对角角度:ATAN((对角差/(对角差*((天数横线-1)/天数横线))-1)*100)*57.3,COLORFFFF00,NODRAW{XG51};
差60度:=(高点-低点)*60/对角角度{XG51};
差45度:=(高点-低点)*45/对角角度{XG51};
差55度:=(高点-低点)*55/对角角度{XG51};
差50度:=(高点-低点)*50/对角角度{XG51};
差65度:=(高点-低点)*65/对角角度{XG51};
角度65:=IF(TS>=0 AND 低点+(差65度/天数横线)*TS<=高点,低点+(差65度/天数横线)*TS,DRAWNULL),COLORLIGREEN,DOTLINE{XG51};
角度50:IF(TS>=0 AND 低点+(差50度/天数横线)*TS<=高点,低点+(差50度/天数横线)*TS,DRAWNULL),COLORLIGREEN,DOTLINE{XG51};
角度55:IF(TS>=0 AND 低点+(差55度/天数横线)*TS<=高点,低点+(差55度/天数横线)*TS,DRAWNULL),COLORLIGREEN,DOTLINE{XG51};
对角线:IF(TS>=0 AND 低点+差*TS<=高点,低点+差*TS,DRAWNULL),COLORBLUE,LINETHICK2{XG51};
角度60:IF(TS>=0 AND 低点+(差60度/天数横线)*TS<=高点,低点+(差60度/天数横线)*TS,DRAWNULL),COLORLIGREEN,DOTLINE{XG51};
角度45:IF(TS>=0 AND 低点+(差45度/天数横线)*TS<=高点,低点+(差45度/天数横线)*TS,DRAWNULL),COLORCYAN{XG51};
收盘角度: (收盘差*对角角度)/对角差,NODRAW{XG51};
收盘线:=IF(TS>=0 AND 低点+(收盘差/天数横线)*TS<=高点,低点+(收盘差/天数横线)*TS,DRAWNULL){X+G^5_1+C+N+{};

通达信神奇三线画线主图未加密选股指标公式源码

源码正文：

N1:=20{XG51};
N2:=10{XG51};
N3:=5{XG51};
AA:=REF(H,N1)=HHV(H,2*N1+1){XG51};
QY:=BacKSET(AA,N1+1){XG51};
CC:=FILTER(QY,N1) AND H=HHV(H,N1+1){XG51};
DDD:=BArslAst(CC){XG51};
GDTS:=IF(CC,CURRBARSCOUNT,0){XG51};
DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS){XG51};
DINGBU1:=REF(DINGBUTS,DDD+1){XG51};
GDCS1:=CONST(DINGBUTS){XG51};
DINGBUTS1:=REF(DINGBUTS,DDD+1){XG51};
GDCS2:=CONST(DINGBUTS1){XG51};
DINGBU2:=REF(DINGBU1,DDD+1){XG51};
MM:=IF(CURRBARSCOUNT>GDCS2,0,1){XG51};
DRAWLINE(CURRBARSCOUNT=GDCS2,H,ISLASTBAR,REF(H,GDCS2-1),1),COLOR0055FF,POINTDOT,LINETHICK2{XG51};
DRAWLINE(CURRBARSCOUNT=GDCS1,H,ISLASTBAR,REF(H,GDCS1-1),1),COLORBLUE,POINTDOT,LINETHICK2{XG51};
AA1:=REF(L,N1)=LLV(L,2*N1+1){XG51};
QY1:=BACKSET(AA1,N1+1){XG51};
CC1:=FILTER(QY1,N1) AND L=LLV(L,N1+1){XG51};
DD1:=BARSLAST(CC1){XG51};
DDTS:=IF(CC1,CURRBARSCOUNT,0){XG51};
YDB:=IF(DD1,REF(L,DD1),L){XG51};
DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS){XG51};
DDCS1:=CONST(DDTS1){XG51};
ZDB:=REF(YDB,DD1+1){XG51};
DDTS2:=REF(DDTS1,DD1+1){XG51};
DDCS2:=CONST(DDTS2){XG51};
DRAWLINE(CURRBARSCOUNT=DDCS2,L,ISLASTBAR,REF(L,DDCS2-1),1),COLOR0055FF,POINTDOT,LINETHICK2{XG51};
DRAWLINE(CURRBARSCOUNT=DDCS1,L,ISLASTBAR,REF(L,DDCS1-1),1),COLORBLUE,POINTDOT,LINETHICK2{XG51};
LAA:=REF(H,N2)=HHV(H,2*N2+1){XG51};
LQY:=BACKSET(LAA,N2+1){XG51};
LCC:=FILTER(LQY,N2) AND H=HHV(H,N2+1){XG51};
LDDD:=BARSLAST(LCC){XG51};
LGDTS:=IF(LCC,CURRBARSCOUNT,0){XG51};
LDINGBU:=IF(LDDD,REF(H,LDDD),H){XG51};
LDINGBUTS:=IF(LDDD,REF(LGDTS,LDDD),LGDTS){XG51};
LDINGBU1:=REF(LDINGBU,LDDD+1){XG51};
LGDCS1:=CONST(LDINGBUTS){XG51};
LDINGBUTS1:=REF(LDINGBUTS,LDDD+1){XG51};
LGDCS2:=CONST(LDINGBUTS1){XG51};
LDINGBU2:=REF(LDINGBU1,LDDD+1){XG51};
LMM:=IF(CURRBARSCOUNT>LGDCS2,0,1){XG51};
压力: DRAWLINE(CURRBARSCOUNT=LGDCS2,H,CURRBARSCOUNT=LGDCS1,H,1) COLORRED{XG51};
DRAWLINE(CURRBARSCOUNT=LGDCS2,H,ISLASTBAR,REF(H,LGDCS2-1),1),COLOR0055FF,POINTDOT{XG51};
DRAWLINE(CURRBARSCOUNT=LGDCS1,H,ISLASTBAR,REF(H,LGDCS1-1),1),COLORBLUE,POINTDOT{XG51};
LAA1:=REF(L,N2)=LLV(L,2*N2+1){XG51};
LQY1:=BACKSET(LAA1,N2+1){XG51};
LCC1:=FILTER(LQY1,N2) AND L=LLV(L,N2+1){XG51};
LDD1:=BARSLAST(LCC1){XG51};
LDDTS:=IF(LCC1,CURRBARSCOUNT,0){XG51};
LYDB:=IF(LDD1,REF(L,LDD1),L){XG51};
LDDTS1:=IF(LDD1,REF(LDDTS,LDD1),LDDTS){XG51};
LDDCS1:=CONST(LDDTS1){XG51};
LZDB:=REF(LYDB,LDD1+1){XG51};
LDDTS2:=REF(LDDTS1,DD1+1){XG51};
LDDCS2:=CONST(LDDTS2){XG51};
支撑: DRAWLINE(CURRBARSCOUNT=LDDCS2,L,CURRBARSCOUNT=LDDCS1,L,1) COLORRED{XG51};
ZGSTAR:=(压力+支撑)/2{XG51};
ZGEND:=CONST((压力+支撑)/2){XG51};
STARDAY:=IF(DDCS2<GDCS2,DDCS2,GDCS2){XG51};
中轨: DRAWLINE(CURRBARSCOUNT=STARDAY,ZGSTAR,ISLASTBAR,ZGEND,1),COLORRED{XG51};
LLAA:=REF(H,N3)=HHV(H,2*N3+1){XG51};
LLQY:=BACKSET(LLAA,N3+1){XG51};
LLCC:=FILTER(LLQY,N3) AND H=HHV(H,N3+1){XG51};
LLDDD:=BARSLAST(LLCC){XG51};
LLGDTS:=IF(LLCC,CURRBARSCOUNT,0){XG51};
LLDINGBU:=IF(LLDDD,REF(H,LLDDD),H){XG51};
LLDINGBUTS:=IF(LLDDD,REF(LLGDTS,LLDDD),LLGDTS){XG51};
LLDINGBU1:=REF(LLDINGBU,LLDDD+1){XG51};
LLGDCS1:=CONST(LLDINGBUTS){XG51};
LLDINGBUTS1:=REF(LLDINGBUTS,LLDDD+1){XG51};
LLGDCS2:=CONST(LLDINGBUTS1){XG51};
LLDINGBU2:=REF(LLDINGBU1,LLDDD+1){XG51};
LLMM:=IF(CURRBARSCOUNT>LGDCS2,0,1){XG51};
L压力: DRAWLINE(CURRBARSCOUNT=LLGDCS2,H,CURRBARSCOUNT=LLGDCS1,H,1) COLORBLUE{XG51};
DRAWLINE(CURRBARSCOUNT=LLGDCS2,H,ISLASTBAR,REF(H,LLGDCS2-1),1),COLOR0055FF,POINTDOT{XG51};
DRAWLINE(CURRBARSCOUNT=LLGDCS1,H,ISLASTBAR,REF(H,LLGDCS1-1),1),COLORBLUE,POINTDOT{XG51};
LLAA1:=REF(L,N3)=LLV(L,2*N3+1){XG51};
LLQY1:=BACKSET(LLAA1,N3+1){XG51};
LLCC1:=FILTER(LLQY1,N3) AND L=LLV(L,N3+1){XG51};
LLDD1:=BARSLAST(LCC1){XG51};
LLDDTS:=IF(LLCC1,CURRBARSCOUNT,0){XG51};
LLYDB:=IF(LLDD1,REF(L,LLDD1),L){XG51};
LLDDTS1:=IF(LLDD1,REF(LLDDTS,LLDD1),LDDTS){XG51};
LLDDCS1:=CONST(LLDDTS1){XG51};
LLZDB:=REF(LLYDB,LLDD1+1){XG51};
LLDDTS2:=REF(LLDDTS1,DD1+1){XG51};
LLDDCS2:=CONST(LLDDTS2){XG51};
L支撑: DRAWLINE(CURRBARSCOUNT=LLDDCS2,L,CURRBARSCOUNT=LLDDCS1,L,1) COLORBLUE{XG51};
LZGSTAR:=(L压力+L支撑)/2{XG51};
LZGEND:=CONST((L压力+L支撑)/2){XG51};
LSTARDAY:=IF(LLDDCS2<LLGDCS2,LLDDCS2,LLGDCS2){XG51};
L中轨: DRAWLINE(CURRBARSCOUNT=LSTARDAY,LZGSTAR,ISLASTBAR,LZGEND,1),COLORBLUE{X~G~5?1~C~N~{};