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

The Unique Trend Detector for Amibroker (AFL)

Rating:
4 / 5 (Votes 16)
Tags:
oscillator, amibroker, trading system, trend

This is very simple Trend Detector, only looking the color we can know the trend, and buy or sell following the arrow.

Created by Chynthia, March, 24, 2010

Similar Indicators / Formulas

TREND INDICATOR WITH CCI
Submitted by sudesh about 9 years ago
Awesome + momentum
Submitted by marriuszek2006 over 6 years ago
STOCH RSI CROSSOVER
Submitted by sonia.b over 7 years ago
MACD Normalized System
Submitted by Tinych over 7 years ago
Simple Chaikin Buy Sell
Submitted by jachyuen almost 8 years ago
Stochastic-and-linear
Submitted by btdung almost 8 years ago
You cannot view the code for the following reasons:
  • You must be a member and have contributed at least 1 indicator

15 comments

1. wonderif

I am registered and still asking me to register!!!!!!!!!!!!!!!

strange, any solution???

2. administrator

Its asking you to contribute something.

3. siddhisagar

id there anything left to contribute on the net. if there was why would i even come to ur site and when i do come to find some useful stuff i find its blocked

4. shailu75

how can i see this afl.

5. drbsrini
i am register, please reveal afl code to all,thanks in advance
6. tradetoday

I have contributed a and logged in even then it is asking to login in. ADMINISTRATOR. Please help me.

7. administrator

tradetoday, the formula you submitted was not approved because it was already posted on this site.

8. anandnst

amazing trend follower! keep it up boss

9. joey0415

I have contributed a and logged in even then it is asking to login in. ADMINISTRATOR. Please help me.

10. administrator

joey, your formula was not approved. You should have access now anyway.

11. istyles

Dear Sir ,

Where is this The Unique Trend Detector indicator please help

Regards

Istyles

12. halfman

Very good. This inspires me a lot. Thank you.

13. al2251w

Thanks

14. ssdas0172

its not working

15. Username123
// I use this moving averige exploration with daily data!  
 
//////////////////////////////////////////////////////////////
 
SetOption("NoDefaultColumns", True);
Filter = Status("lastbarinrange");
 
DTL=140; // DTL = Define Trend Long
DTM=50; // DTM = Define Trend Medium
DTS=10;  // DTS = Define Trend Short
 
//////////////////////////////////////////////////////////////
 
TL=LinRegSlope(MA(C, DTL),2);    // TL = Trend Long
TM=LinRegSlope(MA(C, DTM),2);  // TM = Trend Medium
TS=LinRegSlope(MA(C, DTS),2);  // TS = Trend Short
 
TLL=IIf(LinRegSlope(MA(C, DTL),2) > 0,True, False);      
TMM=IIf(LinRegSlope(MA(C, DTM),2) > 0,True, False);      
TSS=IIf(LinRegSlope(MA(C, DTS),2) > 0,True, False);      
 
TLLL= 
WriteIf(TL>0 AND TL<0.3,"+",
WriteIf(TL>=0.3 AND TL<0.6 ,"+ +", 
WriteIf(TL>=0.6,"+ + +", 
WriteIf(TL<0 AND TL>-0.3,"-",
WriteIf(TL<=-0.3 AND TL>-0.6 ,"- -",
WriteIf(TL<=-0.6,"- - -",""))))));  
 
TMMM=
WriteIf(TM>0 AND TM<0.3,"+",
WriteIf(TM>=0.3 AND TM<0.6 ,"+ +",
WriteIf(TM>=0.6,"+ + +",
WriteIf(TM<0 AND TM>-0.3,"-",
WriteIf(TM<=-0.3 AND TM>-0.6 ,"- -",
WriteIf(TM<=-0.6,"- - -",""))))));  
 
TSSS=
WriteIf(TS>0 AND TS<0.3,"+",
WriteIf(TS>=0.3 AND TS<0.6 ,"+ +",
WriteIf(TS>=0.6,"+ + +",
WriteIf(TS<0 AND TS>-0.3,"-",
WriteIf(TS<=-0.3 AND TS>-0.6 ,"- -",
WriteIf(TS<=-0.6,"- - -",""))))));  
 
