m:-I is random(3),nth0(I,['(: new :)','(\'-\' ) new ( \'-\')','d:M new M:b'],X),format('happy ~a year!',X).