Сообщений в теме: 18761

[alexshow72]

всем привет.вот по этому индюку возможно написать сову?открытие ордера при условии,что если был сигнал, свеча закрылась и стрелка осталась,то по открытии следующей свечки,открывает позицию.т.к. сигналы бывают часто,но по закрытию часовой свечи он может и пропасть.потестируйте сами.да,индюк не мой,друг притащил на флэш-ке.если чё,не ругайте.сам индюк прикрепил.всем удачной торговли! в насторйках я ставлю length-7.method-2.smoothing-2.или 7-3-2.зависит от валютной пары.ну а Вы можете поэксперементировать.

Прикрепленные файлы

•  pfd_snake_trend.rar   8.84К   68 скачиваний

Сообщение отредактировал alexshow72: 01 March 2011 - 18:54

[kareda]

Уважаемый Michelangelo®
не могли бы вы прикрепить к этому советнику умножатель.Каждыий раз при убыточной сделке чтобы лот удваивался, скажем мах 10 раз удвоении.После прибыльой сделки возвращаемся на начальный Lот.

пробуй свою систему...

[DGA]

такие "содержательные" посты буду резать...
какие три индикатора? что должны показывать? через какую разделительную полоску?

Здравствуйте! извените что код выкладываю у меня чего-то файлы не загружаются

е такой индикатор: induk1

хотелось бы

1). сделать как в "induk1" показывало вместо периодов индикаторы под названием 1,2 и 3 с функцией : extern int barsPerTimeFrame - как в "induk1" .
2). или соединить индикаторы под названием: 1, 2 и 3 в один индикатор

с уважением Григорий!


"induk1"

Скрытый текст

//+------------------------------------------------------------------+
//| "induk1" |
//| |
//+------------------------------------------------------------------+
#property copyright "induk1"
#property link ""
#define indicatorName ""

#property indicator_separate_window
#property indicator_buffers 6
#property indicator_color1 Green
#property indicator_color2 Green
#property indicator_color3 Red
#property indicator_color4 Red
#property indicator_color5 White
#property indicator_color6 Gold
#property indicator_width1 2
#property indicator_width3 2
#property indicator_width6 2

//---- input parameters
//
//
//
//
//

extern int FastEMA = 4;
extern int SlowEMA = 134;
extern int Signal = 7;
extern int PriceField = 0;
extern string __ = "Chose timeframes";
extern string timeFrames = "M1;M5;M15;M30;H1;H4;D1;W1;MN";
extern int barsPerTimeFrame = 35;
extern bool shiftRight = False;
extern bool currentFirst = True;
extern bool equalize = True;
extern color txtColor = Silver;
extern color separatorColor = DimGray;

//---- buffers
//
//
//
//
//

double ExtMapBuffer1[];
double ExtMapBuffer2[];
double ExtMapBuffer3[];
double ExtMapBuffer4[];
double ExtMapBuffer5[];
double ExtMapBuffer6[];
double ExtMapBuffer7[];

//
//
//
//
//

int Shift;
int limit;
int window;
int periods[];
string labels[];
string shortName;
double minValue;
double maxValue;
double maxValues[];


//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+

int init()
{
IndicatorBuffers(7);
SetIndexBuffer(0,ExtMapBuffer1);
SetIndexBuffer(1,ExtMapBuffer2);
SetIndexBuffer(2,ExtMapBuffer3);
SetIndexBuffer(3,ExtMapBuffer4);
SetIndexBuffer(4,ExtMapBuffer5);
SetIndexBuffer(5,ExtMapBuffer6);
SetIndexBuffer(6,ExtMapBuffer7);
SetIndexStyle(0,DRAW_HISTOGRAM);
SetIndexStyle(1,DRAW_HISTOGRAM);
SetIndexStyle(2,DRAW_HISTOGRAM);
SetIndexStyle(3,DRAW_HISTOGRAM);
SetIndexStyle(6,DRAW_NONE);

//
//
//
//
//

timeFrames = StringTrimLeft(StringTrimRight(timeFrames));
if (StringSubstr(timeFrames,StringLen(timeFrames),1) != ";")
timeFrames = StringConcatenate(timeFrames,";");

//
//
//
//
//

int s = 0;
int i = StringFind(timeFrames,";",s);
int time;
string current;
while (i > 0)
{
current = StringSubstr(timeFrames,s,i-s);
time = stringToTimeFrame(current);
if (time > 0) {
ArrayResize(labels ,ArraySize(labels)+1);
ArrayResize(periods,ArraySize(periods)+1);
labels[ArraySize(labels)-1] = TimeFrameToString(time);
periods[ArraySize(periods)-1] = time; }
s = i + 1;
i = StringFind(timeFrames,";",s);
}

//
//
//
//
//

if (shiftRight) Shift = 1;
else Shift = 0;
limit = ArraySize(periods);
barsPerTimeFrame = MathMax(barsPerTimeFrame,30);
for (i=0;i<7;i++) SetIndexShift(i,Shift*(barsPerTimeFrame+1));

//
//
//
//
//

if(currentFirst)
for (i=1;i<limit;i++)
if (Period()==periods[i])
{
string tmpLbl = labels[i];
int tmpPer = periods[i];

//
//
//
//
//

for (int k=i ;k>0; k--)
{
labels[k] = labels[k-1];
periods[k] = periods[k-1];
}
labels[0] = tmpLbl;
periods[0] = tmpPer;
}
//
//
//
//
//

shortName = indicatorName+" ("+FastEMA+","+SlowEMA+","+Signal+")";
IndicatorShortName(shortName);
return(0);
}


//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
int deinit()
{
for(int l=0;l<limit;l++) {
ObjectDelete(indicatorName+window+l);
ObjectDelete(indicatorName+window+l+"label");
}
return(0);
}

//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+

int start()
{
static bool init = false;
double koef = 1.0;
double max;
string on;
int k=0;


//
//
//
//
//

if (!init) {
init = true;
window = WindowFind(shortName);
shortName = indicatorName+window+" ("+FastEMA+","+SlowEMA+","+Signal+")";
IndicatorShortName(shortName);

//
//
//
//
//

ArrayResize(maxValues,limit);
}
ArrayInitialize(maxValues,0);

//
//
//
//
//

minValue = 999999;
maxValue = -999999;
for(int p=0; p<limit;p++)
{
for(int i=0; i<barsPerTimeFrame;i++,k++)
{
ExtMapBuffer7[k] = iMACD(NULL,periods[p],FastEMA,SlowEMA,Signal,PriceField,0,i);
ExtMapBuffer6[k] = iMACD(NULL,periods[p],FastEMA,SlowEMA,Signal,PriceField,1,i);
checkMinMax(k,p);
}
ExtMapBuffer1[k] = EMPTY_VALUE;
ExtMapBuffer2[k] = EMPTY_VALUE;
ExtMapBuffer3[k] = EMPTY_VALUE;
ExtMapBuffer4[k] = EMPTY_VALUE;
ExtMapBuffer5[k] = EMPTY_VALUE;
ExtMapBuffer6[k] = EMPTY_VALUE;
ExtMapBuffer7[k] = EMPTY_VALUE;
k += 1;

//
//
//
//
//

on = indicatorName+window+p;
if(ObjectFind(on)==-1)
ObjectCreate(on,OBJ_TREND,window,0,0);
ObjectSet(on,OBJPROP_TIME1,myTime(k-Shift*(barsPerTimeFrame+1)-1));
ObjectSet(on,OBJPROP_TIME2,myTime(k-Shift*(barsPerTimeFrame+1)-1));
ObjectSet(on,OBJPROP_COLOR ,separatorColor);
ObjectSet(on,OBJPROP_WIDTH ,2);
on = indicatorName+window+p+"label";
if(ObjectFind(on)==-1)
ObjectCreate(on,OBJ_TEXT,window,0,0);
ObjectSet(on,OBJPROP_TIME1,myTime(k-Shift*(barsPerTimeFrame+1)-6));
ObjectSetText(on,labels[p],9,"Arial",txtColor);
}
k = 0;

//
//
//
//
//

if (equalize) for (i=0; i<limit; i++) if (max < maxValues[i]) max = maxValues[i];
for(p=0; p<limit;p++)
{
on = indicatorName+window+p;
ObjectSet(on,OBJPROP_PRICE1,maxValue);
ObjectSet(on,OBJPROP_PRICE2,minValue);
on = indicatorName+window+p+"label";
ObjectSet(on,OBJPROP_PRICE1,maxValue);
if (equalize) koef = max/maxValues[p];

//
//
//
//
//

for(i=0; i<barsPerTimeFrame;i++,k++)
{
ExtMapBuffer5[k] = ExtMapBuffer7[k]*koef;
ExtMapBuffer6[k] = ExtMapBuffer6[k]*koef;

//
//
//
//
//

if (ExtMapBuffer7[k] >= 0)
{
ExtMapBuffer3[k] = EMPTY_VALUE;
ExtMapBuffer4[k] = EMPTY_VALUE;
if (ExtMapBuffer7[k] >= ExtMapBuffer7[k+1]) {
ExtMapBuffer1[k]= ExtMapBuffer7[k]*koef;
ExtMapBuffer2[k]= EMPTY_VALUE; }
else {ExtMapBuffer2[k] = ExtMapBuffer7[k]*koef;
ExtMapBuffer1[k] = EMPTY_VALUE; }
}
else
{
ExtMapBuffer1[k] = EMPTY_VALUE;
ExtMapBuffer2[k] = EMPTY_VALUE;
if (ExtMapBuffer7[k] < ExtMapBuffer7[k+1]) {
ExtMapBuffer3[k] = ExtMapBuffer7[k]*koef;
ExtMapBuffer4[k] = EMPTY_VALUE; }
else {ExtMapBuffer4[k] = ExtMapBuffer7[k]*koef;
ExtMapBuffer3[k] = EMPTY_VALUE; }
}
}
k += 1;
}

//
//
//
//
//

for (i=0;i<7;i++) SetIndexDrawBegin(i,Bars-k);
return(0);
}


