Stock Portfolio Organizer
The ultimate porfolio management solution.
WiseTrader Toolbox
#1 Selling Amibroker Plugin featuring:
KP Indicators for Amibroker (AFL)
Here the KP Indicators.
Attention!!
You’ll have to seperate them yourself!
There are 9 indicators in here.
Indicator NAME → is in _SECTION_BEGIN(* NAME *);
So, between _SECTION_BEGIN(); and _SECTION_END(); is 1 indcator!
Hope this is clear, otherwise, love to read your comments ;-)
You also need the kpami.dll which is a plugin, which can be downloaded from:
http://wisestocktrader.com/indicators/174-the-foundation-by-southwind-v-13-00-int its the plugin
Enjoy!
Similar Indicators / Formulas
Indicator / Formula
_SECTION_BEGIN("KP Fast 1"); SetChartBkColor(ParamColor("Panel Color",colorLightGrey)); SetChartBkGradientFill(ParamColor("Upper Chart",colorLightGrey),ParamColor("Lower Chart",colorLightGrey)); //tskp_fast1val1, tskp_fast1val2, tskp_fast1val3, tskp_fast1val4 dummy=E_TSKPFAST1(Open,High,Low,Close,Volume); //Histogram Plot(tskp_fast1val1,"Fast1_1",ParamColor("Fast1_1Color",colorBlue),ParamStyle("Fast1_1Style",styleHistogram|styleThick,maskHistogram)); Plot(tskp_fast1val2,"Fast1_2",ParamColor("Fast1_2Color",colorRed),ParamStyle("Fast1_2Style",styleHistogram|styleThick,maskHistogram)); //Lines Plot(tskp_fast1val3,"Fast1_3",ParamColor("Fast1_3Color",colorYellow),ParamStyle("Fast1_3Style",styleLine|styleThick)); Plot(tskp_fast1val4,"Fast1_4",ParamColor("Fast1_4Color",colorCustom11),ParamStyle("Fast1_4Style",styleLine|styleThick)); Plot(0,"0",ParamColor("Zero Line",colorGrey50),styleLine); Title =FullName(); _SECTION_END(); _SECTION_BEGIN("KP Fast 2"); SetChartBkColor(ParamColor("Panel Color",colorLightGrey)); SetChartBkGradientFill(ParamColor("Upper Chart",colorLightGrey),ParamColor("Lower Chart",colorLightGrey)); //tskp_fast2val1, tskp_fast2val2 dummy=E_TSKPFAST2(Open,High,Low,Close,Volume); Plot(tskp_fast2val1,"Fast2_1",ParamColor("ColorUp",colorBlue),ParamStyle("Style",style=styleHistogram|styleThick,maskDefault)); Plot( tskp_fast2val2,"Fast2_2",ParamColor("ColorDown",colorRed),ParamStyle("Style",style=styleHistogram|styleThick,maskDefault)); Plot(0,"0",ParamColor("Zero Line",colorGrey50),styleLine); Title =FullName(); _SECTION_END(); _SECTION_BEGIN("KP Fast 3 Line or Histogram"); SetChartBkColor(ParamColor("Panel Color",colorLightGrey)); SetChartBkGradientFill(ParamColor("Upper Chart",colorLightGrey),ParamColor("Lower Chart",colorLightGrey)); //r[0] = mydll.call("E_GETRETURN",stateID,0); //r[1] = Math.max(r[0],0); Line = ParamToggle("Line or Histogram","Histogram|Line",1); // tskp_mediumma,tskp_mediumup,tskp_mediumdown fast3 = E_TSKPFAST3(Open,High,Low,Close,Volume); Color = IIf(fast3>0,colorBlue,colorRed); //Line or Histogram if (Line) Plot( fast3,"Fast3",Color,styleThick|styleNoLabel); else Plot(fast3,"Fast3",Color,styleHistogram|styleThick|styleNoLabel); Plot(0,"0",ParamColor("Zero Line",colorGrey50),styleLine); Title =FullName(); _SECTION_END(); _SECTION_BEGIN("KP Medium All Histogram"); SetChartBkColor(ParamColor("Panel Color",colorLightGrey)); SetChartBkGradientFill(ParamColor("Upper Chart",colorLightGrey),ParamColor("Lower Chart",colorLightGrey)); // tskp_mediumma,tskp_mediumup,tskp_mediumdown dummy = E_TSKPMEDIUM(Close); Plot(tskp_mediumup,"MediumUp",ParamColor("UpColor",colorBlue ),ParamStyle("UpStyle",styleHistogram|styleThick,maskHistogram)); Plot(tskp_mediumdown,"MediumDown",ParamColor("DownColor",colorRed ),ParamStyle("DownStyle",styleHistogram|styleThick,maskHistogram)); Plot(tskp_mediumma,"MediumMA",ParamColor("MAColor",colorWhite ),ParamStyle("MAStyle",styleHistogram|styleThick,maskHistogram)); Plot(0,"0",ParamColor("Zero Line",colorGrey50),styleLine); Title=FullName(); _SECTION_END(); _SECTION_BEGIN("KP Medium"); SetChartBkColor(ParamColor("Panel Color",colorLightGrey)); SetChartBkGradientFill(ParamColor("Upper Chart",colorLightGrey),ParamColor("Lower Chart",colorLightGrey)); //tskp_mediumma,tskp_mediumup,tskp_mediumdown dummy = E_TSKPMEDIUM(Close); Plot(tskp_mediumma,"MediumMA",ParamColor("MAColor",colorWhite ),ParamStyle("MAStyle",styleLine|styleThick)); Plot(tskp_mediumup,"MediumUp",ParamColor("UpColor",colorBlue ),ParamStyle("UpStyle",styleHistogram|styleThick,maskHistogram)); Plot(tskp_mediumdown,"MediumDown",ParamColor("DownColor",colorRed ),ParamStyle("DownStyle",styleHistogram|styleThick,maskHistogram)); Plot(0,"0",ParamColor("Zero Line",colorGrey50),styleLine); Title=FullName(); _SECTION_END(); _SECTION_BEGIN("KP S906 and 907 Modus"); SetChartBkColor(ParamColor("Panel Color",colorLightGrey)); SetChartBkGradientFill(ParamColor("Upper Chart",colorLightGrey),ParamColor("Lower Chart",colorLightGrey)); sc=E_TSKPSCORECARD(High,Low,Close,Volume); //tskp_scorecard1, tskp_scorecard2, tskp_scorecard3, tskp_scorecard4 kp906=tskp_scorecard1; kp907=tskp_scorecard2; Plot(kp906,"906",ParamColor("906Color",colorBlack ),ParamStyle("906Style",styleLine|styleThick)); Plot(kp907,"907",ParamColor("907Color",colorWhite ),ParamStyle("907Style",styleLine|styleThick)); Plot(0,"0",ParamColor("Zero Line",colorGrey50),styleLine); Title =FullName(); _SECTION_END(); _SECTION_BEGIN("KP S906 and 907"); SetChartBkColor(ParamColor("Panel Color",colorLightGrey)); SetChartBkGradientFill(ParamColor("Upper Chart",colorLightGrey),ParamColor("Lower Chart",colorLightGrey)); sc=E_TSKPSCORECARD(High,Low,Close,Volume); //tskp_scorecard1, tskp_scorecard2, tskp_scorecard3, tskp_scorecard4 kp906=tskp_scorecard1; kp907=tskp_scorecard2; Plot(IIf(kp906<0,kp906,0),"906Dn",ParamColor("906DnColor",colorRed ),ParamStyle("906DnStyle",styleHistogram|styleThick)); Plot(IIf(kp906>0,kp906,0),"906Up",ParamColor("906UpColor",colorBlue ),ParamStyle("906UpStyle",styleHistogram|styleThick)); Plot(kp907,"907",ParamColor("907Color",colorWhite),ParamStyle("907Style",styleHistogram|styleThick)); Disp1=ParamToggle("Plot 906 Line","Show|Hide",0); if(Disp1){ Plot(kp906,"906",ParamColor("906Color",colorGrey40),ParamStyle("906Style",styleLine|styleThick));} Plot(0,"0",ParamColor("Zero Line",colorGrey50),styleLine); Title =FullName(); _SECTION_END(); _SECTION_BEGIN("KP ScoreCard Histogram"); SetChartBkColor(ParamColor("Panel Color",colorLightGrey)); SetChartBkGradientFill(ParamColor("Upper Chart",colorLightGrey),ParamColor("Lower Chart",colorLightGrey)); Ctmpl = E_TSKPCOLORTMPL(Open,High,Low,Close,Volume); total = 0; total = total + IIf(tskp_colortmplcnd0 > 0, 1, -1); total = total + IIf(tskp_colortmplcnd1 > 0, 1, -1); total = total + IIf(tskp_colortmplcnd2 > 0, 1, -1); total = total + IIf(tskp_colortmplcnd3 > 0, 1, -1); total = total + IIf(tskp_colortmplcnd4 > 0, 1, -1); total = total + IIf(tskp_colortmplcnd5 > 0, 1, -1); total = total + IIf(tskp_colortmplcnd6 > 0, 1, -1); total = total + IIf(tskp_colortmplcnd7 > 0, 1, -1); total = total + IIf(tskp_colortmplcnd8 > 0, 1, -1); Cutoff = 5; for( i = 0; i < BarCount; i++ ) { if( total[i] >= Cutoff ) Color[i] = colorBlue; else if( total[i] <= -Cutoff ) Color[i] = colorRed; else Color[i] = colorYellow; } PlotGrid(4,ParamColor("CutoffColor",colorCycle)); PlotGrid(-4,ParamColor("CutoffColor",colorCycle)); Plot(total,"ScoreCard",Color,ParamStyle("ScoreCardStyle",styleHistogram+styleThick,MAsk=maskHistogram)); if( Status("action") == actionCommentary ) { printf( "KPA900" + NumToStr(tskp_colortmplcnd0) + WriteIf(tskp_colortmplcnd0 > 0, " +++", " ---") ); printf( "\nAutoStop" + NumToStr(tskp_colortmplcnd1) + WriteIf(tskp_colortmplcnd1 > 0, " +++", " ---") ); printf( "\nHighlight" + NumToStr(tskp_colortmplcnd2) + WriteIf(tskp_colortmplcnd2 > 0, " +++", " ---") ); printf( "\nCombo" + NumToStr(tskp_colortmplcnd3) + WriteIf(tskp_colortmplcnd3 > 0, " +++", " ---") ); printf( "\nFast3" + NumToStr(tskp_colortmplcnd4) + WriteIf(tskp_colortmplcnd4 > 0, " +++", " ---") ); printf( "\nSTTB" + NumToStr(tskp_colortmplcnd5) + WriteIf(tskp_colortmplcnd5 > 0, " +++", " ---") ); printf( "\nTrigger/Stop" + NumToStr(tskp_colortmplcnd6) + WriteIf(tskp_colortmplcnd6 > 0, " +++", " ---") ); printf( "\n115Split" + NumToStr(tskp_colortmplcnd7) + WriteIf(tskp_colortmplcnd7 > 0, " +++", " ---") ); printf( "\nMedium" + NumToStr(tskp_colortmplcnd8) + WriteIf(tskp_colortmplcnd8 > 0, " +++", " ---") ); printf( WriteIf(tskp_colortmplcnd0 > 0, "+++", "---") + "KPA900" + NumToStr(tskp_colortmplcnd0)); printf( "\n" + WriteIf(tskp_colortmplcnd1 > 0, "+++", "---") + "AutoStop" + NumToStr(tskp_colortmplcnd1) ); printf( "\n" + WriteIf(tskp_colortmplcnd2 > 0, "+++", "---") + "Highlight" + NumToStr(tskp_colortmplcnd2) ); printf( "\n" + WriteIf(tskp_colortmplcnd3 > 0, "+++", "---") + "Combo" + NumToStr(tskp_colortmplcnd3) ); printf( "\n" + WriteIf(tskp_colortmplcnd4 > 0, "+++", "---") + "Fast3" + NumToStr(tskp_colortmplcnd4)); printf( "\n" + WriteIf(tskp_colortmplcnd5 > 0, "+++", "---") + "STTB" + NumToStr(tskp_colortmplcnd5) ); printf( "\n" + WriteIf(tskp_colortmplcnd6 > 0, "+++", "---") + "Trigger/Stop" + NumToStr(tskp_colortmplcnd6) ); printf( "\n" + WriteIf(tskp_colortmplcnd7 > 0, "+++", "---") + "115Split" + NumToStr(tskp_colortmplcnd7) ); printf( "\n" + WriteIf(tskp_colortmplcnd8 > 0, "+++", "---") + "Medium" + NumToStr(tskp_colortmplcnd8) ); } _SECTION_END(); _SECTION_BEGIN("KP ShortTermTradeBias STTB"); SetChartBkColor(ParamColor("Panel Color",colorLightGrey)); SetChartBkGradientFill(ParamColor("Upper Chart",colorLightGrey),ParamColor("Lower Chart",colorLightGrey)); /* // return both values r[0] = mydll.call("E_GETRETURN",stateID,0); r[1] = mydll.call("E_GETRETURN",stateID,1); // r[2] = mydll.call("E_GETRETURN",stateID,2); if( r[0] > 0 ) setBarBgColor(Color.blue); else if( r[0] < 0 ) setBarBgColor(Color.red); */ // tskp_sttb1, tskp_sttb2,tskp_sttb3 dummy=E_TSKPSHORTTERMTRADEBIAS(High,Low,Close); Color=IIf(tskp_sttb1>0,colorBlue,colorRed); Disp1=ParamToggle("STTB2","Show|Hide",0); if(Disp1){ Plot(tskp_sttb2,"STTB2",ParamColor("STTB2Color",colorCycle),ParamStyle("STTB2Style"));} Plot(tskp_sttb1,"STTB1",Color,ParamStyle("Style",styleHistogram|styleThick,maskHistogram) ); Plot(0,"0",ParamColor("Zero Line",colorGrey50),styleLine); Title =FullName(); _SECTION_END();
6 comments
Leave Comment
Please login here to leave a comment.
Back
Very Good . Waiting for next indicators . thank you very much . Lilian
Hi yo3bl,
This is all I got. There is no more.
9 indicators is not enough? :-)
Dear Ceurami ,
enough , thank you .
have a couple of days to take a look on the videos which you posted.
HNY .
Dear Ceurami ,
Could you please share KP SNAPBACK indicator?
and KPVS too.
Thank you .
LOTS OF ERRER
I revisited all those KP indicators and techniques. Thank you for sharing those codes on the indicators. Al right, here is the problem: I can only run those on 32-bit Amibroker which almost nobody uses anymore, everybody uses the 64-bit version. And as you probably know the kpami.dll and juril.dll links to download those only refer to 32-bit version. Do you know of any way to get the 64-bit version? Thanks again.