In[]:=
​​Print["\n",​​DynamicStyle[​​RandomChoice[{Rotate["TOUCH",0],Rotate["TOUCH",-.02]}],​​FontFamily"Roboto Slab",Bold,RGBColor[.6,.4,.2],66,BackgroundGrayLevel[1]],​​UpdateInterval.25,​​DynamicStyle​​RandomChoiceRotate["DOWN",0],Rotate["DOWN!",.02],Rotate"D⚾WN!",.02,​​FontFamily"Roboto Slab",FontWeight"Bold",RGBColor[1,1,1],62,BackgroundRGBColor[.6,.4,.2],​​UpdateInterval.555,​​"\n"