//+------------------------------------------------------------------+
//+ +
//+------------------------------------------------------------------+

void checkMinMax(int shift,int period)
{
double tmpMin;
double tmpMax;

tmpMin = MathMin(ExtMapBuffer7[shift],ExtMapBuffer6[shift]);
tmpMax = MathMax(ExtMapBuffer7[shift],ExtMapBuffer6[shift]);
minValue = MathMin(tmpMin,minValue);
maxValue = MathMax(tmpMax,maxValue);
maxValues[period] = MathMax(maxValues[period],MathMax(MathAbs(tmpMin),MathAbs(tmpMax)));
}

//
//
//
//
//

int myTime(int a)
{
if(a<0)
return(Time[0]+Period()*60*MathAbs(a));
else return(Time[a]);
}


//+------------------------------------------------------------------+
//+ +
//+------------------------------------------------------------------+
//
//
//
//
//

int stringToTimeFrame(string tfs)
{
int tf=0;
tfs = StringUpperCase(tfs);

if (tfs=="M1" || tfs=="1") tf=PERIOD_M1;
if (tfs=="M5" || tfs=="5") tf=PERIOD_M5;
if (tfs=="M15"|| tfs=="15") tf=PERIOD_M15;
if (tfs=="M30"|| tfs=="30") tf=PERIOD_M30;
if (tfs=="H1" || tfs=="60") tf=PERIOD_H1;
if (tfs=="H4" || tfs=="240") tf=PERIOD_H4;
if (tfs=="D1" || tfs=="1440") tf=PERIOD_D1;
if (tfs=="W1" || tfs=="10080") tf=PERIOD_W1;
if (tfs=="MN" || tfs=="43200") tf=PERIOD_MN1;

return(tf);
}
string TimeFrameToString(int tf)
{
string tfs="Current time frame";
switch(tf) {
case PERIOD_M1: tfs="M1" ; break;
case PERIOD_M5: tfs="M5" ; break;
case PERIOD_M15: tfs="M15" ; break;
case PERIOD_M30: tfs="M30" ; break;
case PERIOD_H1: tfs="H1" ; break;
case PERIOD_H4: tfs="H4" ; break;
case PERIOD_D1: tfs="D1" ; break;
case PERIOD_W1: tfs="W1" ; break;
case PERIOD_MN1: tfs="MN";
}
return(tfs);
}

