6区 - ページ 35 1...282930313233343536373839404142...78 新しいコメント Рустам 2012.07.01 14:53 #341 ストップ-応募しないでください、間違いがありました。直します。 Vasiliy Sokolov 2012.07.01 15:14 #342 Dr.Drain: そろそろコンデンサーを入れる時期なのでしょうか?:-))) いや、遅い先生、そろそろ診断してください。 Рустам 2012.07.01 15:26 #343 //+------------------------------------------------------------------+ //| _2_DoidsSheme.mq4 | //| Copyright © 2012. XrustSolution. mail:xrustx@gmail.com | //| https://www.youtube.com/user/opmlv http://forexrust.info | //+------------------------------------------------------------------+ #property copyright "Copyright © 2012. XrustSolution. mail:xrustx@gmail.com" #property link "https://www.youtube.com/user/opmlv http://forexrust.info" //+------------------------------------------------------------------+ //| Super Global Variables | //+------------------------------------------------------------------+ #property indicator_chart_window #property indicator_buffers 1 #property indicator_color1 Red //+------------------------------------------------------------------+ //| Extern Variables | //+------------------------------------------------------------------+ extern string ЕмкостьКонденсатора = "= Начальный период МА"; extern int Capacity = 50 ; extern string СопротивлениеУтечки = " конденсатора"; extern double Resistance_C1 = 100 ; extern string Резистор_В_Цепи_Заряда = " конденсатора"; extern double Resistance_R1 = 0.13 ; extern string Резистор_В_Цепи_Разряда = " конденсатора"; extern double Resistance_R2 = 0.1 ; extern string Порог_пробоя_Варистора = "Максимальный период"; extern double SafePerid = 100 ; extern string МетодСбросаЗаряда = "true=Ограничение/false=Сброс на 0"; extern bool ResetMetod = true ; extern int MoovingMetod = 0 ; extern int MoovingPrice = 0 ; //+------------------------------------------------------------------+ //| Includes | //+------------------------------------------------------------------+ //#include <OBJECTS_CLASSES.mqh> //#include <AlertsAndSounds.mqh>//GetInfo(""); //+------------------------------------------------------------------+ //| Defines & Global variavles | //+------------------------------------------------------------------+ #define empty EMPTY_VALUE //+------------------------------------------------------------------+ //--- buffers double diods[]; //+------------------------------------------------------------------+ //| Custom indicator initialization function | //+------------------------------------------------------------------+ void init(){ //---- indicators SetIndexStyle(0,DRAW_LINE); SetIndexBuffer(0,diods); //---- return;} //+------------------------------------------------------------------+ void deinit(){return;} //+------------------------------------------------------------------+ void start(){ //---- //---- static int preLimit=0; static double prerp = 0; int i, ii, x, y, counted = IndicatorCounted(); if (counted > 0) counted--; int limit = Bars - counted; int per = Period(); string sy = Symbol(); string txt=""; double res=0,pres=0,diff=0,pdiff=0,koff=0; if(limit<=preLimit){limit=preLimit+1;} //---- for(i=5000;i>=0;i--){ res = iMA(sy,per,1,0,MoovingMetod,MoovingPrice,i); diff = MathAbs(res-iMA(sy,per,1,0,MoovingMetod,MoovingPrice,i+1)); if(diff > pdiff){ koff-=MathAbs(diff-pdiff)/Resistance_R1; }else if(diff < pdiff){ koff+=MathAbs(diff-pdiff)/Resistance_R2; } koff-=1/Resistance_C1; pdiff=diff; if(koff>SafePerid){ if(ResetMetod){ koff = koff-SafePerid; }else{ koff = 0; } } if(koff<-(Capacity-1)){koff=-Capacity+1;} if(Capacity+koff>preLimit){preLimit = Capacity+koff;} diods[i] = iMA(sy,per,Capacity+koff,0,MoovingMetod,MoovingPrice,i+1); } //---- return;} //+------------------------------------------------------------------+ Рустам 2012.07.01 15:26 #344 C-4: いや、先生遅いよ、診断の時間だよ。 私たちの楽しみを止めないでください: ) 削除済み 2012.07.01 15:31 #345 FAQ: なかなかムズカシイ指標をお持ちですね。 Рустам 2012.07.01 15:33 #346 //+------------------------------------------------------------------+ //| _2_DoidsSheme.mq4 | //| Copyright © 2012. XrustSolution. mail:xrustx@gmail.com | //| https://www.youtube.com/user/opmlv http://forexrust.info | //+------------------------------------------------------------------+ #property copyright "Copyright © 2012. XrustSolution. mail:xrustx@gmail.com" #property link "https://www.youtube.com/user/opmlv http://forexrust.info" //+------------------------------------------------------------------+ //| Super Global Variables | //+------------------------------------------------------------------+ #property indicator_chart_window #property indicator_buffers 1 #property indicator_color1 Blue //+------------------------------------------------------------------+ //| Extern Variables | //+------------------------------------------------------------------+ extern string ЕмкостьКонденсатора = "= Начальный период МА"; extern int Capacity = 50 ; extern string СопротивлениеУтечки = " конденсатора"; extern double Resistance_C1 = 100 ; extern string Резистор_В_Цепи_Заряда = " конденсатора"; extern double Resistance_R1 = 0.3 ; extern string Резистор_В_Цепи_Разряда = " конденсатора"; extern double Resistance_R2 = 0.1 ; extern string Порог_пробоя_Варистора = "Максимальный период"; extern double SafePerid = 100 ; extern string МетодСбросаЗаряда = "true=Ограничение/false=Сброс на 0"; extern bool ResetMetod = true ; extern int MoovingMetod = 0 ; extern int MoovingPrice = 0 ; //+------------------------------------------------------------------+ //| Includes | //+------------------------------------------------------------------+ //#include <OBJECTS_CLASSES.mqh> //#include <AlertsAndSounds.mqh>//GetInfo(""); //+------------------------------------------------------------------+ //| Defines & Global variavles | //+------------------------------------------------------------------+ #define empty EMPTY_VALUE //+------------------------------------------------------------------+ //--- buffers double diods[]; //+------------------------------------------------------------------+ //| Custom indicator initialization function | //+------------------------------------------------------------------+ void init(){ //---- indicators SetIndexStyle(0,DRAW_LINE); SetIndexBuffer(0,diods); //---- return;} //+------------------------------------------------------------------+ void deinit(){return;} //+------------------------------------------------------------------+ void start(){ //---- //---- static int preLimit=0; static double prerp = 0; int i, ii, x, y, counted = IndicatorCounted(); if (counted > 0) counted--; int limit = Bars - counted; int per = Period(); string sy = Symbol(); string txt=""; double res=0,pres=0,diff=0,pdiff=0,koff=0; if(limit<=preLimit){limit=preLimit+1;} //---- for(i=5000;i>=0;i--){ res = iMA(sy,per,Capacity+koff,0,MoovingMetod,MoovingPrice,i); diff = MathAbs(res-iMA(sy,per,Capacity+koff,0,MoovingMetod,MoovingPrice,i+1)); if(diff > pdiff){ koff-=MathAbs(diff-pdiff)/Resistance_R1; }else if(diff < pdiff){ koff+=MathAbs(diff-pdiff)/Resistance_R2; } koff-=1/Resistance_C1; pdiff=diff; if(koff>SafePerid){ if(ResetMetod){ koff = koff-SafePerid; }else{ koff = 0; } } if(koff<-(Capacity-1)){koff=-Capacity+1;} if(Capacity+koff>preLimit){preLimit = Capacity+koff;} diods[i] = iMA(sy,per,Capacity+koff,0,MoovingMetod,MoovingPrice,i+1); } //---- return;} //+------------------------------------------------------------------+ フィードバックあり Рустам 2012.07.01 15:36 #347 DmitriyN: なかなかムズカシイ指標をお持ちですね。 そこに何を期待したのでしょうか? 削除済み 2012.07.01 15:42 #348 FAQ: ラスタムさん、どんなスキームでもMQLコードにできるんですか?ユーモアではなく、真剣に聞いているんです。 Рустам 2012.07.01 15:46 #349 MQL => Scheme : 質問なし Scheme =>MQL : 言語の行列が許す限り。 ただ、最初の場合、鉄でやってくれとは言わないでください、私は怠け者なので :)) Рустам 2012.07.01 15:51 #350 ...ふむ。最初のバリエーションは、もう少し掘り下げる必要があり(市場の実情に合わせるため)、ベースに送ることができます。アダプティブMAとしては、まずまずの出来ではないでしょうか。 1...282930313233343536373839404142...78 新しいコメント 取引の機会を逃しています。 無料取引アプリ 8千を超えるシグナルをコピー 金融ニュースで金融マーケットを探索 新規登録 ログイン スペースを含まないラテン文字 このメールにパスワードが送信されます エラーが発生しました Googleでログイン WebサイトポリシーおよびMQL5.COM利用規約に同意します。 新規登録 MQL5.com WebサイトへのログインにCookieの使用を許可します。 ログインするには、ブラウザで必要な設定を有効にしてください。 ログイン/パスワードをお忘れですか? Googleでログイン
そろそろコンデンサーを入れる時期なのでしょうか?:-)))
いや、遅い先生、そろそろ診断してください。
いや、先生遅いよ、診断の時間だよ。
私たちの楽しみを止めないでください: )
フィードバックあり
なかなかムズカシイ指標をお持ちですね。
そこに何を期待したのでしょうか?
MQL => Scheme : 質問なし
Scheme =>MQL : 言語の行列が許す限り。
ただ、最初の場合、鉄でやってくれとは言わないでください、私は怠け者なので :))