Stock Portfolio Organizer
The ultimate porfolio management solution.
WiseTrader Toolbox
#1 Selling Amibroker Plugin featuring:
False Trade Deletion for Amibroker (AFL)
Simple way to avoid negative trade and set good prfit…
Assign two charts and set another value as 46.1… Trade if both signal were same otherwise dont..
Screenshots
Similar Indicators / Formulas
Indicator / Formula
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 | //////////////////////////////////////////////////////////////////////////////////// _SECTION_BEGIN ( "Chart Settings" ); SetChartOptions ( 0, chartShowArrows | chartShowDates ); SetChartBkColor ( ParamColor ( "Outer Panel" , colorDarkGrey ) ); SetChartBkGradientFill ( ParamColor ( "Upper Chart" , colorBlack ), ParamColor ( "Lower Chart" , colorBlack ) ); _SECTION_END (); Kisa = Param ( "KISA GÜN" , 12, 0.1, 500, 0.1 ); Uzun = Param ( "UZUN GÜN" , 43, 0.1, 100, 0.1 ); Tetik = Param ( "TETI.K GÜN" , 21, 0.1, 50, 0.1 ); _SECTION_BEGIN ( "Periodlar" ); function KisaPeriodTopla( Kisa ) { ka = Kisa; for ( i = 1; i < Kisa; i++ ) { ka = ka + i; } return ka; } function UzunPeriodTopla( Uzun ) { au = Uzun; for ( iu = 0; iu < Uzun; iu++ ) { au = au + iu; } return au; } function TetikPeriodTopla( Tetik ) { a = Tetik; for ( i = 0; i < Tetik; i++ ) { a = a + i; } return a; } _SECTION_END (); _SECTION_BEGIN ( " Gün Toplamlar?" ); function KisaGunTopla( Kisa ) { a = Kisa; kd = a * C ; for ( i = 0;i < Kisa;i++ ) { b = Ref ( C , -i ); if ( a > 0 ) a--; kd = kd + ( a * b ); } return kd; } function UzunGunTopla( Uzun ) { au = Uzun; ku = au * C ; for ( iu = 0;iu < Uzun;iu++ ) { bu = Ref ( C , -iu ); if ( au > 0 ) au--; ku = ku + ( au * bu ); } return ku; } Period12Toplam = KisaPeriodTopla( Kisa ); Day12Toplam = KisaGunTopla( Kisa ); LWMA12 = Day12Toplam / Period12Toplam; Period43Toplam = UzunPeriodTopla( Uzun ); Day43Toplam = UzunGunTopla( Uzun ); LWMA43 = Day43Toplam / Period43Toplam; _SECTION_END (); _SECTION_BEGIN ( " TSR HESAPLANMASI" ); function XDAY( Tetik ) { X = ( ( 2 * LWMA12 ) - LWMA43 ); aX = Tetik; kX = AX * X; for ( iX = 0;iX < Tetik;iX++ ) { bX = Ref ( X, -iX ); if ( aX > 0 ) aX--; kX = kX + ( aX * bX ); } return kX; } XDayToplam = XDAY( Tetik ); XPeriodToplam = TetikPeriodTopla( Tetik ); TSR = ( XDayToplam / XPeriodToplam ); _SECTION_END (); _SECTION_BEGIN ( " EKRANA BASMA I.S,LEMI." ); Plot ( C , "Kapanis" , colorWhite , styleCandle ); tsrcolor = IIf ( TSR > Ref ( TSR, -1 ), colorLime , colorRed ); Plot ( TSR, "TSR" , tsrcolor, styleDots + styleLine ); _SECTION_END (); _SECTION_BEGIN ( "EXPLORATION" ); //AL=TSR>Ref(TSR,-1); //SAT=Ref(TSR,-1)>TSR; AL = Cross ( C , TSR ); SAT = Cross ( TSR, C ); AL_status = WriteIf ( AL, "Al?s, Yap" , " " ); SAT_status = WriteIf ( SAT, "Sat?s, Yap" , " " ); AL_Col = IIf ( AL, colorDarkGreen , colorWhite ); SAT_Col = IIf ( SAT, colorRed , colorWhite ); Filter = AL OR SAT; AddColumn ( C , "KAPANIS," , 1.2, IIf ( C > Ref ( C , -1 ), colorBlue , colorRed ) ); AddTextColumn ( AL_status, "TSR ALIS," , 1.2, colorWhite , AL_col ); AddTextColumn ( SAT_status, "TSR SATIS," , 1.2, colorWhite , SAT_col ); _SECTION_END (); //////////////////////////////////////////////////////////////////////////////////// |
6 comments
Leave Comment
Please login here to leave a comment.
Back
Good Chart prepared.
What is the meaning of ‘KAPANIS’, ‘TSR ALIS’, ‘TSR SATIS’.
“Assign two charts and set another value as 46.1… Trade if both signal were same otherwise dont..”
above is incomplete statement. ‘set another value at 46.1…’ what one has to understand?
Thanks
What do these mean?
KISA GUN
uZEN GUN
TETI.K GUN
thanks
Please post a complete description of interpretation of the formula.
// would have been easier to write the 6 functions into 2 or 1 function(s) or
// or better to write it like this:
SetChartOptions( 0, chartShowArrows | chartShowDates );
_SECTION_BEGIN(“TSR”);
Kisa=Param(“KISA GÜN”,12,0.1,500,0.1);
Uzun=Param(“UZUN GÜN”,43,0.1,100,0.1);
Tetik=Param(“TETIK GÜN”,21,0.1,50,0.1);
TSR = WMA-WMA, Tetik);
Plot(TSR, _DEFAULT_NAME() , IIf( TSR > Ref( TSR, -1 ), colorLime, colorRed ), styleDots);
Plot( C, “Close”, colorBlack, styleCandle );
_SECTION_END();
_SECTION_BEGIN( “EXPLORATION” );
AL = Cross( C, TSR );
SAT = Cross( TSR, C );
AL_status = WriteIf( AL, “Alis Yap”, " " );
SAT_status = WriteIf( SAT, “Satis Yap”, " " );
AL_Col = IIf( AL, colorDarkGreen , colorWhite );
SAT_Col = IIf( SAT, colorRed, colorWhite );
Filter = AL OR SAT;
AddColumn( C, “KAPANIS”, 1.2, IIf( C > Ref( C, -1 ), colorBlue, colorRed ) );
AddTextColumn( AL_status, “TSR ALIS”, 1.2, colorWhite, AL_col );
AddTextColumn( SAT_status, “TSR SATIS”, 1.2, colorWhite, SAT_col );
_SECTION_END();
another try… line not displayed properly….
the TSR line should be
TSR = WMA[ 2*WMA(C,Kisa)-WMA, Tetik ];
replace the [] with ()
This comment system eats characters.
see if this works
“TSR = WMA-WMA, Tetik);”