{灰色K}STICKLINE(O>=C,H,L,0,0),COLOR909090;STICKLINE(O>=C,C,O,3.1,0),COLOR606060;STICKLINE(O>=C,C,O,3.1,0),COLOR707070;STICKLINE(O>=C,C,O,1.2,0),COLOR808080;STICKLINE(O>=C,C,O,0.2,0),COLOR909090;STICKLINE(O<=C,H,L,0,0),COLOR666B6F;STICKLINE(C>O,C,O,3.1,1),COLOR666B6F;V2V:=V/REF(V,1)>=1.9 AND C>REF(C,1);{，公式源码 http://}MA1:=EXPMEMA(CLOSE,3);MA2:=EXPMEMA(CLOSE,5);MA3:=EXPMEMA(CLOSE,8);MA4:=EXPMEMA(CLOSE,10);MA5:=EXPMEMA(CLOSE,12);MA6:=EXPMEMA(CLOSE,35);MA7:=EXPMEMA(CLOSE,40);MA8:=EXPMEMA(CLOSE,45);MA9:=EXPMEMA(CLOSE,50);MA10:=EXPMEMA(CLOSE,60); 跌:=EMA(C,120),LINETHICK1,POINTDOT,COLORGREEN;{涨:IF (跌>REF(跌,1),跌,0),LINETHICK2,CIRCLEDOT,COLORGREEN;} 红:=MA(C,120),LINETHICK1,POINTDOT,COLORGREEN;{绿:IF (红>REF(红,1),红,0),LINETHICK2,CIRCLEDOT,COLORFF0080;} A24:=EMA(C,24); IF(A24>=REF(A24,1),A24,DRAWNULL),COLORFF00FF,LINETHICK1; A55:=EMA(C,55); IF(A55>=REF(A55,1),A55,DRAWNULL),COLORCYAN,LINETHICK1; A77:=EMA(C,77),DOTLINE;IF(A77>=REF(A77,1),A77,DRAWNULL),COLORRED,LINETHICK1; 效果:=O<=MIN(MA1,MIN(MA2,MIN(MA3,MIN(MA4,MA5))))ANDC>=MAX(MA1,MAX(MA2,MAX(MA3,MAX(MA4,MA5))));A01:=MIN(O,C);B01:=ABS(O-C);A02:=MAX(O,C); 共振:=O<=MIN(MA1,MIN(MA2,MIN(MA3,MIN(MA4,MIN(MA5,MIN(MA6,MIN(MA7,MIN(MA8,MIN(MA9,MA10)))))))))AND C>=MAX(MA1,MAX(MA2,MAX(MA3,MAX(MA4,MAX(MA5,MAX(MA6,MAX(MA7,MAX(MA8,MAX(MA9,MA10))))))))); STICKLINE(共振,H,L,0,1),COLORYELLOW;STICKLINE(共振,C,O,3.1,0),COLOR117777;STICKLINE(共振,C,O,2.6,0),COLOR119999;STICKLINE(共振,C,O,1.9,0),COLOR11BBBB;STICKLINE(共振,C,O,1.1,0),COLOR11DDDD;STICKLINE(共振,C,O,0.3,0),COLOR44FFFF; STICKLINE(效果,A01,A01+B01/6,3.1,0),COLOR880088;STICKLINE(效果,A01,A01+B01/6,2.5,0),COLOR990099;STICKLINE(效果,A01,A01+B01/6,2.0,0),COLORBB00BB;STICKLINE(效果,A01,A01+B01/6,1.5,0),COLORDD00DD;STICKLINE(效果,A01,A01+B01/6,0.7,0),COLORFF00FF; 主力筹码估算:=EMA(WINNER(CLOSE)*70,3),NODRAW,LINETHICK0;散户筹码估算:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3),NODRAW;散户套牢比率:=散户筹码估算/(主力筹码估算+散户筹码估算)*100,NODRAW;主力控盘比率:=主力筹码估算/(主力筹码估算+散户筹码估算)*100,NODRAW; DRAWTEXT_FIX(CURRBARSCOUNT=1,0.85,0.84,0,'■ 主力筹码估算：'),COLORRED;DRAWTEXT_FIX(CURRBARSCOUNT=1,0.92,0.84,0,' ％'),COLORMAGENTA;DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.90,0.84,0,主力筹码估算),COLORMAGENTA;DRAWTEXT_FIX(CURRBARSCOUNT=1,0.85,0.93,0,'■ 主力控盘比率：'),COLORRED;DRAWTEXT_FIX(CURRBARSCOUNT=1,0.92,0.93,0,' ％'),COLORMAGENTA;DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.90,0.93,0,主力控盘比率),COLORMAGENTA;{风险系数}X1:=(FINANCE(11)-FINANCE(15))/FINANCE(10)*1.2;X2:=(FINANCE(31)+FINANCE(17))/FINANCE(10)*1.4;{盈余公积用资本公积金代替}X3:=FINANCE(23)/FINANCE(10)*3.3;X4:=FINANCE(19)/FINANCE(15)*0.6;{缺长期负债或负债总额}X5:=FINANCE(20)/FINANCE(15)*0.999;LC:=REF(CLOSE,1);WRSI:=SMA(MAX(CLOSE-LC,0),5,1)/SMA(ABS(CLOSE-LC),5,1)*100;获利筹码:=CONST(WINNER(C)*100);SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));量能饱和:=(IF(SAT>1,1,SAT)*100);WR10:=(HHV(HIGH,3)-CLOSE)/(HHV(HIGH,3)-LLV(LOW,3))*100;活跃:=(WRSI-WR10);活跃度比:=IF(活跃>=0,(活跃+100)/2,100-ABS((活跃-100)/2));DRAWTEXT_FIX(1,0.992,0.84,1,STRCAT(STRCAT('量能饱和：',CON2STR(量能饱和,2)),'％')),COLORMAGENTA;DRAWTEXT_FIX(1,0.992,0.88,1,STRCAT(STRCAT('活跃度比：',CON2STR(活跃度比,2)),'％')),COLORMAGENTA;DRAWTEXT_FIX(1,0.992,0.92,1,STRCAT(STRCAT('获利筹码：',CON2STR(获利筹码,2)),'％')),COLORMAGENTA; {DRAWTEXT_FIX(1,0.82,0.00,1,'大盘趋势：'),COLORRED;DRAWTEXT_FIX( CONST(INDEXC) >SAR(4,2,20),0.85,0.00,1,'∧向上∧'),COLORRED;DRAWTEXT_FIX( CONST(INDEXC) >SAR(4,2,20),0.85,0.03,1,'∧∧∧∧'),COLORRED;DRAWTEXT_FIX( CONST(INDEXC) <SAR(4,2,20),0.85,0.00,1,'∨向下∨'),COLORGREEN;DRAWTEXT_FIX( CONST(INDEXC) <SAR(4,2,20),0.85,0.03,1,'∨∨∨∨'),COLORGREEN;}{DRAWTEXT_FIX(CURRBARSCOUNT=1,0.60,0.93,0,'数据日期：'),COLORRED;DRAWTEXT_FIX(CURRBARSCOUNT=1,0.80,0.93,0,' 财报更新第：'),COLORRED;DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.90,0.93,0,FINANCE(37)),,COLORMAGENTA;DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.70,0.93,0,MACHINEDATE+19000000),COLORMAGENTA;};
