Nhờ các bạn cao thủ sửa giúp đoạn code sau

// Reversal and Breakout Signals [AlgoAlpha] AFL Code
// © AlgoAlpha

SetChartOptions(0, chartShowArrows|chartShowDates);
SetChartBkColor(ParamColor("ChartBgColor", colorBlack));
SetChartBkGradientFill(ParamColor("Upper ChartBgColor", colorBlack), ParamColor("Lower ChartBgColor", colorBlack));

period = Param("Indicator Period", 20, 1, 100, 1);
vStrengthPeriod = Param("Volume Strength Period", 20, 1, 100, 1);
strongVolThreshold = Param("Strong Volume Threshold", 2, 0, 100, 0.1);
trendColor = ParamToggle("Color Candles During Trends", "Off|On", 1);
bullishColor = ParamColor("Bullish Color", colorBrightGreen);
bearishColor = ParamColor("Bearish Color", colorRed);
breakoutColor = ParamColor("Breakout Color", colorYellow);

HMA = MA(C, period);
RVol = V/MA(V, vStrengthPeriod);
strongVol = RVol > strongVolThreshold;

SH = WMA(H, period);
SL = WMA(L, period);
HH = HHV(SH, period);
LL = LLV(SL, period);

candleDir = IIf(C > O, 1, -1);

bullishRej = Ref(LL < LL[1] AND C > LL[1], -1);
bearishRej = Ref(HH > HH[1] AND C < HH[1], -1);

bullishBreakout = Ref(C > HH[1] AND O < HH[1], -1);
bearishBreakout = Ref(C < LL[1] AND O > LL[1], -1);

state = 0;
if (bullishBreakout) state = 1;
if (bearishBreakout) state = -1;
if (Cross(L, LL) AND state == -1 OR Cross(HH, H) AND state == 1) state = 0;

PlotShapes(IIf(bullishRej AND state != -1, shapeUpTriangle, shapeNone), colorTransparent, 0, L*0.9995);
PlotShapes(IIf(bearishRej AND state != 1, shapeDownTriangle, shapeNone), colorTransparent, 0, H*1.0005);
PlotShapes(IIf(bullishBreakout, shapeSmallDiamond, shapeNone), colorTransparent, 0, L*0.999);
PlotShapes(IIf(bearishBreakout, shapeSmallDiamond, shapeNone), colorTransparent, 0, H*1.001);

Plot(HH, "", colorRed, styleStaircase);
Plot(LL, "", colorGreen, styleStaircase);
Plot(HMA, "Trend Tracker", IIf(state == 1, bullishColor, IIf(state == -1, bearishColor, colorWhite)), styleLine);

candleColor = IIf(trendColor, IIf(state == 1, bullishColor, IIf(state == -1, bearishColor, colorWhite)), colorWhite);
PlotOHLC(O, H, L, C, "", candleColor, candleColor, styleCandle);

// Alert Conditions
AlertIf(bullishRej AND state != -1, "", "Bullish Reversal", 1);
AlertIf(bearishRej AND state != 1, "", "Bearish Reversal", 1);
AlertIf(bullishBreakout, "", "Bullish Breakout", 1);
AlertIf(bearishBreakout, "", "Bearish Breakout", 1);

 

chưa hiểu bạn muốn sửa nội dung gì

 

Mình muốn sửa đoạn code trên để có thể chạy trên amiboker 6, Có bộ lọc luôn ạ. Bạn xem có thể chỉnh sửa giúp mình được k?

 

Chào anh Nam , anh Nam có code Banker Rythm cho mình xin nhé

 

Đoạn code trên mình đã sửa cho chạy được chart, nhưng phần bộ lọc thì vẫn chưa chạy ra được kết quả.

_SECTION_BEGIN("Test code online 1");
SetChartOptions(0, chartShowArrows | chartShowDates);
SetChartBkColor(ParamColor("ChartBgColor", colorBlack));
SetChartBkGradientFill(ParamColor("Upper ChartBgColor", colorBlack), ParamColor("Lower ChartBgColor", colorBlack));

period = Param("Indicator Period", 20, 1, 100, 1);
vStrengthPeriod = Param("Volume Strength Period", 20, 1, 100, 1);
strongVolThreshold = Param("Strong Volume Threshold", 2, 0, 100, 0.1);
trendColor = ParamToggle("Color Candles During Trends", "Off|On", 1);
bullishColor = ParamColor("Bullish Color", colorBrightGreen);
bearishColor = ParamColor("Bearish Color", colorRed);
breakoutColor = ParamColor("Breakout Color", colorYellow);

HMMA = MA(C, period);
RVol = V / MA(V, vStrengthPeriod);
strongVol = RVol > strongVolThreshold;

SH = WMA(H, period);
SL = WMA(L, period);
HH = HHV(SH, period);
LL = LLV(SL, period);

candleDir = IIf(C > O, 1, -1);

bullishRej = Ref(LL < LL[1] AND C > LL[1], -1);
bearishRej = Ref(HH > HH[1] AND C < HH[1], -1);

bullishBreakout = Ref(C > HH[1] AND O < HH[1], -1);
bearishBreakout = Ref(C < LL[1] AND O > LL[1], -1);

// Initialize state array
state = Null;
state[0] = 0; // Initial state

for (i = 1; i < BarCount; i++)
{
if (bullishBreakout)
state = 1;
else if (bearishBreakout)
state = -1;
else if ((L < LL AND L[i-1] >= LL[i-1] AND state[i-1] == -1) OR
(H > HH AND H[i-1] <= HH[i-1] AND state[i-1] == 1))
state = 0;
else
state = state[i-1];
}

// Set bar colors based on trend state
if (trendColor)
{
SetBarFillColor(IIf(state == 1, bullishColor, IIf(state == -1, bearishColor, colorWhite)));
}

