龙听期货论坛's Archiver

C
+
+
版
量
化		 微信： QQ：

龙听 发表于 2022-11-3 10:57

【Bollinger Bands】

[code]
inputs:
        BollingerPrice( Close ),
        TestPriceUBand( Close ),
        TestPriceLBand( Close ),
        Length( 20 ),
        NumDevsUp( 2 ),
        NumDevsDn( -2 ),
        Displace( 0 ) ;

variables:
        var0( 0 ),
        var1( 0 ),
        var2( 0 ),
        var3( 0 ) ;

var0 = AverageFC( BollingerPrice, Length ) ;
var1 = StandardDev( BollingerPrice, Length, 1 ) ;
var3 = var0 + NumDevsUp * var1 ;
var2 = var0 + NumDevsDn * var1 ;

condition1 = Displace >= 0 or CurrentBar > AbsValue( Displace ) ;
if condition1 then
        begin
        Plot1[Displace]( var3, "UpperBand" ) ;
        Plot2[Displace]( var2, "LowerBand" ) ;
        Plot3[Displace]( var0, "MidLine" ) ;

                         
        if Displace <= 0 then
                begin
                condition1 = TestPriceLBand crosses over var2 ;
                if condition1 then
                        Alert( "Price crossing over lower price band" )
                else
                begin
                condition1 = TestPriceUBand crosses under var3 ;
                if condition1 then
                        Alert( "Price crossing under upper price band" ) ;
                end;
                end ;
        end ;
[/code]

页: [1]