天:=(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1+XMA(XMA(H,25),25),DOTLINE,COLORLIBLUE;
地:XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,LINETHICK1,DOTLINE,COLORRED;
DRAWBAND(天,RGB(55,0,0),地,RGB(55,0,0));
老徐:=STRCAT(HYBLOCK,' ');
公式:=STRCAT(老徐,DYBLOCK);
源码:=STRCAT(公式,' ');
DRAWTEXT_FIX(1,0.02,0.05,0,STRCAT(源码,GNBLOCK)),COLORYELLOW;
啊彬1:=SUM((WINNER(C)*100),30)/30*0.1;
啊彬2:=SUM((WINNER(C)*100),20)/20*0.4;
啊彬3:=SUM((WINNER(C)*100),10)/10*0.3;
啊彬4:=SUM((WINNER(C)*100),5)/5*0.1;
啊彬5:=SUM((WINNER(C)*100),3)/3*0.1;
啊彬Z:=啊彬1+啊彬2+啊彬3+啊彬4+啊彬5;
赚钱效应:IF(啊彬Z>38,啊彬Z,啊彬Z*1.3),NODRAW;
活跃度:IF(SUMBARS(VOL,CAPITAL)<100,100-SUMBARS(VOL,CAPITAL),1),NODRAW;
获利筹码:IF(WINNER(CLOSE),WINNER(CLOSE)*100,0),NODRAW;
AB:=EMA(((2*C+H+L)/4-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30))*100,8);
BA:=EMA(AB,5);
A001{高}:=REFDATE(REF(HHV(H,96),5),DATE);
B001{低}:=REFDATE(REF(LLV(L,96),5),DATE);
DY{中}:=((A001)+(B001))/2;
箱顶:=IF(AB>0 AND AB-BA<=0,A001,A001),LINETHICK2,COLORLIBLUE;
箱腰:IF(AB>0 AND AB-BA<=0,DY,DY),LINETHICK1,COLORLIGRAY;
箱低:=IF(AB>0 AND AB-BA<=0,B001,B001),LINETHICK2,COLORLIMAGENTA;
A1:=EMA(CLOSE,7)-EMA(CLOSE,21);
RR:=EMA(A1,2)*1,COLORSTICK;
多头:=STICKLINE(RR>REF(RR,1),0,RR,0.8,-1),COLORYELLOW;
空头:=STICKLINE(RR<REF(RR,1),0,RR,0.8,-1),COLORBLUE;
STICKLINE(多头=1,箱顶,箱顶,5,0),COLORRED;
STICKLINE(空头=1,箱顶,箱顶,5,0),COLORGREEN;
STICKLINE(多头=1,箱低,箱低,5,0),COLORRED;
STICKLINE(空头=1,箱低,箱低,5,0),COLORGREEN;
DRAWKLINE(H,O,L,C);
MA5:=MA(CLOSE,5),COLORFFFFFF;
MA10:=MA(CLOSE,10),COLOR00FFFF;
MA20:=MA(C,20),COLORFF00FF;
MA60:=MA(CLOSE,60),COLORFF9988;
MA120:=MA(CLOSE,120),COLOR0000FF;
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
BDGD:=C=HHV(C,13);
GDSJ:=BARSLAST(FILTER(CROSS(0.8,BDGD),2))+1;
高点:REF(C,GDSJ),COLORFF00FF,POINTDOT;
突破:CROSS(C,REF(高点,1)),COLOR00FFFF,POINTDOT,NODRAW;
STICKLINE(GDSJ<=6,高点,高点,3,0),COLORFF00FF;
DRAWTEXT(突破,LOW,'▲'),COLOR00FFFF;
BDDD:=C=LLV(C,13);
DDSJ:=BARSLAST(FILTER(CROSS(0.8,BDDD),2))+1;
低点:REF(C,DDSJ),COLOR00FF00,POINTDOT;
STICKLINE(DDSJ<=6,低点,低点,3,0),COLOR00FF00;
LC:=REF(CLOSE,1);
RSI5:=((SMA(MAX((CLOSE - LC),0),5,1) / SMA(ABS((CLOSE - LC)),5,1)) * 100);
TR1:=SUM(MAX(MAX((HIGH - LOW),ABS((HIGH - REF(CLOSE,1)))),ABS((LOW - REF(CLOSE,1)))),10);
HD:=(HIGH - REF(HIGH,1));
LD:=(REF(LOW,1) - LOW);
DMP:=SUM(IF(((HD > 0) AND (HD > LD)),HD,0),10);
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),10);
PDI:=((DMP * 100) / TR1);
MDI:=((DMM * 100) / TR1);
ADX:=MA(((ABS((MDI - PDI)) / (MDI + PDI)) * 100),5);
AV:=(RSI5 + ADX);
DXR:=(((ADX + REF(ADX,5)) / 2) + RSI5);
WR10:=((100 * (HHV(HIGH,10) - CLOSE)) / (HHV(HIGH,10) - LLV(LOW,10)));
NEWVOL:=(RSI5 - WR10);
回踩买入:=(AV + NEWVOL);
DRAWTEXT(CROSS(回踩买入,0),L*0.95,'★'),COLORRED;
DRAWICON(CROSS(回踩买入,-5),L*0.98,1);
HJX:=MAX(MA(C,5),MAX(MAX(MA(C,10),MA(C,20)),MAX(MA(C,60),MA(C,120))));
DRAWTEXT(CROSS(C,HJX) AND CROSS(C,MA5) AND CROSS(C,MA20),L,'五')COLORRED;
AH:=HHV(H,60);
AL:=LLV(L,60);
A0:=(AH-AL)/21;
{九转}
A01:=C>REF(C,4);
NT:=BARSLASTCOUNT(A01);
TJ11:=NT=9;
TJ13:=ISLASTBAR AND BETWEEN(NT,5,8);
AY:=(BACKSET(TJ11>0,9) OR BACKSET(TJ13>0,NT))*NT;
DRAWTEXT(AY>0,箱低,VAR2STR(AY,0)),COLORYELLOW;
DRAWTEXT(NT=9,箱低,'9'),COLORGREEN;
DRAWTEXT(NT=13,箱低,'13'),COLORGREEN;
DRAWTEXT(NT=18,箱低,'18'),COLORGREEN;
B1:=C<REF(C,4);
NT0:=BARSLASTCOUNT(B1);
TJ21:=NT0=9 ;
TJ23:=ISLASTBAR AND BETWEEN(NT0,5,8);
AY1:=(BACKSET(TJ21>0,9) OR BACKSET(TJ23>0,NT0))*NT0;
DRAWTEXT(AY1>0,箱低,VAR2STR(AY1,0)),COLORLIGREEN;
DRAWTEXT(NT0=9,箱低,'9'),COLORYELLOW;
DRAWTEXT(NT0=13,箱低,'13'),COLORYELLOW;
DRAWTEXT(NT0=18,箱低,'18'),COLORYELLOW;
{顶底}
底:DRAWTEXT(CROSS(ZIG(3,8),REF(ZIG(3,8),1)),20,''),LINETHICK2,COLORYELLOW;
DRAWICON(底,L*0.99,1);
顶:DRAWTEXT(CROSS(REF(ZIG(3,10),1),ZIG(3,10)),20,''),LINETHICK2,COLORYELLOW;
DRAWICON(顶,H*1.01,2);
{顾比}
P:=21;
擒股指标1:=IF(L=LLV(L,P),L,DRAWNULL);
擒股指标2:=CONST(BARSLAST(擒股指标1!=DRAWNULL));
擒股指标3:=CONST(IF(擒股指标2=0,H,REF(H,擒股指标2)));
擒股指标4:=CONST(REF(BARSLAST(H>擒股指标3),擒股指标2+1)+擒股指标2+1);
擒股指标5:=CONST(IF(擒股指标4=0,H,REF(H,擒股指标4)));
擒股指标6:=CONST(REF(BARSLAST(H>擒股指标5),擒股指标4+1)+擒股指标4+1);
进场:IF(CURRBARSCOUNT<=擒股指标2+21,CONST(IF(擒股指标6=0,H,REF(H,擒股指标6))),DRAWNULL),COLORYELLOW;
IF(CURRBARSCOUNT<=擒股指标2+1,IF(L=LLV(L,P),L,DRAWNULL),DRAWNULL),CIRCLEDOT,COLORYELLOW;
TJ0:=REF(C,1)<REF(进场,1) AND C>REF(进场,1);
DRAWICON(TJ0,L*0.98,38);
{涨跌停变色}
X_2:=REF(CLOSE,1);
X_3:=REF(CLOSE,1)*1.097;
X_4:=CLOSE>=X_3 AND CLOSE=HIGH;
STICKLINE(X_4,CLOSE-(CLOSE-OPEN)/3,CLOSE,2,0),COLORYELLOW;
X_5:=IF(DTPRICE(REF(CLOSE,1),0.1)=CLOSE,2,0);
STICKLINE(X_5,OPEN,CLOSE,2.5,0),COLORGREEN;
STICKLINE((C-REF(C,1))/REF(C,1)<=-0.0985,CLOSE+(OPEN-CLOSE)/3,CLOSE,2,0),COLORBLUE;
