短线突击队导航简化

input: n(10,1,100),p(3,0.1,20),p1(3,0,300),p2(3,0,300),p3(3,0,300),p4(3,0,300);
explain(1=1,'【短线突击队教练清风斜阳搜集编制】'),colorff;
explain(1=1,'【短线赢家：看清趋势，快速套利!】'),colorffff;
explain(1=1,'【使用说明】'),colorff;
explain(1=1,'1.短线参与者：\n首先看清趋势，\n当导航线变红色时，\n快速套利的机会来临，应当考虑!'),colorff00;
explain(1=1,'2.短线参与者：\n当整个趋势向上，\n出现短线提示时，\n立即介入，\n快进快出，快速套利!'),colorff;
explain(1=1,'3.短线参与者：\n当出现加仓提示时，\n先看清趋势，\n如果大盘环境好，\n适当加仓快速套利!'),colorffff00;
explain(1=1,'4.短线参与者：\n看清趋势至关重要，\n如果大盘或者个股趋势朝下，\n离场休息!休息休息！'),colorffffff;
导航线:ma(c,3);
explainex(1=1,'【短线突击队导航台】=',导航线,2,0),colorff00ff;
ma5:=ma(c,5);
ma10:=ma(c,10);
dd:=cross(ma5,ma10);
ss:=barslast(dd);
收盘1:ref(c,ss),colorffffff;
explainex(1=1,'【第一阻力位，5日上穿10日】=',收盘1,2,0),colorffffff;
ma10:=ma(c,10);
ma20:=ma(c,20);
ww:=cross(ma10,ma20);
tt:=barslast(ww);
收盘2:ref(c,tt),Linethick2,colorffff;
explainex(1=1,'【第二阻力位，10日上穿20日】=',收盘2,2,0),colorffff;
ma20:=ma(c,20);
ma30:=ma(c,30);
aa:=cross(ma20,ma30);
pp:=barslast(aa);
收盘3:ref(c,pp),linethick0,colorff00;
explainex(1=1,'【第三阻力位，20日上穿30日】=',收盘3,2,0),colorff00;
ma60:=ma(c,60);
ma90:=ma(c,90);
bb:=cross(ma60,ma90);
qq:=barslast(bb);
收盘4:ref(c,qq),linethick0,colorff;
explainex(1=1,'【第四阻力位，60日上穿90日】=',收盘4,2,0),colorff;
ma120:=ma(c,120);
ma240:=ma(c,240);
cc:=cross(ma120,ma240);
rr:=barslast(cc);
收盘5:ref(c,rr),linethick0,colorffff00;
explainex(1=1,'【第五阻力位，120日上穿240日】=',收盘5,2,0),colorffff00;
var1:=if(c>ref(c,1),99,0);
var2:=if(c/ref(c,1)>1.02 and h/c<1.01 and var1>0,91,0);
drawtext(var2>89,l*0.99,'=====★=====\n如果趋势向上\n就做超级短线'),colorff;
var1:=(h+l+o+2*c)/5;
var2:=ref(var1,1);
var3:=sma(max(var1-var2,0),10,1)/sma(abs(var1-var2),10,1)*100;
hy3:=if(count(var3<20,5)>=1 and count(var1=llv(var1,10),10)>=1 and c>=o*1.038 and v>ma(v,5)*1.2,1,0);
drawtext(hy3,l,'====▲====\n开始逐步\分批买入'),colorffff;
var3:=if(c>ref(c,1),88,0);
var4:=if(c/ref(c,1)>1.02 and h/c<1.01 and var3>0,91,0);
drawtext(var4>90,l*0.95,'====★====\n或者适当\n加仓买入'),align4,colorffff;
drawtext(var4>90,l*0.99,'★'),colorffff;
varr1:=sma(max(c-ref(c,1),0),6,1)/sma(abs(c-ref(c,1)),6,1)*100;
drawicon(cross(82,varr1),h,2);
drawtext(cross(82,varr1),h,'====▲====\n风险已现\n离场观望\n落袋为安\n安全第一↓'),align4,colorffff;
ma1:ma(c,p1);
ma2:ma(c,p2);
ma3:ma(c,p3);
ma(c,3),Linethick5;
ma4:ma(c,p4),colorff00ff;
partline(ma3>ref(ma3,1),ma3),Linethick5,colorff;
partline(ma3<=ref(ma3,1),ma3),colorffff;
bbi:(ma(c,3)+ma(c,6)+ma(c,12)+ma(c,24))/4,linethick0;
upr:bbi+p*std(bbi,n),linethick0;
dwn:bbi-p*std(bbi,n),linethick0;
xx:cross(导航线,dwn),linethick0;
drawtext(xx,l*0.99,'★\n★\n开\n始\n关\n注'),colorff00;
drawicon(xx,l*0.98,1);