【图】指南针草上飞系列{含原码1

指南针草上飞指系列之

XHB启动

S1:IF(H+L<=REF(H,1)+REF(L,1),0,MAX(ABS(H-REF(H,1)),ABS(L-REF(L,1))));
S2:IF(((H+L)>=(REF(H,1)+REF(L,1))),0,MAX( ABS(H-REF(H,1)),ABS(L-REF(L,1))));
S5:MA(S1,10);
S6:MA(S2,10);
S3:IF(S5>S6,(S5-S6)/S5,IF(S5=S6,0,(S5-S6)/S6));
启动:SMA(S3,5,1),COLORRED,LINETHICK2;
DRAWICON(CROSS(启动,0.0),0,4),ALIGN1;


XHB_上攻动能

五:MA(WINNER(C)*100,5),COLORRED;
十三:MA(WINNER(C)*100,13),COLORYELLOW;
三四:MA(WINNER(C)*100,34),COLORCYAN;
六十:MA(WINNER(C)*100,60),COLORGREEN;
A0:=MA(C,3)>MA(C,7) AND MA(C,7)>MA(C,13);
A1:=(O<REF(C*0.98,1) AND C/O>1.035 AND A0)*18;
A2:=MA(C,5)>MA(C,10) AND MA(C,10)>MA(C,20) AND C>MA(C,5);
A3:=O=L AND C/REF(C,1)>1.03 AND H>C;
A4:=O=L AND C/REF(C,1)>1.03 AND H=C;
A5:=((A2 AND A3) OR A4)*28;
A6:=IF(C-O>=0,(H-C)/C*100,(H-O)/C*100);
A7:=((REF(A6,1)>3.5 AND C>REF(H,1)) OR (REF(A6,2)>3.5 AND C>REF(H,1))
    OR (REF(A6,3)>3.5 AND C>REF(H,1)))*38;
上攻A:A1,COLORRED;
上攻B:A5,COLORWHITE;
上攻C:A7,Color00D7FF;
A8:=(CLOSE/MA(CLOSE,55)-1)*100;
A9:=(CLOSE/MA(CLOSE,34)-1)*100;
A10:=(CLOSE/MA(CLOSE,13)-1)*100;
DRAWTEXT(A8>0 AND A9>0 AND A10>0,三四*0.93,'持'),COLORYELLOW,ALIGN0;



XHB_主图叠加

DMZ:=IF((H+L)<=(REF(H,1)+REF(L,1)),0,MAX(ABS(H-REF(H,1)),ABS(L-REF(L,1))));
DMF:=IF((H+L)>=(REF(H,1)+REF(L,1)),0,MAX(ABS(H-REF(H,1)),ABS(L-REF(L,1))));
ADMZ:=MA(DMZ,10);
ADMF:=MA(DMF,10);
SRDM:=IF(ADMZ>ADMF,(ADMZ-ADMF)/ADMZ,IF(ADMZ=ADMF,0,(ADMZ-ADMF)/ADMF));
ASRDM:=SMA(SRDM,10,1);
A0:=(SRDM>=ASRDM AND ASRDM>=DMF)*7;
TYP:=(H+L+C)/3;
CCI:=(TYP-MA(TYP,34))/(0.015*AVEDEV(TYP,34));
A1:=(CROSS(CCI,199))*6;
A2:=WINNER(C)*100;
A3:=(A2>=HHV(A2,21) AND HHV(A2,21)>REF(HHV(A2,21),1) OR A2>91)*7;
A4:=VOL/CAPITAL*100;
A5:=SLOPE(EMA(C,12),3)/MA(EMA(C,12),3);
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,16);
DEA:=EMA(DIFF,9);
MACD:=2*(DIFF-DEA);
A6:=(MACD<0 AND A5<0.00)*7;
A7:=(V>MA(V,5) AND MA(V,5)>MA(V,10))*7;
CYW:="CYW@CYW";
LC:=REF(CLOSE,1);
RSI6:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
RSI12:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;
Var2:=(CLOSE-REF(CLOSE, 1))/REF(CLOSE, 1)*100;
Var3:=(INDEXC-REF(INDEXC, 1))/REF(INDEXC, 1)*100;
Var4:=SUM(Var2-Var3,0)+100;
A8:=(Var4>MA(Var4,5) AND MA(Var4,5)>MA(Var4,13) AND MA(Var4,13)>MA(Var4,34))*7;
A9:=(A3>5 AND A4>1 AND A5>0.007 AND A6<5 AND A7>5 AND CYW>0.02
    AND RSI6>67 AND RSI12>58 AND A8>5)*7;
A10:=(C>EMA(C,5) AND EMA(C,5)>EMA(C,13) AND CROSS(EMA(C,5),EMA(C,13)))*6;
DRAWTEXT(A10>0,L*0.98,'↑'),ColorD4FF7F,ALIGN0;
DRAWTEXT(A10>0,L*0.95,'短'),ColorD4FF7F,ALIGN0;

