通达信愚公布林线源码附图

BBI:(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4,COLORWHITE;
 UPR:BBI+P*STD(BBI,N),COLORYELLOW;
 DWN:BBI-P*STD(BBI,N),COLORFF00FF;
 LC:=REF(CLOSE,1);
 RSI:=SMA(MAX(CLOSE-LC,0),4.1,1)/SMA(ABS(CLOSE-LC),4.1,1)*100;

VAR27:=REF(CLOSE,1);
 VAR28:=SMA(MAX(CLOSE-VAR27,0),5.5,1)/SMA(ABS(CLOSE-VAR27),6,1)*100;
 DRAWICON(IF(CROSS(76,VAR28),1,0),H*1.03,5);
 DRAWTEXT(FILTER(EMA(CLOSE,60)-EMA(CLOSE,12)>0 AND EMA(CLOSE,12)/LOW>1.15,5),LOW,''),LINETHICK7 , COLORFF00FF;
 VARA:=((AMOUNT)/(VOL))/(100);
 VARB:=((3)*(HIGH)+LOW+OPEN+(2)*(CLOSE))/(7);
 VARC:=((SUM(AMOUNT,7))/(VARA))/(100);
 VARD:=DMA(VARB,(VOL)/(VARC));
 VARE:=((CLOSE-VARD)/(VARD))*(100);
 VARF:=((CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)))*(100);
 VARJ:=MA(VARE,20)+STD(VARE,20);
 BIAS18:=((CLOSE-MA(CLOSE,18))/(MA(CLOSE,18)))*(100);
 AA:=SMA(VARF,3,1);
 SS:=(REF(BIAS18,1)>=5) AND CROSS(VARJ,VARE) AND (AA>79);
 DRAWTEXT((REF(BIAS18,1)>=5) AND CROSS(VARJ,VARE) AND
 (AA>SS),H*1.02,''),LINETHICK7,COLORGREEN;
 VAR1:=ZIG(3,10)<REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)>REF(ZIG(3,10),2);
 VAR2:=ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)<REF(ZIG(3,10),2);
 STICKLINE(VAR1,C,O,1,0),COLORGREEN;
 STICKLINE(VAR1,C,O,1,0),COLORGREEN;
 STICKLINE(VAR1,H,L,1,0),COLORGREEN;
 STICKLINE(VAR2,C,O,1,0),COLORFF00FF;
 STICKLINE(VAR2,C,O,1,0),COLORFF00FF;
 STICKLINE(VAR2,H,L,1,0),COLORFF00FF;
 DRAWTEXT(ZIG(3,10)<REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)>REF(ZIG(3,10),2),LOW,'卖出' ),COLORGREEN;
 DRAWTEXT(ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)<REF(ZIG(3,10),2),LOW,'★买入'),COLORRED;
 C4:=REF(C,1);
非ST涨停:=IF((C-C4)*100/C4>=(10-0.01*100/C4),1,0);
涨停:=非ST涨停;
STICKLINE(涨停,OPEN,CLOSE,2,0),COLOR00FFFF;
 STICKLINE(涨停,H,L,0,0),COLOR00FFFF;