tpl投稿
このコーナーでは、テンプレートファイル *.tpl を紹介しています。
テンプレートファイルは、掲示板に添付するか、このページの編集画面から添付できます。
投稿
Marcket Info v2 - 名無しさん (2008年11月16日 19時47分42秒)
#property copyright "Copyright ゥ 2007, MetaQuotes Software Corp."
#property link "http://www.megadelfi.com/experts/"
#property indicator_chart_window
extern int x = 20 ;
extern int y = 10;
extern int size= 15 ;
extern bool ShowMarketInfo = true;
extern bool ShowAccountStatus = true;
extern string myobj = "uGj8JgG7"; // random string to give unique name to the objects
extern double startinglevel = 2.0345;
extern color textcolor = LightSteelBlue;
extern int startbarno = 1;
extern int spacebetweenlines = 5;
double nextlinelevel = 0;
int counter = 0;
double ModeLow,ModeLow2;
double ModeHigh;
double ModeTime;
double ModeBid;
double ModeAsk;
double ModePoint;
double ModeDigits;
double ModeSpread;
double ModeStopLevel;
double ModeFreezeLevel;
double ModeLotSize;
double ModeTickValue;
double ModeTickSize;
double ModeSwapLong;
double ModeSwapShort;
double ModeStarting;
double ModeExpiration;
double ModeTradeAllowed;
double ModeMinLot;
double ModeLotStep;
int init()
{ AccountStatus(); GetMarketInfo(); return(0); }
int deinit()
{int i; for (i=counter;i>0;i--) ObjectDelete(myobj+i); return(0);} int start() {int counted_bars=IndicatorCounted(); return(0);}
int PrintOnGraph(string mytext)
{if (nextlinelevel == 0) nextlinelevel = startinglevel; else nextlinelevel = nextlinelevel -spacebetweenlines*Point; counter++; ObjectCreate(myobj+counter, OBJ_LABEL, 0, Time[startbarno], nextlinelevel); ObjectSet(myobj+counter, OBJPROP_CORNER, 0); ObjectSet(myobj+counter, OBJPROP_XDISTANCE, x); ObjectSet(myobj+counter, OBJPROP_YDISTANCE, 10+counter*20); ObjectSet(myobj+counter, OBJPROP_COLOR, textcolor); ObjectSet(myobj+counter, OBJPROP_BACK, true); ObjectSetText(myobj+counter, mytext, size); return ( 0 );}
int AccountStatus()
{if(ShowAccountStatus == True ) { PrintOnGraph ("口座: "+ DoubleToStr(AccountBalance(),Digits)); PrintOnGraph ("AccountCompany: "+ DoubleToStr(AccountCompany(),Digits)); PrintOnGraph ("AccountCredit: "+ DoubleToStr(AccountCredit(),Digits)); PrintOnGraph ("AccountCurrency: "+ DoubleToStr(AccountCurrency(),Digits)); PrintOnGraph ("AccountEquity: "+ DoubleToStr(AccountEquity(),Digits)); PrintOnGraph ("AccountFreeMargin: "+ DoubleToStr(AccountFreeMargin(),Digits)); PrintOnGraph ("AccountLeverage: "+ DoubleToStr(AccountLeverage(),Digits)); PrintOnGraph ("AccountMargin: "+ DoubleToStr(AccountMargin(),Digits)); PrintOnGraph ("AccountName: "+ AccountName()); PrintOnGraph ("AccountNumber: "+ DoubleToStr(AccountNumber(),Digits)); PrintOnGraph ("AccountProfit: "+ DoubleToStr(AccountProfit(),Digits)); } return ( 0 );}
int GetMarketInfo()
{ // Schityvaem informatsiyu o rynke ModeLow = MarketInfo(Symbol(), MODE_LOW); ModeHigh = MarketInfo(Symbol(), MODE_HIGH); ModeTime = MarketInfo(Symbol(), MODE_TIME); ModeBid = MarketInfo(Symbol(), MODE_BID); ModeAsk = MarketInfo(Symbol(), MODE_ASK); ModePoint = MarketInfo(Symbol(), MODE_POINT); ModeDigits = MarketInfo(Symbol(), MODE_DIGITS); ModeSpread = MarketInfo(Symbol(), MODE_SPREAD); ModeStopLevel = MarketInfo(Symbol(), MODE_STOPLEVEL); ModeFreezeLevel = MarketInfo(Symbol(), MODE_FREEZELEVEL); ModeLotSize = MarketInfo(Symbol(), MODE_LOTSIZE); ModeTickValue = MarketInfo(Symbol(), MODE_TICKVALUE); ModeTickSize = MarketInfo(Symbol(), MODE_TICKSIZE); ModeSwapLong = MarketInfo(Symbol(), MODE_SWAPLONG); ModeSwapShort = MarketInfo(Symbol(), MODE_SWAPSHORT); ModeStarting = MarketInfo(Symbol(), MODE_STARTING); ModeExpiration = MarketInfo(Symbol(), MODE_EXPIRATION); ModeTradeAllowed = MarketInfo(Symbol(), MODE_TRADEALLOWED); ModeMinLot = MarketInfo(Symbol(), MODE_MINLOT); ModeLotStep = MarketInfo(Symbol(), MODE_LOTSTEP); // Vyvodim informatsiyu o rynke if ( ShowMarketInfo == True ) { PrintOnGraph("Low: "+DoubleToStr(ModeLow,Digits)); PrintOnGraph("High: "+DoubleToStr(ModeHigh,Digits)); PrintOnGraph("ModeTime: "+DoubleToStr(ModeTime,Digits)); PrintOnGraph("Bid: "+DoubleToStr(ModeBid,Digits)); PrintOnGraph("Ask: "+DoubleToStr(ModeAsk,Digits)); PrintOnGraph("ModePoint: "+DoubleToStr(ModePoint,Digits)); PrintOnGraph("ModeDigits: "+DoubleToStr(ModeDigits,Digits)); PrintOnGraph("スプレッド: "+DoubleToStr(ModeSpread,Digits)); PrintOnGraph("ModeStopLevel: "+DoubleToStr(ModeStopLevel,Digits)); PrintOnGraph("ModeFreezeLevel: "+DoubleToStr(ModeFreezeLevel,Digits)); PrintOnGraph("ModeLotSize: "+DoubleToStr(ModeLotSize,Digits)); PrintOnGraph("ModeTickValue: "+DoubleToStr(ModeTickValue,Digits)); PrintOnGraph("ModeTickSize: "+DoubleToStr(ModeTickSize,Digits)); PrintOnGraph("スワップロング: "+DoubleToStr(ModeSwapLong,Digits)); PrintOnGraph("スワップショート: "+DoubleToStr(ModeSwapShort,Digits)); PrintOnGraph("ModeStarting: "+DoubleToStr(ModeStarting,Digits)); PrintOnGraph("ModeExpiration: "+DoubleToStr(ModeExpiration,Digits)); PrintOnGraph("ModeTradeAllowed: "+DoubleToStr(ModeTradeAllowed,Digits)); PrintOnGraph("ModeMinLot: "+DoubleToStr(ModeMinLot,Digits)); PrintOnGraph("ModeLotStep: "+DoubleToStr(ModeLotStep,Digits)); } return (0);}
MarketInfo.mq4 - 名無しさん (2008年11月15日 12時23分52秒)
訂正Ver
#property copyright "Copyright ゥ 2007, MetaQuotes Software Corp."
#property link "http://www.megadelfi.com/experts/"
#property indicator_chart_window
extern bool ShowMarketInfo = true;
extern bool ShowAccountStatus = true;
extern string myobj = "uGj8JgG7"; // random string to give unique name to the objects
extern double startinglevel = 2.0345;
extern color textcolor = LightSteelBlue;
extern int startbarno = 1;
extern int spacebetweenlines = 5;
double nextlinelevel = 0;
int counter = 0;
double ModeLow;
double ModeHigh;
double ModeTime;
double ModeBid;
double ModeAsk;
double ModePoint;
double ModeDigits;
double ModeSpread;
double ModeStopLevel;
double ModeFreezeLevel;
double ModeLotSize;
double ModeTickValue;
double ModeTickSize;
double ModeSwapLong;
double ModeSwapShort;
double ModeStarting;
double ModeExpiration;
double ModeTradeAllowed;
double ModeMinLot;
double ModeLotStep;
int init()
{
AccountStatus();
GetMarketInfo();
return(0); }
int deinit()
{ int i; for (i=counter;i>0;i--) ObjectDelete(myobj+i); return(0); }
int start()
{ int counted_bars=IndicatorCounted(); return(0); }
int PrintOnGraph(string mytext)
{
if (nextlinelevel == 0)
nextlinelevel = startinglevel;
else
nextlinelevel = nextlinelevel -spacebetweenlines*Point;
counter++;
ObjectCreate(myobj+counter, OBJ_LABEL, 0, Time[startbarno], nextlinelevel); ObjectSet(myobj+counter, OBJPROP_CORNER, 0); ObjectSet(myobj+counter, OBJPROP_XDISTANCE, 400); ObjectSet(myobj+counter, OBJPROP_YDISTANCE, 10+counter*10); ObjectSet(myobj+counter, OBJPROP_COLOR, textcolor); ObjectSet(myobj+counter, OBJPROP_BACK, true); ObjectSetText(myobj+counter, mytext, 8);
return ( 0 );
}
int AccountStatus()
{ if(ShowAccountStatus == True ) { Print ("AccountBalance:", AccountBalance()); Print ("AccountCompany:", AccountCompany()); Print ("AccountCredit:", AccountCredit()); Print ("AccountCurrency:", AccountCurrency()); Print ("AccountEquity:", AccountEquity()); Print ("AccountFreeMargin:", AccountFreeMargin()); Print ("AccountLeverage:", AccountLeverage()); Print ("AccountMargin:", AccountMargin()); Print ("AccountName:", AccountName()); Print ("AccountNumber:", AccountNumber()); Print ("AccountProfit:", AccountProfit()); PrintOnGraph ("AccountBalance: "+ AccountBalance()); PrintOnGraph ("AccountCompany: "+ AccountCompany()); PrintOnGraph ("AccountCredit: "+ AccountCredit()); PrintOnGraph ("AccountCurrency: "+ AccountCurrency()); PrintOnGraph ("AccountEquity: "+ AccountEquity()); PrintOnGraph ("AccountFreeMargin: "+ AccountFreeMargin()); PrintOnGraph ("AccountLeverage: "+ AccountLeverage()); PrintOnGraph ("AccountMargin: "+ AccountMargin()); PrintOnGraph ("AccountName: "+ AccountName()); PrintOnGraph ("AccountNumber: "+ AccountNumber()); PrintOnGraph ("AccountProfit: "+ AccountProfit()); } return ( 0 ); }
int GetMarketInfo()
{ // Schityvaem informatsiyu o rynke ModeLow = MarketInfo(Symbol(), MODE_LOW); ModeHigh = MarketInfo(Symbol(), MODE_HIGH); ModeTime = MarketInfo(Symbol(), MODE_TIME); ModeBid = MarketInfo(Symbol(), MODE_BID); ModeAsk = MarketInfo(Symbol(), MODE_ASK); ModePoint = MarketInfo(Symbol(), MODE_POINT); ModeDigits = MarketInfo(Symbol(), MODE_DIGITS); ModeSpread = MarketInfo(Symbol(), MODE_SPREAD); ModeStopLevel = MarketInfo(Symbol(), MODE_STOPLEVEL); ModeFreezeLevel = MarketInfo(Symbol(), MODE_FREEZELEVEL); ModeLotSize = MarketInfo(Symbol(), MODE_LOTSIZE); ModeTickValue = MarketInfo(Symbol(), MODE_TICKVALUE); ModeTickSize = MarketInfo(Symbol(), MODE_TICKSIZE); ModeSwapLong = MarketInfo(Symbol(), MODE_SWAPLONG); ModeSwapShort = MarketInfo(Symbol(), MODE_SWAPSHORT); ModeStarting = MarketInfo(Symbol(), MODE_STARTING); ModeExpiration = MarketInfo(Symbol(), MODE_EXPIRATION); ModeTradeAllowed = MarketInfo(Symbol(), MODE_TRADEALLOWED); ModeMinLot = MarketInfo(Symbol(), MODE_MINLOT); ModeLotStep = MarketInfo(Symbol(), MODE_LOTSTEP); // Vyvodim informatsiyu o rynke if ( ShowMarketInfo == True ) { Print("ModeLow:",ModeLow); Print("ModeHigh:",ModeHigh); Print("ModeTime:",ModeTime); Print("ModeBid:",ModeBid); Print("ModeAsk:",ModeAsk); Print("ModePoint:",ModePoint); Print("ModeDigits:",ModeDigits); Print("ModeSpread:",ModeSpread); Print("ModeStopLevel:",ModeStopLevel); Print("ModeFreezeLevel:",ModeFreezeLevel); Print("ModeLotSize:",ModeLotSize); Print("ModeTickValue:",ModeTickValue); Print("ModeTickSize:",ModeTickSize); Print("ModeSwapLong:",ModeSwapLong); Print("ModeSwapShort:",ModeSwapShort); Print("ModeStarting:",ModeStarting); Print("ModeExpiration:",ModeExpiration); Print("ModeTradeAllowed:",ModeTradeAllowed); Print("ModeMinLot:",ModeMinLot); Print("ModeLotStep:",ModeLotStep); PrintOnGraph("ModeLow: "+ModeLow); PrintOnGraph("ModeHigh: "+ModeHigh); PrintOnGraph("ModeTime: "+ModeTime); PrintOnGraph("ModeBid: "+ModeBid); PrintOnGraph("ModeAsk: "+ModeAsk); PrintOnGraph("ModePoint: "+ModePoint); PrintOnGraph("ModeDigits: "+ModeDigits); PrintOnGraph("ModeSpread: "+ModeSpread); PrintOnGraph("ModeStopLevel: "+ModeStopLevel); PrintOnGraph("ModeFreezeLevel: "+ModeFreezeLevel); PrintOnGraph("ModeLotSize: "+ModeLotSize); PrintOnGraph("ModeTickValue: "+ModeTickValue); PrintOnGraph("ModeTickSize: "+ModeTickSize); PrintOnGraph("ModeSwapLong: "+ModeSwapLong); PrintOnGraph("ModeSwapShort: "+ModeSwapShort); PrintOnGraph("ModeStarting: "+ModeStarting); PrintOnGraph("ModeExpiration: "+ModeExpiration); PrintOnGraph("ModeTradeAllowed: "+ModeTradeAllowed); PrintOnGraph("ModeMinLot: "+ModeMinLot); PrintOnGraph("ModeLotStep: "+ModeLotStep); } return (0); }
Marcket Info - 名無しさん (2008年11月15日 12時23分24秒)
これです。
int PrintOnGraph(string mytext)
{
if (nextlinelevel == 0)
nextlinelevel = startinglevel;
else
nextlinelevel = nextlinelevel -spacebetweenlines*Point;
counter++;
ObjectCreate(myobj+counter, OBJ_LABEL, 0, Time[startbarno], nextlinelevel); ObjectSet(myobj+counter, OBJPROP_CORNER, 0); ObjectSet(myobj+counter, OBJPROP_XDISTANCE, 400); ObjectSet(myobj+counter, OBJPROP_YDISTANCE, 10+counter*10); ObjectSet(myobj+counter, OBJPROP_COLOR, textcolor); ObjectSet(myobj+counter, OBJPROP_BACK, true); ObjectSetText(myobj+counter, mytext, 8);
return ( 0 );
}
int AccountStatus()
{ if(ShowAccountStatus == True ) { Print ("AccountBalance:", AccountBalance()); Print ("AccountCompany:", AccountCompany()); Print ("AccountCredit:", AccountCredit()); Print ("AccountCurrency:", AccountCurrency()); Print ("AccountEquity:", AccountEquity()); Print ("AccountFreeMargin:", AccountFreeMargin()); Print ("AccountLeverage:", AccountLeverage()); Print ("AccountMargin:", AccountMargin()); Print ("AccountName:", AccountName()); Print ("AccountNumber:", AccountNumber()); Print ("AccountProfit:", AccountProfit()); PrintOnGraph ("AccountBalance: "+ AccountBalance()); PrintOnGraph ("AccountCompany: "+ AccountCompany()); PrintOnGraph ("AccountCredit: "+ AccountCredit()); PrintOnGraph ("AccountCurrency: "+ AccountCurrency()); PrintOnGraph ("AccountEquity: "+ AccountEquity()); PrintOnGraph ("AccountFreeMargin: "+ AccountFreeMargin()); PrintOnGraph ("AccountLeverage: "+ AccountLeverage()); PrintOnGraph ("AccountMargin: "+ AccountMargin()); PrintOnGraph ("AccountName: "+ AccountName()); PrintOnGraph ("AccountNumber: "+ AccountNumber()); PrintOnGraph ("AccountProfit: "+ AccountProfit()); } return ( 0 ); }
int GetMarketInfo()
{ // Schityvaem informatsiyu o rynke ModeLow = MarketInfo(Symbol(), MODE_LOW); ModeHigh = MarketInfo(Symbol(), MODE_HIGH); ModeTime = MarketInfo(Symbol(), MODE_TIME); ModeBid = MarketInfo(Symbol(), MODE_BID); ModeAsk = MarketInfo(Symbol(), MODE_ASK); ModePoint = MarketInfo(Symbol(), MODE_POINT); ModeDigits = MarketInfo(Symbol(), MODE_DIGITS); ModeSpread = MarketInfo(Symbol(), MODE_SPREAD); ModeStopLevel = MarketInfo(Symbol(), MODE_STOPLEVEL); ModeFreezeLevel = MarketInfo(Symbol(), MODE_FREEZELEVEL); ModeLotSize = MarketInfo(Symbol(), MODE_LOTSIZE); ModeTickValue = MarketInfo(Symbol(), MODE_TICKVALUE); ModeTickSize = MarketInfo(Symbol(), MODE_TICKSIZE); ModeSwapLong = MarketInfo(Symbol(), MODE_SWAPLONG); ModeSwapShort = MarketInfo(Symbol(), MODE_SWAPSHORT); ModeStarting = MarketInfo(Symbol(), MODE_STARTING); ModeExpiration = MarketInfo(Symbol(), MODE_EXPIRATION); ModeTradeAllowed = MarketInfo(Symbol(), MODE_TRADEALLOWED); ModeMinLot = MarketInfo(Symbol(), MODE_MINLOT); ModeLotStep = MarketInfo(Symbol(), MODE_LOTSTEP); // Vyvodim informatsiyu o rynke if ( ShowMarketInfo == True ) { Print("ModeLow:",ModeLow); Print("ModeHigh:",ModeHigh); Print("ModeTime:",ModeTime); Print("ModeBid:",ModeBid); Print("ModeAsk:",ModeAsk); Print("ModePoint:",ModePoint); Print("ModeDigits:",ModeDigits); Print("ModeSpread:",ModeSpread); Print("ModeStopLevel:",ModeStopLevel); Print("ModeFreezeLevel:",ModeFreezeLevel); Print("ModeLotSize:",ModeLotSize); Print("ModeTickValue:",ModeTickValue); Print("ModeTickSize:",ModeTickSize); Print("ModeSwapLong:",ModeSwapLong); Print("ModeSwapShort:",ModeSwapShort); Print("ModeStarting:",ModeStarting); Print("ModeExpiration:",ModeExpiration); Print("ModeTradeAllowed:",ModeTradeAllowed); Print("ModeMinLot:",ModeMinLot); Print("ModeLotStep:",ModeLotStep); PrintOnGraph("ModeLow: "+ModeLow); PrintOnGraph("ModeHigh: "+ModeHigh); PrintOnGraph("ModeTime: "+ModeTime); PrintOnGraph("ModeBid: "+ModeBid); PrintOnGraph("ModeAsk: "+ModeAsk); PrintOnGraph("ModePoint: "+ModePoint); PrintOnGraph("ModeDigits: "+ModeDigits); PrintOnGraph("ModeSpread: "+ModeSpread); PrintOnGraph("ModeStopLevel: "+ModeStopLevel); PrintOnGraph("ModeFreezeLevel: "+ModeFreezeLevel); PrintOnGraph("ModeLotSize: "+ModeLotSize); PrintOnGraph("ModeTickValue: "+ModeTickValue); PrintOnGraph("ModeTickSize: "+ModeTickSize); PrintOnGraph("ModeSwapLong: "+ModeSwapLong); PrintOnGraph("ModeSwapShort: "+ModeSwapShort); PrintOnGraph("ModeStarting: "+ModeStarting); PrintOnGraph("ModeExpiration: "+ModeExpiration); PrintOnGraph("ModeTradeAllowed: "+ModeTradeAllowed); PrintOnGraph("ModeMinLot: "+ModeMinLot); PrintOnGraph("ModeLotStep: "+ModeLotStep); } return (0); }
EMA 25-50 Trading System - りょすけ (2008年04月27日 02時28分20秒)
ema-25-50.tpl
http://www.forexfactory.com/showthread.php?t=46048
のテンプレートです
ボリンジャーバンド 1σ、2σ、3σ
bb.tpl (右クリックして「対象をファイルに保存」)
参考
Powered by FreeStyleWiki / FXテクニカル分析&業者比較Blog / 車中泊まとめWiki