/////////////////////////////////////////////////////////////
 
AddTextColumn( Name(), "ticker", 1, colorDefault,
IIf(TLL==True AND TMM==True AND TSS==True, colorGreen, 
IIf(TLL==False AND TMM==False AND TSS==False, colorRed, colorYellow )),-1 ) ;
AddColumn( DateTime(), "date/time", formatDateTime, colorDefault,
IIf(TLL==True AND TMM==True AND TSS==True, colorGreen, 
IIf(TLL==False AND TMM==False AND TSS==False, colorRed, colorYellow )),-1 ) ;
 
AddTextColumn( TLLL, "MA"+-DTL, 1 , colorDefault,
IIf( TLL==True, colorGreen, colorRed ),-1 );
AddTextColumn( TMMM, "MA"+-DTM, 1 , colorDefault,
IIf( TMM==True, colorGreen, colorRed ),-1 );
AddTextColumn( TSSS, "MA"+-DTS, 1 , colorDefault,
IIf( TSS==True, colorGreen, colorRed ),-1 );
 
//////////////////////////////////////////////////////////////
 
message=
WriteIf(TL>=0.3 AND TM>=0.3 AND
TS>=0.3, "Strong Up Trend",
WriteIf(TL<=-0.3 AND TM<=-0.3 AND
TS<=-0.3, "Strong Down Trend",
WriteIf(TLL==True AND TMM==True AND
TSS==True,"Up Trend",
WriteIf(TLL==False AND TMM==False AND
TSS==False,"Down Trend", "No Trend"))));
 
 
AddTextColumn( message, "Overall Trend", 1 , colorDefault,
IIf(TLL==True AND TMM==True AND TSS==True, colorGreen, 
IIf(TLL==False AND TMM==False AND TSS==False, colorRed, colorYellow )),-1 );
 
//////////////////////////////////////////////////////////////
 
x = IIf(Cross(LinRegSlope(MA(C, DTL),2),0) OR
Cross(0, LinRegSlope(MA(C, DTL),2) ), True, False); 
y = BarIndex()-ValueWhen(x==True, BarIndex(),1); 
 
Phase=WriteIf(Y>=400,"Mature",WriteIf(Y>100 AND
Y<400, "Progress", WriteIf(Y<=100, "Initial", "")));
 
AddTextColumn( Phase, "Trend Phase", 1 ,colorDefault,
IIf(TLL==True AND TMM==True AND TSS==True, colorGreen, 
IIf(TLL==False AND TMM==False AND TSS==False, colorRed, colorYellow )),-1 ) ;
 
//////////////////////////////////////////////////////////////
 
Comments=
WriteIf(Y>=400,"Mature trend with risk of bubble",
WriteIf(y<400 AND TLL==True AND TMM==True AND TSS==True,
"Keep on coming baby $",
WriteIf(y<15 AND TLL==True AND TMM==True AND TSS==True OR
TLL==False AND TMM==False AND TSS==False,
"Are you going to grow up and become a big boy?",
WriteIf(y<400 AND TLL==False AND TMM==False AND TSS==False,
"Keep on coming baby $$",
WriteIf(TLL==True AND TMM==True AND TSS==False OR
TLL==False AND TMM==False AND TSS==True,
"Risk for short term reversal",
WriteIf(TLL==True AND TMM==False AND TSS==True OR
TLL==False AND TMM==True AND TSS==False,
"trading range-avoid",
"live to trade another day")))))); 
             
 
AddTextColumn( Comments, "Comments", 1,colorDefault,
IIf(TLL==True AND TMM==True AND TSS==True, colorGreen, 
IIf(TLL==False AND TMM==False AND TSS==False, colorRed, colorYellow )),-1 ) ;
 
//////////////////////////////////////////////////////////////

Leave Comment

Please login here to leave a comment.

Back