C5:="CYC@CYC5";
C13:="CYC@CYC13";
A11:=(CROSS(EMA(C,13),EMA(C,34)) AND C5>C13)*6;
CCI89:=(TYP-MA(TYP,89))/(0.015*AVEDEV(TYP,89));
A12:=CROSS(CCI,CCI89)*6;
LFS:="LFS@LFS";
A13:=(A2-LLV(A2,60))/(HHV(A2,60)-LLV(A2,60))*100;
A14:=(LFS-LLV(LFS,20))/(HHV(LFS,20)-LLV(LFS,20))*100;
A15:=(A13>=98 AND A14<=6)*7;
A16:=(WINNER(C*1.1)-WINNER(C/1.1))*100;
A17:=(COST(99.5)/COST(0.5)-1)*100;
A18:=(A16<3 AND A17>175)*7;
A19:=(A4>5 AND C/REF(C,1)<0.96)*7;
安全:A0,COLORYELLOW,linethick0;
量飞:A1,COLORWHITE,linethick0;
价飞:A9,COLORYELLOW,linethick0;
中买:A11,ColorD4FF7F,linethick0;
转折:A12,ColorD4FF7F,linethick0;
强势:A15,ColorD4FF7F,linethick0;
大底:A18,ColorD4FF7F,linethick0;
短险:A6,COLORGREEN,linethick0;
长阴:A19,COLORGREEN,linethick0;
DRAWTEXT(A0>0,L*0.998,'☉'),COLORYELLOW,ALIGN0;
DRAWTEXT(A1>0,H*1.03,'●'),COLORWHITE,ALIGN0;
DRAWTEXT(A9>0,L,'●'),COLORYELLOW,ALIGN0;
DRAWTEXT(A11>0,L*0.97,'中'),ColorD4FF7F,ALIGN0;
DRAWTEXT(A12>0,L*0.99,'♂'),ColorD4FF7F,ALIGN0;
DRAWTEXT(A15>0,L*0.93,'转'),ColorD4FF7F,ALIGN0;
DRAWTEXT(A15>0,L*0.90,'强'),ColorD4FF7F,ALIGN0;

DRAWTEXT(A18>0,L,'底'),colorwhite,ALIGN0;
DRAWTEXT(A6>0,H*1.01,'☉'),COLORGREEN,ALIGN0;
DRAWTEXT(A19>0,H*1.015,'▽'),COLORGREEN,ALIGN0;
STICKLINE(O>=C,O,C,8,0),COLORGREEN;
STICKLINE(O>=C,H,L,0,1),COLORGREEN;
STICKLINE(O<=C,O,C,8,0),COLORRED;
STICKLINE(O<=C,H,L,0,1),COLORRED;
"CYC@CYC5",COLORYELLOW;
"CYC@CYC13",COLORMAGENTA;
"CYC@CYC34",COLORGREEN;
"CYC@CYCMAX",COLORCYAN;


XHB成本重心

短:MA(C,5),COLORRED;
MA(C,10),COLORYELLOW;
MA(C,20),ColorD4FF7F;
A0:=AMOUNT/VOL/100;
A1:=(EMA(A0,5)>EMA(A0,10) AND EMA(A0,10)>EMA(A0,20) AND EMA(A0,20)>EMA(A0,30))*6;
A2:=(EMA(A0,3)>EMA(A0,7) AND EMA(A0,7)>EMA(A0,13) AND EMA(A0,13)>EMA(A0,21))*6;
中线起飞:A1,COLORRED,LINETHICK0;
短线起飞:A2,COLORGREEN,LINETHICK0;
DRAWICON(A1,MA(C,20)*0.97,6),ALIGN0;
DRAWICON(A2,MA(C,20),11),ALIGN0;



XHB个股个性

Var2:=(CLOSE-REF(CLOSE, 1))/REF(CLOSE, 1)*100;
Var3:=(INDEXC-REF(INDEXC, 1))/REF(INDEXC, 1)*100;
Var4:=SUM(Var2-Var3,0)+100;
MA(Var4,5),COLORRED;
MA(Var4,10),COLORYELLOW;
MA(Var4,21),ColorFFFFC0;
A0:=(MA(Var4,3)>MA(Var4,7) AND MA(Var4,7)>MA(Var4,21))*6;
A1:=(MA(C,3)>MA(C,7) AND MA(C,7)>MA(C,13))*6;
强于大盘:A0,COLORred,LINETHICK0;
短线升势:A1,COLORgreen,LINETHICK0;
DRAWICON(A0,MA(Var4,21),6),ALIGN0;
DRAWICON(A1,MA(Var4,21)-1.8,7),ALIGN0;股票论坛 www.55188.com