 | |  |  |
分析家专捉大黑马源码公式：
input:n1(1),m(13);
套牢盘:100*(1-WINNER(C)),coloryellow,linethick2;
CYF13:100*SMA(VOL/CAPITAL,M,1)*M/(1+SMA(VOL/CAPITAL,M,1)*M),COLORRED,LINETHICK2;
DRAWTEXT((CYF13<20 AND CROSS(10,套牢盘) AND HHV(套牢盘,50)>=88 AND
HHV(CYF13,30)=CYF13),CYF13,'★'),COLORWHITE;
vr1:=BARSLAST(cross(89,套牢盘));
穿越天数:vr1,LINETHICK0;
CYC:=dma(c,vol/capital);;
换手率: VOL/CAPITAL*100,LINETHICK0;
ERZD:=换手率/REF(换手率,1)*100-100;
DRAWTEXT(换手率<=3 AND 套牢盘<=10,5,'·'),COLORFFFF30;
DRAWTEXT(ERZD<=-10 AND CLOSE/HHV(CLOSE,125)>=1 AND 换手率<=4 AND 套牢盘<=15 AND
(CLOSE-LLV(CYC,50))/LLV(CYC,60)<0.3 AND
(CLOSE-LLV(CYC,60))/LLV(CYC,50)>0.15,CYF13-4,'↑'),COLORFFFF30;
AA:=MIN((50+100*(CYC-REF(CYC,1))),50);
BB:=MAX((50+100*(CYC-REF(CYC,1))),50);
CC:=MAX((50+100*(CYC-REF(CYC,2))),50);
DD:=MAX((50+100*(CYC-REF(CYC,3))),50);
EE:=MAX((50+100*(CYC-REF(CYC,4))),50);
FF:=MAX((50+100*(CYC-REF(CYC,5))),50);
GG:=MIN((50+100*(CYC-REF(CYC,2))),50);
HH:=MIN((50+100*(CYC-REF(CYC,3))),50);
II:=MIN((50+100*(CYC-REF(CYC,4))),50);
JJ:=MIN((50+100*(CYC-REF(CYC,5))),50);
STICKLINE(CYC-REF(CYC,1)>0,AA,BB,8,0),COLORE0E0FF;
STICKLINE(CYC-REF(CYC,2)>0,BB,CC,8,0),COLORB0B0FF;
STICKLINE(CYC-REF(CYC,3)>0,CC,DD,8,0),COLOR9090FF;
STICKLINE(CYC-REF(CYC,4)>0,DD,EE,8,0),COLOR6060FF;
STICKLINE(CYC-REF(CYC,5)>0,EE,FF,8,0),COLOR2020FF;
STICKLINE(CYC-REF(CYC,1)<0,AA,BB,8,0),COLORFFE0E0;
STICKLINE(CYC-REF(CYC,2)<0,GG,AA,8,0),COLORFFB0B0;
STICKLINE(CYC-REF(CYC,3)<0,HH,GG,8,0),COLORFF9090;
STICKLINE(CYC-REF(CYC,4)<0,II,HH,8,0),COLORFF6060;
STICKLINE(CYC-REF(CYC,5)<0,JJ,II,8,0),COLORFF2020;
STICKLINE(C>0,89.2,90.8,20,0),COLOR00A000;
STICKLINE(C>0,9.2,10.8,20,0),COLOR00A000;
STICKLINE((CLOSE-LLV(CYC,50))/LLV(CYC,60)<0.3 AND
(CLOSE-LLV(CYC,60))/LLV(CYC,50)>0.15,92,95,20,0),COLORFFFF30;
STICKLINE((CLOSE-LLV(CYC,50))/LLV(CYC,60)>=0.3,92,95,20,0),COLOR2020FF;
STICKLINE((CLOSE-LLV(CYC,60))/LLV(CYC,50)<=0.15 AND
(CLOSE-LLV(CYC,60))/LLV(CYC,50)>-0.1,92,95,20,0),COLORE0E0FF;
100*(WINNER(CLOSE)-WINNER(OPEN)),COLORSTICK;
获利差:=100*WINNER(C)-REF(100*WINNER(C),1);
筹码穿透率:获利差/换手率,LINETHICK0,colorred;
var1:=REF(HHV(CLOSE,500),1);
var2:=REF(LLV(CLOSE,500),1);
获利盘:100*WINNER(C),coloryellow,linethick0;
DRAWTEXT(获利差>=40 AND 换手率<=3,获利盘,'★'),colorred;
全盘穿越:VOL/CAPITAL*100<=3 AND 100*WINNER(C)-REF(100*WINNER(C),1)>=40,linethick0;{盘穿越}
DRAWTEXT(全盘穿越,套牢盘*1.1,'全盘穿越'),colorgreen,ALIGN2;
DRAWTEXT(全盘穿越,套牢盘*1.08,'无量长阳'),colorgreen,ALIGN2;
DRAWBMP(全盘穿越,套牢盘*0.95,'T09');
全盘穿越Ａ:ref((1-WINNER(CLOSE))*100,1)-(1-WINNER(CLOSE))*100>30 AND VOL/CAPITAL*100<4 AND(C-ref(C,1))/ref(C,1)>0.04,linethick0;
DRAWBMP(全盘穿越Ａ,套牢盘,'T07');
DRAWTEXT(全盘穿越Ａ,套牢盘*1.81,'全盘穿越'),colorgreen,ALIGN2;
DRAWTEXT(全盘穿越Ａ,套牢盘*1.79,'无量长阳'),colorgreen,ALIGN2;
全盘穿越Ｂ:ref((1-WINNER(CLOSE))*100,1)-(1-WINNER(CLOSE))*100>30 AND VOL/CAPITAL*100>6 AND(C-ref(C,1))/ref(C,1)>0.04,linethick0;
DRAWTEXT(全盘穿越Ｂ,套牢盘*1.1,'全盘穿越'),coloryellow,ALIGN2;
DRAWTEXT(全盘穿越Ｂ,套牢盘*1.08,'放量长阳'),coloryellow,ALIGN2;
DRAWBMP(全盘穿越Ｂ,套牢盘*1.10,'T03'); |
| |  | |  |
|
