İndikatör Formülleri Accumulation Percentage

Accumulation Percentage Tom Strickland Per:=Input('Time Periods',1,60,21); X := (2 * C - H - L)/(H - L); TVA:= Sum(V * x, Per); TV := Sum(V, Per); VA := 100 * TVA / TV; VA ATR Custom Indicator Y. Hardarson Per:= Input('ATR Periods?',1,100,10); TH := If(Ref(C, -1) > H, Ref(C, -1), H); TL := If(Ref(C, -1) < L, Ref(C, -1), L); TR := TH - TL; Mov(TR, Per, S) Average-Modified Method J. Kaufman The New Commodity Trading Systems and Methods, by Perry J. Kaufman Chapter 4 - Moving Averages, pg. 60. Day:=Cum(1)+1; Z :=Input('Periods',2,1000,10); MV :=(1/Z); If(Day<(Z + 2), C, If(day=(Z + 2), Mov(C, LastValue(Z), S),PREV + (MV * (C - PREV)))) Denvelope Adam Hafner Lb := Input('Look-Back Period ?',3,100,20); De := Input('Band Deviation ?',.5,3,2); Alp:= 2 / (Lb + 1); Mt := Alp * CLOSE + (1 - Alp) * PREV; Ut := Alp * Mt + (1 - Alp) * PREV; Dt := ((2 - Alp) * Mt - Ut) / (1 - Alp); mt2:= Alp * Abs(C - Dt) + (1 - Alp) * PREV; ut2:= Alp * mt2 + (1 - alp) * PREV; dt2:= ((2 - Alp) * mt2 - ut2) / (1 - Alp); But:= Dt + de * dt2; Blt:= Dt - de * dt2; But; Dt; Blt; Kase Peak Oscilator Cynthia Kase Per1:=Input('Max Length',10,100,30); RWH := (H - Ref(L, -Per1)) / (ATR(Per1) * Sqrt(Per1)); RWL := (Ref(H,-Per1)-L)/(ATR(Per1)*Sqrt(Per1)); Pk := Mov((RWH-RWL),3,W); MN := Mov(Pk,Per1,S); SD := Stdev(Pk,Per1); Val1:= If(MN+(1.33*SD)>2.08,MN+(1.33*SD),2.08); Val2:= If(MN-(1.33*SD)<-1.92,MN-(1.33*SD),-1.92); LN := If(Ref(Pk,-1)>=0 AND Pk>0,Val1,If(Ref(Pk,-1)<=0 AND Pk<0, Val2, 0)); Red := If(Ref(Pk,-1)> Pk, Pk, 0); Grn := If(Pk > Ref(Pk, -1), Pk, 0); Red ; Grn; LN; Kauffman's Adaptive RSI Perry J. Kaufman Period := Input('Period',1,10000,20); sc := Abs(RSI(Period)/100 - .5)*2; If(Cum(1) <= Period, CLOSE, PREV + sc*(CLOSE - PREV)) Recursive Moving Trend Average Lb:=Input('Look-Back Period?',3,100,21); Ty:=Input('1=C 2=H 3=L 4= Median Price',1,4,1); Tv:=If(Ty=1,C,If(Ty=2,H,If(Ty=3,L,MP() ))); Alpha:=2/(LB+1); Bot :=(1-Alpha)*(If(Cum(1)< Lb,Tv,Prev))+Tv; RMTA:=(1-Alpha)*(If(Cum(1)< Lb,Tv,Prev))+ (Alpha*(Tv+Bot-Ref(Bot,-1))); RMTA Smoothed DMI Index henry1224 A:=Mov(PDI(14)-MDI(14),10,S); Red:=If(A Green:=If(A>Ref(A,-1),A,0); Red; Green; Stochastic Momentum Stocks & Commodities magazine Ocak 1993 Sayısı 100 * ( Mov( Mov(C - (.5 * ( HHV(H,13) + LLV(L,13))),25,E),2,E) / (0.5*Mov(Mov( HHV(H,13) - LLV(L,13),25,E),2,E))) Stop Loss Indicator Eric Kendall PeriodsShort:=Input('Periods Short',1,50,10); PeriodsLong:=input('Periods Long',1,50,10); HHV(H,periodsshort)-atr(PeriodsShort); LLV(L,periodslong)+ATR(PeriodsLong); Customisable StochRSI Nicholas Kormanik mp1:=Input('RSI Periods',1,377,13); mp2:=Input('Stoch Periods',1,377,13); mp3:=Input('Slowing Periods',1,377,1); mp4:=Input('EMA Periods',1,377,5); Mov(Sum((RSI(mp1)-LLV(RSI(mp1),mp2)),mp3)/ Sum((.0000001+(HHV(RSI(mp1),mp2)-( LLV(RSI(mp1),mp2)))),mp3),mp4,E)*100 Tema StochRSI Formula Jim Greening Periods := Input('Enter Tema Smoothing Periods',5,233,13); Tema((( RSI( Periods ) - LLV( RSI( Periods ), Periods)) / (( 0.0001+HHV( RSI( Periods ), Periods )) - LLV( RSI( Periods ), Periods ))) - 0.5, Periods) Trend Detection Index M.E. Pee S&C Magazine, Ekim Sayısı, 2001 X:=Input('Number of Periods',5,50,20); am:=Abs(C-Ref(C,-(x-1))); td:=Sum(C-Ref(C,-(x-1)), x); tdi:=(Abs(td)+Sum(am,x))-Sum(am,(2*x)); status:=If(tdi>0,If(td>0 ,1,-1),PREV); tdi; td; status*LastValue( Highest( Max( Abs(tdi),Abs(td)))) True Range Formula Bob Jagow TR:= (H - L + Abs(H - Ref(C,-1)) + Abs(L - Ref(C,-1)) )/2 True Strength Index Stocks & Commodities magazine Ocak 1993 Sayısı 100*(Mov(Mov(ROC(C,1,$),25,E),13,E)/ Mov(Mov(Abs( ROC(C,1,$)),25,E),13,E)) MTF Fixed Balance Point Step Adam Hefner Dw:=If(DayOfWeek()<=Ref(DayOfWeek(),-1),1,0); Wt:=If(Dw=1, {then}(Ref(HighestSince(1,Dw=1,H),-1)+ Ref(LowestSince(1,Dw=1,L),-1) + Ref(C,-1))/3, {else}0); DwP:=ValueWhen(1,Wt>0,Wt); Dwp