Автозаполнение трибуны
14sub BlogAutoFill(blog CurrBlog) Post newpost Int BlogNumber=CurrBlog.Number Case BlogNumber mod 10 Case 1, 2, 3, 4, 5, 7, 8, 9 CurrBlog.NewPost(newpost) newpost.Title = TitleGenerator (′Зенит′, ′Звенит′, ′Газпром′, ′Питер′) If (CurrBlog.Author.City = ′Санкт-Петербург′) Then newpost.Text = TextGenerator (′Деньги спонсора, а не государства′, ′Профессионализм′, ′Великий Тренер′, ′ Лузеры′, ′Играть не умеете′, ′Завидуйте′, ′Чемпион′, ′Че этим...