|
DIFF:=EMA(CLOSE,9)-EMA(CLOSE,13);
DEA:=EMA(DIFF,5);
STICKLINE(DIFF>DEA,1.05,1.15,2,1),COLORRED;
STICKLINE(DIFF<DEA,1.05,1.15,2,1),COLORGREEN;
{DRAWTEXT(ISLASTBAR=1,1,'.MACD'),COLORFFFFFF;}
A1:=DIFF>DEA;
RSV1:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV1,3,1);
D:=SMA(K,3,1);
STICKLINE(K>D,1.15,1.25,2,1),COLORRED;
STICKLINE(K<D,1.15,1.25,2,1),COLORGREEN;
{DRAWTEXT(ISLASTBAR=1,1.1,'.KDJ'),COLORFFFFFF;}
A2:=K>D;
LC:=REF(CLOSE,1);
RSI1:=(SMA(MAX(CLOSE-LC,0),5,1))/(SMA(ABS(CLOSE-LC),5,1))*100;
RSI2:=(SMA(MAX(CLOSE-LC,0),13,1))/(SMA(ABS(CLOSE-LC),13,1))*100;
STICKLINE(RSI1>RSI2,1.25,1.35,2,1),COLORRED;
STICKLINE(RSI1<RSI2,1.25,1.35,2,1),COLORGREEN;
{DRAWTEXT(ISLASTBAR=1,1.2,'.RSI'),COLORFFFFFF;}
A3:=RSI1>RSI2;
RSV:=-(HHV(HIGH,13)-CLOSE)/(HHV(HIGH,13)-LLV(LOW,13))*100;
LWR1:=SMA(RSV,3,1);
LWR2:=SMA(LWR1,3,1);
STICKLINE(LWR1>LWR2,1.35,1.45,2,1),COLORRED;
STICKLINE(LWR1<LWR2,1.35,1.45,2,1),COLORGREEN;
{DRAWTEXT(ISLASTBAR=1,1.3,'.LW&R'),COLORFFFFFF;}
A4:=LWR1>LWR2;
BBI:=(MA(CLOSE,3)+MA(CLOSE,5)+MA(CLOSE,9)+MA(CLOSE,13))/4;
STICKLINE(CLOSE>BBI,1.45,1.55,2,1),COLORRED;
STICKLINE(CLOSE<BBI,1.45,1.55,2,1),COLORGREEN;
{DRAWTEXT(ISLASTBAR=1,1.4,'.BBI'),COLORFFFFFF;}
A5:=CLOSE>BBI;
MTM:=CLOSE-REF(CLOSE,1);
MMS:=100*EMA(EMA(MTM,5),3)/EMA(EMA(ABS(MTM),5),3);
MMM:=100*EMA(EMA(MTM,13),9)/EMA(EMA(ABS(MTM),13),9);
STICKLINE(MMS>MMM,1.55,1.65,2,1),COLORRED;
STICKLINE(MMS<MMM,1.55,1.65,2,1),COLORGREEN;
{DRAWTEXT(ISLASTBAR=1,1.5,'.ZLMM'),COLORFFFFFF;}
A6:=MMS>MMM;
BIAS:=(C-MA(C,5))/MA(C,5);
DIF:=(BIAS-REF(BIAS,16));
DBCD:=SMA(DIF,76,1);
MM:=MA(DBCD,5);
STICKLINE(DBCD>=MM,1.675,1.775,2,0),COLORRED;
STICKLINE(DBCD<MM,1.675,1.775,2,0),COLORGREEN;
{DRAWTEXT(ISLASTBAR=1,1.6,'.DBCD'),COLORFFFFFF;}
A7:=DBCD>MM;
持股:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE
-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1),LINETHICK0,COLORRED;
支撑:=LLV(持股,3),LINETHICK0,COLOR00FFFF;
下跌:=MA(持股,12),COLOR6B8E23,LINETHICK0;
转向:=CROSS(持股,下跌){ AND 下跌<30};
MA1:=MA(持股,5);
向下:=CROSS(MA1,持股) AND MA1>80;
STICKLINE(持股>下跌,1.795,1.895,2,0),COLORRED;
STICKLINE(持股<下跌,1.795,1.895,2,0),COLORGREEN;
{DRAWTEXT(ISLASTBAR=1,1.7,'.CGZ'),COLORFFFFFF;}
A8:=持股>下跌;
MT:=C-REF(C,1);
ZLGJ:=100*EMA(EMA(MT,9),9)/EMA(EMA(ABS(MT),9),9);
MAZL:=MA(ZLGJ,5);
STICKLINE(ZLGJ>MAZL,1.915,2.015,2,0),COLORRED;
STICKLINE(ZLGJ<MAZL,1.915,2.015,2,0),COLORGREEN;
A9:=ZLGJ>MAZL;
{DRAWTEXT(ISLASTBAR=1,1.8,'.ZLGJ'),COLORFFFFFF;}
PJJ:=DMA((HIGH+LOW+CLOSE*2)/4,0.9);
JJ:=REF(EMA(PJJ,3),1);
QJJ:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
XVL:=IF(CLOSE>OPEN,QJJ*(HIGH-LOW),IF(CLOSE<OPEN,QJJ*(HIGH-OPEN+CLOSE-LOW),VOL/2))+IF
(CLOSE>OPEN,0-QJJ*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE<OPEN,0-QJJ*(HIGH-LOW),0-VOL/2));
HSL:=(XVL/20)/1.15;
攻击流量:=((HSL*0.55+(REF(HSL,1)*0.33))+(REF(HSL,2)*0.22));
GJJ:=EMA(攻击流量,8);
LLJX:=EMA(攻击流量,3);
资金流量:=LLJX,LINETHICK0,COLOR0000FF;
{DRAWICON(资金流量>0,2.00,1);
DRAWICON(资金流量<0,2.00,2);}
ABC1:=MA(CLOSE,10);
ABC2:=MA(CLOSE,55);
ABC3:=(REF(CLOSE,3)-CLOSE)/REF(CLOSE,3)*100>5;
ABC4:=FILTER(ABC3,10);
ABC5:=BARSLAST(ABC4);
ABC6:=REF(HIGH,ABC5+2);
ABC7:=REF(HIGH,ABC5+1);
ABC8:=REF(HIGH,ABC5);
ABC9:=MAX(ABC6,ABC7);
ABC10:=MAX(ABC9,ABC8);
ABC11:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>5;
ABC12:=ABC5<150;
ABC13:=(OPEN-ABC10)/ABC10*100<30;
ABC14:=(CLOSE-LLV(LOW,ABC5))/LLV(LOW,ABC5)*100<50;
ABC15:=(CLOSE-REF(OPEN,5))/REF(OPEN,5)*100<30;
ABC16:=VOL/MA(VOL,5)<3.5;
ABC17:=(CLOSE-REF(CLOSE,89))/REF(CLOSE,89)*100<80;
ABC18:=ABC11 AND ABC12 AND ABC13 AND ABC14 AND ABC15 AND ABC16 AND ABC17;
ABC19:=FILTER(ABC18,15);
ABC20:=(CLOSE-ABC2)/ABC2<0.1;
ABC21:=(CLOSE-ABC1)/ABC1<0.3;
ABC22:=(ABC20=1 AND ABC21=1)*0.2;
ABC23:=(ABC22=0 AND REF(ABC22,1)=0.2 AND REF(COUNT(ABC22=0.2,10)=10,1)=1)*(-0.1);
ABC24:=ABC23=(-0.1);
ABC25:=ABC19 OR ABC24;
ABC27:=VOL/REF(VOL,1)>1.2 AND CLOSE>OPEN OR (LOW>REF(HIGH,1) AND OPEN>CLOSE AND VOL/REF(VOL,1)>1.2);
ABC28:=IF(CODELIKE(3) OR (CODELIKE(4) AND DATE>=1200824),CLOSE>=ZTPRICE(REF(CLOSE,1),0.2) AND CLOSE=HIGH,CLOSE>=ZTPRICE(REF(CLOSE,1),0.1) AND CLOSE=HIGH);
STICKLINE((ZLGJ>MAZL)AND(持股>下跌)AND(DBCD>MM)AND(DIFF>DEA)AND(K>D)AND(RSI1>RSI2)AND(LWR1>LWR2)AND(CLOSE>BBI)AND(MMS>MMM),2.165,2.265,3,0),COLORMAGENTA;
STICKLINE(((DIFF>DEA)AND(K>D)AND(RSI1>RSI2)AND(LWR1>LWR2)AND(CLOSE>BBI)AND(MMS>MMM))OR((ZLGJ>MAZL)AND(持股>下跌)AND(DBCD>MM)),2.04,2.14,3,0),COLORYELLOW;
STICKLINE(((DIFF<DEA)AND(K<D)AND(RSI1<RSI2)AND(LWR1<LWR2)AND(CLOSE<BBI)AND(MMS<MMM))OR((ZLGJ<MAZL)AND(持股<下跌)AND(DBCD<MM)),2.04,2.14,3,0),COLORLIBLUE;
共振:=ABC25 AND ABC27 AND ABC28 AND REF(NOT(ABC28),1) AND(ZLGJ>MAZL)AND(持股>下跌)AND(DBCD>MM)AND(DIFF>DEA)AND(K>D)AND(RSI1>RSI2)AND(LWR1>LWR2)AND(CLOSE>BBI)AND(MMS>MMM);
DRAWICON(共振,2.415,9);
|
