Indicator: Krivo Index [Forex]

Krivo index, suggested by Richard Krivo, tries to quantify the "strength" of a currency by checking how many of its pairs are trading strongly (close above 200sma). As you can see from the chart, KI gives an excellent overview of their strength. Note how it correctly points out the JPY crash (Nov 2012).

I decided to implement KI for each currency separately to be compliant with Pine requirements. Also, this enables to add only the needed currency KI scripts (for ex., just CAD_KI and USD_KI). You can add the needed currency KI scripts and merge them all together to form a chart like this. Make sure you "right click" on all and select "Scale Right" (or "Scale Left". Thing to note is all KIs shd be aligned to the same scale).

I have published KI for only 5 currencies now, but can add more on request. BTW, this index is usable on all time frames.

More info on KrivoIndex:

JPY crashing:

Euro Slump:

Please see the comment below for the complete list of currency pairs I used for deriving these indexes.

List of my free indicators:
List of my indicators at Appstore:

ด้วยจิตวิญญาณของ TradingView อย่างแท้จริง ผู้เขียนสคริปต์นี้ได้เผยแพร่เป็นโอเพนซอร์ส เพื่อให้ผู้ค้าสามารถเข้าใจและตรวจสอบได้ ไชโยให้กับผู้เขียน! คุณสามารถใช้ได้ฟรี แต่การใช้รหัสนี้ซ้ำในสิ่งพิมพ์อยู่ภายใต้กฎของบ้าน คุณสามารถตั้งเป็นรายการโปรดเพื่อใช้บนชาร์ตได้


ข้อมูลและบทความไม่ได้มีวัตถุประสงค์เพื่อก่อให้เกิดกิจกรรมทางการเงิน, การลงทุน, การซื้อขาย, ข้อเสนอแนะ หรือคำแนะนำประเภทอื่น ๆ ที่ให้หรือรับรองโดย TradingView อ่านเพิ่มเติมที่ เงื่อนไขการใช้บริการ

// @author LazyBear
// If you use this code in its original/modified form, do drop me a note. 
study("EUR Krivo Index [LazyBear]", shorttitle="EURKI_LB")


// Helper fns
calc_score(s, l) =>
    ma = sma(s, l)
    s >= ma ? 1 : -1

calc_invscore(s, l) =>
    -1 * score

// EUR 
ieurchf=security("FX:EURCHF", period, src)
ieurusd=security("FX:EURUSD", period, src)
ieurdkk=security("FX:EURDKK", period, src)
ieurjpy=security("FX:EURJPY", period, src)
ieurpln=security("FX:EURPLN", period, src)
ieurgbp=security("FX:EURGBP", period, src)
ieursek=security("FX:EURSEK", period, src)
ieurcad=security("FX:EURCAD", period, src)
ieurnok=security("FX:EURNOK", period, src)
ieurhuf=security("FX:EURHUF", period, src)
ieurtry=security("FX:EURTRY", period, src)
ieuraud=security("FX:EURAUD", period, src)
ieurnzd=security("FX:EURNZD", period, src)
ieurczk=security("FX:EURCZK", period, src)

// Calculate KI
eur_t = calc_score(ieurusd, lengthMA) +
        calc_score(ieurchf, lengthMA) + 
        calc_score(ieurjpy, lengthMA) + 
        calc_score(ieurdkk, lengthMA) + 
        calc_score(ieurpln, lengthMA) + 
        calc_score(ieurgbp, lengthMA) + 
        calc_score(ieursek, lengthMA) + 
        calc_score(ieurcad, lengthMA) + 
        calc_score(ieurnok, lengthMA) + 
        calc_score(ieurhuf, lengthMA) + 
        calc_score(ieurtry, lengthMA) + 
        calc_score(ieuraud, lengthMA) + 
        calc_score(ieurnzd, lengthMA) + 
        calc_score(ieurczk, lengthMA) 
plot(eur_t, color=maroon, linewidth=2, title="EUR KI")