// Plot shapes for various signals
PlotShapes(IIf(bullishRej AND state != -1, shapeUpTriangle, shapeNone), colorYellow, 0, L * 0.9995);
PlotShapes(IIf(bearishRej AND state != 1, shapeDownTriangle, shapeNone), colorYellow, 0, H * 1.0005);
PlotShapes(IIf(bullishBreakout, shapeUpArrow, shapeNone), colorYellow, 0, L * 0.999);
PlotShapes(IIf(bearishBreakout, shapeDownArrow, shapeNone), colorYellow, 0, H * 1.001);

// Plot high and low indicators
Plot(HH, "High", colorRed, styleStaircase);
Plot(LL, "Low", colorGreen, styleStaircase);

// Plot the trend tracker line
Plot(HMMA, "Trend Tracker", IIf(state == 1, bullishColor, IIf(state == -1, bearishColor, colorWhite)), styleLine);

// Plot the candlesticks
PlotOHLC(O, H, L, C, "", colorDefault, colorDefault, styleCandle);

// Alert Conditions
AlertIf(bullishRej AND state != -1, "", "Bullish Reversal", 1);
AlertIf(bearishRej AND state != 1, "", "Bearish Reversal", 1);
AlertIf(bullishBreakout, "", "Bullish Breakout", 1);
AlertIf(bearishBreakout, "", "Bearish Breakout", 1);
_SECTION_END();

 

//Đoạn code này không có bộ lọc, nó chỉ là một cái Trend Tracker gì đó thôi bạn

_SECTION_BEGIN("Test code online 1");
SetChartOptions(0, chartShowArrows | chartShowDates);
SetChartBkColor(ParamColor("ChartBgColor", colorBlack));
SetChartBkGradientFill(ParamColor("Upper ChartBgColor", colorBlack), ParamColor("Lower ChartBgColor", colorBlack));
period = Param("Indicator Period", 20, 1, 100, 1);
vStrengthPeriod = Param("Volume Strength Period", 20, 1, 100, 1);
strongVolThreshold = Param("Strong Volume Threshold", 2, 0, 100, 0.1);
trendColor = ParamToggle("Color Candles During Trends", "Off|On", 1);
bullishColor = ParamColor("Bullish Color", colorBrightGreen);
bearishColor = ParamColor("Bearish Color", colorRed);
breakoutColor = ParamColor("Breakout Color", colorYellow);
HMMA = MA(C, period);
RVol = V / MA(V, vStrengthPeriod);
strongVol = RVol > strongVolThreshold;
SH = WMA(H, period);
SL = WMA(L, period);
HH = HHV(SH, period);
LL = LLV(SL, period);
candleDir = IIf(C > O, 1, -1);
bullishRej = Ref(LL < LL[1] AND C > LL[1], -1);
bearishRej = Ref(HH > HH[1] AND C < HH[1], -1);
bullishBreakout = Ref(C > HH[1] AND O < HH[1], -1);
bearishBreakout = Ref(C < LL[1] AND O > LL[1], -1);
// Initialize state array
state = Null;
state[0] = 0; // Initial state
for (i = 1; i < BarCount; i++)
{
IIf(bullishBreakout, state = 1,IIf(bearishBreakout,state=-1,IIf((L < LL AND L[i-1] >= LL[i-1] AND state[i-1] == -1) OR
(H > HH AND H[i-1] <= HH[i-1] AND state[i-1] == 1),0,state=state[i-1])));
}
// Set bar colors based on trend state
IIf(trendColor,SetBarFillColor(IIf(state == 1, bullishColor, IIf(state == -1, bearishColor, colorWhite))),colorDefault);
// Plot shapes for various signals
PlotShapes(IIf(bullishRej AND state != -1, shapeUpTriangle, shapeNone), colorYellow, 0, L * 0.9995);
PlotShapes(IIf(bearishRej AND state != 1, shapeDownTriangle, shapeNone), colorYellow, 0, H * 1.0005);
PlotShapes(IIf(bullishBreakout, shapeUpArrow, shapeNone), colorYellow, 0, L * 0.999);
PlotShapes(IIf(bearishBreakout, shapeDownArrow, shapeNone), colorYellow, 0, H * 1.001);
// Plot high and low indicators
Plot(HH, "High", colorRed, styleStaircase);
Plot(LL, "Low", colorGreen, styleStaircase);
// Plot the trend tracker line
Plot(HMMA, "Trend Tracker", IIf(state == 1, bullishColor, IIf(state == -1, bearishColor, colorWhite)), styleLine);
// Plot the candlesticks
PlotOHLC(O, H, L, C, "", colorDefault, colorDefault, styleCandle);
// Alert Conditions
AlertIf(bullishRej AND state != -1, "", "Bullish Reversal", 1);
AlertIf(bearishRej AND state != 1, "", "Bearish Reversal", 1);
AlertIf(bullishBreakout, "", "Bullish Breakout", 1);
AlertIf(bearishBreakout, "", "Bearish Breakout", 1);
_SECTION_END();

 

Các b chỉ cần thêm tiêu chí lọc vào là được mà.
Ví dụ ở đây mình cho lọc theo tiêu chí "Bullish Breakout"
Tạm đặt tên là "Bò húc"
.................
m=bullishBreakout;

Filter = m;

AddColumn(m,"Bò húc",1,IIf(C>Ref(C,-1),colorGreen,colorRed));
AddColumn(C,"Close",1,IIf(C>Ref(C,-1),colorGreen,colorRed));
AddColumn(V,"Volume",1,IIf(V>Ref(V,-1),colorGreen,colorRed));

_SECTION_END();

Chạy thử ra: