parks 1.4 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455
  1. # parks
  2. gs'stat'
  3. gs 'outdoors'
  4. '<center><B>Old Town Park</B></center>'
  5. '<center><img src="images/pic/parkus.jpg" ></center>'
  6. 'The lack of amusements is compensated for by the wonderful, landscaped gardens and tranquil atmosphere.'
  7. 'The old park is a favorite vacation spot for families.'
  8. 'Close to the narrow <a href="exec:GT ''allea'',''start''">footpath</a> .'
  9. 'Wander through the <a href="exec:GT ''lug'',''start''">park</a> .'
  10. act 'Elite settlement':gt'psiklin','start'
  11. act 'Walk 1 h':
  12. cla
  13. set minut+=60
  14. set manna = manna + 10
  15. set willpower = willpower + 10
  16. gs'stat'
  17. 'You leisurely stroll through the park of the Old Town. Breathe in the fresh air, reflecting on the vicissitudes of fate.'
  18. act 'Complete outing':gt'parks','start'
  19. end
  20. if month = 5 or month = 6 or month = 7 or month = 8 or month = 9:
  21. if hour > 6 and hour < 23:
  22. act 'Crouch on the bench':
  23. cla
  24. *clr
  25. '<center><img src="images/lmps/сидит.jpg"></center>'
  26. waiting = input ("How many minutes of sitting? (Not more 120 minutes)")
  27. if waiting <= 0 or waiting > 120:
  28. minut = minut + 15
  29. elseif waiting > 0 and waiting <= 120:
  30. minut = minut + waiting
  31. manna = manna + 10
  32. willpower = willpower + 10
  33. if son < 90:son += 10
  34. end
  35. act 'Consult a watch':gt curloc
  36. end
  37. end
  38. end
  39. act 'Abandoned building':gt'psiklin','ps2'
  40. act 'Escape':
  41. setminut += 10
  42. gt'liames'
  43. end
  44. --- parks ---------------------------------