Gerterну да, тут моя ошибочка, GetDate(WEEK) вернет номер недели в месяце, т.е. как раз на любой 4 неделе будет в 4 раза больше. надо так переписать: local week = ceil(GetDate(DAY)/7)
local week = ceil(GetDate(DAY)/7)