| 
                |  |  | 
                        |
 
                                | Вы находитесь в режиме просмотра. Для участия в дискуссиях клуба вам необходимо зарегистрироваться (если вы этого не сделали) и войти в систему. |  |  | 
 | +100 500. прога на сегодня(+)Отправлено: apod 30.07.2010 в 17:17 |  | proc keep if Day={30.07.2010}
 do while IntenalError()=.f. or EndCurrentDay()=.t.
 keep inside 50mlofvodka
 do zakus
 wait(300)
 enddo
 else exit
 endif
 |  |  |  |  |