liam 2.6 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081
  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. '<center><img src="images/pic/liam.jpeg" ></center>'
  23. '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.'
  24. '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.'
  25. 'Since then even the old huts, have been improved, extended and modernized. The old buildings and beautiful park make it popular with tourists.'
  26. 'Not far from here is the quiet <a href="exec:GT ''liames'',''start''">high street</a>.'
  27. 'Close by is a narrow street leading to a <a href="exec:GT ''dvor'',''start''">vacant house</a>.'
  28. 'You see a <a href="exec:GT ''ugol'',''start''">passage</a> between the houses lead to a courtyard.'
  29. if car > 0 and cardrive = 14:
  30. 'I parked at the curb <a href="exec:GS ''carF'',''start''">your <<$car>></a>.'
  31. end
  32. if hour >= 13 and hour <= 15 and bodimodel = 1 and arts = 0 and tusa = 1:
  33. if RAND(1,100) >= 90:
  34. cls
  35. minut += 5
  36. gs'stat'
  37. gs'dibodi'
  38. '<center><img src="images/lmps/gerladvr.jpg"></center>'
  39. 'Suddenly you notice a girlfriend from the local hangouts Marinka, I am standing at the door.'
  40. act 'Ask':gt 'dibodi', 'sptusa'
  41. end
  42. end
  43. if arts = 1:'Apartment <a href="exec:GT ''Marin'',''start''">Marina</a>'
  44. act 'Walk to the St Petersburg to Pavlovsk road (15 min)':minut += 15 & nroad = 10 & gt'road'
  45. gs 'Taxi'
  46. act '<font size = 1>Wait</font>':
  47. cla
  48. waiting = input ("How many minutes to wait? (Not more 120 minutes)")
  49. if waiting <= 0 or waiting > 120:
  50. minut += 15
  51. end
  52. if waiting > 0 and waiting <= 120:
  53. minut += waiting
  54. end
  55. act 'Consult a watch':gt 'liam'
  56. end
  57. act 'Walk 1 h':
  58. cla
  59. minut += 60
  60. manna += 10
  61. willpower += 10
  62. gs 'stat'
  63. '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.'
  64. act 'Complete outing':gt'liam','start'
  65. end
  66. if hour >= 4 and hour <= 23:'Station <a href="exec:GT ''metro'',''start''">Metro</a> located at 5 walking distance.'
  67. if rand (0,2) ! 0:gs 'din_bad' & dynamic $mobile_check
  68. --- liam ---------------------------------