안녕하세요 예스스탁입니다. 올려주신식은 사용해본 경험이 없어 식을 예스랭귀지로 변겨을 해드릴수가 없습니다. 저희쪽에서 변경해 드릴수 있는 식은 대신식과 TS식 정도입니다. 도움을 드리지 못해 죄송합니다. 즐거운 하루되세요 > 괌 님이 쓴 글입니다. > 제목 : 부탁드립니다 > 안녕하세요 tradestion 에서 예스로 변환 부탁드립니다. //+------------------------------------------------------------------+ //| StepMA_v7.1.mq4 | //| Copyright ?2006, TrendLaboratory | //| http://finance.groups.yahoo.com/group/TrendLaboratory | //| E-mail: igorad2003@yahoo.co.uk | //+------------------------------------------------------------------+ #property copyright "Copyright ?2006, TrendLaboratory" #property link "http://finance.groups.yahoo.com/group/TrendLaboratory" #property indicator_chart_window #property indicator_buffers 3 #property indicator_color1 Aqua #property indicator_color2 Blue #property indicator_color3 Red //---- input parameters extern int Length = 10; // Volty Length extern double Kv = 1.0; // Sensivity Factor extern int StepSize = 0; // Constant Step Size (if need) extern int MA_Mode = 0; // Volty MA Mode : 0-SMA, 1-LWMA extern int Advance = 0; // Offset extern double Percentage = 0; // Percentage of Up/Down Moving extern bool HighLow = false; // High/Low Mode Switch (more sensitive) extern int ColorMode = 0; // Color Mode Switch extern int BarsNumber = 0; //---- indicator buffers double LineBuffer[]; double UpBuffer[]; double DnBuffer[]; double smin[]; double smax[]; double trend[]; double StepMA=0, ATR0=0,ATRmax=-100000,ATRmin=1000000; int limit; //---- StepSize Calculation double StepSizeCalc ( int Len, double Km, int Size, int k) { double result; if( Size==0 ) { double AvgRange=0; double Weight = 0; for (int i=Len-1;i>=0;i--) { if(MA_Mode==0) double alfa= 1.0; else alfa= 1.0*(Len-i)/Len; AvgRange+= alfa*(High[k+i]-Low[k+i]); Weight += alfa; } ATR0 = AvgRange/Weight; if (ATR0>ATRmax) ATRmax=ATR0; if (ATR0<ATRmin) ATRmin=ATR0; result=MathRound(0.5*Km*(ATRmax+ATRmin)/Point); } else result=Km*StepSize; return(result); } //---- StepMA Calculation double StepMACalc (bool HL, double Size, int k) { int counted_bars=IndicatorCounted(); double result; if (HL) { smax[k]=Low[k]+2.0*Size*Point; smin[k]=High[k]-2.0*Size*Point; } else { smax[k]=Close[k]+2.0*Size*Point; smin[k]=Close[k]-2.0*Size*Point; } if (counted_bars==0){smax[limit+1]=smax[limit];smin[limit+1]=smin[limit];trend[limit+1]=0;} trend[k]=trend[k+1]; if (Close[k]>smax[k+1]) trend[k]=1; if (Close[k]<smin[k+1]) trend[k]=-1; if(trend[k]>0) { if(smin[k]<smin[k+1]) smin[k]=smin[k+1]; result=smin[k]+Size*Point; } else { if(smax[k]>smax[k+1]) smax[k]=smax[k+1]; result=smax[k]-Size*Point; } //Print (" k=",k," trend=",trend[k], " res=",result," Smax=", smax[k], " Smin=", smin[k]); return(result); } //+------------------------------------------------------------------+ //| Custom indicator initialization function | //+------------------------------------------------------------------+ int init() { string short_name; //---- indicator line IndicatorBuffers(6); SetIndexStyle(0,DRAW_LINE,STYLE_SOLID,2); SetIndexStyle(1,DRAW_LINE); SetIndexStyle(2,DRAW_LINE); SetIndexArrow(1,159); SetIndexArrow(2,159); SetIndexBuffer(0,LineBuffer); SetIndexBuffer(1,UpBuffer); SetIndexBuffer(2,DnBuffer); SetIndexShift(0,Advance); SetIndexShift(1,Advance); SetIndexShift(2,Advance); SetIndexBuffer(3,smin); SetIndexBuffer(4,smax); SetIndexBuffer(5,trend); //---- name for DataWindow and indicator subwindow label short_name="StepMA("+Length+","+Kv+","+StepSize+")"; IndicatorShortName(short_name); SetIndexLabel(0,short_name); SetIndexLabel(1,"UpTrend"); SetIndexLabel(2,"DownTrend"); //---- SetIndexDrawBegin(0,Length); SetIndexDrawBegin(1,Length); SetIndexDrawBegin(2,Length); //---- return(0); } //+------------------------------------------------------------------+ //| Custor indicator deinitialization function | //+------------------------------------------------------------------+ int deinit() { //---- //---- return(0); } //+------------------------------------------------------------------+ //| StepMA_v7.1 | //+------------------------------------------------------------------+ int start() { int shift, counted_bars=IndicatorCounted(); if ( BarsNumber > 0 ) int Nbars=BarsNumber; else Nbars=Bars; if ( counted_bars > 0 ) limit=Bars-counted_bars; if ( counted_bars < 0 ) return(0); if ( counted_bars ==0 ) limit=Nbars-Length-1; for(shift=limit;shift>=0;shift--) { int Step = StepSizeCalc( Length, Kv, StepSize, shift); Comment (" StepSize= ", Step); StepMA = StepMACalc ( HighLow, Step, shift)+Percentage/100.0*Step*Point; if ( ColorMode == 0) LineBuffer[shift]=StepMA; if ( ColorMode == 1) { if ( trend[shift]>0 ) {UpBuffer[shift]=StepMA-Step*Point;DnBuffer[shift]=EMPTY_VALUE;} else if ( trend[shift]<0 ) {DnBuffer[shift]=StepMA+Step*Point;UpBuffer[shift]=EMPTY_VALUE;} } else if ( ColorMode == 2) { if (trend[shift]>0) { UpBuffer[shift]=StepMA; if ( trend[shift+1] < 0 ) UpBuffer[shift+1] = DnBuffer[shift+1]; DnBuffer[shift]=EMPTY_VALUE; } if (trend[shift]<0) { DnBuffer[shift]=StepMA; if ( trend[shift+1] > 0 ) DnBuffer[shift+1] = UpBuffer[shift+1]; UpBuffer[shift]=EMPTY_VALUE; } } else { UpBuffer[shift]=EMPTY_VALUE; DnBuffer[shift]=EMPTY_VALUE; } } return(0); }Share Share this post on Digg Del.icio.us Technorati Twitter duhhhh is offline