это первый наверняка (исполнение Аборигена), а может и второй (эти индюки должно быть уже реализованы поищи на виаке или на пауке , можешь попросить Jofox'а он собирает все индикаторы и раздает нуждающимся) , на заказ индюки пишут тоже поиск в гугле или яндекс, а можешь обратиться к komposter'у ему финансы не помешают и напишет со знаком качества его контактные данные можешь поискать на этом форуме, если нет - ramdass много портирует.
//+------------------------------------------------------------------+ //| HoLo Activator.mq4 | //| Copyright © 2004, Poul_Trade_Forum | //| Aborigen | //| http://forex.kbpauk.ru/ | //+------------------------------------------------------------------+ #property copyright "Poul Trade Forum" #property link "http://forex.kbpauk.ru/" #property indicator_chart_window #property indicator_buffers 2 //---- input parameters extern int R=3; //---- buffers double HighBuffer[]; double LowBuffer[]; double VALUE1,VALUE2,VALUE11,VALUE22; //+------------------------------------------------------------------+ //| Custom indicator initialization function | //+------------------------------------------------------------------+ int init() { string short_name; //---- indicator line SetIndexStyle(0,DRAW_ARROW,EMPTY,1,Blue); SetIndexStyle(1,DRAW_ARROW,EMPTY,1,Red); SetIndexArrow(0, 0x9F); SetIndexArrow(1, 0x9F); SetIndexBuffer(0,HighBuffer); SetIndexBuffer(1,LowBuffer); SetIndexEmptyValue(0,0); SetIndexEmptyValue(1,0); //---- name for DataWindow and indicator subwindow label short_name="HiLo"; IndicatorShortName(short_name); SetIndexLabel(0,short_name); //---- SetIndexDrawBegin(0,10); SetIndexDrawBegin(1,10); //---- return(0); } //+------------------------------------------------------------------+ //| Custor indicator deinitialization function | //+------------------------------------------------------------------+ int deinit() { //---- TODO: add your code here ObjectsDeleteAll(0); //---- return(0); } //+------------------------------------------------------------------+ //| Custom indicator iteration function | //+------------------------------------------------------------------+ int start() { int counted_bars=IndicatorCounted(),i,shift,Swing; //---- TODO: add your code here i=(Bars-counted_bars)-1; for (shift=i; shift>=0;shift--) { VALUE1=iMA(NULL,0,R,0,MODE_SMA,PRICE_HIGH,shift+1); VALUE2=iMA(NULL,0,R,0,MODE_SMA,PRICE_LOW,shift+1); if (Close[shift+1]<VALUE2 ) Swing=-1; if (Close[shift+1]>VALUE1 ) Swing=1; if (Swing==1) { HighBuffer[shift]=VALUE2; LowBuffer[shift]=0; } if (Swing==-1) { LowBuffer[shift]=VALUE1; HighBuffer[shift]=0; } //---- } return(0); } //+------------------------------------------------------------------+
ему финансы не помешают
а тебе, значит, помешают? =)))нашел бедного студента ;)
Привет komposter - так как насчет цены...
Не договаривается лишь тот, кто не идет на контакт!
Не договаривается лишь тот, кто не идет на контакт!
индикаторы - звери =)
даже стыдно деньги брать... но надо учиться ценить своё время )))
поэтому возьму 10 wmz. Чисто симолически)
пиши - komposterius [AT] mail [dot] ru
даже стыдно деньги брать... но надо учиться ценить своё время )))
поэтому возьму 10 wmz. Чисто симолически)
пиши - komposterius [AT] mail [dot] ru
нет и мне не помешают, просто ты насколько я понял заинтересован больше, да и потом качество думаю будет лучше :), а если выразился не так, то ссори.
Привет Всем!
Памагите!
Сколько это будет стоить?
Есть два индюка под МТ3 - нужно переделать в МТ4, но я совсем не шарю в программировании.
Первый:
/*[[
Name := Hi-Lo
Author :=
Link :=
Separate Window := No
First Color := Red
First Draw Type := Symbol
First Symbol := 119
Use Second Data := Yes
Second Color := Lime
Second Draw Type := Symbol
Second Symbol := 119
]]*/
Input :Per(3),NBar(200);
Variable : shift(0),val(0),val2(0),Pr(0),PrevPr(0);
SetLoopCount(0);
For shift=NBar Downto 0 Begin
val=iMAEx(Per,MODE_SMA,1,PRICE_HIGH,shift);
val2=iMAEx(Per,MODE_SMA,1,PRICE_LOW,shift);
if C[shift]<val2 and PrevPr=1 then Pr=0;
if C[shift]>val and PrevPr=0 then Pr=1;
PrevPr=Pr;
if Pr=0 then SetIndexValue(shift, val);
if Pr=1 then SetIndexValue2(shift, val2);
End;
и Второй:
/*[[
Name := hi/lo ART
Author :=
Link :=
Separate Window := No
First Color := red
First Draw Type := symbol
First Symbol := 159
Use Second Data := yes
Second Color := blue
Second Draw Type := symbol
Second Symbol := 159
]]*/
Input: Countbars (300);
Variables : i(0),hma(0),lma(0),startBar(0),up(false),sw(true),first(true);
SetLoopCount(0);
if first then {
startbar=Countbars-5;
first=false;
};
startbar++;
for i = startBar downto 0 {
hma=(h[i+2]+h[i+1]+h[i])/3;
lma=(l[i+2]+l[i+1]+l[i])/3;
if c[i]<lma then { //hi
if not up then SetIndexValue2(i,lma);
up=true;
};
if c[i]>hma then { //lo
if up then SetIndexValue(i,hma);
up=false;
};
if up then
SetIndexValue(i,hma)
else
SetIndexValue2(i,lma);
startbar--;
};
Памагите!
Сколько это будет стоить?
Есть два индюка под МТ3 - нужно переделать в МТ4, но я совсем не шарю в программировании.
Первый:
/*[[
Name := Hi-Lo
Author :=
Link :=
Separate Window := No
First Color := Red
First Draw Type := Symbol
First Symbol := 119
Use Second Data := Yes
Second Color := Lime
Second Draw Type := Symbol
Second Symbol := 119
]]*/
Input :Per(3),NBar(200);
Variable : shift(0),val(0),val2(0),Pr(0),PrevPr(0);
SetLoopCount(0);
For shift=NBar Downto 0 Begin
val=iMAEx(Per,MODE_SMA,1,PRICE_HIGH,shift);
val2=iMAEx(Per,MODE_SMA,1,PRICE_LOW,shift);
if C[shift]<val2 and PrevPr=1 then Pr=0;
if C[shift]>val and PrevPr=0 then Pr=1;
PrevPr=Pr;
if Pr=0 then SetIndexValue(shift, val);
if Pr=1 then SetIndexValue2(shift, val2);
End;
и Второй:
/*[[
Name := hi/lo ART
Author :=
Link :=
Separate Window := No
First Color := red
First Draw Type := symbol
First Symbol := 159
Use Second Data := yes
Second Color := blue
Second Draw Type := symbol
Second Symbol := 159
]]*/
Input: Countbars (300);
Variables : i(0),hma(0),lma(0),startBar(0),up(false),sw(true),first(true);
SetLoopCount(0);
if first then {
startbar=Countbars-5;
first=false;
};
startbar++;
for i = startBar downto 0 {
hma=(h[i+2]+h[i+1]+h[i])/3;
lma=(l[i+2]+l[i+1]+l[i])/3;
if c[i]<lma then { //hi
if not up then SetIndexValue2(i,lma);
up=true;
};
if c[i]>hma then { //lo
if up then SetIndexValue(i,hma);
up=false;
};
if up then
SetIndexValue(i,hma)
else
SetIndexValue2(i,lma);
startbar--;
};
Как ты торгуешь с этими индюками, слишком много ложных сигналов?
Profi_R 02.12.05 13:46
нет и мне не помешают, просто ты насколько я понял заинтересован больше, да и потом качество думаю будет лучше :), а если выразился не так, то ссори.
Ты не поверишь....нет и мне не помешают, просто ты насколько я понял заинтересован больше, да и потом качество думаю будет лучше :), а если выразился не так, то ссори.
Взял с человека деньги (10$!!!), и не смог сделать 2-й индюк =))))))))))))))))))))))))))))))))))))))
Вернее сделал, но он в реале работает не так, как в МТ3...
Правда, проверял не я, а заказчик, но я думаю ему можно верить )
Блин, заблудился в 3-х соснах )
Теория вероятности + (АМУР) - Анализ моделирования и управления рисками :)....и... диплом в кармане :)!
Надо верить людям :)
Народ знает - качество - выше всего!
А из леса надо как-то выбираться...:)
Народ знает - качество - выше всего!
А из леса надо как-то выбираться...:)
Profi_R 02.12.05 13:46
нет и мне не помешают, просто ты насколько я понял заинтересован больше, да и потом качество думаю будет лучше :), а если выразился не так, то ссори.
Ты не поверишь....нет и мне не помешают, просто ты насколько я понял заинтересован больше, да и потом качество думаю будет лучше :), а если выразился не так, то ссори.
Взял с человека деньги (10$!!!), и не смог сделать 2-й индюк =))))))))))))))))))))))))))))))))))))))
Вернее сделал, но он в реале работает не так, как в МТ3...
Правда, проверял не я, а заказчик, но я думаю ему можно верить )
Блин, заблудился в 3-х соснах )
я видел что код простенький, но предпочитаю не: старый код -> восстановление алгоритма построения -> новый код, а : описание алгоритма -> новый код :) (так тех.задание более конкретно, да и конечный результат не будет содержать ошибок допущенных в старом коде и будет наиболее эффективным)
Вы упускаете торговые возможности:
- Бесплатные приложения для трейдинга
- 8 000+ сигналов для копирования
- Экономические новости для анализа финансовых рынков
Регистрация
Вход
Вы принимаете политику сайта и условия использования
Если у вас нет учетной записи, зарегистрируйтесь
Памагите!
Сколько это будет стоить?
Есть два индюка под МТ3 - нужно переделать в МТ4, но я совсем не шарю в программировании.
Первый:
/*[[
Name := Hi-Lo
Author :=
Link :=
Separate Window := No
First Color := Red
First Draw Type := Symbol
First Symbol := 119
Use Second Data := Yes
Second Color := Lime
Second Draw Type := Symbol
Second Symbol := 119
]]*/
Input :Per(3),NBar(200);
Variable : shift(0),val(0),val2(0),Pr(0),PrevPr(0);
SetLoopCount(0);
For shift=NBar Downto 0 Begin
val=iMAEx(Per,MODE_SMA,1,PRICE_HIGH,shift);
val2=iMAEx(Per,MODE_SMA,1,PRICE_LOW,shift);
if C[shift]<val2 and PrevPr=1 then Pr=0;
if C[shift]>val and PrevPr=0 then Pr=1;
PrevPr=Pr;
if Pr=0 then SetIndexValue(shift, val);
if Pr=1 then SetIndexValue2(shift, val2);
End;
и Второй:
/*[[
Name := hi/lo ART
Author :=
Link :=
Separate Window := No
First Color := red
First Draw Type := symbol
First Symbol := 159
Use Second Data := yes
Second Color := blue
Second Draw Type := symbol
Second Symbol := 159
]]*/
Input: Countbars (300);
Variables : i(0),hma(0),lma(0),startBar(0),up(false),sw(true),first(true);
SetLoopCount(0);
if first then {
startbar=Countbars-5;
first=false;
};
startbar++;
for i = startBar downto 0 {
hma=(h[i+2]+h[i+1]+h[i])/3;
lma=(l[i+2]+l[i+1]+l[i])/3;
if c[i]<lma then { //hi
if not up then SetIndexValue2(i,lma);
up=true;
};
if c[i]>hma then { //lo
if up then SetIndexValue(i,hma);
up=false;
};
if up then
SetIndexValue(i,hma)
else
SetIndexValue2(i,lma);
startbar--;
};