help my afl

help me in this alf how to see score yesterday i want to add column score add yesterday to compare today vs. per day

hi,
you can add following afl to get better result.

_SECTION_BEGIN("[email protected]");
r1 = Param( "Fast avg", 2, 2, 200, 1 );
r2 = Param( "Slow avg", 21, 2, 200, 1 );
A = 0;

TrendColor = IIf(OscP(r1,r2)>0,colorLime,colorRed);
Plot( OscP( r1,r2), _DEFAULT_NAME(), TrendColor, ParamStyle("Histogram style", styleLine| styleHistogram | styleNoLabel, maskHistogram ));

Plot( OscP(r1,r2), _DEFAULT_NAME(), TrendColor, styleLine| styleNoLabel);
Plot ( A, _DEFAULT_NAME(), ParamColor( "A", colorCycle ),styleLine | styleNoLabel);


Buy=Cross(OscP (r1,r2),0);
Sell=Cross(0,OscP(r1,r2));

Buy=ExRem(Buy,Sell);
Sell=ExRem(Sell,Buy);

Short=Sell;
Cover=Buy;

PlotShapes(IIf(Buy, shapeUpArrow, shapeNone),colorGreen);
PlotShapes(IIf(Sell, shapeDownArrow, shapeNone),colorRed);


_SECTION_END();

no my friend i need add in this afl column score yesterday after column score today to compare the movement

plz read it
_SECTION_BEGIN("All in One Explorer - Manish");
i=0;
//52 Week High Low
High52 = HHV(High,250);
Low52 = LLV(Low,250);

//Bollinger Band
BB1=C>BBandTop(C,20,2) AND Ref(C,-1)<Ref(BBandTop(C,20,2),-1);
BB2=C<BBandBot(C,20,2) AND Ref(C,-1)>Ref(BBandBot(C,20,2),-1);
BBStatus=WriteIf(BB1,"Above Top",WriteIf(BB2,"Below Bottom",WriteIf(IsNull(MA(C,20)),"N/A","Bearish")));
BBColor=IIf(BB1,colorRed,IIf(BB2,colorGreen,colorLightGrey));
IIf(BB2,i+1,i);

//Moving Average (Short, Mid & Long Term)
MAShort = C>MA(C,15);
IIf(MAShort,i+1,i);
MAMid = C>MA(C,45);
IIf(MAMid,i+1,i);
MALong = C>MA(C,100);
IIf(MALong,i+1,i);
ShortStatus = WriteIf(MAShort,"Bullish",WriteIf(IsNull(MA(C,15)) ,"N/A","Bearish"));
ShortColor = IIf(MAShort,colorGreen,colorRed);
MidStatus = WriteIf(MAMid,"Bullish",WriteIf(IsNull(MA(C,45))," N/A","Bearish"));
MidColor = IIf(MAMid,colorGreen,colorRed);
LongStatus = WriteIf(MALong,"Bullish",WriteIf(IsNull(MA(C,100)) ,"N/A","Bearish"));
LongColor = IIf(MALong,colorGreen,colorRed);

//MACD
MACDBull=MACD(12,26)>Signal(12,26,9);
IIf(MACDBull,i+1,i);
MACDStatus=WriteIf(MACDBull,"Bullish",WriteIf(IsNull(MACD(12,26)),"N/A","Bearish"));
MACDColor=IIf(MACDBull,colorGreen,colorRed);

//Aroon
Period=14;
LLVBarsSince=LLVBars(L,Period)+1;
HHVBarsSince=HHVBars(H,Period)+1;
AroonDown=100*(Period-LLVBarsSince)/(Period-1);
AroonUp=100*(Period-HHVBarsSince)/(Period-1);
AroonOsc=AroonUp-AroonDown;
Aroon=AroonOsc>0;
IIf(Aroon,i+1,i);
AroonStatus=WriteIf(Aroon,"Bullish",WriteIf(IsNull (RSI(14)),"N/A","Bearish"));
AroonColor=IIf(Aroon,colorGreen,IIf(IsNull(RSI(14) ),colorLightGrey,colorRed));

//Stochastic
StochKBull=StochK(15,5)>StochD(15,5,5);
IIf(StochKBull,i+1,i);
StochKStatus=WriteIf(StochKBull,"Bullish",WriteIf( IsNull(StochK(15,5)),"N/A","Bearish"));
StochKColor=IIf(StochKBull,colorGreen,colorRed);

