lug 1.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051
  1. # lug
  2. $metka = $ARGS[0]
  3. $loc = $CURLOC
  4. gs'stat'
  5. gs 'outdoors'
  6. '<center><img src="images/pic/lug.jpg" ></center>'
  7. 'Little, but well maintained meadow with evergreen grass to rest, picnic or just sunbath. Mothers with small children then regular visitors.'
  8. streetrand = RAND(0,100)
  9. if streetrand >= 10 and bfa < 1:
  10. vnerand = RAND(0,300)
  11. if vnerand <= vnesh:
  12. gs'boy'
  13. 'To you came <<$boybody>> <<$boybod>> <<$boyface>>. It <<$boyClo>>'
  14. 'The guy introduced himself as <<$boy>> and I asked for your telefonchik.'
  15. act 'Tell him your phone':
  16. cla
  17. gs'boyfrend','start'
  18. stopboy = 0
  19. '<<$boyA>> record your phone and left.'
  20. act 'Complete outing':gt'lug'
  21. end
  22. end
  23. end
  24. if pavserhom = 0 and psiha = 0 and housr = 0:
  25. temp = RAND(1,100)
  26. if temp >= 90:
  27. horny += 20
  28. gs'stat'
  29. 'In the path is <a href="exec:dynamic $pavserjil">man</a> then-if waiting for someone, then-Do stakeholders than-something or someone-then.'
  30. end
  31. end
  32. act 'Go further':
  33. set minut += 10
  34. gt'prut'
  35. end
  36. act 'Going back':
  37. set minut += 5
  38. gt'parks'
  39. end
  40. dynamic $din_street_cum
  41. --- lug ---------------------------------