//+--------------------------------------------------------------------------------------+ // F R A C T A L C H A N N E L | // Copyright © RickD BJF Trading Group 2006 | // http://fxstrategy.ca | // | //Experts http://fxstrategy.ca/experts.php SALE! 50% OFF | //Indicators http://fxstrategy.ca/products.php SALE!50% OFF | //Digital Filters Strategy http://fxstrategy.ca/digital_filtrs.php SALE!50% OFF | //Trading Signals http://fxstrategy.ca/signals.php Two weeks FREE! No CC. | // forex calendar, research, article .... | //+--------------------------------------------------------------------------------------+ #property copyright "© RickD BJF Trading Group 2006" #property link "http://fxstrategy.ca/products.php" #property indicator_chart_window #property indicator_buffers 0 extern int cnt = 50; extern color HHTL_color = DodgerBlue; extern color LLTL_color = DeepPink; string prefix = "xTop_"; //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ void init() { clear(); show(); } void deinit() { clear(); } void start() { show(); } void show() { string name = ""; double fr1, fr2; int bar1, bar2; int i = 2; for (int j=0; j < cnt; j++) { for (; i < Bars; i++) { fr1 = iFractals(NULL, 0, MODE_UPPER, i); if (fr1 > 0) { bar1 = i; break; } } for (i=i+2; i < Bars; i++) { fr2 = iFractals(NULL, 0, MODE_UPPER, i); if (fr2 > 0) { bar2 = i; break; } } name = prefix + "HHTL" + j; if (ObjectFind(name) == -1) { ObjectCreate(name, OBJ_TREND, 0, Time[bar2], fr2, Time[bar1], fr1); ObjectSet(name, OBJPROP_COLOR, HHTL_color); ObjectSet(name, OBJPROP_STYLE, STYLE_SOLID); ObjectSet(name, OBJPROP_WIDTH, 0); ObjectSet(name, OBJPROP_RAY, j==0); } else { ObjectMove(name, 0, Time[bar2], fr2); ObjectMove(name, 1, Time[bar1], fr1); } } i = 2; for (j=0; j < cnt; j++) { for (; i < Bars; i++) { fr1 = iFractals(NULL, 0, MODE_LOWER, i); if (fr1 > 0) { bar1 = i; break; } } for (i=i+2; i < Bars; i++) { fr2 = iFractals(NULL, 0, MODE_LOWER, i); if (fr2 > 0) { bar2 = i; break; } } name = prefix + "LLTL" + j; if (ObjectFind(name) == -1) { ObjectCreate(name, OBJ_TREND, 0, Time[bar2], fr2, Time[bar1], fr1); ObjectSet(name, OBJPROP_COLOR, LLTL_color); ObjectSet(name, OBJPROP_STYLE, STYLE_SOLID); ObjectSet(name, OBJPROP_WIDTH, 0); ObjectSet(name, OBJPROP_RAY, j==0); } else { ObjectMove(name, 0, Time[bar2], fr2); ObjectMove(name, 1, Time[bar1], fr1); } } } void clear() { string name = ""; int res = -1; for (int j=0; j < cnt; j++) { name = prefix + "HHTL" + j; if (ObjectFind(name) != -1) ObjectDelete(name); name = prefix + "LLTL" + j; if (ObjectFind(name) != -1) ObjectDelete(name); } }
Sample
Analysis
Market Information Used:
Series array that contains open time of each bar
Indicator Curves created:
Indicators Used:
Fractals
Custom Indicators Used:
Order Management characteristics:
Other Features: