# Perl _(*nix)_, 55 bytes

<!-- language: lang-pl -->

    sleep print"\ec",$-++%2?'\o/
    _0_
    ':'_o_
     0
    / \
    'while 1

The above has been tested with Bash.

# Perl _(Windows)_, 56 bytes

<!-- language: lang-pl -->

    sleep print"\x1b[2J",$-++%2?'\o/
    _0_
    ':'_o_
     0
    / \
    'while 1

Thanks to [@Jarmex][1] for his testing and advice!


  [1]: http://codegolf.stackexchange.com/u/26977