//
//
//
//
//

string StringUpperCase(string str)
{
string s = str;
int lenght = StringLen(str) - 1;
int char;

while(lenght >= 0)
{
char = StringGetChar(s, lenght);

//
//
//
//
//

if((char > 96 && char < 123) || (char > 223 && char < 256))
s = StringSetChar(s, lenght, char - 32);
else
if(char > -33 && char < 0)
s = StringSetChar(s, lenght, char + 224);

//
//
//
//
//

lenght--;
}

//
//
//
//
//

return(s);
}

Индикаторы 1,2 и 3.

1).

Скрытый текст

//+------------------------------------------------------------------+
//| 1.2011 |
//| |
//| DGA |
//+------------------------------------------------------------------+
#property copyright "1.2011"
#property link "DGA"

#property indicator_separate_window
#property indicator_minimum -10
#property indicator_maximum 100
#property indicator_buffers 12
#property indicator_color1 Lime
#property indicator_width1 1
#property indicator_color2 Yellow//82,105,82
#property indicator_width2 0
#property indicator_color3 Red
#property indicator_width3 2
#property indicator_color4 Yellow//82,105,82
#property indicator_width4 0
#property indicator_color5 Lime
#property indicator_width5 2
#property indicator_color6 Red
#property indicator_width6 0
//---- input parameters
extern int Profit3 = 11;
extern int Profit3_MODE = MODE_EMA;
extern int Profit3_PRICE = PRICE_CLOSE;

extern int Ma_Profit3 = 11,
Ma_Profit3_MODE = MODE_EMA;

extern int BuyTrigger = 80;
extern int SellTrigger = 20;

extern color BuyTriggerColor = Red;
extern color SellTriggerColor = Lime;

extern int MainTrendLong = 85;
extern int MainTrendShort = 15;

extern color MainTrendLongColor = White;
extern color MainTrendShortColor = White;

//---- buffers
double RSIBuffer[];
double PosBuffer[];
double NegBuffer[];

double bdn[],bup[];
double sdn[],sup[];

double marsioma[];
string short_name;
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
short_name = StringConcatenate("Profit3(",Profit3,")");
IndicatorBuffers(8);

SetIndexBuffer(0,RSIBuffer);
SetIndexBuffer(2,bup);
SetIndexBuffer(1,bdn);
SetIndexBuffer(3,sdn);
SetIndexBuffer(4,sup);
SetIndexBuffer(5,marsioma);

SetIndexStyle(0,DRAW_LINE,STYLE_SOLID,2);
SetIndexStyle(2,DRAW_HISTOGRAM,STYLE_SOLID,1);
SetIndexStyle(1,DRAW_HISTOGRAM,STYLE_SOLID,1);
SetIndexStyle(3,DRAW_HISTOGRAM,STYLE_SOLID,1);
SetIndexStyle(4,DRAW_HISTOGRAM,STYLE_SOLID,1);
SetIndexStyle(5,DRAW_LINE,STYLE_SOLID,1);

SetIndexBuffer(6,PosBuffer);
SetIndexBuffer(7,NegBuffer);

IndicatorShortName(short_name);

SetIndexDrawBegin(0,Profit3);
SetIndexDrawBegin(1,Profit3);
SetIndexDrawBegin(2,Profit3);
SetIndexDrawBegin(3,Profit3);
SetIndexDrawBegin(4,Profit3);
SetIndexDrawBegin(5,Profit3);
SetIndexDrawBegin(6,Profit3);
SetIndexDrawBegin(7,Profit3);
//----

drawLine(BuyTrigger,"BuyTrigger", BuyTriggerColor);
drawLine(SellTrigger,"SellTrigger", SellTriggerColor );
drawLine(MainTrendLong,"MainTrendLong", MainTrendLongColor );
drawLine(MainTrendShort,"MainTrendShort",MainTrendShortColor );

