【検証#01】double型の比較ミス、知らないと致命傷¶

double price = 1.2690 + 0.0003;  // 計算で1.2693を得る
double target = 1.2693;           // リテラルで指定

if(price == target)
{
    Print("一致！");  // ← これが実行されない！？
}

void OnStart()
{
    double price = 1.2690 + 0.0003;
    double target = 1.2693;

    // 表示上は同じ
    Print("price  = ", price);    // 1.2693
    Print("target = ", target);   // 1.2693

    // 内部的な差を確認
    Print("差 = ", DoubleToString(price - target, 20));
    // → 0.00000000000000022204... などの微小な値が出る可能性

    // 比較結果
    if(price == target)
        Print("一致");
    else
        Print("不一致！");  // こちらが実行される可能性あり
}

// 推奨パターン
if(NormalizeDouble(price - target, _Digits) == 0.0)
{
    Print("一致！");
}

// より汎用的なパターン
double epsilon = _Point;  // または任意の許容誤差

if(MathAbs(price - target) < epsilon)
{
    Print("一致！");
}

//+------------------------------------------------------------------+
//|                                    DoubleComparisonTest.mq5      |
//| 「とあるMetaTraderの備忘秘録」様の記事を検証                      |
//| https://fai-fx.hatenadiary.org/entry/20090718/1247924725         |
//+------------------------------------------------------------------+
#property copyright "FXおもしろラボ"
#property link      "https://fx-omoshiro-lab.com/"
#property version   "1.00"
#property script_show_inputs

//+------------------------------------------------------------------+
//| Script program start function                                     |
//+------------------------------------------------------------------+
void OnStart()
{
    Print("=== double型比較テスト ===");

    // テストケース1: 計算結果 vs リテラル
    double calculated = 1.2690 + 0.0003;
    double literal = 1.2693;

    Print("--- ケース1: 計算結果 vs リテラル ---");
    Print("calculated = ", DoubleToString(calculated, 10));
    Print("literal    = ", DoubleToString(literal, 10));
    Print("差         = ", DoubleToString(calculated - literal, 20));

    // 危険な比較
    if(calculated == literal)
        Print("== 比較: 一致");
    else
        Print("== 比較: 不一致 ← 危険なパターン！");

    // 正しい比較1: NormalizeDouble
    if(NormalizeDouble(calculated - literal, 5) == 0.0)
        Print("NormalizeDouble: 一致 ✓");
    else
        Print("NormalizeDouble: 不一致");

    // 正しい比較2: MathAbs
    double epsilon = 0.00001;  // 5桁精度
    if(MathAbs(calculated - literal) < epsilon)
        Print("MathAbs: 一致 ✓");
    else
        Print("MathAbs: 不一致");

    Print("");

    // テストケース2: 実際の価格計算（より現実的）
    Print("--- ケース2: 実際の価格計算 ---");
    double entryPrice = 145.500;
    double slDistance = 0.500;
    double slPrice = entryPrice - slDistance;
    double expectedSL = 145.000;

    Print("SL価格     = ", DoubleToString(slPrice, 5));
    Print("期待値     = ", DoubleToString(expectedSL, 5));

    if(NormalizeDouble(slPrice - expectedSL, 3) == 0.0)
        Print("SL判定: 正しく一致 ✓");
    else
        Print("SL判定: 不一致");

    Print("=== テスト完了 ===");
}

// 悪い例 ❌
if(Bid == targetPrice)  // 完全一致を求めている
{
    // 執行処理
}

// 良い例 ✓
if(Bid >= targetPrice)  // 不等号で判定
{
    // 執行処理
}

// より厳密な例 ✓
if(NormalizeDouble(Bid - targetPrice, _Digits) >= 0)
{
    // 執行処理
}

// 新しいSLが現在のSLより良いか判定
double newSL = Bid - trailDistance * _Point;
double currentSL = PositionGetDouble(POSITION_SL);

// 悪い例 ❌
if(newSL > currentSL)  // double同士の不等号は基本的にOKだが...

// より安全な例 ✓
if(NormalizeDouble(newSL - currentSL, _Digits) > 0)
{
    // SL更新処理
}