//RSI
R1=RSI(14)>30 AND Ref(RSI(14),-1)<30 AND Ref(RSI(14),-2)<30;
R2=RSI(14)<70 AND Ref(RSI(14),-1)>70 AND Ref(RSI(14),-2)>70;
IIf(R1,i+1,i);
RSIStatus=WriteIf(R1,"Improving",WriteIf(R2,"Decli ning",WriteIf(IsNull(RSI(14)),"N/A","Neutral")));
RSIColor=IIf(R1,colorGreen,IIf(R2,colorRed,colorLightGrey));

//MFI
M1=MFI(14)>80;
M2=MFI(14)<20;
IIf(M2,i+1,i);
MFIStatus=WriteIf(M1,"Overbought",WriteIf(M2,"Over sold",WriteIf(IsNull(MFI(14)),"N/A","Neutral")));
MFIColor=IIf(M1,colorRed,IIf(M2,colorGreen,colorLightGrey));


//ADX
B1=ADX(14)>20;
B2=ADX(14)<20;
IIf(B2,i+1,i);
ADXStatus=WriteIf(B1,"Trendy","Neutral");
ADXColor=IIf(B1,colorGreen,IIf(B2,colorRed,colorLightGrey));

//RSIT
T1=RSI(14)>50;
T2=RSI(14)<50;
IIf(T2,i+1,i);
RSITStatus=WriteIf(T1,"Bullish",WriteIf(T2,"Bearish",WriteIf(IsNull(RSI(14)),"N/A","Neutral")));
RSITColor=IIf(T1,colorGreen,IIf(T2,colorRed,colorLightGrey));


TrendScore =

IIf(BB2,1,0)+
IIf(MAShort,1,0)+
IIf(MAMid,1,0) +
IIf(MAMid,1,0) +
IIf(MALong,1,0)+
IIf(MACDBull,1,0) +
IIf(Aroon,1,0) +
IIf(StochKBull,1,0)+
IIf(R1,1,0) +
IIf(M2,1,0) +
IIf(B1,1,0) +
IIf(T1,1,0) ;





/*
TrendScore =

IIf(C>=Ref(C,-11),1,-1)+
IIf(C>=Ref(C,-12),1,-1)+
IIf(C>=Ref(C,-13),1,-1)+
IIf(C>=Ref(C,-14),1,-1)+
IIf(C>=Ref(C,-15),1,-1)+
IIf(C>=Ref(C,-16),1,-1)+
IIf(C>=Ref(C,-17),1,-1)+
IIf(C>=Ref(C,-18),1,-1)+
IIf(C>=Ref(C,-19),1,-1)+
IIf(C>=Ref(C,-20),1,-1)+
IIf(C>=Ref(C,-21),1,-1)+
IIf(C>=Ref(C,-22),1,-1);
*/





Filter = 1;

//AddColumn(High52,"52 Week High");
//AddColumn(Low52,"52 Week Low");
AddColumn(C,"Close",1,IIf(C>Ref(C,-1),colorGreen,colorRed));
AddColumn(V,"Volume",1,IIf(V>Ref(V,-1),colorGreen,colorRed));
AddTextColumn(BBStatus,"BBand",1,colorWhite,BBColor);
AddTextColumn(ShortStatus,"Short MA(15)",1,colorWhite,ShortColor);
AddTextColumn(MidStatus,"Mid MA(45)",1,colorWhite,MidColor);
AddTextColumn(LongStatus,"Long MA(100)",1,colorWhite,LongColor);
AddTextColumn(MACDStatus,"MACD",1,colorWhite,MACDColor);
AddTextColumn(AroonStatus,"Aroon",1,colorWhite,AroonColor);
AddTextColumn(StochKStatus,"Stochastic",1,colorWhite,StochKColor);
AddTextColumn(RSIStatus,"RSI(14)",1,colorWhite,RSIColor);
AddTextColumn(MFIStatus,"MFI(14)",1,colorWhite,MFIColor);
AddTextColumn(ADXStatus,"ADX(14)",1,colorWhite,ADXColor);
AddTextColumn(RSITStatus,"RSI(14)",1,colorWhite,RSITColor);
AddColumn(TrendScore,"Score");
_SECTION_END();

you can visit wisestocktrade.com, will find solution

wheres i searched i cant find it plz if u have this salutation plz tell me any page or any place

Thanks
A good afl for confirmation, when used with other afl.

you can use with 15 min interval. will surprise to see the outcome.

Hi Friends,

I am new in stock market. I use amibroker software for analyses. I want write one simple afl in intraday 30 min candle chart when candle color is green and after

closing these green candle and next candle is break high of previous green candle buy call and vise versa in case of red candle

if any one do these pls try.......

Thanks