0
0

165_stolPar 529 B

12345678910111213141516171819202122232425262728293031
  1. # stolPar
  2. gs 'stat'
  3. !'<center><img src="images/pics/telek.jpg"></center>'
  4. 'You sat down at the desk.'
  5. act 'Get up from the table':gt $locM, $metkaM
  6. if lernHome > 0:
  7. act 'Learning lessons':
  8. cls
  9. if lernHome <= 2:
  10. minut += 60 * lernHome
  11. lernHome = 0
  12. lern += 1
  13. end
  14. if lernHome > 2:
  15. minut += 60 * 2
  16. lernHome = 0
  17. end
  18. gs 'stat'
  19. 'Sitting for a long time you learned yet they were able to learn.'
  20. act 'Get up from the table':gt $locM, $metkaM
  21. end
  22. end
  23. --- stolPar ---------------------------------