gargazel 2.6 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970
  1. # gargazel
  2. CLOSE ALL
  3. $metka = $ARGS[0]
  4. $loc = $CURLOC
  5. $location_type = 'secluded'
  6. fatherdrunk=0
  7. clr
  8. gs 'stat'
  9. '<center><h4>Garage</h4></center>'
  10. if father_go = 1 and hour >= 16 and hour < 21:
  11. '<center><img src="images/pic/gargazel.jpg"></center>'
  12. 'A large garage that belongs to your stepfather. He spends time in there working on his beloved Gazelle pickup truck whenever he can in the late afternoons and evenings. You can tell the door is not locked, he''s probably in there now.'
  13. else
  14. '<center><img src="images/pic/gargazel_empty.jpg"></center>'
  15. 'A large garage that belongs to your stepfather. He spends time in there working on his beloved Gazelle pickup truck whenever he can in the late afternoons and evenings. Right now the garage is closed, and the door is locked with a large padlock.'
  16. end
  17. act 'Leave the garage':minut += 5 & gt 'garmassiv'
  18. if father_go = 1 and hour >= 16 and hour < 20:
  19. 'Your <a href="exec:GT ''garfather''">stepfather</a> is in the garage, working on his Gazelle pickup truck.'
  20. end
  21. if father_go=1 and hour>=20 and hour<21:
  22. 'Your <a href="exec:GT ''garfather''">stepfather and uncle Misha</a> are in the garage, drinking vodka.'
  23. set fatherdrunk=1
  24. end
  25. if YouCanGar > 0:
  26. 'You have stored <<GarTorgItem>> trinkets in the garage currently. Your stepfather allowed you to store some things in his garage but doesn''t want you taking up all his space, he has allowed you to store up to 100 trinkets here. The garage is not very easily accessible; if you want to sell the trinkets at the station, you will have to bring them back home first.'
  27. if tovarL >= 30:
  28. 'You already have too much stored at home and do not have any more space.'
  29. elseif tovarL < 30:
  30. perenGarTov = 30-tovarL
  31. 'You can bring <<perenGarTov>> trinkets home and store them somewhere, until you have time to collect and sell them at the train station.'
  32. if GarTorgItem > 0:
  33. if GarTorgItem >= perenGarTov:
  34. act 'Move <<perenGarTov>> trinkets to your home':
  35. cls
  36. minut += 60
  37. tovarL += perenGarTov
  38. GarTorgItem -= perenGarTov
  39. gs 'stat'
  40. 'You spend an hour gathering your trinkets from various places, bringing them home and hiding them there.'
  41. act 'Continue':gt $curloc
  42. end
  43. end
  44. if GarTorgItem < perenGarTov:
  45. act 'Collect <<GarTorgItem>> trinkets to take with you':
  46. cls
  47. minut += 30
  48. tovarL += GarTorgItem
  49. GarTorgItem = 0
  50. gs 'stat'
  51. 'You spend half an hour gathering your trinkets from various places in the garage, putting them in a bag so you can go sell them at the station.'
  52. act 'Continue':gt $curloc
  53. end
  54. end
  55. end
  56. end
  57. end
  58. --- gargazel ---------------------------------