修改(主升行情)指标出现笑脸是选股公式

编写要求：

解答：

?网友求助：

季线:MA(CLOSE,36),colorff00ff,LINETHICK2;
生命线:ema(c,24),color00ff00,linethick2;{24日指数平滑均价,24日生命线是真正大资金运作的主要参考和支撑线}
A:=ref(生命线,24);
mtm:=close-ref(close,1);
dx:=100*ema(ema(mtm,6),6)/ema(ema(abs(mtm),6),6);
dy:=hhv(dx,2)=hhv(dx,7) and count(dx>50,2) and cross(ma(dx,2),dx);
lc:=ref(close,1);
rsi:=sma(max(close-lc,0),6,1)/sma(abs(close-lc),6,1)*100;
多头线:EMA(C,1),COLORYELLOW;
空头线:EMA(C,5),COLORWHITE,;
均衡线:EMA(空头线,5), COLORRED;
varF1:=COUNT(CROSS(多头线,均衡线),2)=1;
varF2:=COUNT(CROSS(空头线,均衡线),2)=1;
ZAI:=FILTER(varF1 AND varF2,2);
DRAWTEXT(ZAI,均衡线*0.98,' 主升行情'),color00ff00;
VAR1:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21))));
VAR2:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21))));
VAR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));
DRAWICON(CROSS(VAR2,MA(VAR3,6)),(LOW * 0.998),8);DRAWICON(CROSS(MA(VAR3,6),VAR1),(HIGH * 1.013),9);
DRAWTEXT(CROSS(VAR2,MA(VAR3,6)),(LOW * 0.984),'B '),color4440FF;DRAWTEXT(CROSS(MA(VAR3,6),VAR1),(HIGH * 1.035),'S '),colorFFFF34;
dp:=if(c=INDEXC,0,1);gj:=AMOUNT/v/100;
上线:=sma(c,6.5,1);
下线:=sma(c,13.5,1);
上线1:=sma(c,3,1);
下线1:=sma(c,8,1);
{STICKLINE(上线>下线 , 上线,下线 ,2.5, 0),colorred,linethick2;
stickline(下线>上线,上线,下线,2.5,0),coloryellow,linethick2; }
DRAWTEXT( cross(上线,下线),low *0.98,'全仓▲买入' ),color00ff00;
drawtext(cross(下线1,上线1),h*1.02,'清▼仓'),coloryellow;
减仓:=filter(cross(80,rsi) or dy,5),colorblue;
drawtext(减仓 and 生命线>A,high*1.03,'○'),colorblue;
D:=MA(CLOSE,80)-MA(CLOSE,10)/3;
DRAWTEXT(if(CLOSEMA(VOL,5)/240 AND CLOSE>REF(CLOSE,1)*1.08 AND CLOSE VA1:=EMA(c,8);
VA2:=EMA(c,28);
DRAWTEXT(CROSS(VA2,VA1),VA1*1.10,'全仓●卖出'),COLORYELLOW;
x1:=(3*C+H+L+O)/6;
x2:=EMA(x1,10);
x3:=REF(x2,1);
XL4:=SMA((CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100,3,1);
DRAWTEXT(IF(CROSS(3*XL4-2*SMA(XL4,3,1),8),87,0) and x2>x3,l-0.1,'反●弹'),COLORGREEN;
DRAWTEXT(IF(CROSS(2*(EMA((CLOSE*2+HIGH+LOW)/4,12)-EMA((CLOSE*2+HIGH+LOW)/4,26)-EMA(EMA((CLOSE*2+HIGH+LOW)/
4,12)-EMA((CLOSE*2+HIGH+LOW)/4,26),2))*5.8,0.47),LOW,0) and x2>x3,l-0.4,'加●仓'),ColorFF5ED8;
V1:=EMA(CLOSE,5),COLORYELLOW;
V2:=EMA(EMA(CLOSE,29)*1.01,10),COLORFFCC66;
DRAWICON(CROSS(V1,V2),V2,1);
V3:=EMA(CLOSE,10),COLORFF00FF;
V4:=EMA(EMA(CLOSE,60)*0.99,10),COLOR0099FF;
DRAWICON(CROSS(V3,V4),V4,1);
Var34:=(INDEXC-REF(INDEXC, 1))/REF(INDEXC, 1);
Var35:=(CLOSE-REF(CLOSE, 1))/REF(CLOSE, 1);
Var36:=IF(Var34>0.010, 0.900, 1) AND IF(Var34>(-0.025), 1, 1.200);
Var37:=Var36*(Var35-Var34)*100;
Var38:=SUM(Var37, 10);
Var310:=Var38>20;
VAR326:=IF(CLOSE>REF(CLOSE, 1),88,0);
VAR327:=IF(CLOSE/REF(CLOSE, 1)>1.050 AND HIGH/CLOSE<1.010 AND VAR326>0, 91, 0);
STICKLINE(VAR327>90,L*0.99,L*0.95,4,0),COLORYELLOW;
DRAWTEXT(VAR327>90,LOW*0.95,'追涨'),COLORYELLOW;

STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,(9)*(0.5),0),CoLorFF5B00;
STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,(8)*(0.5),0),CoLorFF6C00;
STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,(7)*(0.5),0),CoLorFF7B00;
STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,(6)*(0.5),0),CoLorFF9C00;
STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,(5)*(0.5),0),CoLorFFBE00;
STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,(3.5)*(0.5),0),CoLorFFCC00;
STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,(1.5)*(0.5),0),CoLorFFFF00;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,(9)*(0.5),0),CoLor070084;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,(8)*(0.5),0),CoLor0000A3;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,(7)*(0.5),0),CoLor0000B7;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,(6)*(0.5),0),CoLor0000CD;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,(5)*(0.5),0),CoLor0000E9;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,(3)*(0.5),0),CoLor0754E9;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,(1.5)*(0.5),0),CoLor076EF3;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,(1)*(0.5),0),CoLor077BF3;
STICKLINE((CLOSE>OPEN),OPEN,LOW,(1)*(0.5),0),CoLor0726CA;
STICKLINE((CLOSE>OPEN),CLOSE,HIGH,(1)*(0.5),0),CoLor0726CA;
STICKLINE((OPEN>CLOSE),CLOSE,LOW,(1)*(0.5),0),CoLorDE9100;
STICKLINE((OPEN>CLOSE),OPEN,HIGH,(1)*(0.5),0),CoLorDE9100;
?