Stock Portfolio Organizer

The ultimate porfolio management solution.

Shares, Margin, CFD's, Futures and Forex
EOD and Realtime
Dividends and Trust Distributions
And Much More ....
For Portfolio Manager Click Here

WiseTrader Toolbox

#1 Selling Amibroker Plugin featuring:

Advanced Adaptive Indicators
Advanced Pattern Exploration
Neural Networks
And Much More ....
Find Out More Here

Intraday Trading Setup for Amibroker (AFL)

Rating:
3 / 5 (Votes 4)
Tags:
trading system, amibroker, bands, intraday

THIS IA A UNIQUE INTRADAY TRADING SETUP USING MANY INDICATORS TO GIVE BUY AND SELL SIGNALS.

Screenshots

Similar Indicators / Formulas

Turtle trading system
Submitted by clerobson almost 12 years ago
Fix Kenzie SR System
Submitted by jachyuen about 13 years ago
Scan Buy Sell & BB
Submitted by morgen over 14 years ago
Extreme Keltner using ATR
Submitted by jenkisan over 12 years ago
Heikin Ashi HaDiffCO
Submitted by kaiji almost 15 years ago
RMO with BB
Submitted by gvdevan over 14 years ago
You cannot view the code for the following reasons:
  • You must be a member and have contributed at least 1 indicator

13 comments

1. jagdishrgandhi

good afl

2. godisbogus

This afl is FORWARD LOOKING. It is only fit for doing post mortem. This one is a complete waste.

3. mlnd1986

thnx

4. rajchhapani

gud work

5. NAIR7929

grttt

6. target1cr

Please send me this AFL to my email id Removed to test and post results.

7. administrator

Asking for formulas is against the rules. Please refrain from doing so.

8. pranjal4u

_SECTION_BEGIN(“Stochastic”);

periods = Param( “Periods”, 15, 1, 200, 1 );
Ksmooth = Param( “%K avg”, 3, 1, 200, 1 );
Dsmooth = Param( “%D avg”, 3, 1, 200, 1 );
myStochD=StochD( periods , Ksmooth, DSmooth );
myStochK=StochK( periods , Ksmooth);
Overbought=80;
Oversold=20;

Buy = Cross(myStochK, myStochD );
Sell = Cross( myStochD, myStochK );

Plot( myStochD, “Stochastic %D”+_PARAM_VALUES(), ParamColor( “ColorD”, colorRed ), ParamStyle(“StyleD”) );
Plot( myStochK, “Stochastic %K”, ParamColor( “ColorK”, colorGreen ), ParamStyle(“StyleK”) );

PlotShapes(IIf(Sell, shapeHollowDownArrow , shapeNone), colorRed);
PlotShapes(IIf(Buy, shapeHollowUpArrow , shapeNone), colorBlue);

Plot(Overbought,“Overbought Level”,colorRed);
Plot(Oversold,“Oversold Level”,colorGreen);

PlotOHLC( myStochK,myStochK,50,myStochK, "", colorRed, styleCloud | styleClipMinMax, 20, 80 );
PlotOHLC( myStochD,myStochD,50,myStochD, "", colorYellow, styleCloud | styleClipMinMax, 20, 80 );

PlotOHLC( Null,myStochD,myStochK,Null, "", colorBlue, styleCloud);

_SECTION_END();

9. mundo0007

Hi,

Please could you explain what the colored bars below the graph and the middle row changes color (blue / red), thanks.

10. alwaheed

_SECTION_BEGIN(“ibrah”);

SetChartOptions(0,chartShowArrows|chartShowDates);
SetChartBkColor(ParamColor(“Outer panel”,colorBlack)); // color of outer border
SetChartBkGradientFill( ParamColor(“Inner panel upper”,colorBlack),ParamColor(“Inner panel lower”,colorBlack));
tchoice=Param("Title Selection ",2,1,2,1);

//// Vchart
//This was converted from code created for TradeStation by Mark W. Helweg of ValueCharts.com
VarNumbars = Param(“Number of candlestick”,5,2,1000,1);
Color = Param(“Bar Color”,colorBlue);
Top = Param(“Top Chart Line”,8);
TopMid = Param(“Top Mid Chart Line”,4);
BottomMid = Param(“Bottom Mid Chart Line”,-4);
Bottom = Param(“Bottom Chart Line”,-8);
Plot(Top,“Top Chart Line”,colorRed);
Plot(TopMid,“Top Mid Chart Line”,colorLightGrey);
Plot(BottomMid,“Bottom Mid Chart Line”,colorLightGrey);
Plot(Bottom,“Bottom Chart Line”,colorRed);

LRange = 0;
VarP = round(VarNumBars/5);
if (VarNumBars > 7)
{
VarA=HHV-LLV;
VarR1 = IIf(VarA0 AND VarP1,abs(C-Ref(C,-Varp)),VarA);
VarB=Ref(HHV,-VarP+1)-Ref(LLV,-VarP);
VarR2 = IIf(VarB0 AND VARP1,abs( Ref(C,-VarP)-Ref(C,-Varp*2) ),VarB);
VarC=Ref(HHV,-VarP*2)-Ref(LLV,-VarP*2);
VarR3 = IIf(VarC == 0 AND VarP==1,abs(Ref(C,-Varp*2)-Ref(C,-Varp*3)),VarC);
VarD = Ref(HHV,-VarP*3)-Ref(LLV,-VarP*3);
VarR4 = IIf(VarD == 0 AND VarP==1,abs(Ref(C,-Varp*3)-Ref(C,-Varp*4)),VarD);
VarE = Ref(HHV,-VarP*4)-Ref(LLV,-VarP*4);
VarR5 = IIf(VarE == 0 AND VarP==1,abs(Ref(C,-Varp*4)-Ref(C,-Varp*5)),VarE);
LRange=((VarR1+VarR2+VarR3+VarR4+VarR5)/5)*.2;
};

CDelta = abs(C – Ref(C,-1));
if (VarNumBars <=7)
{
Var0 = IIf(CDelta > (H-L) OR H==L,CDelta,(H-L));
LRange = MA*.2;
}
MidBarAverage = MA/2,VarNumbars);
VOpen = (Open- MidBarAverage)/LRange;
VHigh = (High-MidBarAverage)/LRange;
VLow = (Low-MidBarAverage)/LRange;
VClose = (Close-MidBarAverage)/LRange;
PlotOHLC(VOpen,VHigh,VLow,VClose,“ValueChart”,color,styleCandle| styleThick ,-12,12);
Title= Name() + " " + WriteVal( DateTime(), formatDateTime )+
“\nVOpen " + VOpen + “\n”+ " VHigh "+ VHigh + “\n”+ " VLow " + Vlow + “\n”+ " VClose " + VClose;
Filter = Volume > 50000;
AddColumn( VOpen, “VOpen”);
AddColumn( VHigh, “VHigh”);
AddColumn( VLow, “VLow”);
AddColumn( VClose, “VClose”);
_SECTION_END();

11. abubargas

thaaaaaaaaaaaaaaaaaaaaaaanks

12. walidgouied

WHY MUST SHARE

Comment hidden - Show

Leave Comment

Please login here to leave a comment.

Back