return(0);
}
//+------------------------------------------------------------------+
//| Relative Strength Index |
//+------------------------------------------------------------------+
int start()
{



int i,counted_bars=IndicatorCounted();
double rel,negative,positive;
//----
if(Bars<=Profit3) return(0);
//---- initial zero
if(counted_bars<1)
for(i=1;i<=Profit3;i++) RSIBuffer[Bars-i]=0.0;
//----
i=Bars-Profit3-1;
int ma = i;
if(counted_bars>=Profit3) i=Bars-counted_bars-1;
while(i>=0)
{
double sumn=0.0,sump=0.0;
if(i==Bars-Profit3-1)
{
int k=Bars-2;
//---- initial accumulation
while(k>=i)
{

double cma = iMA(Symbol(),0,Profit3,0,Profit3_MODE,Profit3_PRICE,k);
double pma = iMA(Symbol(),0,Profit3,0,Profit3_MODE,Profit3_PRICE,k+1);

rel=cma-pma;

if(rel>0) sump+=rel;
else sumn-=rel;
k--;
}
positive=sump/Profit3;
negative=sumn/Profit3;
}
else
{
//---- smoothed moving average
double ccma = iMA(Symbol(),0,Profit3,0,Profit3_MODE,Profit3_PRICE,i);
double ppma = iMA(Symbol(),0,Profit3,0,Profit3_MODE,Profit3_PRICE,i+1);

rel=ccma-ppma;

if(rel>0) sump=rel;
else sumn=-rel;
positive=(PosBuffer[i+1]*(Profit3-1)+sump)/Profit3;
negative=(NegBuffer[i+1]*(Profit3-1)+sumn)/Profit3;
}
PosBuffer[i]=positive;
NegBuffer[i]=negative;
if(negative==0.0) RSIBuffer[i]=0.0;
else
{
RSIBuffer[i]=100.0-100.0/(1+positive/negative);

bdn[i] = 0;
bup[i] = 0;
sdn[i] = 0;
sup[i] = 0;

if(RSIBuffer[i]>MainTrendLong)
bup[i] = -10;

if(RSIBuffer[i]<MainTrendShort)
bdn[i] = -10;

if(RSIBuffer[i]<20 && RSIBuffer[i]>RSIBuffer[i+1])
sup[i] = -10;

if(RSIBuffer[i]>80 && RSIBuffer[i]<RSIBuffer[i+1])
sdn[i] = -10;


}
i--;
}

while(ma>=0)
{
marsioma[ma] = iMAOnArray(RSIBuffer,0,Ma_Profit3,0,Ma_Profit3_MODE,ma);
ma--;
}

//----
return(0);
}
//+------------------------------------------------------------------+
void drawLine(double lvl,string name, color Col )
{

ObjectDelete(name);
ObjectCreate(name, OBJ_HLINE, WindowFind(short_name), Time[0], lvl,Time[0],lvl);


ObjectSet(name, OBJPROP_STYLE, STYLE_DOT);

ObjectSet(name, OBJPROP_COLOR, Col);
ObjectSet(name,OBJPROP_WIDTH,1);


}

2).

Скрытый текст

//+------------------------------------------------------------------+
//| 2.2011 |
//| |
//| DGA |
//+------------------------------------------------------------------+
#property copyright "2.2011"
#property link "DGA"

#property indicator_separate_window
#property indicator_buffers 2
#property indicator_color1 Lime
#property indicator_color2 Red
#property indicator_width1 1
extern int SF = 111;
extern int RSI_Period = 134;
extern double DARFACTOR = 11;
int g_period_92;
int gi_96;
double g_ibuf_100[];
double g_ibuf_104[];
double g_ibuf_108[];
double g_ibuf_112[];
double g_ibuf_116[];

