liam 3.0 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091
  1. # liam
  2. $metka = $ARGS[0]
  3. $loc = $CURLOC
  4. $location_type = 'public_outdoors'
  5. CLOSE ALL
  6. if sound = 0:PLAY 'sound/street.mp3',30
  7. cls
  8. gs'stat'
  9. palMir = 0
  10. bordysh = 0
  11. housrA = 0
  12. palMir = 0
  13. obdysh = 0
  14. tanhouse1 = 0
  15. obMir = 0
  16. obLoker = 0
  17. houseob = 0
  18. borMir = 0
  19. minut += 10
  20. set minut = minut + 5
  21. '<center><B>Old town center</B></center>'
  22. if month >= 11 or month <= 3:
  23. if hour >= 8 and hour <= 21:
  24. '<center><img <<$set_imgh>> src="images/locations/oldtown/townwinter.jpg"></center>'
  25. else
  26. '<center><img <<$set_imgh>> src="images/locations/oldtown/townwinternight.jpg"></center>'
  27. end
  28. else
  29. if hour >= 8 and hour <= 21:
  30. '<center><img <<$set_imgh>> src="images/locations/oldtown/liam.jpg" ></center>'
  31. else
  32. '<center><img <<$set_imgh>> src="images/locations/oldtown/townnight.jpg"></center>'
  33. end
  34. end
  35. 'The old part of the city, usually call old town. A couple of centuries ago, this was the village of Pushkin, located near a town that is now the city.'
  36. 'Later, the rich bought land off the poor here and knocked down the wooden shacks and farm houses to build large houses. As the city continued to grow rapidly, it became a desirable suburb.'
  37. 'Since then even the old huts, have been improved, extended and modernized. The old buildings and beautiful park make it popular with tourists.'
  38. 'Not far from here is the quiet <a href="exec:GT ''liames'',''start''">high street</a>.'
  39. 'Close by is a narrow street leading to a <a href="exec:GT ''dvor'',''start''">vacant house</a>.'
  40. 'You see a <a href="exec:GT ''ugol'',''start''">passage</a> between the houses lead to a courtyard.'
  41. if car > 0 and cardrive = 14:
  42. 'I parked at the curb <a href="exec:GS ''carF'',''start''">your <<$car>></a>.'
  43. end
  44. if hour >= 13 and hour <= 15 and bodimodel = 1 and arts = 0 and tusa = 1:
  45. if RAND(1,100) >= 90:
  46. cls
  47. minut += 5
  48. gs'stat'
  49. gs'dibodi'
  50. '<center><img <<$set_imgh>> src="images/characters/oldtown/Marinka/Marinka.jpg"></center>'
  51. 'Suddenly you notice a girlfriend from the local hangouts Marinka, I am standing at the door.'
  52. act 'Ask':gt 'dibodi', 'sptusa'
  53. end
  54. end
  55. if arts = 1:'Apartment <a href="exec:GT ''Marin'',''start''">Marina</a>'
  56. act 'Walk to the St Petersburg to Pavlovsk road (5 min)':minut += 5 & nroad = 15 & gt'road'
  57. act '<font size = 1>Wait</font>':
  58. cla
  59. waiting = input ("How many minutes to wait? (Not more 120 minutes)")
  60. if waiting <= 0 or waiting > 120:
  61. minut += 15
  62. end
  63. if waiting > 0 and waiting <= 120:
  64. minut += waiting
  65. end
  66. act 'Consult a watch':gt 'liam'
  67. end
  68. act 'Walk 1 h':
  69. cla
  70. minut += 60
  71. pcs_mood += 10
  72. pcs_willpwr += 10
  73. gs 'stat'
  74. 'You slowly walk along the narrow streets of the Old Town, It became one of the areas of the big city, admiring the beautiful architecture buildings, built long ago and miraculously survived to our times. Breathe in the fresh air, reflecting on the vicissitudes of fate.'
  75. act 'Complete outing':gt'liam','start'
  76. end
  77. if rand (0,2) ! 0:gs 'din_bad' & dynamic $mobile_check
  78. --- liam ---------------------------------