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)))));
黄s起动线:=EMA((CLOSE/VBNH),20),COLORYELLOW,POINTDOT;
洋红色主力线:=EMA((CLOSE/VBNH),60),COLORMAGENTA,LINETHICK1;
绿色散户线:=EMA((CLOSE/VBNH),120),COLORGREEN,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), COLORMAGENTA;
STICKLINE(EMA(C,10)>EMA(C,60) ,80,85,2.0,0),COLORRED;
STICKLINE(EMA(C,10)<EMA(C,60) ,75,80,2.0,0),COLORGREEN;
DRAWTEXT(CROSS(EMA((CLOSE/VBNH),20),1.02),80,'拉升'),COLORYELLOW;
DRAWTEXT(CROSS(EMA((CLOSE/VBNH),20),1.04),95,'可能涨停'),COLORYELLOW;
STICKLINE(EMA((CLOSE/VBNH),120)>1.003 ,80,85,2.0,0),COLORMAGENTA;
DRAWTEXT(CROSS(EMA((CLOSE/VBNH),120),1.0029),80,'买进'),COLORYELLOW;
DRAWICON(CROSS(EMA((CLOSE/VBNH),120),1.0029),88,9);
DRAWTEXT(CROSS(EMA((CLOSE/VBNH),120),1.0029),85,'观察分时量'),COLORYELLOW;
DRAWTEXT(CROSS(EMA((CLOSE/VBNH),120),1.004),92,'超强'),COLORYELLOW;
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,COLORYELLOW,LINETHICK2;
顶:=95,COLORFF0000,LINETHICK4;
风险区:=90,COLORRED,LINETHICK2;
安全区:=10,COLORGREEN,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,COLORRED;
{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,COLORWHITE;
投机线:=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),COLORYELLOW;
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),COLORGREEN,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),COLORYELLOW;
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,COLORMAGENTA;
机卖:(A3/A6)*100,LINETHICK1,COLORGREEN;
散买:=(A4/A6)*100,LINETHICK1,COLORLIRED;
散卖:=(A5/A6)*100,LINETHICK0;
主力差:=机买-机卖,LINETHICK2,COLORYELLOW;
散户差:=散买-散卖,LINETHICK0,NODRAW;
DRAWTEXT(主力差>0 AND REF(主力差,1)<=0,C*1.35,'●机构'),COLORRED;
DRAWTEXT(主力差<0 AND REF(主力差,1)>=0,-C*0.35,'▼◆机构'),COLORWHITE;
DRAWTEXT(散户差>0 AND REF(散户差,1)<=0,C*0.75,'▲散户'),COLORCYAN;
DRAWTEXT(散户差<0 AND REF(散户差,1)>=0,-C*0.15,'▽散户'),COLORWHITE;
机构加仓:(主力差>=REF(主力差,1)+1.8)*30,LINETHICK1,COLORMAGENTA;
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,'买')COLORYELLOW;
DRAWTEXT(BB>100 AND BBB/REF(BBB,1)>1.1,30+BB,'全买')COLORYELLOW;
STICKLINE(BB>100 AND BBB/REF(BBB,1)>1.1,0,30,1,0)COLORRED;
机构买:CROSS(机买,机卖);
DRAWTEXT(机买,机买,'上穿买'),COLORMAGENTA;
机构卖:CROSS(机卖,机买);
DRAWTEXT(机卖,机买,'☆'),COLORWHITE;
