非常准确的布林买卖主图副图(通达信)

非常准确的布林买卖主图副图(通达信)

源码正文：

主图源码
VAR1:=1{XG51};
VAR2:=REF(CLOSE-OPEN, 2){XG51};
VAR3:=REF(CLOSE, 1){XG51};
VAR4:=REF(CLOSE, 2){XG51};
VAR5:=REF(CLOSE, 3){XG51};
VAR6:=REF(CLOSE, 4){XG51};
VAR7:=maX(MAX(MAX(CLOSE, VAR3), VAR4), VAR5){XG51};
VAR8:=MIN(MIN(MIN(CLOSE, VAR3), VAR4), VAR5){XG51};
蓝卖:STICKLINE(VAR3=VAR7 AND CLOSE<VAR4 OR (VAR4=VAR7 AND VAR3>VAR5 OR VAR5=VAR7 AND VAR3>VAR4) AND VAR4>=VAR6 AND CLOSE<VAR3, VAR3, VAR4, 5, 1), COLORYELLOW{XG51};
VAR9:=SAR(5, 1, 5){XG51};
VAR10:=ema(CLOSE, 30){XG51};
VAR11:=IF(CLOSE>450, 8, IF(CLOSE>=20 AND CLOSE<150, 0.200, IF(CLOSE<20 AND CLOSE>=10, 0.070, IF(CLOSE<10, 0.030, 0.070)))){XG51};
STICKLINE(CLOSE<VAR9, VAR10, VAR10-VAR11, 6, 0), COLORGREEN{XG51};
STICKLINE(crOSS(CLOSE, VAR9), VAR10, VAR10-VAR11, 6, 0){XG51};
STICKLINE(CROSS(VAR9, CLOSE), VAR10, VAR10+VAR11, 6, 0), COLORFF0066{XG51};
STICKLINE(RANGE(DAY, 6, 9) OR RANGE(DAY, 27, 30), VAR10+0.010, VAR10-0.010, 6, 0), COLORBLUE{XG51};
VAR22:=MA(LLV(CLOSE,9)*1.1,14)*1{XG51};
VAR33:=MA(HHV(CLOSE,26)*0.9,14)*1{XG51};
VAR55:=EMA((HIGH+LOW+CLOSE)/3,3){XG51};
VARB:=AMOUNT/(100*vol){XG51};
VARC:=MA(VARB,34){XG51};
VARD:=MA(CLOSE,26){XG51};
通道: (VARD+VARC)/2, POINTDOT, COLORBLUE{XG51};
阻力: VARD+2*STD(CLOSE,34),LINETHICK2 ,  COLORCYAN{XG51};
支持: (VARD-2*STD(CLOSE,26)),LINETHICK2 , COLORCYAN{XG51};
VARE:=MA(WINNER(CLOSE),34)*100{XG51};
警: DRAWTEXT(VARE>60 AND HIGH>阻力,HIGH,'★警'), COLORBLUE{XG51};
突破:DRAWTEXT(VARE<15 AND CROSS(VAR55,通道),LOW,'★突破'), COLORAAAAAA{XG51};
MA5:MA(C,5){XG51};
BB5:=MA5-REF(MA5,1){XG51};
MA10:MA(C,10){XG51};
BB10:=MA10-REF(MA10,1){XG51};
MA20:=EMA(C,20){XG51};
A1:=FILTER(MA5>REF(MA5,1)AND MA10>REF(MA10,1)AND MA20>REF(MA20,1)AND MA5<MA10,5){XG51};
A2:=(2*C+H+L+O)/5{XG51};
A3:=LLV(L,5){XG51};
A4:=HHV(H,4){XG51};
A5:=EMA((A2-A3)/(A4-A3)*100,4){XG51};
A6:=EMA(0.667*REF(A5,1)+0.333*A5,2){XG51};
A7:=EMA(A2,13)-EMA(A2,34){XG51};
A8:=EMA(A7,5){XG51};
A9:=(-2)*(A7-A8)*3.8{XG51};
DRAWTEXT(CROSS(A5,A6)AND A1<40,L-0.08,' 买'),COLORBLUE{XG51};
DRAWTEXT(CROSS(A9,MA(A9,3))AND(A7>A8),H+0.08,' 卖'),COLORCYAN;

副图源码：
VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2){XG51};
VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
STICKLINE(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,CLOSE,REF(CLOSE,1),3,1),COLOR0000FF;
VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2){XG51};
VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
STICKLINE(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,CLOSE,REF(CLOSE,1),3,0),COLORC08000;
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{XG51};
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),3,0),COLORFF00FF;  
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{XG51};
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),3,0) ,COLOR00FF00;
涨家数:INDEXADV,NODRAW,COLORMAGENTA {XG51};
跌家数:INDEXDEC,NODRAW,COLORCYAN{XG51};
boll:MA(CLOSE,20),COLORRED{XG51};
UPPER:BOLL+2*STD(CLOSE,20),COLORBLUE{XG51};
LOWER:BOLL-2*STD(CLOSE,20),COLORWHITE{X=G_5_1=C=N={};