require "Color"
require "TIlib"

$Names[0] = "W%R(14)"
$Colors[0] = $Blue

if !$WR14
    $WR14 = WilliamsR_new(14)
else
    WilliamsR_next($WR14)
    WilliamsR_draw($WR14, $Colors[0])
end
Indicator(0, $WR14[1])
