通达信公式源码概况：
指标类别：通达信公式
授权方式： 免费版
指标评级： ★★★★★
指标分类： 策略
画线方法： 副图
一、通达信量价时空指标公式
N:=6000;
高:=REFDATE(HHV(H,N),DATE);
低:=REFDATE(LLV(L,N),DATE);
H11:=高-(高-低)*1.000;
H10:=高-(高-低)*0.875;
H9:=高-(高-低)*0.750;
H8:=高-(高-低)*0.666;
H7:=高-(高-低)*0.625;
H6:=高-(高-低)*0.500;
H5:=高-(高-低)*0.375;
H4:=高-(高-低)*0.333;
H3:=高-(高-低)*0.250;
H2:=高-(高-低)*0.125;
H1:=高-(高-低)*0.000;
STICKLINE(CURRBARSCOUNT=18,高,高,120,1),COLORGREEN;
STICKLINE(CURRBARSCOUNT=18,H1,H1,120,1),COLORCYAN;
STICKLINE(CURRBARSCOUNT=18,H2,H2,120,1),COLORCCCCCC;
DRAWTEXT(CURRBARSCOUNT=10,H1,'0.000'),COLORCYAN;
DRAWTEXT(CURRBARSCOUNT=10,H2,'0.125'),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=10,H3,'0.250'),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=10,H4,'0.333'),COLORLIRED;
DRAWTEXT(CURRBARSCOUNT=10,H5,'0.375'),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=10,H6,'0.500'),COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=10,H7,'0.625'),COLORRED;
DRAWTEXT(CURRBARSCOUNT=10,H8,'0.666'),COLORRED;
DRAWTEXT(CURRBARSCOUNT=10,H9,'0.750'),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=10,H10,'0.875'),COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=10,H11,'1.000'),COLORGREEN;
STICKLINE(CURRBARSCOUNT=18,H3,H3,120,1),COLORYELLOW;
STICKLINE(CURRBARSCOUNT=18,H4,H4,120,1),COLORLIRED;
STICKLINE(CURRBARSCOUNT=18,H6,H6,120,1),COLORGREEN;
STICKLINE(CURRBARSCOUNT=18,H5,H5,120,1),COLORMAGENTA;
STICKLINE(CURRBARSCOUNT=18,低,低,120,1),COLORRED;
STICKLINE(CURRBARSCOUNT=18,H7,H7,120,1),COLORRED;
STICKLINE(CURRBARSCOUNT=18,H8,H8,120,1),COLORRED;
STICKLINE(CURRBARSCOUNT=18,H9,H9,120,1),COLORRED;
STICKLINE(CURRBARSCOUNT=18,H10,H10,120,1),COLORRED;
STICKLINE(CURRBARSCOUNT=18,H11,H11,120,1),COLORRED;
DRAWTEXT(CURRBARSCOUNT=35,高*0.99,CON2STR(高,2)),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=35,H11,CON2STR(H11,2)),COLORLIRED;
DRAWTEXT(CURRBARSCOUNT=35,H10,CON2STR(H10,2)),COLORLIRED;
DRAWTEXT(CURRBARSCOUNT=35,H9,CON2STR(H9,2)),COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=35,H8,CON2STR(H8,2)),COLORRED;
DRAWTEXT(CURRBARSCOUNT=35,H1,CON2STR(H1,2)),COLORCYAN;
DRAWTEXT(CURRBARSCOUNT=35,H2,CON2STR(H2,2)),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=35,H3,CON2STR(H3,2)),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=35,H6,CON2STR(H6,2)),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=35,H4,CON2STR(H4,2)),COLORLIRED;
DRAWTEXT(CURRBARSCOUNT=35,H5,CON2STR(H5,2)),COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=35,H7,CON2STR(H7,2)),COLORRED;
低点:=800;
高点:=800;
时间:=1;
价格:=1;
调点:=1;
PURC:=CONST(FINDHIGH(H,0,高点*10,1));
PLZ:=CONST(BARSLAST(PURC=H))+1;
顶X:=CONST(IF(PLZ=1,H,REF(H,PLZ-1)));
QQT:=CONST(FINDLOW(L,0,低点*10,1));
PLL:=CONST(BARSLAST(QQT=L))+1;
低X:=CONST(IF(PLL=1,L,REF(L,PLL-1)));
ATM:=时间=2OR时间=2;
QTM:=时间=1OR时间=1;
BTM:=时间=1OR时间=1OR时间=1;
AAZ:=IF(ATM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*0.809),DRAWNULL);
ABZ:=IF(BTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*0.5),DRAWNULL);
ACZ:=IF(ATM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*0.618),DRAWNULL);
ADZ:=IF(ATM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*0.382),DRAWNULL);
AEZ:=IF(ATM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*0.236),DRAWNULL);
AFZ:=IF(BTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*1),DRAWNULL);
AGZ:=IF(ATM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*1.809),DRAWNULL);
AHZ:=IF(BTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*1.5),DRAWNULL);
AIZ:=IF(ATM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*1.618),DRAWNULL);
AJZ:=IF(ATM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*1.382),DRAWNULL);
AKZ:=IF(ATM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*1.236),DRAWNULL);
ALZ:=IF(BTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*2),DRAWNULL);
AMZ:=IF(ATM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*2.236),DRAWNULL);
ANZ:=IF(ATM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*2.382),DRAWNULL);
AOZ:=IF(BTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*2.5),DRAWNULL);
APZ:=IF(ATM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*2.618),DRAWNULL);
AQZ:=IF(ATM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*2.809),DRAWNULL);
ARZ:=IF(BTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*3),DRAWNULL);
ASZ:=IF(BTM,ROUND(IF(PLZ>PLL,PLZ,PLL)),DRAWNULL);
HXCS1:=CURRBARSCOUNT=AAZORCURRBARSCOUNT=ABZORCURRBARSCOUNT=ACZORCURRBARSCOUNT=ADZ
ORCURRBARSCOUNT=AEZORCURRBARSCOUNT=AFZORCURRBARSCOUNT=AGZORCURRBARSCOUNT=AHZ
ORCURRBARSCOUNT=AIZORCURRBARSCOUNT=AJZORCURRBARSCOUNT=AKZORCURRBARSCOUNT=ALZ
ORCURRBARSCOUNT=AMZORCURRBARSCOUNT=ANZORCURRBARSCOUNT=AOZ
ORCURRBARSCOUNT=APZORCURRBARSCOUNT=AQZORCURRBARSCOUNT=ARZORCURRBARSCOUNT=ASZ;
QAZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*1/8),DRAWNULL);
QBZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*2/8),DRAWNULL);
QCZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*3/8),DRAWNULL);
QDZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*4/3),DRAWNULL);
QEZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*5/8),DRAWNULL);
QGZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*6/8),DRAWNULL);
QHZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*7/8),DRAWNULL);
QIZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*9/8),DRAWNULL);
QJZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*1/3),DRAWNULL);
QKZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*2/3),DRAWNULL);
QMZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*10/8),DRAWNULL);
QNZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*11/8),DRAWNULL);
QOZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*5/3),DRAWNULL);
QPZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*13/8),DRAWNULL);
QQZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*14/8),DRAWNULL);
QRZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*15/8),DRAWNULL);
QSZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*17/8),DRAWNULL);
QTZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*18/8),DRAWNULL);
QUZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*19/8),DRAWNULL);
QVZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*21/8),DRAWNULL);
QWZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*22/8),DRAWNULL);
QXZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*23/8),DRAWNULL);
QYZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*7/3),DRAWNULL);
QZZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*8/3),DRAWNULL);
HXCS2:=CURRBARSCOUNT=QAZORCURRBARSCOUNT=QBZORCURRBARSCOUNT=QCZ
ORCURRBARSCOUNT=QDZORCURRBARSCOUNT=QEZORCURRBARSCOUNT=QGZ
ORCURRBARSCOUNT=QHZORCURRBARSCOUNT=QIZORCURRBARSCOUNT=QJZ
ORCURRBARSCOUNT=QKZORCURRBARSCOUNT=QMZORCURRBARSCOUNT=QNZ
ORCURRBARSCOUNT=QOZORCURRBARSCOUNT=QPZORCURRBARSCOUNT=QQZ
ORCURRBARSCOUNT=QRZ
ORCURRBARSCOUNT=QSZORCURRBARSCOUNT=QTZORCURRBARSCOUNT=QUZ
ORCURRBARSCOUNT=QVZORCURRBARSCOUNT=QWZORCURRBARSCOUNT=QXZ
ORCURRBARSCOUNT=QYZORCURRBARSCOUNT=QZZ;
STICKLINE(HXCS1ORHXCS2,顶X,低X,0,0),COLORMAGENTA;
DRAWKLINE(H,O,L,C);
天XX线:=IF(价格=5AND时间=5,DRAWNULL,顶X),COLORMAGENTA;
地XX线:=IF(价格=5AND时间=5,DRAWNULL,低X),COLORMAGENTA;
顶点:天XX线,COLORMAGENTA;
底点:地XX线,COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=QAZORCURRBARSCOUNT=QIZORCURRBARSCOUNT=QSZ,顶X*0.98,'1/8')COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=QBZORCURRBARSCOUNT=QMZORCURRBARSCOUNT=QTZ,顶X*0.98,'2/8')COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=QCZORCURRBARSCOUNT=QNZORCURRBARSCOUNT=QUZ,顶X*0.98,'3/8')COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=QEZORCURRBARSCOUNT=QPZORCURRBARSCOUNT=QVZ,顶X*0.98,'5/8')COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=QGZORCURRBARSCOUNT=QQZORCURRBARSCOUNT=QWZ,顶X*0.98,'6/8')COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=QHZORCURRBARSCOUNT=QRZORCURRBARSCOUNT=QXZ,顶X*0.98,'7/8')COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=QJZORCURRBARSCOUNT=QDZORCURRBARSCOUNT=QYZ,顶X*0.98,'1/3')COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=QKZORCURRBARSCOUNT=QOZORCURRBARSCOUNT=QZZ,顶X*0.98,'2/3')COLORMAGENTA;
HY:=C>OOR(C=OANDC>=REF(C,1));
BLT:=BArslAst(BL>2ANDHY);
L<REF(H,BLT)ANDRANGE(BLT,0.9,20)ANDHY;
C5:SMA(COST(50),5,1),COLORRED,POINTDOT;
C8:SMA(COST(80),5,1),COLORGREEN,POINTDOT;
C18:SMA(COST(18),5,1),COLORWHITE,POINTDOT;
雪:(SUM(C,N-1)+C)/N,linethick0,COLORRED;
M5:EMA(C,5),COLORWHITE;
M15:EMA(C,15),COLORYELLOW;
M60:EMA(C,60),COLORGREEN;
M240:EMA(C,240),COLORCYAN;
{M220:MA(C,220),COLORGRAY;
M440:MA(C,440),COLORBLUE;}
A15:=BACKSET(ISLASTBAR,15);
STICKLINE(REF(A15,1)=0ANDA15,HHV(H,30),LLV(L,30),0,0),COLORYELLOW;
A30:=BACKSET(ISLASTBAR,30);
STICKLINE(REF(A30,1)=0ANDA30,HHV(H,30),LLV(L,30),0,0),COLORYELLOW;
A60:=BACKSET(ISLASTBAR,60);
STICKLINE(REF(A60,1)=0ANDA60,HHV(H,30),LLV(L,30),0,0),COLORYELLOW;
A220:=BACKSET(ISLASTBAR,220);
STICKLINE(REF(A220,1)=0ANDA220,HHV(H,30),LLV(L,30),0,0),COLORYELLOW;
AABB:=CROSS(MA(C,3),MA(C,8))ANDMA(C,8)>REF(MA(C,8),1);
STICKLINE(AABBANDdatatype>6,L,L*0.990,6,0),COLORYELLOW;
AABB1:=CROSS(MA(C,50),MA(C,60))ANDMA(C,60)>REF(MA(C,60),1);
ASZ:=MA(C,60)>REF(MA(C,60),1)ANDMA(C,50)>REF(MA(C,50),1);AABB2:=REF(ASZ,1)=0ANDASZ;
STICKLINE((AABB1ORAABB2)ANDMA(C,5)<MA(C,220)ANDMA(C,5)>MA(C,60)ANDdatatype>6,L,L*0.90,6,0),COLORBLUE;
{阻力:IF(PERIOD>4,0.998*"KX.HH#MONTH",IF(PERIOD>1,0.998*"KX.HH#WEEK",0.998*"KX.HH#DAY")),COLORGREEN;
支撑:IF(PERIOD>4,1.002*"KX.LL#MONTH",IF(PERIOD>1,1.002*"KX.LL#WEEK",1.002*"KX.LL#DAY")),COLORYELLOW;};
TY:=C;
A1:=REF(TY,10)=HHV(TY,2*10+1);VB1:=FILTER(A1,10);C1:=BACKSET(VB1,10+1);HD:=FILTER(C1,10);
A2:=REF(TY,10)=LLV(TY,2*10+1);VB2:=FILTER(A2,10);C2:=BACKSET(VB2,10+1);LD:=FILTER(C2,10);
A:=REF(H,BARSLAST(HD));B:=REF(L,BARSLAST(LD));
T1:=BARSLAST(HD)<BARSLAST(LD)ANDNOT(HD);
T2:=BARSLAST(HD)>BARSLAST(LD)ANDNOT(LD);
波峰:IF(T1,A,A),COLORFF00FF,POINTDOT;
STICKLINE(T1,A,A,9,0),COLORFF00FF;
波谷:IF(T2,B,B),COLOR80FF00,POINTDOT;
STICKLINE(T2,B,B,9,0),COLOR80FF00;
fh:=HIGH;fl:=LOW;
DRAWTEXTEX(sysparam(3)=BARPOS,0,10,8,'【代码:'+STKLABEL+'名称:'+STKNAME+'】'),COLORWHITE;
DRAWTEXT((BARPOS=SYSPARAM(2)),HIGH,('所属板块:'+BLKNAME)+'\n')ALIGN4,COLORGREEN;
variable:wday[7]='星期六';
wday[1]:='星期日';
wday[2]:='星期一';
wday[3]:='星期二';
wday[4]:='星期三';
wday[5]:='星期四';
wday[6]:='星期五';
fy:=year;
fm:=month;
fd:=day;
wd:=weekday;
p:=SYSPARAM(1);
DRAWTEXTex(c,0,300,1,
numtostr(fy[p],0)+'年'+numtostr(fm[p],0)+'月'
+numtostr(fd[p],0)+'日,'+wday[wd[p]+1]+'\n'),COLORyellow;
DRAWTEXTEX(1,1,20,150,'雪
狼提醒顺上飞'),COLORRED;
STICKLINE((CLOSE<OPEN),HIGH,LOW,1,0),color8800;
STICKLINE((CLOSE<OPEN),HIGH,LOW,0,0),colorFF00;
STICKLINE((CLOSE<OPEN),CLOSE,OPEN,8,0),color8800;
STICKLINE((CLOSE<OPEN),CLOSE,OPEN,7,0),color9900;
STICKLINE((CLOSE<OPEN),CLOSE,OPEN,6,0),colorAA00;
STICKLINE((CLOSE<OPEN),CLOSE,OPEN,5,0),colorBB00;
STICKLINE((CLOSE<OPEN),CLOSE,OPEN,4,0),colorCC00;
STICKLINE((CLOSE<OPEN),CLOSE,OPEN,3,0),colorDD00;
STICKLINE((CLOSE<OPEN),CLOSE,OPEN,2,0),colorEE00;
STICKLINE((CLOSE<OPEN),CLOSE,OPEN,1,0),colorFF00;
STICKLINE((CLOSE>=OPEN),HIGH,LOW,1,0),colorFF;
STICKLINE((CLOSE>=OPEN),HIGH,LOW,0,0),colorEEFF;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,8,0),colorFF;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,7,0),color22FF;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,6,0),color44FF;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,5,0),color66FF;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,4,0),color88FF;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,3,0),colorAAFF;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,2,0),colorCCFF;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,1,0),colorEEFF;
{立体柱子：红色}
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0),COLOR000033;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0),COLOR000066;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0),COLOR000099;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0),COLOR0000BB;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0),COLOR0000DD;
VAR9Q:=C=HHV(C,4)AND(REF(C,1)>=REF(C,2)ORREF(C,1)>=REF(C,3))ORREF(C,1)=HHV(C,4)ANDCLOSE>=REF(C,2)ORREF(C,2)=HHV(C,4)ANDREF(C,3)=LLV(C,4)ANDC>=REF(C,1)ORREF(C,3)=HHV(C,4)ANDC>=REF(C,1)ANDC>=REF(C,2);
红持:var9Q,color0000ff,LINETHICK0;
{立体柱子：红色}
STICKLINE(VAR9Q,C,(O+C)/2,8,0),COLOR000044;
STICKLINE(VAR9Q,C,(O+C)/2,7,0),COLOR000055;
STICKLINE(VAR9Q,C,(O+C)/2,6,0),COLOR000066;
STICKLINE(VAR9Q,C,(O+C)/2,5,0),COLOR000077;
STICKLINE(VAR9Q,C,(O+C)/2,4,0),COLOR000099;
STICKLINE(VAR9Q,C,(O+C)/2,3,0),COLOR0000BB;
STICKLINE(VAR9Q,C,(O+C)/2,2,0),COLOR0000DD;
STICKLINE(VAR9Q,C,(O+C)/2,1,0),COLOR0000FF;
VARAQ:=C=HHV(C,4)ANDREF(C,1)=LLV(C,4);
粉变:varaQ,colorff99ff,LINETHICK0;
STICKLINE(VARAQ,C,(O+C)/2,8,0),COLORFF11FF;
STICKLINE(VARAQ,C,(O+C)/2,7,0),COLORFF22FF;
STICKLINE(VARAQ,C,(O+C)/2,6,0),COLORFF33FF;
STICKLINE(VARAQ,C,(O+C)/2,5,0),COLORFF55FF;
STICKLINE(VARAQ,C,(O+C)/2,4,0),COLORFF77FF;
STICKLINE(VARAQ,C,(O+C)/2,3,0),COLORFF99FF;
STICKLINE(VARAQ,C,(O+C)/2,2,0),COLORFFBBFF;
STICKLINE(VARAQ,C,(O+C)/2,1,0),COLORFFDDFF;
VARBQ:=C=LLV(C,4)AND(REF(C,1)<REF(C,2)ORREF(C,1)<REF(C,3))ORREF(C,1)=LLV(C,4)ANDC<REF(C,2)ORREF(C,2)=LLV(C,4)ANDREF(C,1)<>HHV(C,4)ANDC<REF(C,1)ORREF(C,3)=LLV(C,4)ANDC<REF(C,1)ANDC<REF(C,2);
银灰跌:varbQ,color888888,LINETHICK0;
{立体柱子：银色}
STICKLINE(VARBQ,C,(O+C)/2,8,0),COLOR333333;
STICKLINE(VARBQ,C,(O+C)/2,7,0),COLOR444444;
STICKLINE(VARBQ,C,(O+C)/2,6,0),COLOR555555;
STICKLINE(VARBQ,C,(O+C)/2,5,0),COLOR777777;
STICKLINE(VARBQ,C,(O+C)/2,4,0),COLOR999999;
STICKLINE(VARBQ,C,(O+C)/2,3,0),COLORBBBBBB;
STICKLINE(VARBQ,C,(O+C)/2,2,0),COLORDDDDDD;
STICKLINE(VARBQ,C,(O+C)/2,1,0),COLORFFFFFF;
VARCQ:=REF(C,1)=LLV(C,4)ANDC>=REF(C,2)ORREF(C,2)=LLV(C,4)ANDREF(C,1)<=REF(C,3)ANDREF(C,2)<REF(C,4)ANDC>=REF(C,1);
绿买:varcQ,color00ff00,LINETHICK0;
{立体柱子：绿色}
STICKLINE(VARCQ,O,(O+C)/2,8,0),COLOR004400;
STICKLINE(VARCQ,O,(O+C)/2,6,0),COLOR005500;
STICKLINE(VARCQ,O,(O+C)/2,5,0),COLOR007700;
STICKLINE(VARCQ,O,(O+C)/2,4,0),COLOR009900;
STICKLINE(VARCQ,O,(O+C)/2,3,0),COLOR00BB00;
STICKLINE(VARCQ,O,(O+C)/2,2,0),COLOR00DD00;
STICKLINE(VARCQ,O,(O+C)/2,1,0),COLOR00FF00;
VARDQ:=REF(C,1)=HHV(C,4)ANDC<REF(C,2)OR(REF(C,2)=HHV(C,4)ANDREF(C,1)>REF(C,3)ORREF(C,3)=HHV(C,4)ANDREF(C,1)>REF(C,2))ANDREF(C,2)>=REF(C,4)ANDC<REF(C,1);
蓝抛:vardQ,colorff9900,LINETHICK0;
{立体柱子：深蓝色}
STICKLINE(VARDQ,O,(O+C)/2,8,0),COLORFF1100;
STICKLINE(VARDQ,O,(O+C)/2,7,0),COLORFF2200;
STICKLINE(VARDQ,O,(O+C)/2,6,0),COLORFF3300;
STICKLINE(VARDQ,O,(O+C)/2,5,0),COLORFF5500;
STICKLINE(VARDQ,O,(O+C)/2,4,0),COLORFF7700;
STICKLINE(VARDQ,O,(O+C)/2,3,0),COLORFF9900;
STICKLINE(VARDQ,O,(O+C)/2,2,0),COLORFFBB00;
STICKLINE(VARDQ,O,(O+C)/2,1,0),COLORFFDD00;
{立体柱子：金色}
ZDF:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100;
STICKLINE(ZDF>9.8,OPEN,CLOSE,8,0),color004444;
STICKLINE(ZDF>9.8,OPEN,CLOSE,7,0),color005555;
STICKLINE(ZDF>9.8,OPEN,CLOSE,6,0),color006666;
STICKLINE(ZDF>9.8,OPEN,CLOSE,5,0),color007777;
STICKLINE(ZDF>9.8,OPEN,CLOSE,4,0),color009999;
STICKLINE(ZDF>9.8,OPEN,CLOSE,3,0),color00BBBB;
STICKLINE(ZDF>9.8,OPEN,CLOSE,2,0),color00DDDD;
STICKLINE(ZDF>9.8,OPEN,CLOSE,1,0),color00FFFF;
Z:=(CLOSE>REF(CLOSE,1));
成功:((((((((((((((((((((((((((((((ALL(Z,1)+ALL(Z,2))+
ALL(Z,3))+ALL(Z,4))+ALL(Z,5))+ALL(Z,6))+ALL(Z,7))+
ALL(Z,8))+ALL(Z,10))+ALL(Z,11))+ALL(Z,12))+ALL(Z,13))+
ALL(Z,14))+ALL(Z,15))+ALL(Z,16))+ALL(Z,17))+ALL(Z,18))+
ALL(Z,19))+ALL(Z,20))+ALL(Z,21))+ALL(Z,22))+ALL(Z,23))+
ALL(Z,24))+ALL(Z,25))+ALL(Z,26))+ALL(Z,27))+ALL(Z,28))+
ALL(Z,29))+ALL(Z,30))+ALL(Z,31))+ALL(Z,32)),LINETHICK0,colorFF;
D:=(CLOSE<REF(CLOSE,1));
失败:((((((((((((((((((((((((((((((ALL(D,1)+
ALL(D,2))+ALL(D,3))+ALL(D,4))+ALL(D,5))+
ALL(D,6))+ALL(D,7))+ALL(D,8))+ALL(D,10))+
ALL(D,11))+ALL(D,12))+ALL(D,13))+ALL(D,14))+
ALL(D,15))+ALL(D,16))+ALL(D,17))+ALL(D,18))+
ALL(D,19))+ALL(D,20))+ALL(D,21))+ALL(D,22))+
ALL(D,23))+ALL(D,24))+ALL(D,25))+ALL(D,26))+
ALL(D,27))+ALL(D,28))+ALL(D,29))+ALL(D,30))+
ALL(D,31))+ALL(D,32)),LINETHICK0,colorFF00;
XL2:=(((CLOSE-EMA(CLOSE,21))/EMA(CLOSE,21))*100);
XL3:=CROSS(XL2,(0-20));
{缺口1}
DRAWTEXT(l>REF(H,1),REF(H,1),''),COLOrwhite;
DRAWTEXT(h<REF(L,1),REF(L,1),''),COLORblue;
{缺口2}
KOH:=LOW>REF(HIGH,1);
KOL:=HIGH<REF(LOW,1);
HIF:=LOW>REF(HIGH,BARSLAST(KOH)+1);
NHIF:=LOW<=REF(HIGH,BARSLAST(KOH)+1);
LIF:=HIGH<REF(LOW,BARSLAST(KOL)+1);
NLIF:=HIGH>=REF(LOW,BARSLAST(KOL)+1);
DRAWICON(HIFANDBARSLAST(koh)<BARSLAST(nhif)and
BARSLAST(HIF)<BARSLAST(NHIF),REF(HIGH,BARSLAST(KOH)+1),10),ALIGN0;
DRAWICON(LIFANDBARSLAST(kol)<BARSLAST(nlif)and
BARSLAST(LIF)<BARSLAST(NLIF),REF(LOW,BARSLAST(KOL)+1),11),ALIGN0;
AABB:CROSS(MA(C,3),MA(C,8)),linethick0;
STICKLINE(AABBANDdatatype>5,L,L*0.990,6,0),COLORYELLOW;
N:=250;
AX:=BARSCOUNT(c);
超周期:100-COS(AX/360*(N/12))*100,LINETHICK2,COLORWHITE;
大周期:100-COS(AX/360*(N/6))*100,LINETHICK2,COLORYELLOW;
小周期:100-COS(AX/360*(N/4))*100,LINETHICK2,COLOR7F00FF;
短周期:100-COS(AX/360*(N/2))*100,LINETHICK2,COLOR00bb00;
STICKLINE(短周期<5AND小周期>195,小周期,短周期,5,0),COLORWHITE;
STICKLINE(短周期<5AND大周期<5AND超周期>195AND小周期>195,小周期,短周期,5,0),COLORYELLOW;
STICKLINE(短周期<5AND大周期<5AND超周期<5AND小周期<5,200,短周期,5,0),COLORRED;
STICKLINE(短周期>195AND大周期>195AND超周期>195AND小周期>195,2,短周期,5,0),COLORRED;
if(短周期>195AND大周期>195,150,200),COLORRED,LINETHICK2;
if(短周期<5AND小周期<5,50,0),COLORAAAA00,LINETHICK2;
DRAWTEXT(短周期<5or短周期>195,短周期,'★'),COLORYELLOW;
[源码注释]通达信公式动态翻译结果
A赋值:收盘价的7日指数移动平均
B赋值:收盘价的19日指数移动平均
Q赋值:当满足条件最高价=上次A上穿B距今天数+1日内最高价的最高值时,在上次A上穿B距今天数+1日内最高价的最高值位置画直线起点，当满足条件最低价=上次B上穿A距今天数+1日内最低价的最低值时,在上次B上穿A距今天数+1日内最低价的最低值位置画直线终点,0表示是否延长.
输出涨区:如果(最近1日一直存在Q>=1日前的Q),返回3.8,否则返回1.6,画绿色
输出低买:如果((涨区上穿2.1)),返回6,否则返回0,STICK,线宽为2,画红色
每日通达信公式解答：
编写条件：
上影线在1.5%以上的选股公式
编写方法：
G:H-maX(O,C)>REF(C,1)*0.015;
评论(0)