源码
var1:=(close+ref(close,1)+ref(close,2)+ref(close,3)+ref(close,4))/5; var2:=ema(var1,3); var3:=ema(var1,10); var4:=ema(var1,20); var5:=ema(var1,30); var6:=ema(var1,60); var7:=ema(var1,120); var8:=barscount(close); var9:=var2>ref(var2,1) and ref(var2,1)>ref(var2,2) and var3>ref(var3,1) and ref(var3,1)>ref(var3,2); vara:=(vol+ref(vol,1)+ref(vol,2)+ref(vol,3)+ref(vol,4))/(capital*6000); varb:=var1+vara; varc:=ema(winner(varb),7)*100; vard:=ema(winner(varb),14)*100; vare:=ema(winner(varb),21)*100; varf:=ema(winner(varb),28)*100; var10:=barslast(ref(cross(varc,vard),1)); 八路军: varc; 鬼子: vard; 交锋线: vare; 战局研判: varf; var11:=varc>ref(varc,1) and ref(varc,1)>ref(varc,2) and vard>ref(vard,1) and ref(vard,1)>ref(vard,2) and vare>ref(vare,1) and ref(vare,1)>ref(vare,2) and var10<8 and (close-ref(close,var10))/ref(close,var10)*100<20 and var9 and (ref(varc,1)<10 or ref(varc,1)>10 and ref(varc,1)<35); var12:=var11=1 and var11+ref(var11,1)+ref(var11,2)+ref(var11,3)+ref(var11,4)+ref(var11,5)+ref(var11,6)+ref(var11,7)+ref(var11,8)+ref(var11,9)<=4 and (ref(var11,1)=1 or ref(var11,2)=1 or ref(var11,3)=1); 荡魔除寇: if(var12,20,0), ; c14: drawtext(cross(varc,vard) and (ref(varc,1)<10 or ref(varc,1)>10 and ref(varc,1)<35),varc,'密切注意'); c15: drawtext(cross(varc,vard) and ref(varc,1)>40,varc,'鬼子撤，进退择机'); STICKLINE(cross(varc,vard) and (ref(varc,1)<10 or ref(varc,1)>10 and ref(varc,1)<35),vard,vard+20,8,0)COLORRED;c17: drawicon(cross(varc,vard) and ref(varc,1)>45,vard-5,5); STICKLINE(cross(varc,vard) and ref(varc,1)>45,vard,vard+20,6,0)COLORGREEN;10,POINTDOT; 20,POINTDOT; 30,POINTDOT; 40,POINTDOT; 50,POINTDOT; 60,POINTDOT; 70,POINTDOT;