int init() {
g_period_92 = 3 * RSI_Period - 0;
if (g_period_92 < SF) gi_96 = SF;
else gi_96 = g_period_92;
IndicatorBuffers(6);
SetIndexBuffer(0, g_ibuf_116);
SetIndexStyle(0, DRAW_LINE, STYLE_SOLID, 1);
SetIndexLabel(0, "Value 1");
SetIndexDrawBegin(0, gi_96);
SetIndexStyle(1, DRAW_LINE, STYLE_DOT);
SetIndexBuffer(1, g_ibuf_100);
SetIndexLabel(1, "Value 2");
SetIndexDrawBegin(1, gi_96);
SetIndexBuffer(2, g_ibuf_104);
SetIndexBuffer(3, g_ibuf_108);
SetIndexBuffer(4, g_ibuf_112);
IndicatorShortName(StringConcatenate("2.2011(", SF, ")"));
return (0);
}

int start() {
double l_ima_on_arr_8;
double ld_24;
double ld_40;
if (Bars <= gi_96) return (0);
int li_0 = IndicatorCounted();
if (li_0 < 1) {
for (int li_4 = Bars - gi_96; li_4 < Bars; li_4++) {
g_ibuf_100[li_4] = 0.0;
g_ibuf_104[li_4] = 0.0;
g_ibuf_108[li_4] = 0.0;
g_ibuf_112[li_4] = 0.0;
g_ibuf_116[li_4] = 0.0;
}
}
li_0 = Bars - li_0 - 1;
for (li_4 = li_0; li_4 >= 0; li_4--) g_ibuf_112[li_4] = iRSI(NULL, 0, RSI_Period, PRICE_CLOSE, li_4);
for (li_4 = li_0; li_4 >= 0; li_4--) {
g_ibuf_116[li_4] = iMAOnArray(g_ibuf_112, 0, SF, 0, MODE_EMA, li_4);
g_ibuf_104[li_4] = MathAbs(g_ibuf_116[li_4 + 1] - g_ibuf_116[li_4]);
}
for (li_4 = li_0; li_4 >= 0; li_4--) g_ibuf_108[li_4] = iMAOnArray(g_ibuf_104, 0, g_period_92, 0, MODE_EMA, li_4);
li_4 = li_0 + 1;
double ld_32 = g_ibuf_100[li_4];
for (double l_ima_on_arr_16 = iMAOnArray(g_ibuf_112, 0, SF, 0, MODE_EMA, li_4); li_4 > 0; l_ima_on_arr_16 = l_ima_on_arr_8) {
li_4--;
l_ima_on_arr_8 = iMAOnArray(g_ibuf_112, 0, SF, 0, MODE_EMA, li_4);
ld_24 = iMAOnArray(g_ibuf_108, 0, g_period_92, 0, MODE_EMA, li_4) * DARFACTOR;
ld_40 = ld_32;
if (l_ima_on_arr_8 < ld_32) {
ld_32 = l_ima_on_arr_8 + ld_24;
if (l_ima_on_arr_16 < ld_40)
if (ld_32 > ld_40) ld_32 = ld_40;
} else {
if (l_ima_on_arr_8 > ld_32) {
ld_32 = l_ima_on_arr_8 - ld_24;
if (l_ima_on_arr_16 > ld_40)
if (ld_32 < ld_40) ld_32 = ld_40;
}
}
g_ibuf_100[li_4] = ld_32;
}
return (0);
}

3).

Скрытый текст

//+------------------------------------------------------------------+
//| 3.2011 |
//| |
//| DGA |
//+------------------------------------------------------------------+
#property copyright "3.2011"
#property link "DGA"

