gspt1:=REF(C,1);
gspt2:=SMA(MAX(C-gspt1,0),5,1)/SMA(ABS(C-gspt1),5,1)*100;
gspt3:=CONST(WINNER(C)*100);
gspt4:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));
gspt5:=(IF(gspt4>1,1,gspt4)*100);
gspt6:=(HHV(HIGH,3)-C)/(HHV(HIGH,3)-LLV(LOW,3))*100;
gspt7:=(gspt2-gspt6);
gspt8:=IF(gspt7>=0,(gspt7+100)/2,100-ABS((gspt7-100)/2));
DRAWTEXT_FIX(ISLASTBAR=1,0.83,0.25,1,STRCAT(STRCAT('量能饱和: ',CON2STR(gspt5,2)),'%')),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR=1,0.83,0.52,1,STRCAT(STRCAT('活跃度比: ',CON2STR(gspt8,2)),'%')),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR=1,0.83,0.75,1,STRCAT(STRCAT('获利筹码: ',CON2STR(gspt3,2)),'%')),COLORYELLOW;
DRAWRECTREL(950,470,630,365,RGB(150,10,250));
DRAWRECTREL(950,710,630,610,RGB(150,10,250));
DRAWRECTREL(950,855,630,955,RGB(150,10,250));
DRAWRECTREL(950,470,630+CONST(gspt5*(950-630)/100),365,RGB(0,100,0));
DRAWRECTREL(790,470,790,365,RGB(0,0,10));
DRAWRECTREL(950,710,630+CONST(gspt8*(950-630)/100),610,RGB(0,100,0));
DRAWRECTREL(790,710,790,610,RGB(0,0,10));
DRAWRECTREL(950,855,630+CONST(gspt3*(950-630)/100),955,RGB(0,100,0));
DRAWRECTREL(790,855,790,955,RGB(0,0,10));
gspt23:=SUM(IF(C>REF(C,1),VOL/CAPITAL*100,IF(C< REF(C,1),-VOL/CAPITAL*100,0)),0);
gspt24:=V*C/100,NODRAW;
gspt25:=SUM((IF(((gspt24/8>20) AND (C>(REF(C,1)))),gspt24,0)),0);
gspt26:=SUM((IF(((gspt24/8>20) AND (C< (REF(C,1)))),gspt24,0)),0);
gspt27:=SUM((IF(((gspt24/8< 20) AND (C>(REF(C,1)))),gspt24,0)),0);
gspt28:=SUM((IF(((gspt24/8< 20) AND (C< (REF(C,1)))),gspt24,0)),0);
gspt29:=((gspt25+gspt26)+gspt27)+gspt28;
gspt30:=1;
gspt31:=STRCAT(STRCAT('机构持有',CON2STR((100*gspt25)/gspt29,0)),'%');
gspt32:=STRCAT(STRCAT('散户持有',CON2STR((100*gspt26)/gspt29,0)),'%');
DRAWTEXT_FIX(1,0.83,0,1,'《★筹码分析★》'),COLORRED;
DRAWTEXT_FIX(gspt30=1,0.63,0,0,gspt31),COLORMAGENTA;
DRAWTEXT_FIX(gspt30=1,0.89,0,0,gspt32),COLORGREEN;
gspt33:=CONST(gspt25/gspt29*100);
DRAWRECTREL(950,220,630,115,RGB(150,10,250));
DRAWRECTREL(950,220,630+CONST(gspt33*(950-630)/100),115,RGB(0,100,0));
DRAWRECTREL(790,220,790,115,RGB(0,0,10));