c:=68 list("L@MG","  ","#*1#8818$?+?+?+8$81*#")at(Date second&3)foreach(b,writeln((c=c+b%7)asCharacter,b/7|0))