布林红绿源码副图

以下是布林红绿源码副图

布林红绿源码副图

BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
 DWN:BBI-10*STD(BBI,3),COLORred,linethick2;
 UPR:BBI+10*STD(BBI,3),COLOrblue,linethick1;
 cc:=(c+h+l)/3;
 xx:=ma(cc,7);
 yy:=ref(xx,1);
 {stickline(xx>yy,xx,yy,5,1),colore870ff,linethick2;
 stickline(xx<yy,xx,yy,5,1),colorgreen,linethick2;}
 FILLRGN(xx,yy,xx>=yy,RGB(255,0,0),xx<yy,RGB(0,250,0));
 {if(MA5<ref(MA5,1),ma5,0),pointdot,colorblue,linethick7; }
 {DRAWGBKLAST(MA5>=ref(MA5,1),STRIP(RGB(0,150,0),RGB(150,0,0),1));
 DRAWGBKLAST(MA5<=ref(MA5,1),STRIP(RGB(150,0,0),RGB(0,150,0),1)); }
 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);
 DRAWTEXT(VAR327>90,LOW*0.99,’追’),COLORgray;
 STICKLINE(VAR327>90,OPEN,CLOSE,3,0),colorgray;
 STICKLINE(VAR327>90,LOW,HIGH,0,0 ),COLORgray;
 {45度异动}
x1:=(C+L+H)/3;
 bb13:=atan(ema(x1,13)-ref(ema(x1,13),1))*3.1416*10;
 ema8:=ema(c,8);
 DRAWTEXT(filter(bb13>1 and ema(x1,13)>ref(ema(x1,8),1),10),
 ema8,’∠45上升’),colorgray;
 AAA:=(3*C+H+L+O)/6;
 VAR41:=(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF
 (AAA,8))/36;
 TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR41;
立桩量:=FILTER(TJ1,5);
 TJ2:=IF(BARSLAST(立桩量)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(立桩量)=2 AND CLOSE>REF
 (HIGH,2),1,IF(BARSLAST(立桩量)=3 AND CLOSE>REF(HIGH,3),1,0)));
突破:=TJ2=1;
 TJ3:=IF(BARSLAST(立桩量)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(立桩量)=2 AND CLOSE>REF
 (LOW,2),1,IF(BARSLAST(立桩量)=3 AND CLOSE>REF(LOW,3),1,0)));
三天法则:=TJ3=1;
成立:=三天法则 AND 突破;
条件成立:=FILTER(成立,3);
 DRAWTEXT(条件成立,L*0.99,’立桩量’),colorgray;
 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:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
 varE:=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,REF(CLOSE,1),REF(CLOSE,2),8,0),COLOR00FFFF;{黄色}
STICKLINE(var1A,REF(CLOSE,1),REF(CLOSE,2),8,0),COLORFF00FF;{粉红色}
黄底买入:var19,linethick0,COLOR00ffff;
粉顶卖出:var1A,linethick0,COLORFF50FF;
红色持股:0,linethick0,COLORRED;
绿色持币:0,linethick0,COLOR00d900;
 DRAWtext(var19,REF(CLOSE,1)*0.99,’B’),COLORyellow,linethick3;
 DRAWtext(var1A,REF(CLOSE,1)*1.02,’S’),COLOR00ff00,linethick3;