通达信公式源码概况:指标类别:通达信公式授权方式: 免费版指标评级: ★★★★★指标分类: 策略画线方法: 副图一、通达信量价时空指标公式 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;