gdkkru 2.1 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879
  1. # gdkkru
  2. $metka = ''
  3. $loc = 'gdkkru'
  4. $location_type = 'public_indoors'
  5. frost = 0
  6. gs'stat'
  7. FColor = RGB(0,0,0)
  8. BColor = RGB(255,255,255)
  9. LColor = RGB(106,90,205)
  10. '<center><b><font color = maroon>The community center</font></b></center>'
  11. '<center><img src="images/locations/pavlovsk/community/gdkkru.jpg"></center>'
  12. act 'Leave': gt 'gdk'
  13. act 'Go to the toilets': gt 'gdktoilet', 'start'
  14. if hour >= 12 and hour <= 20:
  15. 'At this time of day the community center operates various clubs.'
  16. if krumonth = month and kruyear = year:
  17. act 'Go to the sewing club': gt 'krupo'
  18. else
  19. act 'Go to the sewing club':
  20. cls
  21. gs 'stat'
  22. '<center><b><font color = maroon>Sewing circle</font></b></center>'
  23. '<center><img src="images/locations/pavlovsk/community/krupo.jpg"></center>'
  24. 'You went to the sewing club room, as you walked in, a teacher looked at you said. "It costs 500 <b>₽</b> for one month to join, you can come as many days as you like. Once the month is up any days you did not attend are not transferred."'
  25. if money >= 500:
  26. act 'Sign up':
  27. cls
  28. money -= 500
  29. krumonth = month
  30. kruyear = year
  31. gs 'stat'
  32. 'You pay the tuition.'
  33. act 'Leave': gt 'gdkkru'
  34. end
  35. end
  36. act 'Leave':gt 'gdkkru'
  37. end
  38. end
  39. if chessmonth=month and chessyear=year:
  40. act 'Go to the chess club': gt 'kruchess'
  41. else
  42. act 'Go to the chess club':
  43. cls
  44. gs 'stat'
  45. '<center><b><font color = maroon>Chess Circle</font></b></center>'
  46. '<center><img src="images/locations/pavlovsk/community/kruchess.jpg"></center>'
  47. 'You went to the chess club room, as you walked in, a teacher looked at you said. "It costs 500 <b>₽</b> for one month to join, you can come as many days as you like. Once the month is up any days you did not attend are not transferred."'
  48. if money >= 500:
  49. act 'Sign up':
  50. cls
  51. money -= 500
  52. chessmonth = month
  53. chessyear = year
  54. gs'stat'
  55. 'You pay the tuition.'
  56. act 'Leave': gt 'gdkkru'
  57. end
  58. end
  59. act 'Leave': gt 'gdkkru'
  60. end
  61. end
  62. else
  63. 'Clubs closed.'
  64. end
  65. --- gdkkru ---------------------------------