雇用統計の前月比を表示するインジケーター

作ってみました。

雇用統計の前月比を表示するインジケーターです。
見やすくするために、単位は調整しています。

※ コピペする場合は以下の変更を行ってください
［］（全角の角括弧）→（半角の角括弧）
（全角スペース）→（半角スペース）

=====
//version=4
study( "雇用統計" ,overlay=false )

payems = security("QUANDL:FRED/PAYEMS", "D", close) / 10
unrate = security("QUANDL:FRED/UNRATE", "D", close) * 100

is_change = payems != payems［1］

float PAYEMS = na
float UNRATE = na
PAYEMS := is_change ? payems - payems［1］ : PAYEMS［1］
UNRATE := is_change ? unrate - unrate［1］ : UNRATE［1］

p1 = plot( PAYEMS ,offset=1 ,color=color.red ,title="非農業部門雇用者数（万人）")
p2 = plot( UNRATE ,offset=1 ,color=color.blue ,title="失業率（0.01％）" )
p0 = plot( 0 ,offset=1 ,color=color.gray ,title="zero" ,editable=false )
plot( PAYEMS ,offset=1 ,color=color.red ,style=plot.style_circles ,show_last=1 ,linewidth=2 ,title="")
plot( UNRATE ,offset=1 ,color=color.blue ,style=plot.style_circles ,show_last=1 ,linewidth=2 ,title="" )
fill( p0 ,p1 ,color=color.red )
fill( p0 ,p2 ,color=color.blue )
=====