[ARCHIVE] フォーラムを散らかさないように、どんなルーキーでも質問してください。プロフェッショナルは、通り過ぎないでください。Nowhere without you - 3. - ページ 329

 
emilien:
extern int variable = 0;
extern intshift= 0.0000;
extern intshift2= 0.0000;
int init()
{
//----

//----
return(0)です。
}
//+------------------------------------------------------------------+
//| 専門家による初期化関数
//+------------------------------------------------------------------+
int deinit()
{
//----

//----
return(0)です。
}
//+------------------------------------------------------------------+
//| エキスパートスタート機能
//+------------------------------------------------------------------+
int start()
{
//----
SetLabel("MA_LABEL",DoubleToStr(iMA(Symbol(),15,変数,0,MODE_SMA,PRICE_CLOSE,0),シフト,2),Bisque,735,277,0,14))。
SetLabel("MA_LABEL2",DoubleToStr(iMA(Symbol(),15,variable,0,MODE_SMA,PRICE_CLOSE,0),shift2,2),Bisque,680,277,0,14)
//----
return(0)です。
}
//+------------------------------------------------------------------+


void SetLabel(string nm, string tx, color cl, int xd, int yd, int cr=0, int fs=9) { { SetLabel(string nm, string tx, color cl, int xd, int yd, int cr=0, int fs=9) }.
if (ObjectFind(nm)<0) ObjectCreate(nm, OBJ_LABEL, 0, 0,0);
ObjectSetText(nm, tx, fs)です。
ObjectSet(nm, OBJPROP_COLOR, cl)です。
ObjectSet(nm, OBJPROP_XDISTANCE, xd);
ObjectSet(nm, OBJPROP_YDISTANCE, yd)です。
ObjectSet(nm, OBJPROP_CORNER, cr)です。
ObjectSet(nm, OBJPROP_FONTSIZE, fs)です。
}




垂直方向のシフト アップとシフト2 ダウンのインデントができません。
このパラメータは、チャートごとに異なる設定をする必要があります。
コンパイルタイムエラーが発生
します。
括弧を見ると、DoubleToStr関数の中に入れていますが、これはシフトできません。
 
ilunga:

TbとTsは、TPbとTPsという意味ですか。

すべての値をアンロードして、何が得られるか確認します。

失礼しました!!!


double pb = Ask+20*Point;

double ps = Bid-20*Point;

double TPb = Ask+50*Point;

double TPs = Bid-50*Point;

ticket=OrderSend(Symbol(),OP_BUYSTOP,0.01,Ask+q*Point,5,0,Ask+50*Point,「あ」「ん」「0」CLR_NONE)とする。

ticket=OrderSend(Symbol(,OP_SELLSTOP,0.01,Bid-q*Point,5,0,Bid-50*Point, "Aw",mn,0,CLR_NONE));

if (!ticket) Print(GetLastError());

}

}

ticket=OrderTicket()。

for (ii=OrdersTotal(); ii>0; ii--)

{

if (OrderSelect(ii,SELECT_BY_POS,MODE_TRADES)==true)

{

if (OrderComment()=="Aw")

{

if (OrderType()==OP_BUYSTOP)

{

t=OrderModify(OrderTicket(),pb,0,TPb,0,CLR_NONE);

if (!t) Print("BUY OBUYSTOP = ",GetLastError());

}

if (OrderType()==OP_SELLSTOP)

{

t=OrderModify(OrderTicket(),ps,0,TPs,0,CLR_NONE);

if (!t) Print("SELL OVERSTOP = ",GetLastError()")

}

}

}

}

これはログからです。

13:55:47 0 EURUSD,M1: 修正 #736403688売りストップ 0.01 EURUSD at 1.3622 sl: 0.0000 tp: 1.3592 ok

13:55:47 0 eurusd,m1: ショート売り = 1

13:55:53 0 EURUSD,M1: 修正 #736403688 売りストップ0.01 EURUSD at 1.3623 sl: 0.0000 tp: 1.3593 ok

13:55:53 0 eurusd,m1: 売りショート = 1

13:55:54 0 EURUSD,M1: 修正 #736403688 売りストップ0.01 EURUSD at 1.3622 sl: 0.0000 tp: 1.3592 ok

13:55:54 0 eurusd,m1: 売りショート = 1

13:55:55 0 EURUSD,M1: 修正 #736403688 売りストップ0.01 EURUSD at 1.3623 sl: 0.0000 tp: 1.3593 ok

ノークレーム・ノーリターン

ありがとうございました。

 
smartemiy:

すまん


...

for (ii=OrdersTotal(); ii>0; ii--)

...

byeは変更しません

よろしくお願いします。

ナンバリングはゼロから始まる。ループを 1 に移動します。

for (ii=OrdersTotal()-1; ii>=0; ii--)

 
ilunga:
括弧を見ると、関数 DoubleToStr の中に入れているため、シフトすることができません。

左小括弧

の場合、エラー座標は一番端の中括弧の部分です。

でも、このブラケットは正常です。

それは何でしょう?


 
emilien:

左小括弧

の場合、エラー座標は一番端の中括弧の部分です。

でも、このブラケットは正常です。

それは何でしょう?


が抜けているので、戦っています。よく見てください。
 
ilunga:

ナンバリングはゼロから始まる。ループを 1 に移動します。

for (ii=OrdersTotal()-1; ii>=0; ii--)

ありがとうございます!!問題はそこだったんです。

--------------------------------------------------------------

なぜエラーが出るのですか?

15:38:55 0 eurusd,m1: 売りソックス = 1

15:38:55 0 eurusd,m1: 買いショート = 1

 
皆さん、ありがとうございます!うまくいっています。=)
 
Roman.:


これはPascalではないので、手続きはありません...:-)1つの機能、1つの価値...:-)

GetMarketInfo f-file of all orders closing script - using arrays is possibleを参照してください。


ありがとうございます。
 

こんにちは!「白」と「緑」のバーが交互に現れる頻度を公式化し、アルゴリズム化するにはどうすればよいでしょうか?

 
Shniperson:

こんにちは!「白」と「緑」のバーが交互に現れる頻度を公式化し、アルゴリズム化するにはどうすればよいでしょうか?


何でも可能です。

どのようなのこぎりか...