Tuyệt Chiêu AmiBroker

[1nightdream]

Có hai đoạn code của phần mềm phân tích kỹ thuật AmiBroker khá hay nhờ các cao thủ cho ý kiến

Đoạn 1:

// Zig-Hi-Zag-Lo and Zig on Close formula
VolON = ParamToggle( \"Plot Volume\", \"Off|On\", 1 );
ZigON = ParamToggle( \"Plot ZigHiLo\", \"Off|On\", 1 );
pr = Param( \"ZigZag change\", 0.15, 0.01, 20, 0.01 );
CloseORhilo = ParamToggle( \"ZigOnClose\", \"ZigOnHiLo\", 1 );

if ( CloseORhilo == 1 )
**
pk = PeakBars( C, pr ) == 0;// PeakBars( H, pr ) == 0
tr = TroughBars( C, pr ) == 0;// TroughBars( L, pr ) == 0

zzHi = Zig( C, pr );// Zig( H, pr )
zzLo = Zig( C, pr );// Zig( L, pr )
Avg = ( zzHi + zzLo ) / 2;

x = IIf( pk, zzHi, IIf( tr, zzLo, IIf( Avg > Ref( Avg, -1 ), C, C ) ) );// Ref( Avg, -1 ), H, L ) ) )
}
else
**
pk = PeakBars( H, pr ) == 0;// PeakBars( H, pr ) == 0
tr = TroughBars( L, pr ) == 0;// TroughBars( L, pr ) == 0

zzHi = Zig( H, pr );// Zig( H, pr )
zzLo = Zig( L, pr );// Zig( L, pr )
Avg = ( zzHi + zzLo ) / 2;

x = IIf( pk, zzHi, IIf( tr, zzLo, IIf( Avg > Ref( Avg, -1 ), H, L ) ) );// Ref( Avg, -1 ), H, L ) ) )
}

zzHiLo = Zig( x, pr );

zzup = zzHiLo > Ref( zzHiLo, -1 ) ;
zzdn = zzHiLo < Ref( zzHiLo, -1 );
ribboncol = IIf( zzup , colorWhite, colorBlack );
Plot ( 3, \"\", ribboncol, styleArea | styleOwnScale | styleNoLabel, 0, 100 );// Plot the Zig ribbon

if ( ZigON == 1 )
Plot( zzHiLo, \"\", ribboncol , styleNoLabel );

//Swing Volume
Volswing = Sum( V, BarsSince( zzup != Ref( zzup, -1 ) ) + 1 );

SwingBar = BarsSince( zzHiLo != Ref( zzHiLo, -1 ) );

// plot Volume at X % from peak and trough
percent = Param( \"PositTextVol%\", 5, 2, 90, 0.5 );

xshift = Param( \"xshift %\", 1.5, 1, 90, 0.5 );

yshift = Param( \"yshift %\", 5, 1, 90, 0.5 );

Miny = Status( \"axisminy\" );

Maxy = Status( \"axismaxy\" );

y = Miny + ( Maxy - Miny ) * percent / 100;

FirstVisibleBar = Status( \"FirstVisibleBar\" );

Lastvisiblebar = Status( \"LastVisibleBar\" );

if ( VolON == 1 )
**
for ( i = Firstvisiblebar + 1; i <= Lastvisiblebar AND i < BarCount - 1; i++ )
**
if ( zzup [i] AND zzup [ i+1] == 0 )
**
PlotText( \"\" + Volswing [ i] , i - xshift , H[i] + yshift , colorWhite );
}

if ( zzup [i] == 0 AND zzup [ i+1] == 1 )
**
PlotText( \"\" + Volswing [ i] , i - xshift , L[i] - yshift , colorBlack );
}
}

PlotText( \"\" + Volswing , i + 2 , zzHiLo[BarCount-1], LastValue( ribboncol ) );
}

Đoạn 2:


PriceAtBuy = 0;
HighSinceBuy = 0;
Exit = 0;

for( i=0; i< BarCount; i++)
**
if(PriceAtBuy == 0 AND Buy[i])
**
PriceAtBuy = BuyPrice[i];
}
if(PriceAtBuy > 0)
**
HighSinceBuy = Max(High[i], HighSinceBuy);
if(Exit == 0 AND Buy[i] AND (Close[i] < BuyPrice[i-2] ))
**
Sell[i] = 1;
SellPrice[i] = Min(Open[i+1],(Close[i] < BuyPrice[i-2]));
Buy[i] = 0;
}
if(Exit == 0 AND Close[i] > PriceAtBuy AND HighSinceBuy AND (Close[i] < HighSinceBuy[i-2]))
**
Sell[i] = 1;
SellPrice[i] = Min(Open[i+1],(Close[i] <HighSinceBuy[i-2]));
Buy[i] = 0;
PriceAtBuy = 0;
HighSinceBuy = 0;
}
}
}