ポジションの平均pipsを計算するサブルーチン

おはようございます。キリンです。
実は愛用のノーパソが壊れちゃいまして、
一年以内なので保障修理に出すのですが外部に漏れたらまずいデータの消去とか
バックアップとかが大変でした。
情報扱う商売というのはこういうところ神経質にならないといけないですよね＞＜
さて、今日のお題です。最近こんなコメントをいただきました。

僕の理解度の問題だと思うんですが、全ポジションの平均損益pipsさえ求めれれば問題が解決するということで大丈夫でしょうか。
ということでサブルーチンとして作ってみました。

double AvePips(int magic = -1){   double avePips=0;   double lotsTotal=0;   int ordersTotal = OrdersTotal();      for(int i=0; i<ordersTotal; i++)   {      if(OrderSelect(i, SELECT_BY_POS) == false) break;      if(OrderSymbol() != Symbol()) continue;      if(OrderMagicNumber() != magic && magic!=-1)continue;            int type = OrderType();      int mult;      double lots = OrderLots();      double POINT=Point;       if(Digits==3 || Digits==5)POINT=Point*10;            if(type == OP_BUY)mult=1;      else if(type == OP_SELL)mult=-1;      else continue;            double openPrice = OrderOpenPrice();      double closePrice = OrderClosePrice();            double diffPips = mult*(closePrice - openPrice)/POINT;            lotsTotal += lots;      avePips += diffPips*lots;   }   avePips /= lotsTotal;         return(avePips);}

引数を初期のまま用いれば、全ポジションの平均pipsを返してくれます。
それがマイナスならば、そのマイナス分をプラスにしたところにOrderModifyで指値を入れればいいと思います。
おやっさんさん、こんな内容で大丈夫でしょうか。。。。ちょっと心配ですが。
今日もお読みいただきまして、ありがとうございます。