//+----------------------------------------------------------------------------+//| Автор : Ким Игорь В. aka KimIV, http://www.kimiv.ru |//+----------------------------------------------------------------------------+//| Версия : 19.05.2008 |//| Описание : Возвращает флаг закрытия последней позиции по стопу. |//+----------------------------------------------------------------------------+//| Параметры: |//| sy - наименование инструмента ("" - любой символ, |//| NULL - текущий символ) |//| op - операция (-1 - любая позиция) |//| mn - MagicNumber (-1 - любой магик) |//+----------------------------------------------------------------------------+bool isCloseLastPosByStop(string sy="", int op=-1, int mn=-1) {
datetime t;
double ocp, osl;
int dg, i, j=-1, k=OrdersHistoryTotal();
if (sy=="0") sy=Symbol();
for (i=0; i<k; i++) {
if (OrderSelect(i, SELECT_BY_POS, MODE_HISTORY)) {
if (OrderSymbol()==sy || sy=="") {
if (OrderType()==OP_BUY || OrderType()==OP_SELL) {
if (op<0 || OrderType()==op) {
if (mn<0 || OrderMagicNumber()==mn) {
if (t<OrderCloseTime()) {
t=OrderCloseTime();
j=i;
}
}
}
}
}
}
}
if (OrderSelect(j, SELECT_BY_POS, MODE_HISTORY)) {
dg=MarketInfo(OrderSymbol(), MODE_DIGITS);
if (dg==0) if (StringFind(OrderSymbol(), "JPY")<0) dg=4; else dg=2;
ocp=NormalizeDouble(OrderClosePrice(), dg);
osl=NormalizeDouble(OrderStopLoss(), dg);
if (ocp==osl) return(True);
}
return(False);
}
//+----------------------------------------------------------------------------+//| Автор : Ким Игорь В. aka KimIV, http://www.kimiv.ru |//+----------------------------------------------------------------------------+//| Версия : 19.05.2008 |//| Описание : Возвращает флаг закрытия последней позиции по тейку. |//+----------------------------------------------------------------------------+//| Параметры: |//| sy - наименование инструмента ("" - любой символ, |//| NULL - текущий символ) |//| op - операция (-1 - любая позиция) |//| mn - MagicNumber (-1 - любой магик) |//+----------------------------------------------------------------------------+bool isCloseLastPosByTake(string sy="", int op=-1, int mn=-1) {
datetime t;
double ocp, otp;
int dg, i, j=-1, k=OrdersHistoryTotal();
if (sy=="0") sy=Symbol();
for (i=0; i<k; i++) {
if (OrderSelect(i, SELECT_BY_POS, MODE_HISTORY)) {
if (OrderSymbol()==sy || sy=="") {
if (OrderType()==OP_BUY || OrderType()==OP_SELL) {
if (op<0 || OrderType()==op) {
if (mn<0 || OrderMagicNumber()==mn) {
if (t<OrderCloseTime()) {
t=OrderCloseTime();
j=i;
}
}
}
}
}
}
}
if (OrderSelect(j, SELECT_BY_POS, MODE_HISTORY)) {
dg=MarketInfo(OrderSymbol(), MODE_DIGITS);
if (dg==0) if (StringFind(OrderSymbol(), "JPY")<0) dg=4; else dg=2;
ocp=NormalizeDouble(OrderClosePrice(), dg);
otp=NormalizeDouble(OrderTakeProfit(), dg);
if (ocp==otp) return(True);
}
return(False);
}
次のような疑問があります。init()の中にターミナルをハングアップさせるブロックがあります（これをdllに転送したいのです）。当然、ログを見ることはできません。Ctrl+Alt+Deleteでターミナルを閉じるだけです。トレース（とブロックに入るループの経過時間の測定）のために印刷を解除しても、プリンタは何も書き込まず、ロギングも作成されないのです。同じ目的でFileOpen/FileWriteを使おうとすると、ファイルが作成されるだけで（0Kb）、沈黙してしまいます。FileOpenの次の行にFileWriteを入れましたが、効果はありません。どっちを掘ればいいんだろう？
トピックは終了しました...悪い人。
次のような疑問があります。init()の中にターミナルをハングアップさせるブロックがあります（これをdllに転送したいのです）。当然、ログを見ることはできません。Ctrl+Alt+Deleteでターミナルを閉じるだけです。トレース（および受信ループのトランジットタイム測定）のために印刷を解除しても、プリンタは何も書き込まず、ロギングも作成されません。同じ目的でFileOpen/FileWriteを使おうとすると、ファイルが作成されるだけで（0Kb）、沈黙してしまいます。FileOpenの次の行にFileWriteを入れましたが、効果がありません。掘る方向は？
ほら、属性に隠し事がないでしょ？
隠していないのです。
これを使ってみて ください。それでもダメなら、エラーを探すために、フラグを経由して一時的に一発起動のために言及した初期化ブロックを取り込んで、そこからログを「引っ張って」みるのも手です。
startやininitでの1回限りの起動も、PrintもFileWriteも効きません。このコードの一部を添付します（他の方法が見当たりません）、長すぎるのでここには載せません。バッファの宣言をすべて削除し、そこに内蔵テクニカル指標の呼び出しをすべて記述しています。配列によるメモリのオーバーフローはすでに考えていて、一番大きな配列と他の配列を全部足すと50と1円という計算をしています。まあ、ブロックに入るとき、一番最初の行でも印刷されないとなると...。- というのが気になる。添付のバージョンはFileWriteでそうです。
起動時の一回限りの起動も、ininitも、PrintもFileWriteも効きません。このコードの一部を添付します（他の方法が見当たりません）、長すぎるのでここには貼り付けません。バッファの宣言をすべて削除し、そこに内蔵テクニカル指標の呼び出しをすべて記述しています。配列でメモリがオーバーフローすることは既に考えていて、一番大きな配列と他の配列を全部足すと50.5mになる計算です。まあ、ブロックに入るとき、一番最初の行でも印刷されないとなると...。- というのが気になる。添付のバージョンはFileWriteでそうです。
コードのスタイルでは処分されない。スペースがない、括弧のレベルが違う、操作がいくつも並んでいる、コメントがない...。悪夢だ！:-))
ご自身で理解されているのでしょうか？
彼はその話題を閉じた・・・。良い人ではない。
= :)
ワンタイムスタートアップもイニシャルスタートアップも、PrintもFileWriteも効かない。このコードの一部を添付します（他の方法が見当たりません）、長すぎるのでここには貼り付けません。バッファの宣言をすべて削除し、そこに内蔵テクニカル指標の呼び出しをすべて記述しています。配列でメモリがオーバーフローすることは既に考えていて、一番大きな配列と他の配列を全部足すと50.5mになる計算です。まあ、ブロックに入るとき、一番最初の行でも印刷されないとなると...。- というのが気になる。添付のバージョンはFileWriteでそうです。
Vadimと同意見で、コードは読みにくいです。このコードを機能ブロックに分解し、各ブロックで印刷またはファイルへの 書き込みを行ってみてください。そして、例えばこんな風に、コードの実行を「遅くする」構造で実行します。
次のブロックの実行を1秒遅らせる。- 端末はログを印刷するのに十分な時間があるはずです。
金さんの「STOPによるラストポジションクローズフラグ」と「TAKEによるラストポジションクローズフラグ」には、非常によく似た機能が2つあります。
以下はそのコードです。
ご覧の通り、非常によく似ています。
でも、なぜかSTOPで閉じる のだけはうまくいくんです。
それは動作しますが、私のExpert AdvisorはUNITを印刷せず、NULLを印刷し続けます。
しかし、STOPでのクローズは正しくプリントされます：もしstop = 1なら、そうでなければstop = 0・・・。
助けてください...。
金さんの「STOPによるラストポジションクローズフラグ」と「TAKEによるラストポジションクローズフラグ」には、非常によく似た機能が2つあります。
以下はそのコードです。
ご覧の通り、非常によく似ています。
でも、なぜかSTOPで閉じるのだけはうまくいくんです。
手動でポジションをオープンし、TAKEをショートさせます。それはうまくいきますが、EAはUNITを表示せず、NULLを表示し続けます。
しかし、STOPでのクローズは正しくプリントされます：もしstop = 1なら、そうでなければstop = 0・・・。
このことを理解するのを助けてください....