vokzaltorg 2.6 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697
  1. # vokzaltorg
  2. $d_kachatprava = {
  3. act 'swing right':
  4. cls
  5. money = 0
  6. tovarL = 0
  7. minut += 120
  8. manna = 0
  9. gs 'stat'
  10. '<center><img src="images/qwest/vokzal/katalkin.jpg"></center>'
  11. 'You have decided to shake their rights, Police responded to what is to be expected, dragged you to the department, money seized and confiscated goods. Once you promuryzhili two o`clock, you still released.'
  12. act 'Leave':minut += 1 & gt 'vokzalGin'
  13. end
  14. }
  15. cls
  16. minut += 30
  17. gs 'stat'
  18. prodskill = vnesh + will + dom
  19. if prodskill < 20:prodskill = 20
  20. if prodskill > 150:minimumtov = 3
  21. if prodskill > 100 and prodskill <= 150:minimumtov = 2
  22. if prodskill < 100:minimumtov = 1
  23. tovarand = rand(minimumtov, prodskill / 10)
  24. if tovarand > tovarL:tovarand = tovarL
  25. tovpay = tovarand * 300
  26. money += tovpay
  27. tovarL -= tovarand
  28. will += rand(0, 1)
  29. TorgVokzalTimes += 1
  30. dom += 1
  31. gs 'stat'
  32. '<center><img src="images/qwest/vokzal/peron.jpg"></center>'
  33. 'You managed vtyuhat <<tovarand>> One unit of product, while earning <<tovpay>> rubles.'
  34. act 'Leave':
  35. cls
  36. gs 'stat'
  37. '<center><img src="images/qwest/vokzal/katalkin.jpg"></center>'
  38. 'Near the platform you are already waiting for the police. "breach? Trade without proper papers?"'
  39. if money >= 500:
  40. act 'Pay (500 rubles)':
  41. cls
  42. money -= 500
  43. gs 'stat'
  44. '<center><img src="images/qwest/vokzal/katalkin.jpg"></center>'
  45. 'you paid 500 rubles police. He took the money and immediately lost interest to you.'
  46. act 'Leave':minut += 1 & gt 'vokzalGin'
  47. end
  48. end
  49. act 'persuaded to forgive':
  50. cls
  51. gs 'stat'
  52. '<center><img src="images/qwest/vokzal/katalkin.jpg"></center>'
  53. 'You started to persuade police captain forgive you and release.'
  54. if katalkinSexOnce >= 1:
  55. if katalkinSexDay+7 >= daystart:
  56. 'captain grinned "Well."'
  57. act 'Leave':minut += 1 & gt 'vokzalGin'
  58. end
  59. if katalkinSexDay + 7 < daystart:
  60. 'The captain frowned "You long ago to me did not come, avoiding?"'
  61. act 'No, what do you, simply no':
  62. cls
  63. gs 'stat'
  64. '<center><img src="images/qwest/vokzal/katalkin.jpg"></center>'
  65. 'You started arguing opravdyvatsya, that you just do not have enough time. captain grinned "Come then now the Department. Carry out bodily searches."'
  66. act 'Go to the police':minut += 5 & katalkinNoexit = 1 & gt 'katalkin'
  67. end
  68. end
  69. end
  70. if katalkinSexOnce = 0:
  71. schtraf = 500
  72. 'captain grinned "Come then now the Department. there shall understand."'
  73. act 'Go to the police':minut += 5 & katalkinNoexit = 1 & gt 'katalkin'
  74. end
  75. end
  76. dynamic $d_kachatprava
  77. end
  78. --- vokzaltorg ---------------------------------