量价启动:=C;
量能异动:=V;
DRAWGBK(C>0,RGB(0,10,10),RGB(88,0,0),0,'0',0);
DRAWGBK(C>0,RGB(40,120,20),RGB(00,00,00),0,'0',1);
DRAWGBK(C>0,RGB(80,100,120),RGB(00,00,00),0,'0',1);
DRAWKLINE(HIGH,OPEN,LOW,量价启动) ;
HHH:=(EMA(量价启动,10)*7+EMA(量价启动,20)*3)/10;
III:=DMA(EMA(量价启动,20),MAX(1,100*(SUM(量能异动,5)/(3*CAPITAL)))),COLORWHITE,DOTLINE;
DRAWBAND(HHH,RGB(255,50,50),III,RGB(64,204,208));
A:EMA(C,21)COLORWHITE,LINETHICK3;
B:=A< REF(A,1);
IF(B-1,A,DRAWNULL)COLORYELLOW,LINETHICK3;
XA_:=EMA(C,3) > EMA(C,21);
Y_:=EMA(C,3) < EMA(C,21);
X_:= EMA(C,3) > EMA(C,8);
X_1:=EMA(C,3) < EMA(C,8);
DD:=量价启动< OPEN;
STICKLINE(XA_,H,L,0,0),COLORRED;
STICKLINE(XA_,O,C,3,1),COLORRED;
STICKLINE(XA_ AND DD,O,C,3,0),COLOR007FFF;
STICKLINE(Y_,H,L,0,0),COLORGREEN;
STICKLINE(Y_,O,C,3,1),COLORGREEN;
STICKLINE(Y_ AND DD,O,C,3,0),COLORGREEN;
STICKLINE(Y_ AND X_,H,L,0,1),COLORF00FF0;
STICKLINE(Y_ AND X_,O,C,3,1),COLORF00FF0;
STICKLINE(Y_ AND X_ AND DD,O,C,3,0),COLORF00FF0;
STICKLINE(XA_ AND X_1,H,L,0,0),COLORBLUE;
STICKLINE(XA_ AND X_1,O,C,3,1),COLORBLUE;
STICKLINE(XA_ AND X_1 AND DD,O,C,3,0),COLORBLUE;
买线:=MA(量价启动,9),LINETHICK2;
卖线:=MA(量价启动,20);
BU:=CROSS(买线,卖线);
SEL:=CROSS(卖线,买线);
DRAWTEXT(BU,L-0.2,'↖建仓位')COLORYELLOW;
DRAWTEXT(SEL,H+0.1,'空仓位');
A2:=(C-REF(C,1))/REF(C,1)*100< 1.02;
A3:=H>MA(C,5)*1.12;
XA_A:= A2 AND A3;
DRAWTEXT(XA_A,H*1.05,'高位'),COLORWHITE;
EMA13:=EMA(C,13),COLOR0000FF,LINETHICK2;
EMA34:=EMA(C,34),COLORYELLOW;
EMA55:=EMA(C,55),COLORFF00FF;
EMA120:=EMA(C,120),COLORFFCC66;
AR1:=EMA55>EMA34 AND EMA34>EMA13;
AR2:=BARSLAST((C-EMA13)/EMA13*100< -6);
AR3:=EMA13>=REF(EMA13,2);
AR4:=COUNT(CROSS(C,EMA13),AR2)=1;
AR5:=AR1 AND AR2 AND AR3 AND AR4;
AR6:=AR5 AND FILTER(AR5,10);
DRAWTEXT(AR6,L-0.09,'↖启动'),COLORYELLOW;
STICKLINE(AR6,H,L,3,0),LINETHICK2,COLORYELLOW;
gspt1:=COUNT(BETWEEN((C-REF(C,1))/REF(C,1)*100,0,5) ,5)=5;
gspt2:=ABS((EMA13-EMA34)+(EMA34-EMA55))/C< 0.2;
gspt3:=C>EMA55 AND (REF(C,1)< REF(EMA55,1) OR REF(C,2)< REF(EMA55,2) OR REF(C,3)< REF(EMA55,3) OR REF(C,4)< REF(EMA55,4) OR REF(C,5)< REF(EMA55,5));
gspt4:=gspt1 AND gspt2 AND gspt3;
DRAWTEXT_FIX(C>O,0,0.07,0,'公式平台 公式源码 http://www.gspt.com'),COLOR333333;
DRAWTEXT(gspt4 AND FILTER(gspt4,10),L-0.09,'上升'),COLOR00C5FF;
STICKLINE(gspt4 AND FILTER(gspt4,10),O,C,3,1),LINETHICK2,COLOR00C5FF;
CR1:=(C-REF(C,1))/REF(C,1)*100>0.5;
CR2:=V>MA(V,5)*0.6;
CR3:=COUNT(CROSS(EMA13,EMA55),3)=1;
CR4:=ABS(EMA34-EMA55)/EMA55< 0.03;
CR5:=EMA55<=EMA120 AND EMA55>=REF(EMA55,1);
CR6:=FILTER(CR1 AND CR2 AND CR3 AND CR4 AND CR5,2);
STICKLINE(CR6,O,C,3,1),LINETHICK2,COLORF00FF0;
DRAWTEXT(CR6,L-0.09,'涨升'),COLORF00FF0;
DR1:=EMA13>EMA34 AND EMA34< EMA55;
DR2:=BARSLAST(CROSS(C,EMA55) );
DR3:=H=HHV(H,DR2);
DR4:=BARSLAST(DR3);
DR5:=COUNT(O>C AND C< REF(C,1) AND C>EMA55 AND BETWEEN((C-EMA55)/EMA55,0,0.02),DR4)=1;
DR6:=C>REF(C,1) ;
DR7:= DR1 AND DR5 AND DR6 ;
DR8:=DR7 AND FILTER(DR7 ,10);
DRAWTEXT(DR8,L-0.09,'↖出击'),COLORD6BA63;
ER:=BARSLAST(REF(CROSS(EMA55,EMA34),1)) AND CROSS(EMA34,EMA55);
DRAWTEXT(ER,L-0.09,'金叉'),COLOR0099FF;
HOP:=BARSLAST(REF(CROSS(EMA34,EMA13),1)) AND CROSS(EMA13,EMA34);
DRAWTEXT(HOP,L-0.08,'↖加仓点'),COLORWHITE;
GR1:=BARSLAST(BETWEEN("BIAS.BIAS2"(6,13,24),0,5) );
GR2:=EMA13>EMA34 AND EMA34>EMA55 AND EMA13>REF(EMA13,1);
GR3:=COUNT("BIAS.BIAS2"(6,13,24)>10 AND H=HHV(H,GR1),GR1);
GR4:=H=HHV(H,GR1);
GR5:="MACD.MACD"(12,26,9)< REF("MACD.MACD"(12,26,9),1);
GR6:=GR2 AND GR3 AND GR4;
GR7:=GR2 AND GR3 AND GR4 AND GR5;
DRAWTEXT(GR6 AND GR7,H+0.13,'了结点'),COLOR00FF00;
HR2:=EMA13>=REF(EMA13,3) AND EMA34>=REF(EMA34,1) AND EMA55>=REF(EMA55,1) AND CROSS(C,EMA13) AND CROSS(C,EMA34) AND CROSS(C,EMA55);
DRAWTEXT(HR2 AND FILTER(HR2,10),L-0.3,'↖推进'),COLORFFC8FF;
STICKLINE(HR2 AND FILTER(HR2,10),O,C,3,1),LINETHICK2,COLORFFC8FF;
下档线:=(((量价启动 - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);
ARSV:=SMA(下档线,3,1);
AK:=SMA(ARSV,3,1);
AD:=((3 * ARSV) - (2 * AK));
AJ12:=(((量价启动 - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100);
ARSV24:=SMA(AJ12,3,1);
AK24:=SMA(ARSV24,3,1);
AD24:=((3 * ARSV24) - (2 * AK24));
撑:=IF(CROSS(AD24,AD),HIGH,REF(HIGH,BARSLAST(CROSS(AD24,AD))));
撑压位:=IF(ISLASTBAR ,撑,DRAWNULL);
底底:=LLV(HIGH,30);
底:=IF(ISLASTBAR ,底底,DRAWNULL);
STICKLINE(ISLASTBAR ,撑压位,撑压位,100,1),LINETHICK1,COLORFFFFFF;
STICKLINE(ISLASTBAR ,底,底,80,1),COLOR00FF00,LINETHICK1;