ZF:=(H-L)/REF(C,1)*100;
TJ:=ZF/REF(ZF,1)>1.1 AND V/REF(V,1)>1.1 AND C>O;
A1:=BARSLAST(REF(CROSS("MACD.DIF","MACD.DEA"),1));
B1:=REF(C,A1+1)>C AND REF("MACD.DIF",A1+1)<"MACD.DIF" AND CROSS("MACD.DIF","MACD.DEA");
DRAWTEXT(FILTER(B1>0,5),L-0.38,'MACD底背'),COLORGREEN;
A2:=BARSLAST(REF(CROSS("KDJ.K","KDJ.D"),1));
B2:=REF(C,A2+1)>C AND REF("KDJ.K",A2+1)<"KDJ.K" AND CROSS("KDJ.K","KDJ.D");
DRAWTEXT(FILTER(B2>0,5),L-0.39,'KDJ底背'),COLORYELLOW;
A3:=BARSLAST(REF(CROSS("RSI.RSI1","RSI.RSI2"),1));
B3:=REF(C,A3+1)>C AND REF("RSI.RSI1",A3+1)<"RSI.RSI1" AND CROSS("RSI.RSI1","RSI.RSI2");
DRAWTEXT(FILTER(B3>0,5),L,'RSI底背'),COLORCYAN;
C1:=BARSLAST(REF(CROSS("MACD.DEA","MACD.DIF"),1));
D1:=REF(C,C1+1)<C AND REF("MACD.DIF",C1+1)>"MACD.DIF" AND CROSS("MACD.DEA","MACD.DIF");
DRAWTEXT(FILTER(D1>0,5),H+0.08,'MACD顶背'),COLORWHITE;
C2:=BARSLAST(REF(CROSS("KDJ.D","KDJ.K"),1));
D2:=REF(C,C2+1)<C AND REF("KDJ.K",C2+1)>"KDJ.K" AND CROSS("KDJ.D","KDJ.K");
DRAWTEXT(FILTER(D2>0,5),H+0.32,'KDJ顶背'),COLORWHITE;
C3:=BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1));
D3:=REF(C,C3+1)<C AND REF("RSI.RSI1",C3+1)>"RSI.RSI1" AND CROSS("RSI.RSI2","RSI.RSI1");
DRAWTEXT(FILTER(D3>0,5),H+0.1,'RSI顶背'),COLORMAGENTA;
{猎庄拐点㊣}
MA5:EMA(CLOSE,5),COLORYELLOW;
MA10:EMA(CLOSE,10),COLORFFFFFF;
MA30:EMA(CLOSE,30),COLORFF0000;
MA60:EMA(CLOSE,60),COLORRED;
VAR37:=EMA(EMA(EMA(CLOSE,2),2),2);
VAR47:=(MA(VAR37,47))*(0.99);
分水岭:(MA(VAR37,13))*(0.99),LINETHICK2,COLORFF00FF;
DRAWTEXT((MA(CLOSE,13) > MA(CLOSE,18)) AND CROSS(CLOSE,MA(CLOSE,4)) AND (MA(CLOSE,4) < MA(CLOSE,13)),(LOW)*(0.97),'赢'),COLOR00FF00;
B36:=MA(CLOSE,3) - MA(CLOSE,6);
B612:=MA(CLOSE,6) - MA(CLOSE,12);
J:=((B36)/(CLOSE))*(10);
J1:=((B612)/(CLOSE))*(10);
DRAWTEXT((J < (-0.2)) AND (J1 < (-0.2)) AND CROSS(J,J1),(LOW)*(0.95),'猎庄'),COLORRED;
KS:=((CLOSE - MA(CLOSE,13))/(MA(CLOSE,13)))*((-200));
RKS:=REF(KS,1);
FT:=((RKS)/(KS) >= 1.23) AND (RKS >= 8) AND ((CLOSE)/(REF(CLOSE,1)) >= 1.03);
反弹:STICKLINE(FT,HIGH,LOW,0,1),LINETHICK2,COLOR00FF00;
STICKLINE(FT,OPEN,CLOSE,8,0),COLORYELLOW;
VAR10:=MA(CLOSE,80) - (MA(CLOSE,10))/(3);
VAR11:=REF(CLOSE,1);
VAR12:=((SMA(MAX(CLOSE - VAR11,0),18,1))/(SMA(ABS(CLOSE - VAR11),18,1)))*(100);
DRAWICON(CROSS(79,VAR12),(HIGH)*(1.035),2),COLOR008000;
DRAWTEXT(CROSS(79,VAR12),(HIGH)*(1.04),' 抛↓'),COLORFFFFFF;
VAR1:=LLV(LOW,22);
VAR2:=HHV(HIGH,22);
AK1:=EMA(((CLOSE - VAR1)/(VAR2 - VAR1))*(100),5);
AK:=EMA(((CLOSE - VAR1)/(VAR2 - VAR1))*(50),13);
DD:=EMA((0.667)*(REF(AK1,1)) + (0.333)*(AK1),2);
VAR3:=LLV(LOW,55);
VAR4:=HHV(HIGH,34);
VAR5:=EMA(((CLOSE - VAR3)/(VAR4 - VAR3))*(100),3);
VAR6:=(AK + VAR5)/(2);
VAR7:=EMA((0.667)*(REF(VAR5,1)) + (0.333)*(AK1),2);
VAR8:=EMA(VAR6,5);
BB:=EMA((0.667)*(REF(VAR8,1)) + (0.333)*(VAR8),2);
AB:=CROSS(AK1,AK);
BB1:=CROSS(AK1,BB) AND (BB < 30);
CD:=(BB1)*(0.6);
DRAWTEXT((CD = 0.6),(LOW)*(0.98),'□'),LINETHICK1,COLORFFFFFF;
DRAWTEXT((AB = 1),(LOW)*(0.98),'■'),LINETHICK1,COLOR66FFCC;
DRAWTEXT((AB = 1),(LOW)*(0.94),'拐点 '),COLOR33CC99;
VAR111:=(((CLOSE - MA(CLOSE,6))/(MA(CLOSE,6)))*(200) + ((CLOSE - MA(CLOSE,24))/(MA(CLOSE,24)))*(200) + ((CLOSE - MA(CLOSE,32))/(MA(CLOSE,32)))*(200))/(3);
DRAWICON((VAR111 > 20) AND FILTER((VAR111 < REF(VAR111,1)),5),(HIGH)*(1.02),2),COLORFF00FF;
{优化实站助手}
AR2:=REF(LOW,1);
AR3:=((SMA(ABS((LOW - AR2)),3,1) / SMA(MAX((LOW - AR2),0),3,1)) * 100);
AR4:=EMA(IF((CLOSE * 1.2),(AR3 * 10),(AR3 / 10)),3);
AR5:=LLV(LOW,38);
AR6:=HHV(AR4,38);
AR7:=IF(LLV(LOW,90),1,0);
AR8:=((EMA(IF((LOW <= AR5),((AR4 + (AR6 * 2)) / 2),0),3) / 1618) * AR7);
STICKLINE(AR8,0,AR8,4,1),,COLORFFFFA6;
VAR3:=((((2 * CLOSE) + HIGH) + LOW) / 4);
VAR4:=LLV(LOW,34);
VAR5:=HHV(HIGH,34);
散户:EMA((((VAR3 - VAR4) / (VAR5 - VAR4)) * 100),13),,COLORFFCAFF;
新庄:EMA(((0.667 * REF(散户,5)) + (0.333 * 散户)),2),,COLORFC6FFF;
高抛低吸分界线:50;
DRAWTEXT((CROSS(散户,新庄) AND (散户 < 22)),30,'买'),,COLORFF00FF;
DRAWICON((CROSS(散户,30) AND (新庄 < 散户)),35,4),;
STICKLINE((CROSS(散户,65) AND (新庄 < 散户)),70,50,8,1),;
DRAWICON((CROSS(散户,75) AND (新庄 < 散户)),80,10),;
DRAWTEXT((CROSS(新庄,散户) AND (新庄 > 75)),75,'卖'),,COLORFFFF00;
逢低吸呐:IF((CROSS(散户,新庄) AND (散户 < 40)),20,0),,COLOR5798FF;
逢高减磅:IF((CROSS(新庄,散户) AND (新庄 > 75)),75,90),,COLORFCD100;
|