park_walkeventsrnd.qsrc 1.5 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061
  1. # park_walkeventsrnd
  2. if suchunt = 1:
  3. !!Used to randomize hunting times and make hunting faster the higher the suc level
  4. scrand = rand(0,4)
  5. minut += 60 - (5 * (succublvl + scrand))
  6. else
  7. minut += 60
  8. end
  9. gs 'stat'
  10. gs 'park_walkevents'
  11. parkrand = rand(1,20)
  12. !!day
  13. if hour > 7 and hour < 21:
  14. if parkrand < 10:
  15. if parkrand = 1:gt 'park_walkevents', '1'
  16. if parkrand = 2:gt 'park_walkevents', '2'
  17. if parkrand = 3:gt 'park_walkevents', '3'
  18. if parkrand = 4:gt 'park_walkevents', '4'
  19. if parkrand = 5:gt 'park_walkevents', '5'
  20. if parkrand = 6:gt 'park_walkevents', '6'
  21. if parkrand = 7:gt 'park_walkevents', '7'
  22. if parkrand = 8:gt 'park_walkevents', '8'
  23. if parkrand = 9:gt 'park_walkevents', '9'
  24. elseif parkrand = 19 and lactation['active'] > 0:
  25. gt 'park_walkevents', 'find_baby'
  26. else
  27. gt 'park_walkevents', 'empty'
  28. end
  29. else
  30. !!night
  31. !!Used to make a hunting easier the higher the suc level
  32. if suchunt = 1: parkrand -= (succublvl-1)
  33. if knowsfairy < 1 and MagikDostup ! 1:
  34. if rand (1, 4) <= pcs_magik:
  35. fairyrand = 19
  36. else
  37. fairyrand = 21
  38. end
  39. elseif MagikDostup ! 1:
  40. if (fairychat - fairyshoo) < 5 or ((fairychat - fairyshoo) < 10 and fairylooking = 1):
  41. fairyrand = 19 - (fairychat - fairyshoo)
  42. elseif fairylooking = 1:
  43. fairyrand = 10
  44. else
  45. fairyrand = 15
  46. end
  47. end
  48. if parkrand <= 5:
  49. gt 'park_walkevents', '1'
  50. elseif parkrand >= fairyrand and MagikDostup ! 1:
  51. gt 'MagEncounterFairy'
  52. else
  53. gt 'park_walkevents', 'empty'
  54. end
  55. end
  56. --- park_walkeventsrnd ---------------------------------