|
MA70:=MA(CLOSE,70)COLORA67D3D ; MA4:=MA(CLOSE,4)COLORFFFFFF; MA10:=MA(CLOSE,10)COLORGREEN ; MA21:MA(CLOSE,21)COLOREAADEA ; MA43:=MA(CLOSE,43)COLORFF00FF ; MA70走平:=(MA70-REF(MA70,1)>0) ; MA21走平:=(MA21-REF(MA21,1)>0) ; IF(MA21>REF(MA21,1),MA21,DRAWNULL)COLORRED,LINETHICK2; N1:=5;N2:=7;N3:=11; EM1:=EMA(C,N1),COLORWHITE; EM2:=EMA(C,N2),COLORRED; EM3:=EMA(C,N3),COLORGREEN; TJ:=BETWEEN(EM2,EM1,EM3); 立樁量:=FILTER(TJ=0,5); 價:REF(H,BARSLAST(立樁量)),NODRAW; STICKLINE(C,REF(H,BARSLAST(立樁量)),REF(H,BARSLAST(立樁量)),6,0),COLORGREEN; DRAWTEXT(C AND ISLASTBAR,價,' 突破買入'); DRAWTEXT_FIX(1,0.00,0,0,'所屬行業：')COLORCYAN; DRAWTEXT_FIX(1,0.06,0,0,HYBLOCK),COLORWHITE; DRAWTEXT_FIX(1,0.14,0,0,'所屬地區：')COLORCYAN; DRAWTEXT_FIX(1,0.20,0,0,DYBLOCK),COLORWHITE; DRAWTEXT_FIX(ISLASTBAR,0.75,0.9,0,GNBLOCK),COLORYELLOW; VAR11:=(C+H+O+L)/4; 賣出:MA(VAR11,20)*(1+80/1000),COLORLIMAGENTA ,LINETHICK2; 出:XMA(VAR11,20)*(1+80/1000)POINTDOT,COLORGREEN,LINETHICK3; A1:=MA(C,P1); A2:=MA(C,P2); MRX1:2*A1-A2,COLOR0080FF,LINETHICK3; DRAWICON(CROSS(MRX1,C),L*0.98,38); DIF:=EMA(CLOSE,12)-EMA(CLOSE,26); DEA:=EMA(DIF,9); MACD:=(DIF-DEA)*2,COLORSTICK; TJ1:=MACD>0;T:=MACD<0; A:=LLV(MACD,50)=MACD; DRAWTEXT(BARSLAST(TJ1)=1,MA4,'1'),COLORYELLOW; DRAWTEXT(BARSLAST(TJ1)=2,MA4,'2'),COLORYELLOW; DRAWTEXT(BARSLAST(TJ1)=3,MA4,'3'),COLORYELLOW; DRAWTEXT(BARSLAST(TJ1)=5,MA4,'5'),COLORYELLOW; DRAWTEXT(BARSLAST(TJ1)=8,MA4,'8'),COLORYELLOW; DRAWTEXT(BARSLAST(TJ1)=13,MA4,'13'),COLORYELLOW; DRAWTEXT(BARSLAST(TJ1)=21,MA4,'21'),COLORYELLOW; DRAWTEXT(BARSLAST(TJ1)=34,MA4,'34'),COLORYELLOW; DRAWTEXT(BARSLAST(TJ1)=55,MA4,'55'),COLORYELLOW; DRAWTEXT(BARSLAST(T)=1,MA4,'1'),COLORGREEN; DRAWTEXT(BARSLAST(T)=2,MA4,'2'),COLORGREEN; DRAWTEXT(BARSLAST(T)=3,MA4,'3'),COLORGREEN; DRAWTEXT(BARSLAST(T)=5,MA4,'5'),COLORGREEN; DRAWTEXT(BARSLAST(T)=8,MA4,'8'),COLORGREEN; DRAWTEXT(BARSLAST(T)=13,MA4,'13'),COLORGREEN; DRAWTEXT(BARSLAST(T)=21,MA4,'21'),COLORGREEN; DRAWTEXT(BARSLAST(T)=34,MA4,'34'),COLORGREEN; DRAWTEXT(BARSLAST(T)=55,MA4,'55'),COLORGREEN; 萬:=AMOUNT/10000,COLORFF00FF,NODRAW; VAR100:=AMOUNT/((HIGH-LOW)*2-ABS(CLOSE-OPEN)); 流入萬:=IF(CLOSE>OPEN,VAR100*(HIGH-LOW),IF(CLOSE<OPEN,VAR100*((HIGH-OPEN)+(CLOSE-LOW)),AMOUNT/2))/10000,COLORRED,NODRAW; 流出萬:=IF(CLOSE>OPEN,0-VAR100*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-VAR100*(HIGH-LOW),0-AMOUNT/2))/10000,COLOR00FF00,NODRAW; 額萬:流入萬+流出萬,COLORFFFF00,NODRAW; DRAWNUMBER(額萬=1 ,L,額萬),COLORFFFF00; VAR111:=AMOUNT/((HIGH-LOW)*2-ABS(CLOSE-OPEN)); 流入量:=IF(CLOSE>OPEN,VAR111*(HIGH-LOW),IF(CLOSE<OPEN,VAR111*((HIGH-OPEN)+(CLOSE-LOW)),AMOUNT/2))/100000000,COLORRED,NODRAW; 流出量:=IF(CLOSE>OPEN,0-VAR111*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-VAR111*(HIGH-LOW),0-AMOUNT/2))/100000000,COLOR00FF00,NODRAW; 凈量:=流入量+流出量,COLORFFFF00,NODRAW; 趨勢線:SMA(FORCAST(CLOSE,13),5,1); 幅度:100*(趨勢線-MRX1)/MRX1,NODRAW; p1;1 100 5 p2;1 100 17 (ygymacd) DIF:EMA(CLOSE,12)-EMA(CLOSE,26); DEA:EMA(DIF,9); MACD:(DIF-DEA)*2,COLORSTICK; TJ:=MACD>0;T:=MACD<0; A:=LLV(MACD,50)=MACD; DRAWICON(A AND FILTERX(A,20), MACD,1); DRAWTEXT(BARSLAST(TJ)=1,MACD,'1'),COLORYELLOW; DRAWTEXT(BARSLAST(TJ)=2,MACD,'2'),COLORYELLOW; DRAWTEXT(BARSLAST(TJ)=3,MACD,'3'),COLORYELLOW; DRAWTEXT(BARSLAST(TJ)=5,MACD,'5'),COLORYELLOW; DRAWTEXT(BARSLAST(TJ)=8,MACD,'8'),COLORYELLOW; DRAWTEXT(BARSLAST(TJ)=13,MACD,'13'),COLORYELLOW; DRAWTEXT(BARSLAST(TJ)=21,MACD,'21'),COLORYELLOW; DRAWTEXT(BARSLAST(TJ)=34,MACD,'34'),COLORYELLOW; DRAWTEXT(BARSLAST(TJ)=55,MACD,'55'),COLORYELLOW; DRAWTEXT(BARSLAST(T)=1,MACD,'1'),COLORGREEN; DRAWTEXT(BARSLAST(T)=2,MACD,'2'),COLORGREEN; DRAWTEXT(BARSLAST(T)=3,MACD,'3'),COLORGREEN; DRAWTEXT(BARSLAST(T)=5,MACD,'5'),COLORGREEN; DRAWTEXT(BARSLAST(T)=8,MACD,'8'),COLORGREEN; DRAWTEXT(BARSLAST(T)=13,MACD,'13'),COLORGREEN; DRAWTEXT(BARSLAST(T)=21,MACD,'21'),COLORGREEN; DRAWTEXT(BARSLAST(T)=34,MACD,'34'),COLORGREEN; DRAWTEXT(BARSLAST(T)=55,MACD,'55'),COLORGREEN; MA4:=MA(CLOSE,4)COLORFF00FF ; MA20:=MA(CLOSE,20)COLOREAADEA ; MA43:=MA(CLOSE,43)COLORFF00FF ; MA43走平:=(MA43-REF(MA43,1)>0) ; MA20走平:=(MA20-REF(MA20,1)>0) ; MA4走平:=(MA4-REF(MA4,1)>0) ; N1:=5;N2:=7;N3:=11; EM1:=EMA(C,N1),COLORWHITE; EM2:=EMA(C,N2),COLORRED; EM3:=EMA(C,N3),COLORGREEN; TJ1:=BETWEEN(EM2,EM1,EM3); 立樁量:=FILTER(TJ1=0,5); 價:REF(H,BARSLAST(立樁量)),NODRAW; 金叉:(CROSS(C,MA43))AND(CROSS(C,價)); A1:=V*100/CAPITAL; {CAPITAL 當前流通股本(手)不算未來函數} 小黑碼:=MA(A1,180); DIFF0:=(EMA(DCLOSE,12)-EMA(DCLOSE,26))*100; DEA0:=EMA(DIFF0,9); MACD0:=2*(DIFF0-DEA0); 黑碼:=(MACD0>REF(MACD0,1)*2.5 AND MACD0>15),COLORFF00FF; 黑:(黑碼)AND(MA43走平)AND(MA20走平); STICKLINE(黑,00,1,1.2,0),COLORMAGENTA; DRAWTEXT(黑,0.5,'←小黑碼'),COLORMAGENTA; VAB0:=531; VAB1:=1510000; VAB2:=VAB0 + VAB1; VAB3:=IF(DATE > VAB2,1,1); LC:=REF(CLOSE,1); SG:=EMA(HHV(HIGH,1),8); X1:=EMA(CLOSE,8); X30:=((X1 < REF(X1,1)) AND (CLOSE < X1)); X31:=IF(((SG < REF(SG,1)) OR X30),1,0); 操作線:=SMA(MAX(CLOSE-LC,0),2,1)/SMA(ABS(CLOSE-LC),2,1)*100; 震倉線:=45; 抄底線:=20; PP:=操作線<震倉線 AND REF(操作線,1)>震倉線 ; PP3:=操作線<抄底線 AND REF(操作線,1)>抄底線*VAB3; 抓牛1:=(((((COUNT((X31 = 1),4) = 3) AND (X31 = 0))AND O<C AND (((C-REF(C,1))/REF(C,1))>0.085))*89) >=89)OR((C-REF(C,1))/REF(C,1)>0.085 AND (REF(PP3,1) OR REF(PP,1))) AND VAB3=1,STICK,COLORRED,LINETHICK9; 抓牛:(((((COUNT((X31 = 1),4) = 3) AND (X31 = 0))AND O<C AND (((C-REF(C,1))/REF(C,1))>0.085))*89) >=89)OR((C-REF(C,1))/REF(C,1)>0.085 AND (REF(PP3,1) OR REF(PP,1))) AND VAB3=1,STICK,COLORLIRED,LINETHICK4; DRAWTEXT(抓牛,抓牛*0.69,' ←狙擊+-★-★-'),COLORLIRED; 金叉2:CROSS("MACD.MACD",0); (自用) MA10:=MA(CLOSE,10); MA20:=MA(CLOSE,20); MA10走平:=(MA10-REF(MA10,1)>0) ; MA20走平:=(MA20-REF(MA20,1)>0) ; VAR11:=(2*CLOSE+HIGH+LOW)/4; VAR2:=EXPMA(EXPMA(EXPMA(VAR11,4),4),4); J:= (VAR2-REF(VAR2,1))/REF(VAR2,1)*100, COLORSTICK; K: MA(J,M)COLOR0080FF; K1: MA(J,N)COLORGREEN ; KK: MA(J,1)COLORYELLOW; D: MA(J,3)COLOR99CC32; D走平:=(D-REF(D,1)>0) ; K走平:=(K-REF(K,1)>0) ; K1走平:=(K1-REF(K1,1)>0) ; KK走平:=(KK-REF(KK,1)>0) ; IF(K>REF(K,1),K,DRAWNULL)COLORRED,LINETHICK1; IF(KK>REF(KK,1),KK,DRAWNULL)COLORRED,LINETHICK1; IF(D>REF(D,1),D,DRAWNULL)COLORRED,LINETHICK1; 金叉:=(CROSS(D,KK))AND(K1走平); 總量:=AMOUNT/100000000,COLORFF00FF,NODRAW; VAR1:=AMOUNT/((HIGH-LOW)*2-ABS(CLOSE-OPEN)); 流入量:=IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),AMOUNT/2))/100000000,COLORRED,NODRAW; 流出量:=IF(CLOSE>OPEN,0-VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-VAR1*(HIGH-LOW),0-AMOUNT/2))/100000000,COLOR00FF00,NODRAW; 凈量:流入量+流出量,COLORFFFF00,NODRAW; Q_1:=C-REF(C,1); Q_2:=100*EMA(EMA(Q_1,6),6)/EMA(EMA(ABS(Q_1),6),6); Q_3:=CROSS(EMA(C,19),EMA(C,7)); Q_4:=CROSS(EMA(C,7),EMA(C,19)); Z1:=L=LLV(L,BARSLAST(Q_3)+1); Z2:=LLV(L,BARSLAST(Q_3)+1); Z3:=H=HHV(H,BARSLAST(Q_4)+1); Z4:=HHV(H,BARSLAST(Q_4)+1); Q_A:=DRAWLINE(Z1,Z2,Z3,Z4,0); Y1:=H=HHV(H,BARSLAST(Q_4)+1); Y2:=HHV(H,BARSLAST(Q_4)+1); Y3:=L=LLV(L,BARSLAST(Q_3)+1); Y4:=LLV(L,BARSLAST(Q_3)+1); Q_B:=DRAWLINE(Y1,Y2,Y3,Y4,0); TJ:=IF(Q_B<REF(Q_B,1) AND Q_B=Q_A,1,0); 堪稱一絕:STICKLINE(REF(TJ,1)=0 AND TJ>=1 AND CCI<0 ,1,0,1,-1),COLORRED; P:=55;S:=8;M1:=3; 財:=(EMA(CLOSE,S)-EMA(CLOSE,P))*10,COLORRED,LINETHICK1; 神:=EMA(財,M1),COLORGREEN,LINETHICK1; BTJ3:=CROSS(財,神) AND 財<-0.3; VAR111:=EMA(EMA(CLOSE,13),13); 控盤:=(VAR111-REF(VAR111,1))/REF(VAR111,1)*1000; BTJ2:=控盤>REF(控盤,1) AND 控盤<-0.2; JJ:=DYNAINFO(11); BTJ11:=(C-JJ)/JJ<-0.03; BTJ811:=FILTER(BTJ11 AND BTJ2 AND BTJ3,13); 莊:= BTJ11 AND BTJ2 AND BTJ3; 有莊:FILTER(莊,55),COLORWHITE; DRAWTEXT(BTJ811,有莊,'有莊'),COLORWHITE; VAR1111:=(C+H+O+L)/4; 賣出:=XMA(VAR1111,20)*(1+80/1000),COLORGREEN,LINETHICK2; 中軌:=XMA(VAR1,30)*(1-2/1000),COLORFFCC66, LINETHICK2; 買入:=XMA(VAR1111,30)*(1-84/1000),COLORMAGENTA,LINETHICK2; 賣出走平:=(賣出-REF(賣出,1)>0) ; 買入走平:=(買入-REF(買入,1)>0) ; 買賣幅度:=100*(賣出-買入)/買入,NODRAW; 幅度1:100*(0-KK)/KK,NODRAW; 幅度:=100*(MA20-買入)/買入,NODRAW; 買入點:(買入走平)AND(賣出走平)AND(L<買入)AND(MA20走平)COLORFFCC66, LINETHICK2; YGY點:(幅度<4)COLORMAGENTA,LINESTICK, LINETHICK2; |
|
|
