/*MAIRU:=XMA((C+H+O+L)/4,32)*(1-100/1000),COLORMAGENTA,POINTDOT;
MAICHU:=XMA((C+H+O+L)/4,20)*(1+80/1000),COLORGREEN,POINTDOT; 买入:IF(CURRBARSCOUNT<=34,MAIRU,DRAWNULL),COLORMAGENTA,POINTDOT; 卖出:IF(CURRBARSCOUNT<=34,MAICHU,DRAWNULL),COLORGREEN,POINTDOT; {粉买黄卖-买买提示}
{VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VARD:=CLOSEVARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);};{ VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1;
VAR1A:=REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,1) AND VARD;
STICKLINE(VAR19 AND LOW<=MIN(REF(CLOSE,1),REF(CLOSE,2)) AND HIGH>=MAX(REF(CLOSE,1),REF(CLOSE,2)),
REF(CLOSE,1),REF(CLOSE,2),2,0),COLORMAGENTA;}{粉买}
{STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),2,0),COLORYELLOW;}{黄卖} PRICE:=IF(CAPITAL>0,AMOUNT/(V*100),CLOSE); 多空
线:(20*PRICE+19*REF(PRICE,1)+18*REF(PRICE,2)+17*REF(PRICE,3)+16*REF(PRICE,4) +15*REF(PRICE,5)+14*REF(PRICE,6)+13*REF(PRICE,7)+12*REF(PRICE,8)+11*REF(PRICE,9)
+10*REF(PRICE,10)+9*REF(PRICE,11)+8*REF(PRICE,12)+7*REF(PRICE,13)+6*REF(PRICE,14)
+5*REF(PRICE,15)+4*REF(PRICE,16)+3*REF(PRICE,17)+2*REF(PRICE,18) +REF(PRICE,20))/210,COLORYELLOW,LINETHICK2;
DRAWICON(CROSS(CLOSE,多空线) AND COUNT(CROSS(CLOSE,多空线),5)=1,LLV(LOW,5),5);
生命线:EMA(C,55),COLORGREEN,LINETHICK2;
买卖点1:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20; 买卖点2:=2*ABS(买卖点1); 买卖点
3:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1); 情报:= 100-买卖点3;
红军:= IF(买卖点1>0,买卖点1,0); 绿军:= IF(买卖点1<0,买卖点2,0);
工作:IF((CLOSE>多空线 AND 多空线>REF(多空线,1)*0.98)
OR ((情报>=REF(情报,1)) AND ((红军>=REF(红军,1)) OR 绿军奔跑:IF(MA5>REF(MA5,1),MA5,DRAWNULL),COLORMAGENTA,LINETHICK2; 狗熊:IF(生命线{起涨点}EMA14:=EMA(PRICE,14);
起涨点:=CROSS(EMA14-REF(EMA14,1),0);
STICKLINE(起涨点,CLOSE,OPEN,3,0 ),COLOR0000CC; STICKLINE(起涨点,CLOSE,OPEN,2,0 ),COLOR0033FF; STICKLINE(起涨点,LOW,HIGH,0,0 ),COLOR0033FF; SHORT:=7;LONG:=19; T:=PERIOD; D:=IF(T=0,30,{1F} IF(T=1,25,{5F} IF(T=8,25,{多分钟} IF(T=2,20,{15F} IF(T=3,20,{30F} IF(T=4,20,{60F} IF(T=5,10,{日} IF(T=6,10,{周} IF(T=7,10,{月} IF(T=9,10,{多日}
IF(T=10,10{季},10{年})))))))))));
RMA:=EMA(CLOSE,SHORT),COLORLIGRAY; NMA:=EMA(CLOSE,LONG),COLORMAGENTA;
RISK:=IF(NMA>RMA,NMA,DRAWNULL),COLORGREEN; UP:DRAWLINE(L=LLV(L,BARSLAST(CROSS(NMA,RMA))+1)
AND L=LLV(L,D) AND RMA<=NMA,L,H=HHV(H,BARSLAST(CROSS(RMA,NMA))+1) AND H=HHV(H,D) AND RMA>=NMA,H,0),COLOR0000BB,LINETHICK2;
DOWN:DRAWLINE(H=HHV(H,BARSLAST(CROSS(RMA,NMA))+1) AND H=HHV(H,D) AND RMA>=NMA,H,L=LLV(L,BARSLAST(CROSS(NMA,RMA))+1) AND L=LLV(L,D) AND RMA<=NMA,L,0),COLOR00BB00,LINETHICK2; {箱体}
箱顶:REFDATE(REF(HHV(H,96),5),DATE),LINETHICK1,COLORLIBLUE; 箱低:REFDATE(REF(LLV(L,96),5),DATE),LINETHICK2,COLOR00FF00; 箱腰:((箱顶)+(箱低))/2,LINETHICK1,COLORLIGREEN;
{主力控盘度: 无庄控盘(白色)-动力线上升(深灰色)-开始控盘(红色)-高度控盘(粉色)-主力出货(绿色)}
控盘V1:=EMA(EMA(CLOSE,9),9); 控盘V2:=100*WINNER(CLOSE*0.95);
控盘:=(控盘V1-REF(控盘V1,1))/REF(控盘V1,1)*1000; {专吸庄血修改说明：绿柱前有两条以上白柱的买入更可靠。}
N:=9;
短线:=4*SMA((CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,5,1)-
3*SMA(SMA((CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,5,1),3,1),COLORGREEN,LINETHICK2;
{通达信超级组合抄底逃顶王公式} 动力
线:=EMA((CLOSE-LLV(LOW,10))/(HHV(HIGH,25)-LLV(LOW,10))*4,4),COLORA8A8A8,LINETHICK2;
IF((短线>=REF(短线,1)) AND (动力线>REF(动力线,1)),箱低,DRAWNULL),LINETHICK2,COLORGRAY;
IF(((控盘>REF(控盘,1) AND 控盘>0) OR((情报>=REF(情报,1)) AND ((红军>=REF(红军,1)) OR 绿军50 AND COST(85)0)),箱低,DRAWNULL),LINETHICK2,COLORRED;IF(控盘0,箱低,DRAWNULL),LINETHICK2,COLORGREEN; */A1A:=EMA(CLOSE, 9);
A1B:=((A1A - EMA(CLOSE, 5)) < 0); A1C:=((A1A - EMA(CLOSE, 5)) > 0); A1D:=BARSLAST(A1B); A1E:=BARSLAST(A1C);
A1F:=IF((A1E > 0),(CLOSE - REF(CLOSE, 1)) / REF(CLOSE, 1) * 100,0); A20:=SUM(A1F,0);
A21:=IF((A1D > 0),(0 - 2),0);
A22:=IF((A1E > 0),SUM((CLOSE - REF(CLOSE, 1)) / REF(CLOSE, 1) * 100,A1E),0); A23:=A22 / A1E;
A25:=EMA(EMA(EMA(CLOSE, 3), 3), 3);
上升通道:((A25 - REF(A25, 1)) + A25),COLORRED; 反转通道:MA(上升通道, 15),COLORGREEN;
IF(上升通道>REF(上升通道,1),上升通道,NULL),COLORRED,LINETHICK4,POINTDOT; IF(反转通道>REF(反转通道,1),反转通道,NULL),COLORGREEN,LINETHICK4,POINTDOT; STICKLINE((上升通道 > 反转通道),反转通道,上升通道, 1, 0),COLORRED; STICKLINE((反转通道 > 上升通道),上升通道,反转通道, 1, 0),COLORGREEN;
DRAWTEXT(CROSS(反转通道,上升通道),上升通道 * 1.08,'下降趋势'),COLOR00FF00; DRAWTEXT(CROSS(上升通道,反转通道),反转通道 * 0.97,'上升趋势'),COLOR0000FF; DRAWICON(((REF(A21, 1) = (0 - 2)) AND (A21 = 0)),LOW, 5); DRAWICON(((REF(A1E, 1) > 0) AND (A1E = 0)),HIGH, 6);
