CANG1:=REF(C,1); CANG2:=SMA(MAX(C-CANG1,0),5,1)/SMA(ABS(C-CANG1),5,1)*100; CANG3:=CONST(WINNER(C)*100); CANG4:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20)); CANG5:=(IF(CANG4>1,1,CANG4)*100); CANG6:=(HHV(HIGH,3)-C)/(HHV(HIGH,3)-LLV(LOW,3))*100; CANG7:=(CANG2-CANG6); CANG8:=IF(CANG7>=0,(CANG7+100)/2,100-ABS((CANG7-100)/2)); DRAWTEXT_FIX(ISLASTBAR=1,0.83,0.25,1,STRCAT(STRCAT('量能饱和: ',CON2STR(CANG5,2)),'%')),COLORYELLOW; DRAWTEXT_FIX(ISLASTBAR=1,0.83,0.52,1,STRCAT(STRCAT('活跃度比: ',CON2STR(CANG8,2)),'%')),COLORYELLOW; DRAWTEXT_FIX(ISLASTBAR=1,0.83,0.75,1,STRCAT(STRCAT('获利筹码: ',CON2STR(CANG3,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(CANG5*(950-630)/100),365,RGB(0,100,0)); DRAWRECTREL(790,470,790,365,RGB(0,0,10)); DRAWRECTREL(950,710,630+CONST(CANG8*(950-630)/100),610,RGB(0,100,0)); DRAWRECTREL(790,710,790,610,RGB(0,0,10)); DRAWRECTREL(950,855,630+CONST(CANG3*(950-630)/100),955,RGB(0,100,0)); DRAWRECTREL(790,855,790,955,RGB(0,0,10)); CANG23:=SUM(IF(C>REF(C,1),VOL/CAPITAL*100,IF(C< REF(C,1),-VOL/CAPITAL*100,0)),0); CANG24:=V*C/100,NODRAW; CANG25:=SUM((IF(((CANG24/8>20) AND (C>(REF(C,1)))),CANG24,0)),0); CANG26:=SUM((IF(((CANG24/8>20) AND (C< (REF(C,1)))),CANG24,0)),0); CANG27:=SUM((IF(((CANG24/8< 20) AND (C>(REF(C,1)))),CANG24,0)),0); CANG28:=SUM((IF(((CANG24/8< 20) AND (C< (REF(C,1)))),CANG24,0)),0); CANG29:=((CANG25+CANG26)+CANG27)+CANG28; CANG30:=1;DRAWTEXT_FIX(1,0.01,0.01,0,'公众号:仓鼠量化'),COLOR333333; CANG31:=STRCAT(STRCAT('J构持有',CON2STR((100*CANG25)/CANG29,0)),'%'); CANG32:=STRCAT(STRCAT('散呼持有',CON2STR((100*CANG26)/CANG29,0)),'%'); DRAWTEXT_FIX(1,0.83,0,1,'《★筹码分析★》'),COLORRED; DRAWTEXT_FIX(CANG30=1,0.63,0,0,CANG31),COLORMAGENTA; DRAWTEXT_FIX(CANG30=1,0.89,0,0,CANG32),COLORGREEN; CANG33:=CONST(CANG25/CANG29*100); DRAWRECTREL(950,220,630,115,RGB(150,10,250)); DRAWRECTREL(950,220,630+CONST(CANG33*(950-630)/100),115,RGB(0,100,0)); DRAWRECTREL(790,220,790,115,RGB(0,0,10));
|