|
{ZL超級回馬槍} M55:MA(C,250); P1:(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4*1.01,COLORYELLOW,DOTLINE; 總額:=AMOUNT; 買:=IF(O=C AND (C-REF(C,1))/REF(C,1)*100>9.8,AMOUNT,AMOUNT/((H-L)*2-ABS(O-C))*(C-L)); 買%:=買/AMOUNT*100; 流入:=AMOUNT*買%/10000000000; 流出:=AMOUNT/100000000-流入; 凈流:=(流入-流出); 總額3:=SUM(AMOUNT,3); 流入3:=SUM(流入,3); 流出3:=SUM(流出,3); 凈流3:=SUM(流入-流出,3); 總額5:=SUM(AMOUNT,5); 流入5:=SUM(流入,5); 流出5:=SUM(流出,5); 凈流5:=SUM(流入-流出,5); 總額10:=SUM(AMOUNT,10); 流入10:=SUM(流入,10); 流出10:=SUM(流出,10); 凈流10:=SUM(流入-流出,10); 畫:=CONST(FINDHIGH(總額10,0,190,1)); DRAWTEXT_FIX(1,0.11,0.12,0,'凈流(億):'),COLOR8080FF,LINETHICK1; DRAWTEXT_FIX(1,0.18,0.1,0,'1日'),COLOR8080FF,LINETHICK1; DRAWTEXT_FIX(1,0.23,0.1,0,'3日'),COLOR8080FF,LINETHICK1; DRAWTEXT_FIX(1,0.28,0.1,0,'5日'),COLOR8080FF,LINETHICK1; DRAWTEXT_FIX(1,0.33,0.1,0,'10日'),COLOR8080FF,LINETHICK1; DRAWNUMBER_FIX(1,0.18,0.15,0,CONST((凈流))),COLORYELLOW; DRAWNUMBER_FIX(1,0.23,0.15,0,CONST((凈流3))),COLORYELLOW; DRAWNUMBER_FIX(1,0.28,0.15,0,CONST((凈流5))),COLORYELLOW; DRAWNUMBER_FIX(1,0.33,0.15,0,CONST((凈流10))),COLORYELLOW; Z1A:=STRCAT(HYBLOCK,' '); Z2A:=STRCAT(Z1A,FGBLOCK); Z3A:=STRCAT(Z2A,DYBLOCK); Z4A:=STRCAT(Z3A,' '); DRAWTEXT_FIX(ISLASTBAR,0.25,0.98,0,STRCAT(Z4A,GNBLOCK)),COLORCYAN; 漲停家數(shù):"880006$C" NODRAW COLOR0000FF; 跌停家數(shù):"880006$O" NODRAW COLOR00FF00; STICKLINE(MA(C,13)>REF(MA(C,13),1) AND MA(C,21)>REF(MA(C,21),1) AND C>MA(C,21), MA(C,13),MA(C,21),0,0),COLORBLUE; DRAWKLINE(H,O,L,C);LC:=REF(CLOSE,1); CZX:=SMA(MAX(CLOSE-LC,0),2,1)/SMA(ABS(CLOSE-LC),2,1)*100,COLORWHITE,LINETHICK2; Z1:=STRCAT(HYBLOCK,' '); Z2:=STRCAT(Z1,DYBLOCK); Z3:=STRCAT(Z2,' '); DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLOR00C0C0; ZT:=(REF(C,1)*1.095-C)<0.01 AND C=H; STICKLINE(ZT,OPEN,CLOSE,3,0),COLORRED; STICKLINE(ZT,OPEN,CLOSE,2,0),COLORYELLOW; STICKLINE(ZT,H,L,0,0),COLORYELLOW; F2:=C-REF(C,1)*0.9<0.01; STICKLINE(F2,OPEN,CLOSE,3,0),COLORGREEN; JJX:=AMOUNT/V/100,POINTDOT; STICKLINE(ZT,JJX,JJX,2,0),COLORGREEN; STICKLINE(REF(ZT,1),REF(JJX,1),REF(JJX,1),6,0),COLORGREEN; {STICKLINE(REF(ZT,2),REF(JJX,2),REF(JJX,2),4,0),COLORGREEN;} STICKLINE(ZT,(O+C)/2,(O+C)/2,2,0),COLORMAGENTA; STICKLINE(REF(ZT,1),REF((O+C)/2,1),REF((O+C)/2,1),6,0),COLORMAGENTA; {STICKLINE(REF(ZT,2),REF((O+C)/2,2),REF((O+C)/2,2),4,0),COLORMAGENTA;} STICKLINE(ZT,L,L,2,0),COLORGRAY; STICKLINE(REF(ZT,1),REF(L,1),REF(L,1),6,0),COLORGRAY; {STICKLINE(REF(ZT,2),REF(L,2),REF(L,2),4,0),COLORGRAY;} MA13:MA(C,13),COLORGRAY; MA21:MA(C,21),COLORWHITE,LINETHICK2; 強勢線:(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4,COLORMAGENTA; 當(dāng)日短線止損:0.97*REF(C,1),COLORCYAN,NODRAW; 當(dāng)日短線止贏:1.05*REF(C,1),COLORRED,NODRAW; 當(dāng)日平衡:REF(C,1),COLORMAGENTA,NODRAW; 操作線:=SMA(MAX(CLOSE-LC,0),14,1)/SMA(ABS(CLOSE-LC),14,1)*100,COLORGRAY; ZCX2:=45;CDX:=25; HH:=COUNT(ZT,13)>=1; PP2:=CZX<ZCX2 AND REF(CZX,1)>ZCX2 AND C>MA(C,21); PP3:=CZX<CDX AND REF(CZX,1)>CDX AND C>MA(C,21); STICKLINE(PP2 AND HH,OPEN,CLOSE,0.8,0),COLORBLUE; STICKLINE(PP3 AND HH,OPEN,CLOSE,0.8,0),COLORBLUE; {P1:(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4*1.01,COLORMAGENTA,DOTLINE;} A:=SMA(L,4,3) ; STICKLINE( REF(PP2,1) AND HH ,A*0.9999,A*0.9979,1,0)COLORGREEN; IF( REF(PP2,1) AND HH ,L*0.99,DRAWNULL),COLORRED,CIRCLEDOT; DRAWICON( REF(PP2,1) AND HH,L*0.98,1); STICKLINE( REF(PP3,1) AND HH ,A*0.9999,A*0.9979,1,0)COLORGREEN; IF( REF(PP3,1) AND HH ,L*0.99,DRAWNULL),COLORRED,CIRCLEDOT; DRAWICON( REF(PP3,1) AND HH,L*0.98,1); HD:=COUNT(ZT,21)>=1; A1:=SMA(H,4,3); STICKLINE(A1 AND HD AND C>MA(C,21),A1,A1*1.001,0.3,0)COLORWHITE; {P2:(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4*0.99,COLORBLUE,DOTLINE;} UU:=REF(H,2)=HHV(H,8) AND HH; DRAWTEXT(UU AND C>MA(C,21),H,'3'); DRAWTEXT(REF(UU,2) AND HH AND C>MA(C,21),H,'5'); {當(dāng)日平衡:IF(CURRBARSCOUNT<3,CONST(REF(C,1)),DRAWNULL),COLORMAGENTA,LINETHICK2; 當(dāng)日短線止贏:1.05*當(dāng)日平衡,COLORRED,LINETHICK2; 當(dāng)日短線止損:0.97*當(dāng)日平衡,COLORCYAN,LINETHICK2;} STICKLINE(IF(CURRBARSCOUNT<2,CONST(REF(C,1)),DRAWNULL),REF(C,1)*1.05,REF(C,1)*1.05,1,0),COLORYELLOW; STICKLINE(IF(CURRBARSCOUNT<2,CONST(REF(C,1)),DRAWNULL),REF(C,1),REF(C,1),1,0),COLORYELLOW; STICKLINE(IF(CURRBARSCOUNT<2,CONST(REF(C,1)),DRAWNULL),REF(C,1)*0.97,REF(C,1)*0.97,1,0),COLORYELLOW; BOLL:=MA(C,20); UB:=BOLL+2*STD(C,20),COLORWHITE; LB:=BOLL-2*STD(C,20),COLORWHITE; VAR1:=CLOSE-LOW; VAR2:=HIGH-LOW; VAR3:=CLOSE-HIGH; VAR4:=IF(HIGH>LOW,(VAR1/VAR2+VAR3/VAR2)*VOL,0); HPTP:=SUM(VAR4,10)/10000,COLORSTICK; DIF:=EMA(CLOSE,DIF)-EMA(CLOSE,DEA); DEA:=EMA(DIF,MID); TKXL:=(DIF-DEA)*2; XVYO:=UPNDAY(TKXL,1); HH1:=REF(H,5)=HHV(H,11); LL:=REF(L,5)=LLV(L,11); FG01:=BACKSET(HH1,6)>BACKSET(HH1,5); FD01:=BACKSET(LL,6)>BACKSET(LL,5); STICKLINE(V/REF(V,1)>2,OPEN,CLOSE,1,0),COLOR00FFFF; FG02:=IF(BARSLAST(FG01)=BARSLAST(FD01) AND MA(C,5)>MA(C,10),FG01,IF(BARSLAST(FD01)>BARSLAST(FG01),FG01,0)); FD02:=IF(BARSLAST(FG01)=BARSLAST(FD01) AND MA(C,10)>MA(C,5),FD01,IF(BARSLAST(FG01)>BARSLAST(FD01),FD01,0)); FG0:=FG02 AND H=HHV(H,BARSLAST(FD02)); FD0:=FD02 AND L=LLV(L,BARSLAST(FG02)); GQ:=L>REF(H,1) AND DAY!=REF(DAY,1); DQ:=H<REF(L,1) AND DAY!=REF(DAY,1); FGH:=REF(H,BARSLAST(FG0)); FGL:=REF(L,BARSLAST(FG0)); FGH1:=REF(H,BARSLAST(FG0)+1); FGL1:=REF(L,BARSLAST(FG0)+1); FGL2:=REF(L,BARSLAST(FG0)+2); FDH2:=REF(H,BARSLAST(FD0)+2); FDH:=REF(H,BARSLAST(FD0)); FDL:=REF(L,BARSLAST(FD0)); FDH1:=REF(H,BARSLAST(FD0)+1); FDL1:=REF(L,BARSLAST(FD0)+1); FGZL:=IF(FGH1<FGL,FGL,IF(FGL<=FGL1,FGL2,FGL1)); FDZH:=IF(FDL1>FDH,FDH,IF(FDH>=FDH1,FDH2,FDH1)); FG1:=FGH>FDZH AND FG0; FD1:=FDL<FGZL AND FD0; FG:=FG1 AND FGH>FDH AND FGL>FDL AND FGL1>FDL; FD:=FD1 AND FDL<FGL AND FDH<FGH AND FDH1<FGH; BH0:=(H<=REF(H,1) AND L>=REF(L,1)) OR (H>=REF(H,1) AND L<=REF(L,1)); BHG:=COUNT(BH0,BARSLAST(FD0)); BHD:=COUNT(BH0,BARSLAST(FG0)); BGQ:=COUNT(GQ,BARSLAST(FD0)); BDQ:=COUNT(DQ,BARSLAST(FG0)); BK0:=IF(BHG>0,BHG+2,IF(BHD,BHD+2,3)); BK:=IF(BGQ,BK0-BGQ,IF(BDQ,BK0-BDQ,BK0)); G1X:=(FG AND BARSLAST(FD)>BK); D1X:=(FD AND BARSLAST(FG)>BK); G1:=(FG0 AND REF(H,BARSLAST(FG0))>=REF(H,BARSLAST(G1X)) AND BARSLAST(D1X)>BARSLAST(G1X)) OR (FG1 AND COUNT(GQ,BARSLAST(FD1))>0 AND REF(H,BARSLAST(FG1))>REF(H,BARSLAST(G1X))); D1:=(FD0 AND REF(L,BARSLAST(FD0))<=REF(L,BARSLAST(D1X)) AND BARSLAST(G1X)>BARSLAST(D1X)) OR (FD1 AND COUNT(DQ,BARSLAST(FG1))>0 AND REF(L,BARSLAST(FD1))<REF(H,BARSLAST(D1X))); G1H:=IF(BARSLAST(D1)>BARSLAST(G1),REF(H,BARSLAST(G1)),REF(H,BARSLAST(D1))); D1L:=IF(BARSLAST(G1)>BARSLAST(D1),REF(L,BARSLAST(D1)),REF(L,BARSLAST(G1))); G2:=G1 AND H=HHV(G1H,BARSLAST(D1)+1) AND H>REF(H,1) AND BARSLAST(D1)>BARSLAST(G1); D2:=D1 AND L=LLV(D1L,BARSLAST(G1)+1) AND L<REF(L,1) AND BARSLAST(G1)>BARSLAST(D1); NN:=G2 OR (FG0 AND REF(H,BARSLAST(FG0))>REF(H,BARSLAST(G2)) AND BARSLAST(D2)>BARSLAST(G2)); UU1:=D2 OR (FD0 AND REF(L,BARSLAST(FD0))<REF(L,BARSLAST(D2)) AND BARSLAST(G2)>BARSLAST(D2)); 找頂線:DRAWLINE(NN,H,REF(NN,1),REF(H,1),1),COLORGREEN; 找底線:DRAWLINE(UU1,L,REF(UU1,1),REF(L,1),1),COLORRED; DRAWNUMBER(UU1,L*0.995,L); DRAWNUMBER(NN,H*1.01,H); XG:CROSS(C,找頂線) AND 找頂線>0 AND HPTP AND XVYO,NODRAW; DRAWICON(XG,LOW,1); A3:EMA(C,21)COLORBLUE,LINETHICK3; B:=A3<REF(A3,1); IF(B-1,A3,DRAWNULL)COLORRED,LINETHICK3; AA:=EMA(C,3) > EMA(C,21); BB:=EMA(C,3) < EMA(C,21); CC:= EMA(C,3) > EMA(C,8); CC1:=EMA(C,3) < EMA(C,8); DD:=CLOSE<OPEN; 買線:=MA(CLOSE,9),LINETHICK2; 賣線:=MA(CLOSE,20); BU:=CROSS(買線,賣線); SEL:=CROSS(賣線,買線); DRAWTEXT(BU,L-0.1,'建倉')COLORYELLOW; DRAWTEXT(SEL,H+0.1,'空倉'); A7:=(C-REF(C,1))/REF(C,1)*100<1.02; A8:=H>MA(C,5)*1.12; AAA:= A7 AND A8; DRAWTEXT(AAA,H*1.03,'賣點'); EMA13:=EMA(C,13),COLOR0000FF; EMA34:=EMA(C,34); EMA55:=EMA(C,55),COLORFF00FF; EMA120:=EMA(C,120),COLORFFCC66; AR1:=EMA55>EMA34 AND EMA34>EMA13; AR2:=BARSLAST((C-EMA13)/EMA13*100<-6); AR3:=EMA13>=REF(EMA13,2); AR4:=COUNT(CROSS(C,EMA13),AR2)=1; AR5:=AR1 AND AR2 AND AR3 AND AR4; AR6:=AR5 AND FILTER(AR5,10); DRAWTEXT(AR6,L-0.09,'啟動'),COLORYELLOW; BR1:=COUNT(BETWEEN((C-REF(C,1))/REF(C,1)*100,0,5) ,5)=5; BR2:=ABS((EMA13-EMA34)+(EMA34-EMA55))/C<0.2; BR3:=C>EMA55 AND (REF(C,1)<REF(EMA55,1) OR REF(C,2)<REF(EMA55,2) OR REF(C,3)<REF(EMA55,3) OR REF(C,4)<REF(EMA55,4) OR REF(C,5)<REF(EMA55,5)); BR4:=BR1 AND BR2 AND BR3; DRAWTEXT(BR4 AND FILTER(BR4,10),L-0.09,'上升'),COLOR00C5FF; STICKLINE(BR4 AND FILTER(BR4,10),O,C,3,1),LINETHICK2,COLOR00C5FF; CR1:=(C-REF(C,1))/REF(C,1)*100>0.5; CR2:=V>MA(V,5)*0.6; CR3:=COUNT(CROSS(EMA13,EMA55),3)=1; CR4:=ABS(EMA34-EMA55)/EMA55<0.03; CR5:=EMA55<=EMA120 AND EMA55>=REF(EMA55,1); CR6:=FILTER(CR1 AND CR2 AND CR3 AND CR4 AND CR5,2); DRAWTEXT(CR6,L-0.09,'漲升'),COLORF00FF0; DR1:=EMA13>EMA34 AND EMA34<EMA55; DR2:=BARSLAST(CROSS(C,EMA55) ); DR3:=H=HHV(H,DR2); DR4:=BARSLAST(DR3); DR5:=COUNT(O>C AND C<REF(C,1) AND C>EMA55 AND BETWEEN((C-EMA55)/EMA55,0,0.02),DR4)=1; DR6:=C>REF(C,1) ; DR7:= DR1 AND DR5 AND DR6 ; DR8:=DR7 AND FILTER(DR7 ,10); DRAWTEXT(DR8,L-0.09,'出擊'),COLORD6BA63; ER:=BARSLAST(REF(CROSS(EMA55,EMA34),1)) AND CROSS(EMA34,EMA55); DRAWTEXT(ER,L-0.09,'調(diào)整'),COLOR0099FF; FR:=BARSLAST(REF(CROSS(EMA34,EMA13),1)) AND CROSS(EMA13,EMA34); DRAWTEXT(FR,L-0.09,'小頂'),COLORWHITE; GR1:=BARSLAST(BETWEEN("BIAS.BIAS2"(6,13,24),0,5) ); GR2:=EMA13>EMA34 AND EMA34>EMA55 AND EMA13>REF(EMA13,1); GR3:=COUNT("BIAS.BIAS2"(6,13,24)>10 AND H=HHV(H,GR1),GR1); GR4:=H=HHV(H,GR1); GR5:="MACD.MACD"(12,26,9)<REF("MACD.MACD"(12,26,9),1); GR6:=GR2 AND GR3 AND GR4; GR7:=GR2 AND GR3 AND GR4 AND GR5; DRAWTEXT(GR6 AND GR7,H+0.08,'了結(jié)'),COLOR00FF00; HR2:=EMA13>=REF(EMA13,3) AND EMA34>=REF(EMA34,1) AND EMA55>=REF(EMA55,1) AND CROSS(C,EMA13) AND CROSS(C,EMA34) AND CROSS(C,EMA55); DRAWTEXT(HR2 AND FILTER(HR2,10),L-0.3,'推進'),COLORFFC8FF;
|
|
|
