AtenA

SeismoGraphoBTC

This script will give you a "shock" quite all the times there is some hype in the market. The color suggests the probable direction.
Orange = down;
Green = Up;
Gray = undecided = retracement = congestion = consolidation

Only for Bitcoin            

Remove from Favorite Scripts Add to Favorite Scripts
study("SeismoGraphoBTC", precision=1)
wmaperiods = input(title="Periods", type=integer, defval=5, minval=2)
sresponsiveness = input(title="SentimentResponsiveness", type=integer, defval=2, minval=1, maxval=5)

stamp = security("BITSTAMP:BTCUSD", period, close)
btcchina = security("BTCCHINA:BTCCNY", period, close)
stampvol = security("BITSTAMP:BTCUSD", period, volume)
btcchinavol = security("BTCCHINA:BTCCNY", period, volume)

allvol = stampvol+btcchinavol+volume
volmom = mom(allvol, 1)

btcusdwma = wma(stamp, wmaperiods)
btccnywma = wma(btcchina, wmaperiods)
localwma1 = wma(hlc3, 8)
localwma2 = wma(hlc3, 12)

colorbg = rising(btccnywma, sresponsiveness) and 
            rising(btcusdwma, sresponsiveness) and 
                localwma1 >= localwma2 ? 
                    green : 
                        falling(btccnywma, sresponsiveness) and 
                            falling(btcusdwma, sresponsiveness) and 
                                localwma2 >= localwma1 ? 
                                    orange : silver

plot(volmom, title="rocMOM", style=line, color = colorbg, linewidth=2)
Nice, thanks for sharing.
Reply
United States
United Kingdom
India
Deutschland
France
España
Italia
Polska
Türkiye
Россия
Brasil
Indonesia
Malaysia
ประเทศไทย
Việt Nam
日本
한국
简体
繁體
Home Stock Screener Forex Signal Finder Cryptocurrency Signal Finder Economic Calendar How It Works Chart Features House Rules Moderators Website & Broker Solutions Widgets Stock Charting Library Feature Request Blog & News FAQ Help & Wiki Twitter
Profile Profile Settings Account and Billing My Support Tickets Contact Support Ideas Published Followers Following Private Messages Chat Sign Out