Scalpel декодировка
Artem Ashikhmin:
Правильно, принцип скальпирования это краткосрочные сделки, быстрый выход с прибылью или маленьким убытком.
И что тут скальперного??
Просто открывается 1 ордер с SL и TP пересиживает и тралит профит или бьёт большой стоп.
Artem Ashikhmin:
Тоже по привычке подумал о скальпинге (пипсовке), но все же увидел последнюю букву. Скальпель (scalpel), хирургический ножик.
И что тут скальперного??
Просто открывается 1 ордер с SL и TP пересиживает и тралит профит или бьёт большой стоп.
Прикидывает волатильность по своему как то, исходя из размера свечи и тиковых объемов со всех ТФ, формирует из этой каши сигнал и торгует, по моему сеткой (не уверен)....
мельком глянул, глубже не вникал.
Ну типа "срез рынка" - был такой модный индюк.
Лично я не приветствую любого рода усреднение, но для начала - протестируйте эту фичу в тестере, пжста
Вы упускаете торговые возможности:
- Бесплатные приложения для трейдинга
- 8 000+ сигналов для копирования
- Экономические новости для анализа финансовых рынков
Регистрация
Вход
Вы принимаете политику сайта и условия использования
Если у вас нет учетной записи, зарегистрируйтесь
Всем привет. Весь иннет облазал, не могу найти описание стратегии заложенной в советник scalpel. Есть код на mql4. Может кто нибудь помочь?
Спасибо.
//| scalpel.mq4 |
//| Copyright © 2009, ryaz |
//| ryaz://outta.here/ |
//+------------------------------------------------------------------+
#property copyright "ryaz"
#property link "outta@here"
#define EA "Scalpel"
#define VER "1_01"
extern double Lots = -5; //if Lots are negative means the percent of free margin used
extern int TakeProfit = 40;
extern int StopLoss = 340;
extern int TrailingStop = 25;
extern int cciPeriod = 14;
extern double cciLimit = 75;
extern int MaxPos=1; //open positions allowed in one dir.
extern int Interval=0;//Minutes before adding a position (0=not used)
extern int Reduce=600;//Minutes before reducing TP by one pip (0=not used)
extern int Live=0;//Minutes before closing an order regardless profit (0=not used)
extern int Volatility=100;//volatility bars (positive>directional or negative>non dir.)
extern int Threshold=1;//pip threshold for volatility
extern int FridayClose=22;//At what time to close all orders on Friday (0=not used)
extern int slippage = 3;
extern double spreadlimit = 5.5;
extern int magic = 123581321;
double high4, high1, high30, low4, low1, low30, high4s, high1s, high30s, low4s, low1s, low30s;
double cci, volu, vold, vol0u, vol1u=1, vol0d, vol1d=1, min, max, lNorm, thresh;
int tim=0, timm=0, tim30=0, tim1=0, tim4=0, lDigits, dig, pip;
bool ccib, ccis;
int init() {
min=MarketInfo(Symbol(),MODE_MINLOT);
max=MarketInfo(Symbol(),MODE_MAXLOT);
lNorm=MarketInfo(Symbol(),MODE_LOTSTEP);
if (lNorm==0.1) lDigits=1; else
if (lNorm==0.01) lDigits=2; else
if (lNorm==0.001) lDigits=3; else
lDigits=0;
lNorm=-MarketInfo(Symbol(),MODE_MARGINREQUIRED)*AccountLeverage()/100;
pip=1;
while (Lots<=-1) Lots/=100;
dig=Digits;
if (dig==3 || dig==5) {
TakeProfit*=10;
StopLoss*=10;
TrailingStop*=10;
slippage*=10;
pip=10;
dig--;
}
Interval*=60;
thresh=pip*Point*MathAbs(Threshold);
spreadlimit*=pip*Point;
}
double UseLots() {
if (Lots>0) return(Lots);
double lots=MathMin(NormalizeDouble(AccountFreeMargin()*Lots/lNorm,lDigits),max);
if (lots<min) return(0);
return(lots);
}
void start() {
int i,buys=0,sells=0,life=0;
double lots, h, l;
bool close;
if(Bars<cciPeriod || !IsTradeAllowed()) return;
for(i=OrdersTotal()-1;i>=0;i--) {
if (!OrderSelect(i,SELECT_BY_POS,MODE_TRADES)) continue;
if (OrderMagicNumber()!=magic) continue;
if (OrderSymbol()!=Symbol()) continue;
life=(TimeCurrent()-OrderOpenTime())/60;
if (Live>0) close=life>Live; else close=false;
if (!close && FridayClose>0) close=DayOfWeek()==5 && Hour()>FridayClose;
if (OrderType()==OP_BUY) {
if (!close && Reduce>0) close=Bid>OrderTakeProfit()-pip*(life/Reduce)*Point;
if (close) {
close=OrderClose(OrderTicket(),OrderLots(),Bid,slippage,Aqua);
RefreshRates();
if (close) {life=0;continue;}
}
buys++;
if (TrailingStop>0)
if (Bid-OrderOpenPrice() > Point*TrailingStop)
if (NormalizeDouble(OrderStopLoss() - Bid+Point*TrailingStop,dig)<0)
OrderModify(OrderTicket(), OrderOpenPrice(), NormalizeDouble(Bid-Point*TrailingStop,Digits), OrderTakeProfit(), 0, Blue);
} else {
if (!close && Reduce>0) close=Ask<OrderTakeProfit()+pip*(life/Reduce)*Point;
if (close) {
close=OrderClose(OrderTicket(),OrderLots(),Ask,slippage,Pink);
RefreshRates();
if (close) {life=0;continue;}
}
sells++;
if (TrailingStop>0)
if (OrderOpenPrice()-Ask > Point * TrailingStop)
if (OrderStopLoss()==0 || NormalizeDouble(OrderStopLoss()- Ask-Point*TrailingStop,dig)>0)
OrderModify(OrderTicket(), OrderOpenPrice(), NormalizeDouble(Ask+Point*TrailingStop,Digits), OrderTakeProfit(), 0, Red);
}
}
if (MathAbs(buys-sells)>=MaxPos) return;
if (DayOfWeek()==5) return;
if (Interval>0 && life>Interval) return;
if (spreadlimit>0 && Ask-Bid>spreadlimit) return;
if (tim!=Time[0]) {
cci=iCCI(0,0,cciPeriod,PRICE_MEDIAN,1);
if (cciLimit>0) {
ccib=cci>0 && cci< cciLimit;
ccis=cci<0 && cci>-cciLimit;
} else {
ccib=cci>-cciLimit;
ccib=cci< cciLimit;
}
tim=Time[0];
}
if (!ccib && !ccis) return;
high4=iHigh(0,PERIOD_H4,0);
low4=iLow(0,PERIOD_H4,0);
if (tim4!=iTime(0,PERIOD_H4,0)) {
high4s=iHigh(0,PERIOD_H4,1);
low4s=iLow(0,PERIOD_H4,1);
tim4=iTime(0,PERIOD_H4,0);
}
if (tim1!=iTime(0,PERIOD_H1,0)) {
high1s=iHigh(0,PERIOD_H1,1);
low1s=iLow(0,PERIOD_H1,1);
tim1=iTime(0,PERIOD_H1,0);
}
high1=iHigh(0,PERIOD_H1,0);
low1=iLow(0,PERIOD_H1,0);
if (tim30!=iTime(0,PERIOD_M30,0)) {
high30s=iHigh(0,PERIOD_M30,1);
low30s=iLow(0,PERIOD_M30,1);
tim30=iTime(0,PERIOD_M30,0);
}
high30=iHigh(0,PERIOD_M30,0);
low30=iLow(0,PERIOD_M30,0);
if (Volatility>0) {
if (timm!=iTime(0,PERIOD_M1,0)) {
vol1u=0;
vol1d=0;
for (i=Volatility; i<Volatility<<1; i++) {
h=iClose(0,PERIOD_M1,i);
l=iOpen(0,PERIOD_M1,i);
if (h>l+thresh)
vol1u+=iVolume(0,PERIOD_M1,i);
else
if (l>h+thresh)
vol1d+=iVolume(0,PERIOD_M1,i);
}
volu=0;
vold=0;
for (i=1; i<Volatility; i++) {
h=iClose(0,PERIOD_M1,i);
l=iOpen(0,PERIOD_M1,i);
if (h>l+thresh)
volu+=iVolume(0,PERIOD_M1,i);
else
if (l>h+thresh)
vold+=iVolume(0,PERIOD_M1,i);
}
if (Threshold<0) {
l=vol1u;
vol1u=vol1d;
vol1d=l;
}
timm=iTime(0,PERIOD_M1,0);
}
h=iClose(0,PERIOD_M1,0);
l=iOpen(0,PERIOD_M1,0);
if (h>l+thresh) {
vol0u=volu+iVolume(0,PERIOD_M1,0);
vol0d=vold;
} else
if (l>h+thresh) {
vol0d=vold+iVolume(0,PERIOD_M1,0);
vol0u=volu;
} else {
vol0u=volu;
vol0d=vold;
}
if (Threshold<0) {
l=vol0u;
vol0u=vol0d;
vol0d=l;
}
} else
if (Volatility<0) {
if (timm!=iTime(0,PERIOD_M1,0)) {
vol1u=0;
for (i=-Volatility; i<(-Volatility)<<1; i++) {
h=iClose(0,PERIOD_M1,i);
l=iOpen(0,PERIOD_M1,i);
if (MathAbs(h-l)>thresh)
vol1u+=iVolume(0,PERIOD_M1,i);
}
volu=0;
for (i=1; i<-Volatility; i++)
h=iClose(0,PERIOD_M1,i);
l=iOpen(0,PERIOD_M1,i);
if (MathAbs(h-l)>=thresh)
volu+=iVolume(0,PERIOD_M1,i);
vol1d=vol1u;
vold=volu;
timm=iTime(0,PERIOD_M1,0);
}
h=iClose(0,PERIOD_M1,0);
l=iOpen(0,PERIOD_M1,0);
if (MathAbs(h-l)>=thresh)
vol0u=volu+iVolume(0,PERIOD_M1,0);
vol0d=vol0u;
} else {
h=iClose(0,PERIOD_M1,0);
l=iOpen(0,PERIOD_M1,0);
if (MathAbs(h-l)>=thresh)
vol0u=iVolume(0,PERIOD_M1,0);
else
vol0u=0;
vol0d=vol0u;
}
if (ccib) {
if(low4>low4s && low1>low1s && low30>low30s && Ask >High[1] && vol0u>vol1u && vol1u>0 && High[2]>High[1] && High[3]>High[2]) {
lots=UseLots();
if (lots==0) return(0);
i=OrderSend(Symbol(),OP_BUY,UseLots(),Ask,slippage,Ask-StopLoss*Point,Ask+TakeProfit*Point,EA,magic,0,Blue);
}
} else
if(high4<high4s && high1<high1s && high30<high30s && Ask <Low[1] && vol0d>vol1d && vol1d>0 && Low[2]<Low[1] && Low[3]<Low[2] && ((cciLimit>0 && cci<0 && cci>-cciLimit) || (cciLimit<0 && cci<cciLimit))) {
lots=UseLots();
if (lots==0) return(0);
i=OrderSend(Symbol(),OP_SELL,UseLots(),Bid,slippage,Bid+StopLoss*Point,Bid-TakeProfit*Point,EA,magic,0,Red);
}
return(0);
}