通达信箱体分析主图选股指标公式源码

通达信箱体分析主图选股指标公式源码

源码正文：

EM:=20{XG51};
EMM:=40{XG51};
N1:=20{XG51};
DRAWGBK(C>0, RGB(1,1,1),RGB(1,1,1),0,'0',0){XG51};
TY:=H{XG51};
HD:=FILTER(BacKSET(FILTER(REF(TY,10)=HHV(TY,2*10+1),10),10+1),10){XG51};
LD:=FILTER(BACKSET(FILTER(REF(TY,10)=LLV(TY,2*10+1),10),10+1),10){XG51};
A:=REF(H,BArslAst(HD)){XG51};
B:=REF(H,BARSLAST(LD)){XG51};
T1:=BARSLAST(HD){XG51};
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD){XG51};
波浪顶:IF(T1,A,A),COLORCYAN,POINTDOT,LINETHICK1{XG51};
DRAWNUMBER(波浪顶!=REF(波浪顶,1),H,波浪顶),COLORF00FF0{XG51};
STICKLINE(T1,A,A,9,0),COLORF00FF0,LINETHICK1{XG51};
波浪底:=IF(T2,B,B),COLORCYAN,LINETHICK1{XG51};
STICKLINE(T2,B,B,9,0),COLORGREEN,LINETHICK1{XG51};
QA12:=REF(CLOSE,6)=LLV(CLOSE,2*6+1){XG51};
QB12:=BACKSET(QA12,6+1){XG51};
QC12:=FILTER(QB12,6) AND CLOSE=LLV(CLOSE,6+1){XG51};
QD12:=BARSLAST(QC12){XG51};
QE12:=IF(QC12,CURRBARSCOUNT,0){XG51};
QF12:=IF(QD12,REF(QE12,QD12),QE12){XG51};
QG12:=CONST(QF12){XG51};
支撑1:=DRAWLINE(CURRBARSCOUNT=QG12,CLOSE,ISLASTBAR,REF(CLOSE,QG12-1),1),COLOR00FF00,LINETHICK1{XG51};
DRAWNUMBER(支撑1!=REF(支撑1,1),C,支撑1),COLOR00FF00{XG51};
DRAWNUMBER(ISLASTBAR,支撑1,支撑1),COLOR00FF00{XG51};
QA14:=REF(CLOSE,3)=LLV(CLOSE,2*3+1){XG51};
QB14:=BACKSET(QA14,3+1){XG51};
QC14:=FILTER(QB14,3) AND CLOSE=LLV(CLOSE,3+1){XG51};
QD14:=BARSLAST(QC14){XG51};
QE14:=IF(QC14,CURRBARSCOUNT,0){XG51};
QF14:=IF(QD14,REF(QE14,QD14),QE14){XG51};
QG14:=CONST(QF14){XG51};
支撑2:=DRAWLINE(CURRBARSCOUNT=QG14,CLOSE,ISLASTBAR,REF(CLOSE,QG14-1),1),COLOR00FF00,LINETHICK1{XG51};
{XG51};
STICKLINE(C>支撑1,支撑1,波浪顶,15,1),COLOR005599,LINETHICK2{XG51};
STICKLINE(C>支撑2,支撑2,波浪顶,5,1),COLOR005599,LINETHICK2{XG51};
STICKLINE(C>支撑1,支撑1,(波浪顶+支撑1)/2,15,1),COLOR005599,LINETHICK2{XG51};
QA11:=REF(CLOSE,6)=HHV(CLOSE,2*6+1){XG51};
QB11:=BACKSET(QA11,6+1){XG51};
QC11:=FILTER(QB11,6) AND CLOSE=HHV(CLOSE,6+1){XG51};
QD11:=BARSLAST(QC11){XG51};
QE11:=IF(QC11,CURRBARSCOUNT,0){XG51};
QF11:=IF(QD11,REF(QE11,QD11),QE11){XG51};
QG11:=CONST(QF11){XG51};
颈线2:DRAWLINE(CURRBARSCOUNT=QG11,CLOSE,ISLASTBAR,REF(C,QG11-1),1),COLORFFDD00,LINETHICK1{XG51};
STICKLINE(C>支撑1,支撑1,颈线2,5,1),COLORFFAA33{XG51};
STICKLINE(C>支撑1,支撑1,(颈线2+支撑1)/2,5,1),COLORFFAA33{XG51};
DRAWKLINE(H,O,L,C){XG51};
DRAWNUMBER(颈线2!=REF(颈线2,1),C,颈线2),COLOR00FF00{XG51};
DRAWNUMBER(ISLASTBAR,波浪顶,波浪顶),COLOR005599{XG51};
DRAWNUMBER(ISLASTBAR,(波浪顶+支撑1)/2,(波浪顶+支撑1)/2),COLOR005599{XG51};
DRAWNUMBER(ISLASTBAR,颈线2,颈线2),COLORFFAA33{XG51};
DRAWNUMBER(ISLASTBAR,(颈线2+支撑1)/2,(颈线2+支撑1)/2),COLORFFAA33{XG51};
T1B:=CONST(LLVBARS(LOW,10)){XG51};
T1HIGH:=CONST(REF(HIGH,T1B)){XG51};
CCC:=CONST(CURRBARSCOUNT){XG51};
T2B:=CONST(BARSLAST(CURRBARSCOUNT>CCC+T1B AND H>T1HIGH)){XG51};
T2HIGH:=CONST(REF(HIGH,T2B)){XG51};
T3B:=CONST(BARSLAST(CURRBARSCOUNT>CCC+T2B AND HIGH>T2HIGH)){XG51};
T3HIGH:=CONST(REF(HIGH,T3B)){XG51};
抢钱10:DRAWLINE(CURRBARSCOUNT=T3B+1, T3HIGH, ISLASTBAR, T3HIGH, 1),COLORBLUE,LINETHICK1{XG51};
DRAWTEXT(ISLASTBAR, T3HIGH, '过线')LINETHICK1,COLORBLUE{XG51};
DRAWNUMBER(抢钱10!=REF(抢钱10,1),H,抢钱10),COLORBLUE{XG51};
STICKLINE(C>支撑1,(抢钱10+支撑1)/2,(抢钱10+支撑1)/2,5,1),COLORBLUE;{XG51};
DRAWGBK(C>0,RGB(0,0,0),RGB(00,0,0),0,'EM',0);DRAWKLINE(H,O,L,C){X.G-5~1.C.N.{};