机构进场买主图指标源码分享
DRAWGBK(C>0,RGB(0,0,110),RGB(0,25,0),0,' ',0);ZBGS1:=SUM((WINNER(C)*100),30)/30*0.1;ZBGS2:=SUM((WINNER(C)*100),20)/20*0.4;ZBGS3:=SUM((WINNER(C)*100),10)/10*0.3;ZBGS4:=SUM((WINNER(C)*100),5)/5*0.1;ZBGS5:=SUM((WINNER(C)*100),3)/3*0.1;ZBGSZ:=ZBGS1+ZBGS2+ZBGS3+ZBGS4+ZBGS5;赚钱效应:IF(ZBGSZ>38,ZBGSZ,ZBGSZ*1.3),NODRAW;活跃度:IF(SUMBARS(VOL,CAPITAL)< 100,100-SUMBARS(VOL,CAPITAL),1),NODRAW;获利筹码:IF(WINNER(CLOSE),WINNER(CLOSE)*100,0),NODRAW;Z1:=STRCAT(HYBLOCK,' ');Z2:=STRCAT(Z1,DYBLOCK);Z3:=STRCAT(Z2,' ');DRAWTEXT_FIX(ISLASTBAR,0.02,0.02,0,STRCAT(Z3,GNBLOCK)),COLORYELLOW;DRAWKLINE(H,O,L,C);SN1:=(L+H)/2;N5:=IF(BARSCOUNT(C),SMA(SN1,3,1),C),COLORWHITE,DOTLINE;N3:=IF(BARSCOUNT(C),SMA(SN1,21,1),C),COLORYELLOW;MA5:MA(C,5)LINETHICK2,COLOR00CCFF;五日乖离率:=(C-MA5)/MA5*100;BB5:=ATAN((MA5/REF(MA5,1)-1)*100)*180/3.1416;速度5:=SMA(EMA((MA5-REF(MA5,1))/REF(MA5,1),3)*100,3,1);加速度5:=EMA((速度5-REF(速度5,1)),3),NODRAW;IF(BB5>30 AND MA5>REF(MA5,1),MA5,DRAWNULL),LINETHICK2,COLORRED;IF(BB5< 0 AND MA5< REF(MA5,1),MA5,DRAWNULL),LINETHICK2,COLORGREEN;VAR3:=LLV(HIGH,240);VAR4:=100*(CLOSE-VAR3)/VAR3;VAR5:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100;VAR6:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100;VAR7:=0;VAR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;VAR10:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0);VAR11:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);VAR12:=ZIG(3,6)< REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);VAR13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);VAR14:=ZIG(3,22)< REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);VAR15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);VAR16:=ZIG(3,51)< REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);VAR17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);VAR18:=ZIG(3,72)< REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);VAR19:=EMA(CLOSE,2)-EMA(CLOSE,150);买１:=VAR10;买２:=(VAR11+VAR13+VAR15+VAR17);卖１:=(VAR12+VAR14+VAR16+VAR18);B:IF(买１>0 OR 买２>0,LOW*0.99,DRAWNULL),CROSSDOT,LINETHICK3,COLORYELLOW;DRAWICON((ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)<=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)<=REF(ZIG(3,5),3)),LOW*0.99,1) ;DRAWICON((ZIG(3,5)< REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)>=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)>=REF(ZIG(3,5),3)),HIGH*1.01,2);ZB:=EMA(EMA(VAR3,5),5)*3, COLORSTICK;VARA:=IF(VAR9 AND CROSS(MA(CLOSE,3),MA(CLOSE,5)),20,0);K:=EMA(VAR7,5)*2, , COLORFF00FF;D:=EMA(K,5), , COLORWHITE;J:=K*3-D*2, ,COLORYELLOW;VARB:=BETWEEN(CLOSE,MA(CLOSE,3),MA(CLOSE,5)) AND J>10;HS:=VOL/CAPITAL*100, , COLORGREEN;VARE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;VARF:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);DRAWTEXT(VAR11 AND COUNT(VAR11,30)=1,LOW*0.98,'机构进场'),COLORYELLOW;VAR1A:=IF(VARE>0,VARE,0);VAR1B:=IF(VAR14>=200 AND VAR13>=150,15,IF(VAR14<=-200 AND VAR13<=-150,-15,VAR16))+60;VAR1C:=VAR1A>48 AND VAR1B>60 AND VAR19< 100;DRAWTEXT(VAR1C AND COUNT(VAR1C,30)=1,H*1.02,'大顶（底）') COLORWHITE;
{上下轨}N11:=2,200,13;UR00:=2,200,6;LR0:=2,200,6;TC01:=IF(H=HHV(H,8*UR00),H,DRAWNULL);TC02:=CONST(BARSLAST(TC01=H))+1;UPPER:=CONST(IF(TC02=1,H,REF(H,TC02-1)));BC1:=IF(L=LLV(L,8*LR0),L,DRAWNULL);BC2:=CONST(BARSLAST(BC1=L))+1;LOWER:=CONST(IF(BC2=1,L,REF(L,BC2-1)));LP:=CURRBARSCOUNT<=BC2 AND L=LOWER;HP:=CURRBARSCOUNT<=TC02 AND H=UPPER;NOD:=(IF(TC02>BC2,TC02,BC2)-IF(TC02>BC2,BC2,TC02));LR1:=FORCAST(C,NOD+1);NP:IF(CURRBARSCOUNT<=MAX(BC2,TC02),CONST(IF(MIN(TC02,BC2)=1,LR1,REF(LR1,MIN(TC02,BC2)-1))),DRAWNULL),DOTLINE,COLORRED;LR2:=SLOPE(C,NOD+1);LR3:=CONST(IF(MIN(TC02,BC2)=1,LR2,REF(LR2,MIN(TC02,BC2)-1)));STICKLINE(IF(BC2>TC02,HP,LP),LOWER,UPPER,0,0),COLORWHITE;STICKLINE(IF(BC2>TC02,LP,HP),LOWER,UPPER,0,0),COLORWHITE;FP:NP-LR3*(NOD),DOTLINE,COLORYELLOW;EQU:(NP+FP)/2,DOTLINE,COLORWHITE;AD:=ABS(NP-FP);DBL0:=BARSLAST(BC1!=DRAWNULL)+1;DBH:=BARSLAST(TC01!=DRAWNULL)+1;BSP:=IF(BC2>TC02,DBL0,DBH)-1;LRL:=IF(NP>FP,FP+AD/NOD*BSP,FP-AD/NOD*BSP);AT1:=IF(BETWEEN(CURRBARSCOUNT,BC2,TC02) AND H>LRL,H,LRL);AT2:=HHV(AT1-LRL,MAX(BC2,TC02));AT3:=CONST(BARSLAST(AT1-LRL=AT2));AT4:=CONST(IF(AT3=0,H,REF(H,AT3)));AT5:=CONST(IF(AT3=0,AT1-LRL,REF(AT1-LRL,AT3)));ATL:=LRL+AT5;UT1:=IF(BETWEEN(CURRBARSCOUNT,BC2,TC02) AND L<LRL,L,LRL);UT2:=HHV(LRL-UT1,MAX(BC2,TC02));UT3:=CONST(BARSLAST(LRL-UT1=UT2));UT4:=CONST(IF(UT3=0,H,REF(H,UT3)));UT5:=CONST(IF(UT3=0,LRL-UT1,REF(LRL-UT1,UT3)));UTL:=LRL-UT5;RH:=IF(CURRBARSCOUNT>=MIN(BC2,TC02)-10,ATL,CONST(REF(ATL,MIN(BC2,TC02)-11)));RL:=IF(CURRBARSCOUNT>=MIN(BC2,TC02)-10,UTL,CONST(REF(UTL,MIN(BC2,TC02)-11)));中轨:IF(NP>FP,IF(LRL<=RH,LRL,DRAWNULL),IF(LRL>=RL,LRL,DRAWNULL)),COLORBBBBBB;上轨:IF(NP>FP,IF(ATL<=RH,ATL,DRAWNULL),IF(ATL>=RL,ATL,DRAWNULL)),COLORBLUE;下轨:IF(NP>FP,IF(UTL<=RH,UTL,DRAWNULL),IF(UTL>=RL,UTL,DRAWNULL)),COLORFF00FF;
LT:=LLVBARS(L,60);LT1:=LLVBARS(L,60);LTT:=BARSLAST(CURRBARSCOUNT=CONST(LT)+1);HT:=FINDHIGHBARS(H,LT+1,60,1);DT:=FINDLOW(L,LT1+1,60,1);锅盖:DRAWLINE(CURRBARSCOUNT=CONST(HT)+1,H,ISLASTBAR,REF(H,HT),0),COLORGREEN ,LINETHICK1;
{顶底}底:DRAWTEXT(CROSS(ZIG(3,8),REF(ZIG(3,8),1)),H,''),LINETHICK2,COLORYELLOW;DRAWICON(底,L*0.99,1);顶:DRAWTEXT(CROSS(REF(ZIG(3,10),1),ZIG(3,10)),H,''),LINETHICK2,COLORYELLOW;DRAWICON(顶,H*1.01,2);
{涨跌停变色}X_2:=REF(CLOSE,1);X_3:=REF(CLOSE,1)*1.097;X_4:=CLOSE>=X_3 AND CLOSE=HIGH;STICKLINE(X_4,O,CLOSE,2,0),COLORYELLOW;X_5:=IF(DTPRICE(REF(CLOSE,1),0.1)=CLOSE,2,0);STICKLINE(X_5,OPEN,CLOSE,2,0),COLORGREEN;
{九转}AH:=HHV(H,60);AL:=LLV(L,60);A0:=(AH-AL)/21;A11:=C>REF(C,4);NT:=BARSLASTCOUNT(A11);TJ11:=NT=9;TJ13:=ISLASTBAR AND BETWEEN(NT,5,8);AY:=(BACKSET(TJ11>0,9) OR BACKSET(TJ13>0,NT))*NT;DRAWTEXT(AY>0,H+1.1*A0,VAR2STR(AY,0)),COLORYELLOW;DRAWTEXT(NT=9,H+1.1*A0,'9'),COLORGREEN;DRAWTEXT(NT=13,H+1.1*A0,'13'),COLORGREEN;DRAWTEXT(NT=18,H+1.1*A0,'18'),COLORGREEN;B11:=C<REF(C,4);NT0:=BARSLASTCOUNT(B11);TJ21:=NT0=9 ;TJ23:=ISLASTBAR AND BETWEEN(NT0,5,8);AY1:=(BACKSET(TJ21>0,9) OR BACKSET(TJ23>0,NT0))*NT0;DRAWTEXT(AY1>0,L-1*A0,VAR2STR(AY1,0)),COLORLIGREEN;DRAWTEXT(NT0=9,H+1.1*A0,'9'),COLORYELLOW;DRAWTEXT(NT0=13,H+1.1*A0,'13'),COLORYELLOW;
来函数检测结果如下：
该公式包含未来函数:ZIG
该公式包含未来函数:TROUGH
该公式包含未来函数:TROUGHBARS
该公式包含未来函数:BACKSET
该公式包含未来函数:WINNER
该公式包含未来函数:CAPITAL
该公式包含未来函数:DHIGH
该公式包含未来函数:DLOW
解密、定制、编写公式指标请联系QQ或微信同号：88652583
置顶指标
相关指标公式
填充背景(C>0,RGB(0,0,110),RGB(0,25,0),0,' ',0)
ZBGS1赋值:SUM((C计算的获利盘比例*100),30)/30*0.1
ZBGS2赋值:SUM((C计算的获利盘比例*100),20)/20*0.4
ZBGS3赋值:SUM((C计算的获利盘比例*100),10)/10*0.3
ZBGS4赋值:SUM((C计算的获利盘比例*100),5)/5*0.1
ZBGS5赋值:SUM((C计算的获利盘比例*100),3)/3*0.1
ZBGSZ赋值:ZBGS1+ZBGS2+ZBGS3+ZBGS4+ZBGS5
如果ZBGSZ>38返回ZBGSZ否则返回ZBGSZ*1.3
如果成交量累加至当前流通股本的天数< 100返回100-成交量累加至当前流通股本的天数否则返回1
如果收盘价计算的获利盘比例返回收盘价计算的获利盘比例*100否则返回0
Z1赋值:STRCAT(HYBLOCK,' ')
Z2赋值:STRCAT(Z1,DYBLOCK)
Z3赋值:STRCAT(Z2,' ')
DRAWTEXT_FIX(ISLASTBAR,0.02,0.02,0,STRCAT(Z3,GNBLOCK)),画黄色
DRAWKLINE(H,O,L,C)
SN1赋值:(L+H)/2
SN1的3日[1日权重]移动平均
SN1的21日[1日权重]移动平均
输出MA5:MA(C,5) 线宽为2,COLOR00CCFF
五日乖离率赋值:(C-MA5)/MA5*100
BB5赋值:ATAN((MA5/1日前的MA5-1)*100)*180/3.1416
速度5赋值:SMA(EMA((MA5-1日前的MA5)/1日前的MA5,3)*100,3,1)
加速度5赋值:EMA((速度5-1日前的速度5),3),NODRAW
如果BB5>30 AND MA5>1日前的MA5返回MA5否则返回DRAWNULL
如果BB5< 0 AND MA5< 1日前的MA5返回MA5否则返回DRAWNULL
VAR3赋值:240日内最高价最低值
VAR4赋值:100*(收盘价-VAR3)/VAR3
VAR5赋值:(收盘价-528日内最低价最低值)/(528日内最高价最高值-528日内最低价最低值)*100
VAR6赋值:(收盘价-530日内收盘价最低值)/(530日内收盘价最高值-530日内收盘价最低值)*100
VAR7赋值:0
收盘价-1日前的收盘价和0较大值的34日[1日权重]移动平均
收盘价-1日前的收盘价和0较大值的13日[1日权重]移动平均
VAR10赋值:IF(TROUGHBARS(3,16,1)=0 AND 最高价>最低价+0.04,4,0)
VAR11赋值:ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3)
VAR12赋值:ZIG(3,6)< REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3)
VAR13赋值:ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3)
VAR14赋值:ZIG(3,22)< REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3)
VAR15赋值:ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3)
VAR16赋值:ZIG(3,51)< REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3)
VAR17赋值:ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3)
VAR18赋值:ZIG(3,72)< REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3)
VAR19赋值:收盘价的2日指数移动平均-收盘价的150日指数移动平均
买１赋值:VAR10
买２赋值:(VAR11+VAR13+VAR15+VAR17)
卖１赋值:(VAR12+VAR14+VAR16+VAR18)
如果买１>0 OR 买２>0返回最低价*0.99否则返回DRAWNULL
DRAWICON((ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)<=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)<=REF(ZIG(3,5),3)),最低价*0.99,1)
DRAWICON((ZIG(3,5)< REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)>=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)>=REF(ZIG(3,5),3)),最高价*1.01,2)
ZB赋值:VAR3的5日指数移动平均,5)*3, COLORSTICK
VARA赋值:IF(VAR9 AND CROSS(MA(收盘价,3),MA(收盘价,5)),20,0)
K赋值:VAR7的5日指数移动平均*2, , COLORFF00FF
D赋值:K的5日指数移动平均, , 画白色
J赋值:K*3-D*2, ,画黄色
VARB赋值:BETWEEN(收盘价,MA(收盘价,3),MA(收盘价,5)) AND J>10
HS赋值:成交量/当前流通股本*100, , 画绿色
VARE赋值:MA(100*(收盘价-34日内收盘价最低值)/(34日内最高价最高值-34日内最低价最低值),5)-20
VARF赋值:100-3*SMA((收盘价-75日内最低价最低值)/(75日内最高价最高值-75日内最低价最低值)*100,20,1)+2*SMA(SMA((收盘价-75日内最低价最低值)/(75日内最高价最高值-75日内最低价最低值)*100,20,1),15,1)
当满足条件VAR11 AND 统计30日满足VAR11的天数=1时,在最低价*0.98和'机构进场'位置书写文字
如果VARE>0返回VARE否则返回0
VAR1B赋值:IF(VAR14>=200 AND VAR13>=150,15,IF(VAR14<=-200 AND VAR13<=-150,-15,VAR16))+60
VAR1C赋值:VAR1A>48 AND VAR1B>60 AND VAR19< 100
当满足条件VAR1C AND 统计30日满足VAR1C的天数=1时,在H*1.02和'大顶（底）'位置书写文字
{上下轨}N11赋值:2,200,13
UR00赋值:2,200,6
LR0赋值:2,200,6
如果H=8*UR00日内H最高值返回H否则返回DRAWNULL
TC02赋值:CONST(上次TC01=H距今天数)+1
如果TC02=1返回H否则返回TC02-1日前的H
如果L=8*LR0日内L最低值返回L否则返回DRAWNULL
BC2:=CONST(上次BC1=L距今天数)+1
如果BC2=1返回L否则返回BC2-1日前的L
LP赋值: 到最后交易的周期<=BC2 AND L=最低价ER
HP赋值: 到最后交易的周期<=TC02 AND H=UPPER
如果TC02>BC2返回TC02否则返回BC2
LR1赋值:C的NOD+1日线性回归预测值
输出NP:IF( 到最后交易的周期<=BC2和TC02较大值,CONST(IF(TC02和BC2的较小值=1,LR1,TC02和BC2的较小值-1日前的LR1)),DRAWNULL),DOTLINE,画红色
LR2赋值:SLOPE(C,NOD+1)
LR3赋值:CONST(IF(TC02和BC2的较小值=1,LR2,TC02和BC2的较小值-1日前的LR2))
如果BC2>TC02返回HP否则返回LP
如果BC2>TC02返回LP否则返回HP
输出FP:NP-LR3*(NOD),DOTLINE,画黄色
输出EQU:(NP+FP)/2,DOTLINE,画白色
AD赋值:NP-FP的绝对值
DBL0:=上次BC1!=DRAWNULL距今天数+1
DBH:=上次TC01!=DRAWNULL距今天数+1
如果BC2>TC02返回DBL0否则返回DBH
如果NP>FP返回FP+AD/NOD*BSP否则返回FP-AD/NOD*BSP
AT1赋值:IF(BETWEEN( 到最后交易的周期,BC2,TC02) AND H>LRL,H,LRL)
AT2赋值:BC2和TC02较大值日内AT1-LRL最高值
AT3赋值:CONST(上次AT1-LRL=AT2距今天数)
如果AT3=0返回H否则返回AT3日前的H
如果AT3=0返回AT1-LRL否则返回AT3日前的AT1-LRL
ATL赋值:LRL+AT5
UT1赋值:IF(BETWEEN( 到最后交易的周期,BC2,TC02) AND LUT2赋值:BC2和TC02较大值日内LRL-UT1最高值
UT3赋值:CONST(上次LRL-UT1=UT2距今天数)
如果UT3=0返回H否则返回UT3日前的H
如果UT3=0返回LRL-UT1否则返回UT3日前的LRL-UT1
UTL赋值:LRL-UT5
RH赋值:IF( 到最后交易的周期>=BC2和TC02的较小值-10,ATL,CONST(BC2和TC02的较小值-11日前的ATL))
RL赋值:IF( 到最后交易的周期>=BC2和TC02的较小值-10,UTL,CONST(BC2和TC02的较小值-11日前的UTL))
输出中轨:IF(NP>FP,IF(LRL<=RH,LRL,DRAWNULL),IF(LRL>=RL,LRL,DRAWNULL)),COLORBBBBBB
输出上轨:IF(NP>FP,IF(ATL<=RH,ATL,DRAWNULL),IF(ATL>=RL,ATL,DRAWNULL)), 画蓝色
输出下轨:IF(NP>FP,IF(UTL<=RH,UTL,DRAWNULL),IF(UTL>=RL,UTL,DRAWNULL)),COLORFF00FF
LT赋值:LLVBARS(L,60)
LT1:=LLVBARS(L,60)
LTT:=上次 到最后交易的周期=CONST(LT距今天数+1)
HT赋值:FIND最高价BARS(H,LT+1,60,1)
DT:=FIND最低价(L,LT1+1,60,1)
输出锅盖:DRAWLINE( 到最后交易的周期=CONST(HT)+1,H,ISLASTBAR,HT日前的H,0),画绿色 , 线宽为1
输出{顶底}底:DRAWTEXT(CROSS(ZIG(3,8),REF(ZIG(3,8),1)),H,''), 线宽为2,画黄色
当满足条件底时,在L*0.99和1之间画图标
输出顶:DRAWTEXT(CROSS(REF(ZIG(3,10),1),ZIG(3,10)),H,''), 线宽为2,画黄色
当满足条件顶时,在H*1.01和2之间画图标
{涨跌停变色}X_2赋值:1日前的收盘价
X_3赋值:1日前的收盘价*1.097
X_4赋值:收盘价>=X_3 AND 收盘价=最高价
当满足条件X_4时,在O和收盘价之间画柱状线
X_5赋值:IF(DTPRICE(1日前的收盘价,0.1)=收盘价,2,0)
当满足条件X_5时,在开盘价和收盘价之间画柱状线
{九转}AH赋值:60日内H最高值
AL赋值:60日内L最低值
A0赋值:(AH-AL)/21
A11赋值:C>4日前的C
NT赋值: 条件连续成立次数(A11)
TJ11:=NT=9
TJ13:=ISLASTBAR AND BETWEEN(NT,5,8)
AY赋值:(BACKSET(TJ11>0,9) OR BACKSET(TJ13>0,NT))*NT
DRAWTEXT(AY>0,H+1.1*A0,VAR2STR(AY,0)),画黄色
当满足条件NT=9时,在H+1.1*A0和'9'位置书写文字
当满足条件NT=13时,在H+1.1*A0和'13'位置书写文字
当满足条件NT=18时,在H+1.1*A0和'18'位置书写文字
B11:=C<4日前的C
NT0:= 条件连续成立次数(B11)
TJ21:=NT0=9
TJ23:=ISLASTBAR AND BETWEEN(NT0,5,8)
AY1:=(BACKSET(TJ21>0,9) OR BACKSET(TJ23>0,NT0))*NT0
DRAWTEXT(AY1>0,L-1*A0,VAR2STR(AY1,0)),COLORLIGREEN
当满足条件NT0=9时,在H+1.1*A0和'9'位置书写文字
当满足条件NT0=13时,在H+1.1*A0和'13'位置书写文字
