Linux, Game programming, ... F1
char sig[] = {84,65,73,68,65,84,32,79,76,76,65,32,85,84,69,76,73,65,83};
perl -e '@a = ("(.)(·)","(·)(·)","(·)(.)","(.)(.)"); $i = 0; while(1) { system("clear"); print $a[$i]."\n"; system("sleep 0.05"); ($i > 2) ? $i = 0 : $i++; }'