BGTYU:=IF(DATE<=1590301,1,0);
GHYJKU:=BETWEEN((CLOSE*BGTYU)/(SUM(AMOUNT,BARSCOUNT((CLOSE*BGTYU)))/SUM(vol*100,BARSCOUNT((CLOSE*BGTYU)))),1.05,0.95);
VBNH:=IF(GHYJKU=0,ma((CLOSE*BGTYU),BARSCOUNT((CLOSE*BGTYU))),(SUM(AMOUNT,BARSCOUNT((CLOSE*BGTYU)))/SUM(VOL*100,BARSCOUNT((CLOSE*BGTYU)))));
黄色起动线:=ema((CLOSE/VBNH),20),COLORBLUE,POINTDOT;
洋红色主力线:=EMA((CLOSE/VBNH),60),COLORLIMAGENTA,LINETHICK1;
绿色散户线:=EMA((CLOSE/VBNH),120),COLORCYAN,LINETHICK1;
DRAWICON(crOSS(EMA((CLOSE/VBNH),60),EMA((CLOSE/VBNH),120)),EMA((CLOSE/VBNH),60)*1,1);
DRAWICON(CROSS(EMA((CLOSE/VBNH),120),EMA((CLOSE/VBNH),60)),EMA((CLOSE/VBNH),120)*1,2);
DRAWICON(CROSS(EMA((CLOSE/VBNH),20),1.02),85,18);
STICKLINE(CROSS(EMA((CLOSE/VBNH),20),1.02),83,90,5,0), COLORLIMAGENTA;
STICKLINE(EMA(C,10)>EMA(C,60) ,80,85,2.0,0),COLORWHITE;
STICKLINE(EMA(C,10)<EMA(C,60) ,75,80,2.0,0),COLORCYAN;
DRAWTEXT(CROSS(EMA((CLOSE/VBNH),20),1.02),80,'拉升'),COLORBLUE;
DRAWTEXT(CROSS(EMA((CLOSE/VBNH),20),1.04),95,'可能涨停'),COLORBLUE;
STICKLINE(EMA((CLOSE/VBNH),120)>1.003 ,80,85,2.0,0),COLORLIMAGENTA;
DRAWTEXT(CROSS(EMA((CLOSE/VBNH),120),1.0029),80,'买进'),COLORBLUE;
DRAWICON(CROSS(EMA((CLOSE/VBNH),120),1.0029),88,9);
DRAWTEXT(CROSS(EMA((CLOSE/VBNH),120),1.0029),85,'观察分时量'),COLORBLUE;
DRAWTEXT(CROSS(EMA((CLOSE/VBNH),120),1.004),92,'超强'),COLORBLUE;
DRAWICON(CROSS(EMA((CLOSE/VBNH),120),1.004),90,9);
P:=EMA(-100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34)),3);
风警值:P+100,COLORBLUE,LINETHICK2;
顶:=95,COLORFF0000,LINETHICK4;
风险区:=90,COLORWHITE,LINETHICK2;
安全区:=10,COLORCYAN,LINETHICK2;
底:=5,COLOR004000,LINETHICK4;
多方:EMA(100-3*SMA((LLV(LOW,75)-CLOSE)/(HHV(HIGH,75)-LLV(LOW,75))*100,27,1)+2*SMA(SMA((LLV(LOW,75)-CLOSE)/(HHV(HIGH,75)-LLV(LOW,75))*100,27,1),15,1)-100,3),LINETHICK2,COLORWHITE;
{MA(多方,3);}
空方:EMA(100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,27,1)+2*SMA(SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,27,1),15,1),3),LINETHICK2,COLORRED;
投机线:=EMA(3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1),3),COLOR00FFFF;
V12:=(投机线-REF(投机线,1))/REF(投机线,1)*100;
准备现金: STICKLINE(投机线<=13,0,20,4,0),COLORCC9900;
AA:=投机线<=13 AND FILTER((投机线<=13),15);
DRAWTEXT (AA,25,'备钱'),COLORCC9900;
买入股票: STICKLINE(投机线<=13 AND V12>13,0,35,6,0),COLOR0099FF;
BBK:= (投机线<=13 AND V12>13) AND FILTER((投机线<=13 AND V12>13),10) ;
DRAWTEXT (BBK,40,'买股'),COLOR0099FF;
见顶清仓: STICKLINE(投机线>=95 AND V12,90,99,4,0),COLORBLUE;
V1:=(C*2+H+L)/4*10;
V2:=EMA(V1,13)-EMA(V1,34);
V3:=EMA(V2,5);
V4:=2*(V2-V3)*5.5;
主力撤:IF(V4<=0,V4,0),COLORCYAN,NODRAW;
主力进:IF(V4>=0,V4,0),NODRAW;
顶部:IF(CROSS(多方,99) AND 投机线>=95 OR 多方>=90 AND CROSS(多方,投机线) OR MA(多方,3)>=105,90,100),COLOR00AA00;
底部:IF(投机线<=5,10,10),COLORBLUE;
A1:=(DVOL/C)/2,NODRAW;
A2:=SUM(IF(A1>100 AND CLOSE>REF(CLOSE,1),A1,0),0);
A3:=SUM(IF(A1>100 AND CLOSE<REF(CLOSE,1),A1,0),0);
A4:=SUM(IF(A1<100 AND CLOSE>REF(CLOSE,1),A1,0),0);
A5:=SUM(IF(A1<100 AND CLOSE<REF(CLOSE,1),A1,0),0);
A6:=A2+A3+A4+A5;
机买:(A2/A6)*100,LINETHICK1,COLORLIMAGENTA;
机卖:(A3/A6)*100,LINETHICK1,COLORCYAN;
散买:=(A4/A6)*100,LINETHICK1,COLORLICYAN;
散卖:=(A5/A6)*100,LINETHICK0;
主力差:=机买-机卖,LINETHICK2,COLORBLUE;
散户差:=散买-散卖,LINETHICK0,NODRAW;
DRAWTEXT(主力差>0 AND REF(主力差,1)<=0,C*1.35,'●机构'),COLORWHITE;
DRAWTEXT(主力差<0 AND REF(主力差,1)>=0,-C*0.35,'▼◆机构'),COLORRED;
DRAWTEXT(散户差>0 AND REF(散户差,1)<=0,C*0.75,'▲散户'),COLORGREEN;
DRAWTEXT(散户差<0 AND REF(散户差,1)>=0,-C*0.15,'▽散户'),COLORRED;
机构加仓:(主力差>=REF(主力差,1)+1.8)*30,LINETHICK1,COLORLIMAGENTA;
BB:=机买/机卖;
BBB:=机构加仓/REF(机构加仓,1);
DRAWICON(BB/REF(BB,1)>1.02 AND BB>5 AND BBB=1,1,3);
DRAWICON(BB/REF(BB,1)>1.03 AND BB>9 AND BBB/REF(BBB,1)>0.99,10,1);
DRAWICON(BB/REF(BB,1)>1.03 AND BB>9 AND BBB/REF(BBB,1)>0.99,15,1);
DRAWICON(BB/REF(BB,1)>1.05 AND BB>9 AND BBB/REF(BBB,1)>0.99,20,13);
DRAWICON(BB/REF(BB,1)>1.05 AND BB>9 AND BBB/REF(BBB,1)>1.0,30,1);
DRAWICON(BB/REF(BB,1)>1.05 AND BB>9 AND BBB/REF(BBB,1)>1.0,40,1);
DRAWICON(BB/REF(BB,1)>1.05 AND BB>9 AND BBB/REF(BBB,1)>1.1,18,13);
DRAWTEXT(BB/REF(BB,1)>1.05 AND BB>9 AND BBB/REF(BBB,1)>1.1,30,'买')COLORBLUE;
DRAWTEXT(BB>100 AND BBB/REF(BBB,1)>1.1,30+BB,'全买')COLORBLUE;
STICKLINE(BB>100 AND BBB/REF(BBB,1)>1.1,0,30,1,0)COLORWHITE;
机构买:CROSS(机买,机卖);
DRAWTEXT(机买,机买,'上穿买'),COLORLIMAGENTA;
机构卖:CROSS(机卖,机买);
DRAWTEXT(机卖,机买,'☆'),COLORRED;
