Force Index

Fastperiod:=Input("Enter the Fast EMA period: ",12);

Slowperiod:=Input("Enter the longer EMA period: ",26);

signal:=Input("Enter the number of signal line period: ",9);

FI:=V*(C - hist(C,1)); { Elder's Force Index }

[Name=MACD; color=dodger blue]

ma(FI,Fastperiod,E)-ma(FI,Slowperiod,E);

[name=Signal; linestyle=solid; color=red]

ma(ma(FI,Fastperiod,E) - ma(FI,Slowperiod,E),signal,S);

[color=black] 0;

[linestyle=histogram]

((ma(FI,Fastperiod,E) - ma(FI,Slowperiod,E)) - ma((ma(FI,Fastperiod,E) - ma(FI,Slowperiod,E)),signal,E));