MAA:=MA(CLOSE,20);MTM:=C-REF(C,1);DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);买:=LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2));加:=MAA>=REF(MAA,3) AND CROSS(CLOSE,MAA);SC:=加 AND 买;DRAWICON(SC,L,24);{牛熊线}N:=BARSSINCEN(L=LLV(L,60),20);压力线1:=HHV(H,60);撑抓线1:=CONST(LLV(C,120));A18:IF(压力线1=REF(压力线1,1),(压力线1-撑抓线1)/8+撑抓线1,DRAWNULL),COLORBLUE;A26:IF(压力线1=REF(压力线1,1),(压力线1-撑抓线1)*2/8+撑抓线1,DRAWNULL),COLORLIRED;A45:IF(压力线1=REF(压力线1,1),(压力线1-撑抓线1)*3/8+撑抓线1,DRAWNULL),COLORRED;A63:IF(压力线1=REF(压力线1,1),(压力线1-撑抓线1)*4/8+撑抓线1,DRAWNULL),COLORBROWN;A71:IF(压力线1=REF(压力线1,1),(压力线1-撑抓线1)*5/8+撑抓线1,DRAWNULL),COLORBROWN;A75:IF(压力线1=REF(压力线1,1),(压力线1-撑抓线1)*6/8+撑抓线1,DRAWNULL),COLORBROWN;A82:IF(压力线1=REF(压力线1,1),(压力线1-撑抓线1)*7/8+撑抓线1,DRAWNULL),COLORBROWN;A90:压力线1,COLORBROWN;A0:撑抓线1,COLORYELLOW;DRAWTEXT(CURRBARSCOUNT=10,A45*0.99,'A45红线为牛熊关隘,上穿看多，下穿看空'),COLORMAGENTA;反弹线:CONST(压力线1/3);M5:=MA(C,5),COLORWHITE;IF(CODELIKE('000622'),5.50,DRAWNULL);STICKLINE(A90>REF(A90,1),A90,A0,0,-1),COLORRED;DRAWKLINE(H,O,L,C);TO1N:=REF(O,SUMBARS(IF(C>=O,1,0),1));TO2N:=REF(O,SUMBARS(IF(C>=O,1,0),2));AAN:=C>=TO1N OR C>=TO2N OR C>REF(C,1);ATJ1N:=BACKSET(REF(C>O,2) AND REF(C<O,1) AND REF(C>REF(O,1),1)  AND C<REF(O,2),3);ATJ2N:=BACKSET(REF(C>O,1) AND C<REF(O,1),2);A1N:=NOT(ATJ1N) AND NOT(ATJ2N) AND AAN AND REF(NOT(AAN),1);NAN:=BARSLAST(A1N);A2N:=REF(COUNT(AAN,NAN+1)=NAN+1,1) AND AAN AND H=HHV(H,NAN+1);ABN:=DRAWLINE(A1N,LLV(L,3),A2N,H,0),COLORYELLOW;A2TJN:=BACKSET(ABN>REF(ABN,1) AND REF(NOT(ABN>REF(ABN,1)),1),2);A22N:=A2N AND A2TJN=1;DIN:=REF(ABN,NAN),COLORRED;NBN:=BARSLAST(A22N);DINGN:=IF(NOT(REF(ABN,NBN)<ABN),REF(ABN,NBN),REF(ABN,NBN)),LINETHICK4; {顶};TC1N:=REF(O,SUMBARS(IF(C<O,1,0),1));TC2N:=REF(O,SUMBARS(IF(C<O,1,0),2));BBN:=C<TC1N OR C<TC2N OR C<REF(C,1);BTJ1N:=BACKSET(REF(C<O,2) AND REF(C>O,1) AND REF(C<REF(O,1),1)  AND C>REF(O,2),3);BTJ2N:=BACKSET(REF(C<O,1) AND C>REF(O,1),2);B1N:=NOT(BTJ1N) AND NOT(BTJ2N) AND BBN AND REF(NOT(BBN),1);NBBN:=BARSLAST(B1N);B2N:=REF(COUNT(BBN,NBBN+1)=NBBN+1,1) AND BBN AND L=LLV(L,NBBN+1);BBBN:=DRAWLINE(B1N,HHV(H,3),B2N,L,0);W2N:=H-BBBN=HHV(H-BBBN,BARSLAST(B1N)) AND NOT(BBBN=DRAWNULL);DRAWLINE(B1N,H,W2N,H,1) COLORMAGENTA;STICKLINE(C>=O,C,O,3.4,0),COLOR000045;STICKLINE(C>=O,C,O,2.2,0),COLOR000085;STICKLINE(C>=O,C,O,1,0),COLOR0000C5;STICKLINE(C>=O,H,L,0,0),COLOR0000F5;STICKLINE(C<O,C,O,3.4,0),COLOR353500;STICKLINE(C<O,C,O,2.2,0),COLOR555500;STICKLINE(C<O,C,O,1,0),COLOR757500;STICKLINE(C<O,H,L,0,0),COLOR959500;买X:EMA(CLOSE,5),COLOR888800,LINETHICK2;IF(C>买X,买X,DRAWNULL),COLOR00AAFF,LINETHICK6;不雅望:EMA(CLOSE,10),COLOR555555,LINETHICK2;IF(C>不雅望,不雅望,DRAWNULL),COLORFFFFFF,LINETHICK6;A:=(REF(买X,1));卖:EMA(SLOPE(CLOSE,21)*20+CLOSE,42),LINETHICK2;B:=CROSS(买X,卖);S:=CROSS(卖,买X);DRAWTEXT(B,LOW-0.1,'←买X '),COLORRED,LINETHICK2;RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;K:=SMA(RSV,3,1);D:=SMA(K,3,1);J:=3*K-2*D;G:=95;DRAWTEXT(CROSS(J,D),L*0.999,'←加仓'),COLOR00FFFF,LINETHICK2;VAR29:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;VAR2A:=SMA(VAR29,5,1);VAR2B:=SMA(VAR2A,10,1);VAR2C:=CROSS(VAR2B,VAR2A);VAR2D:=VAR2B>80 OR VAR2A>80;VAR2E:=VAR2C AND VAR2D;VAR33:=HIGH;VAR34:=LOW;逃顶:=STICKLINE(VAR2E,VAR33,VAR34,4,0);DRAWTEXT(CROSS(75,SMA(MAX(CLOSE-REF(CLOSE,1),0),8,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),8,1)*100),HIGH+0.25,'←卖'),COLORGREEN;DRAWTEXT(CROSS((REF(HIGH,1)+REF(LOW,1))/2,MA(CLOSE,20)+2*STD(CLOSE,20)),HIGH*1.03,'-落袋为安'),COLORYELLOW;  

图片

图片

图片