Simple Scanner.afl

Simple Scanner.afl

_SECTION_BEGIN("Simple Scanner");

//Logical Filtering of Stocks
Filter = ROC(C,12)>4 AND ROC(C,12)<7 AND C>100;

//Track Status and Text Interpretation
ratestatus = WriteIf(ROC(C,12)>4 AND ROC(C,12)<5,"Lower ROC",WriteIf(ROC(C,12)<7,"Higher ROC","Medium ROC"));
ratecolor = IIf(ROC(C,12)>4 AND ROC(C,12)<5,colorGreen,IIf(ROC(C,12)<7,colorBlue,colorYellow));


//Plot Values
AddColumn(C,"Close",1.2);
AddColumn(RSI(14),"RSI-14",1.2);
AddColumn(ROC(C,1),"%Change",1.2);
AddColumn(ROC(C,12),"ROC",1.2,colorWhite,IIf(ROC(C,12)>5,colorGreen,colorRed));

//Plot Text Interpretation
AddTextColumn(ratestatus,"ROC Status",1,colorWhite,ratecolor);