parkdin.qsrc 1.3 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859
  1. # parkdin
  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 'parkivent'
  11. parkrand = rand(1,20)
  12. !!day
  13. if hour > 7 and hour < 21:
  14. if parkrand < 10:
  15. if parkrand = 1:gt 'parkivent', '1'
  16. if parkrand = 2:gt 'parkivent', '2'
  17. if parkrand = 3:gt 'parkivent', '3'
  18. if parkrand = 4:gt 'parkivent', '4'
  19. if parkrand = 5:gt 'parkivent', '5'
  20. if parkrand = 6:gt 'parkivent', '6'
  21. if parkrand = 7:gt 'parkivent', '7'
  22. if parkrand = 8:gt 'parkivent', '8'
  23. if parkrand = 9:gt 'parkivent', '9'
  24. else
  25. gt 'parkivent', 'empty'
  26. end
  27. else
  28. !!night
  29. !!Used to make a hunting easier the higher the suc level
  30. if suchunt = 1: parkrand -= (succublvl-1)
  31. if knowsfairy < 1 and MagikDostup ! 1:
  32. if rand (1, 4) <= pcs_magik:
  33. fairyrand = 19
  34. else
  35. fairyrand = 21
  36. end
  37. elseif MagikDostup ! 1:
  38. if (fairychat - fairyshoo) < 5 or ((fairychat - fairyshoo) < 10 and fairylooking = 1):
  39. fairyrand = 19 - (fairychat - fairyshoo)
  40. elseif fairylooking = 1:
  41. fairyrand = 10
  42. else
  43. fairyrand = 15
  44. end
  45. end
  46. if parkrand <= 5:
  47. gt 'parkivent', '1'
  48. elseif parkrand >= fairyrand and MagikDostup ! 1:
  49. gt 'MagEncounterFairy'
  50. else
  51. gt 'parkivent', 'empty'
  52. end
  53. end
  54. --- parkdin ---------------------------------