发出此指标主图，副图，选股的源码及图片，给大家去思考，请多多指教，谢谢!
例如：600111 包钢稀土;000869 张裕A; 600460 士兰微;600403 欣网视讯等等
{筹码主图}
m2:cost(2),color0000ff;
m50:cost(50),color00ffff;
m90:cost(90),colorffff00;
DRAWICON(CROSS(c,m50),m50,1);
获利盘:=WINNER(CLOSE)*100;
套牢盘:=100*(1-WINNER(C));
F:=COST(5 );J:=COST(95 );
M:=COST(15 );N1:=COST(85 );
F11:=(J-F)/(F+J)*100;M1:=(N1-M)/(N1+M)*100;
成本集中度90％:=F11;
成本集中度70％:=M1;
浮筹比例:=(winner(c*1.1)-winner(c*0.9))/winner(hhv(h,0))*100;
A1A:=100*V/CAPITAL;
B1B:=100*(WINNER(C)-REF(WINNER(C),1));
获利盘:=WINNER(CLOSE)*100;
套牢盘:=100*(1-WINNER(C));
F:=COST(5 );J:=COST(95 );
M:=COST(15 );N1:=COST(85 );
F11:=(J-F)/(F+J)*100;M1:=(N1-M)/(N1+M)*100;
成本集中度90％:=F11;
成本集中度70％:=M1;
浮筹比例:=(winner(c*1.1)-winner(c*0.9))/winner(hhv(h,0))*100;
A1A:=100*V/CAPITAL;
B1B:=100*(WINNER(C)-REF(WINNER(C),1));
MM:=5-1;
筹码穿透率:=B1b/A1a;
DRAWTEXTABS(16,20,'筹码分析：'),Color00FFFF;
DRAWTEXTABS(70,20,'获利盘:'+获利盘+'％ '),LINETHICK1,Color0000FF;
DRAWTEXTABS(160,20,'套牢盘:'+套牢盘+'％ '),LINETHICK1,ColorFF6A00;
DRAWTEXTABS(260,20,'底仓区成本集中度:'+成本集中度70％+'％ '),LINETHICK1,Color0000FF;
DRAWTEXTABS(420,20,'吸筹拉升区成本集中度：'+成本集中度90％+'％ '),LINETHICK1,ColorFF00FF;
DRAWTEXTABS(610,20,'浮筹比例:'+浮筹比例+'％ '),LINETHICK1,ColorFFFF00;
DRAWTEXTABS(730,20,'筹码穿透率:'+筹码穿透率+'％ '),LINETHICK1,Color00FFFF;
...........................................................................
{解读换手率的应用附筹码指标}
获利筹码:EMA(WINNER(C)*70,5),Color00ffff,LINETHICK3;
亏损筹码:EMA((WINNER(C*1.1)-WINNER(C*0.9))*80,5),Colorff0000;
主力控筹:If(获利筹码>亏损筹码,获利筹码*2,获利筹码),colorff00ff,LINETHICK3;
AI:=AMOUNT/VOL/100;
C0:=REF(C,2)*0.865;
C1:=REF(C,13)*0.772;
DSY:=100*vol/CApitAl;
抄底:If((C-MIN(C0,C1))/C<0.1 AND SUM(DSY,5)/5<1.8,100, 0),ColorFF00ff,COLOR3D;
stickline(抄底,0,80,4,0),ColorFF00FF;
动态底部:EMA(IF(L<= LLV(l,30),SMA(ABS(L-REF(L,1)),30,1)/SMA(MAX(L-REF(l,1),0),30,1),0),3)*10,COLORYELLOW,LINETHICK2,COLOR3D;{STICK}
SAT:=IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100);
STICKLINE(((CLOSE > 0) AND day=2),0,120,10,1),colorFFFFFF;
STICKLINE(((SAT <= 5) AND day=2),20,(100 + SAT),8,0),colorFFFFFF;
STICKLINE((((SAT > 5) AND (SAT <= 20)) AND day=2),20,(80 + SAT),10,0),colorCCFF88;
STICKLINE((((SAT > 20) AND (SAT <= 40)) AND day=2),20,(80 + SAT),8,0),colorFF00FF;
STICKLINE(((SAT > 40) AND day=2),20,(60 + SAT),8,0),color0000FF;
主力筹码:EMA(WINNER(CLOSE)*70,10),color0000ff,LINETHICK2;
小股民筹码:EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,10),colorffff00;
FILLRGN(获利筹码,主力筹码,获利筹码>=主力筹码,RGB(255,0,0),获利筹码<主力筹码,RGB(0,250,0));
FILLRGN(亏损筹码,亏损筹码,亏损筹码>=小股民筹码,RGB(0,255,0));
VERTLINE(CROSS(主力筹码,小股民筹码),2);
DRAWICON(CROSS(主力筹码,小股民筹码),亏损筹码,1);
........................................................................
{解读换手率的应用附筹码指标选股：}
{这里有7个选股条件，可自行组合及优化，如果不要提示用括号屏蔽}
DSY:=100*vol/CApitAl;
SAT:=IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100);
S:(((CLOSE > 0) AND day=2));
S1:(((SAT <= 5) AND day=2));
S2:((((SAT > 5) AND (SAT <= 20)) AND day=2));
S3:((((SAT > 20) AND (SAT <= 40)) AND day=2));
S4:(((SAT > 40) AND day=2));
主力筹码:=EMA(WINNER(CLOSE)*70,10);
小股民筹码:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,10);
主:(CROSS(主力筹码,小股民筹码));
m50:=cost(50);
哈:(CROSS(c,m50));
DRAWTEXT(S=1,0.3,'S');
DRAWTEXT(S1=1,0.4,'S1');
DRAWTEXT(S2=1,0.5,'S2');
DRAWTEXT(S3=1,0.6,'S3');
DRAWTEXT(S4=1,0.7,'S4');
DRAWTEXT(主=1,0.8,'主');
DRAWTEXT(哈=1,0.9,'哈');
|