#property indicator_separate_window
#property indicator_level1 25
#property indicator_level2 75
//#property indicator_minimum -5
//#property indicator_maximum 105
#property indicator_buffers 4
#property indicator_color1 Lime
#property indicator_color2 Red
#property indicator_width1 1
//---- input parameters
extern int rsiLength=111;
extern int kLength=134;
extern int KSmooth=5;
extern int DLength=11;
extern bool SmoothKLine=true;
//---- buffers
double K[];
double D[];
double rsi[];
double stoch[];
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
//---- indicators
SetIndexStyle(0,DRAW_LINE);
SetIndexBuffer(0,K);
SetIndexStyle(1,DRAW_LINE);
SetIndexBuffer(1,D);
SetIndexStyle(2,DRAW_NONE);
SetIndexBuffer(2,rsi);
SetIndexStyle(3,DRAW_NONE);
SetIndexBuffer(3,stoch);
//----
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function |
//+------------------------------------------------------------------+
int deinit()
{
//----

//----
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator iteration function |
//+------------------------------------------------------------------+
int start()
{
int counted_bars=IndicatorCounted();

for (int i = Bars - counted_bars; i >= 0; i--)
{
rsi[i] = iRSI(Symbol(), 0, rsiLength, PRICE_TYPICAL, i);
stoch[i] = iStochK (kLength, i);
K[i] = Smooth(stoch, KSmooth, i);
D[i] = Smooth(K, DLength, i);
}

return(0);
}

double iStochK(int len, int bar)
{
double ll = 9999, hh = -5555;
for(int i = 0; i < len; i++)
{
if (ll > rsi[bar + i]) ll = rsi[bar + i];
if (hh < rsi[bar + i]) hh = rsi[bar + i];
}

if (ll == hh) return (stoch[bar+1]);

return (100 * (rsi[bar] - ll) / (hh - ll));
}


double Smooth (double array[], int period, int shift)
{
double sum = 0;
for (int i = shift + period - 1; i >= shift; i--)
{
sum += array[i];
}
return (sum / period);
}


//+------------------------------------------------------------------+

Сообщение отредактировал Necron: 02 March 2011 - 18:33

[alexshow72]

уважаемый MICHELANGELO@!это опять я.всё с той-же просьбой-помогите написать советника по этой ТС.суть такова:выставляется ордера на пробитие фракталов как на бай,так и на сел,+3+5п.,ну и с учётом спреда.допустим фрактал у нас 1.6227(gbp/usd)значит байстоп-1.6233-1.6235.т.е.-3п.спред+3-5п.на пробитие.и селстоп так-же.допустим-0.1лота.после того как закупится одна из закупок,советник должен модифицировать второй,к примеру закупился байстоп по 1.6233,значит отложенный будет селстоп-0.2лота по 1.6203,эти 30 пунктов-это должна быть переменная которую можно менять,но с 30 пунктами работает пока ок.хотя можно и поэксперементировать.да.,на первый ордер советник должен выставить профит 10-12п.-это тоже переменная.допустим цена не дошла до проф.развернулась и закупила селстоп,тут-же советник выставляет бай стоп-0.3лота по 1.6239(3спред+3пробитие от первой закупки,желательно это тоже сделать переменной),а эти 2 модифицирует:выставляет стоплосс на первом и профит на втором,так чтобы обе сделки закрылись одновременно с прибылью в 10-12п.-это тоже можно переменная. это будет где-то 30-33п.от селовской закупки.если-же и на этот раз цена развернулась и закупила 3-ю т.е.байстоп,то советник выставляет селстоп уже-0.6 лота по 1.6200(-3п.на пробитие вниз)и модифицирует эти 3 ордера-выставляет стоп на 2-ом,и профиты на 1-ом и 3-ем ордере так,что-бы все закрылись одновременно с прибылью 10-12п.ну и так далее:если опять разворот то выставляет байстоп уже 1.2 лота,потом селстоп 2.4 лота и т.д.пока все закупки закроются с прибылью 10-12п.я делаю это всё в ручную,и пока не жалуюсь,цена всё-равно куда-нить пойдёт,главное не работать на спокойных парах.у меня редко доходили закупки до 4.8-9.6 лота,ну и пару раз закупалось по 19.2.зато прибыль с этих закупок наиболее весомая.надеюсь поможете автоматизировать всё это.заранее благодарен.

[alexshow72]

уважаемый Michelangelo@! это опять я.всё с той-же просьбой -помогите написать советника по моей ТС.ВЫКЛАДЫВАЛ ВЧЕРА.ПОСМОТРИТЕ ПОЖАЛУЙСТА.ОЧЕНЬ НАДЕЮСЬ НА ВАШУ ПОМОЩЬ.

[Necron]

DGA и другие участники данной ветки (и не только) ,
Любые советники, индикаторы или скрипты лучше прикреплять к сообщению, а не копировать их код в сообщение. Если прикрепить по каким-либо причинам не получается, то код/текст/большой скопированный материал лучше скрыть. Как это сделать написал в ветке "Часто задаваемые вопросы по форуму".

[Рац]

 Уважаемые программисты, подскажите, какой код (строчку) надо добавить в советник, чтобы он закрывал прибыльные (только прибыльные) ордера при каждом закрытии нового бара (close)?

То есть, висят несколько открытых позиций. Некоторые в минусе, некоторые в плюсе. Нужно, чтобы по окончании формирования бара, то есть close, прбыльные ордера закрылись при условии что прибыль равна-больше нуля.

[ibraim-k]

Здравствуйте, помогите написать инструмент, если такой возможно написать, я в программирование абсолютно не понимаю, поэтому если сложно или невозможно это осуществить прошу ответить знающих людей. Спасибо за понимание.
http://i031.radikal....dd6e2eaa621.png

[Michelangelo®]

уважаемый Michelangelo@! это опять я.всё с той-же просьбой -помогите написать советника по моей ТС.ВЫКЛАДЫВАЛ ВЧЕРА.ПОСМОТРИТЕ ПОЖАЛУЙСТА.ОЧЕНЬ НАДЕЮСЬ НА ВАШУ ПОМОЩЬ.

я видел вашу просьбу... займусь ее на днях...



КОС111 - я пока просто снес вашу рекламу... еще одна такая выходка - пойдете "мыться"...

[tolyatti]

этот индикатор более подходит... сейчас работаю над вашим задание, но боюсь оно будет видоизменено...

Здравствуйте, уважаемый Michelangelo...Хотел узнать, как видоизменилось задание и получилось-ли .....

[ALEX1712]

огромная просьба - вылечить этот индикатор!

Прикрепленные файлы

•  el333.rar   34.79К   58 скачиваний

[SKY_DRIFT]

  проблема следующая. можно ли вшить в советник антидот против ошибки в журнале OLDTICK? в данный момент у меня сплошные олдики на дц робоfx

советник прилагается.
поставил на мастерфорекс, алерт выдает. Your broker do not support fractional lots. Please change the setup.

Так же вероятно мне криво помогли излечить сову от лицухи. посмотрите пжл, вот оригинальынй установочный файл.

http://filecaster.ru...dihZP/rybka_rar

ещё при попытке прогнать на тестере выдаёт ошибку - ArrayCopyRates functional internal error


короче, как я понял тут непростая защита от пролечивания совы.

Прикрепленные файлы

•  rybka.mq4   28К   41 скачиваний
•  Libraries.zip   39.13К   32 скачиваний

[alexshow72]

наимудрейшие из наимудрейших!!! можно-ли вшить в этот сов.стоп лос?и с какими индюками он работает?а ещё есть идея-он берёт ордер и пока не закроет другой не делает,а можно-ли сделать так,что-бы он брал второй ордер,с коофицентом 2,даже если первый не закрыт?было-бы интересно потестить.так вроде показал не плохие результаты,особенно на gbp/usd на H-1.если подрихтуете,обязуюсь потестить и вылажить результаты.заранее спаааааасииииибооооо!

Прикрепленные файлы

•  Angel_A1.rar   4.77К   28 скачиваний

Сообщение отредактировал alexshow72: 03 March 2011 - 19:40

[Olej]

не могли бы вы прикрепить к этому советнику умножатель.Каждыий раз при убыточной сделке чтобы лот удваивался, скажем мах 10 раз удвоении.После прибыльой сделки возвращаемся на начальный Lот.

Этот трюк толком не работает

Проверял вот в этом советнике в разных вариантах:

http://fxgeneral.com...?showtopic=1488

[Alen_T]

огромная просьба - вылечить этот индикатор!

Смотри название ветки!!!
В этой ветке со взломанными, декомпилированными программами не работают!!!
Из этических соображений.