Top Page



パラメーターで円換算ペアとドル換算ペアを振り分ける処理
パラメーターを使用して処理を振り分けます。
具体的には、１つ前の価格表示プログラムを「円換算通貨ペア」と「ドル換算通貨ペア」に対応します（小数点の処理が異なります）。
その振り分けをインジケーターをチャートに挿入するときのパラメーターで設定するというものです。

・「円換算の場合」
　①インジケーターをチャートに挿入する時に、「パラメーターの入力」タブを開きます。
　②「FLG_DOL0_YEN1」の「Value」に"１"を設定します。
③画面左上に価格（小数点以下３桁）が表示されます。
・「ドル換算の場合」
　①インジケーターをチャートに挿入する時に、「パラメーターの入力」タブを開きます。
　②「FLG_DOL0_YEN1」の「Value」に"０"を設定します。
③画面左上に価格（小数点以下５桁）が表示されます。
◎解説
［１］パラメーターの設定
　　　　extern int FLG_DOL0_YEN1 = 1; //ドル換算か円換算か　【０：ドル】【１：円】
　　「FLG_DOL0_YEN1」というパラメーターを設定します。
　　初期値を"１"に設定しています。
　　メイン処理で、"０"の場合は、ドル換算の処理を行い、それ以外の場合は円換算の処理を行います。
　　今回はパラメーターのプログラムに慣れることが目的なので振り分け処理は簡略化しました。
　　つまり、"０"もしくは"１"以外の処理は、プログラミングしていません。了承ください。

［２］メイン処理
　　パラメーターの値によって振り分けられる処理の違いは、小数点の桁処理です。
　　ドル換算の場合は、小数点以下５桁まで求めます。
　　円換算の場合は、小数点以下３桁まで求めます。


◎以下、プログラム
//+----------------------------------------------------------------------------+
//| インジ １－２ パラメーターで円換算ペアとドル換算ペアを振り分ける処理 |
//+----------------------------------------------------------------------------+
//----------------
//プロパティの設定
//----------------
//インジケーターをチャートウィンドウに表示する
#property indicator_chart_window

//----------------
//パラメーターの設定
//----------------
extern int FLG_DOL0_YEN1 = 1; //ドル換算か円換算か　【０：ドル】【１：円】

//----------------
//定数の定義
//----------------
#define OBJ_DISP_01 "OBJ_DISP_01" //オブジェクト名
#define STR_LAVEL_FONT "ＭＳ　ゴシック" //ラベルのフォント

//+----------------------------------------------------------------------------+
//| 初期処理関数 |
//+----------------------------------------------------------------------------+
//プログラム起動時に１回だけ呼び出される関数
//今回は特に処理なし
int init()
{
return(0);
}
//+----------------------------------------------------------------------------+
//| 終了処理関数 |
//+----------------------------------------------------------------------------+
//プログラム終了時に呼び出される関数
int deinit()
{
//オブジェクト削除
ObjectDelete(OBJ_DISP_01);

return(0);
}

//+----------------------------------------------------------------------------+
//| メイン処理関数 |
//+----------------------------------------------------------------------------+
//価格が更新される度に呼び出される関数
int start()
{
double WK_DBL_PRICE=0; //作業用　価格

//オブジェクト削除
ObjectDelete(OBJ_DISP_01);
// 価格表示
WK_DBL_PRICE = ((Ask+Bid)/2);
ObjectCreate(OBJ_DISP_01,OBJ_LABEL,0,0,0);
ObjectSet(OBJ_DISP_01,OBJPROP_XDISTANCE,10);
ObjectSet(OBJ_DISP_01,OBJPROP_YDISTANCE,10);

//ドル換算か円換算かのフラグ判定
//フラグ"0"の場合ドル換算の処理。小数点以下５桁計算。
if(FLG_DOL0_YEN1 == 0)
{
ObjectSetText(OBJ_DISP_01,DoubleToStr(WK_DBL_PRICE,5),28,STR_LAVEL_FONT,MediumSlateBlue);
}
//フラグ"0"以外の場合円換算の処理。小数点以下３桁計算。
//ここでは、パラメーターの設定処理に慣れることが目的のため、
//フラグの設定値が異常の場合の処理はあえて行いません。
//よってフラグが"0"以外の場合は、円換算の処理とするロジックにします。
else
{
ObjectSetText(OBJ_DISP_01,DoubleToStr(WK_DBL_PRICE,3),28,STR_LAVEL_FONT,MediumSlateBlue);
}

return(0);
}

//+----------------------------------------------------------------------------+