Advertisement
Guest User

Untitled

a guest
Jun 9th, 2013
92
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 6.79 KB | None | 0 0
  1. -- Start Herb Tracking
  2.  
  3. enemyCanEat = os.clock()
  4. function EnemyHerb(name, line, wildcs)
  5. ate = wildcs[2]
  6. eater = string.lower(wildcs[1])
  7. if eater == TARGET then
  8. if (ate == "some prickly ash bark") or (ate == "a bladder slice") then
  9. plantEaten = "ash"
  10. ColourTell("White", "", TARGET)
  11. ColourTell("grey", "", "--------------")
  12. ColourTell("White", "", " ATE ASH ")
  13. ColourTell("grey", "", "-------------")
  14. ColourTell("grey", "", "--------------")
  15. ColourTell("White", "", " ATE ASH ")
  16. elseif (ate == "a goldenseal root") or (ate == "a liver slice") then
  17. plantEaten = "Goldenseal"
  18. ColourTell("White", "", TARGET)
  19. ColourTell("grey", "", "--------------")
  20. ColourTell("Yellow", "", " ATE GOLDENSEAL ")
  21. ColourTell("grey", "", "-------------")
  22. ColourTell("grey", "", "--------------")
  23. ColourTell("Yellow", "", " ATE GOLDENSEAL ")
  24. elseif (ate == "a piece of kelp") or (ate == "an eyeball slice") then
  25. plantEaten = "kelp"
  26. ColourTell("White", "", TARGET)
  27. ColourTell("grey", "", "--------------")
  28. ColourTell("Green", "", " ATE KELP ")
  29. ColourTell("grey", "", "-------------")
  30. ColourTell("grey", "", "--------------")
  31. ColourTell("Green", "", " ATE KELP ")
  32. elseif (ate == "a lobelia seed") or (ate == "a testis slice") then
  33. plantEaten = "lobelia"
  34. ColourTell("White", "", TARGET)
  35. ColourTell("grey", "", "--------------")
  36. ColourTell("Orange", "", " ATE LOBELIA ")
  37. ColourTell("grey", "", "-------------")
  38. ColourTell("grey", "", "--------------")
  39. ColourTell("Orange", "", " ATE LOBELIA ")
  40. elseif (ate == "a ginseng root") or (ate == "an ovary slice") then
  41. plantEaten = "ginseng"
  42. ColourTell("White", "", TARGET)
  43. ColourTell("grey", "", "--------------")
  44. ColourTell("Brown", "", " ATE Ginseng ")
  45. ColourTell("grey", "", "-------------")
  46. ColourTell("grey", "", "--------------")
  47. ColourTell("Brown", "", " ATE Ginseng ")
  48. elseif (ate == "a bellwort flower") or (ate == "a castorite gland slice") then
  49. plantEaten = "bellwort"
  50. ColourTell("White", "", TARGET)
  51. ColourTell("grey", "", "--------------")
  52. ColourTell("Purple", "", " ATE BELLWORT ")
  53. ColourTell("grey", "", "-------------")
  54. ColourTell("grey", "", "--------------")
  55. ColourTell("Purple", "", " ATE BELLWORT ")
  56. elseif (ate == "a bloodroot leaf") or (ate == "a lung slice") then
  57. plantEaten = "bloodroot"
  58. ColourTell("White", "", TARGET)
  59. ColourTell("grey", "", "--------------")
  60. ColourTell("Red", "", " ATE BLOODROOT ")
  61. ColourTell("grey", "", "-------------")
  62. ColourTell("grey", "", "--------------")
  63. ColourTell("Red", "", " ATE BLOODROOT ")
  64. elseif (ate == "a hawthorn berry") or (ate == "a heart slice") then
  65. plantEaten = "hawthorn"
  66. ColourTell("White", "", TARGET)
  67. ColourTell("grey", "", "--------------")
  68. ColourTell("Green", "", " ATE Hawthorn ")
  69. ColourTell("grey", "", "-------------")
  70. ColourTell("grey", "", "--------------")
  71. ColourTell("Green", "", " ATE Hawthorn ")
  72. elseif (ate == "some bayberry bark") or (ate == "a stomach slice") then
  73. plantEaten = "bayberry"
  74. ColourTell("White", "", wildcs[1])
  75. ColourTell("grey", "", "--------------")
  76. ColourTell("Grey", "", " ATE BAYBERRY ")
  77. ColourTell("grey", "", "-------------")
  78. ColourTell("grey", "", "--------------")
  79. ColourTell("Grey", "", " ATE BAYBERRY ")
  80. end --if
  81. end -- if
  82.  
  83. ash={
  84. "sadness",
  85. "dementia",
  86. "hallucinations",
  87. "confusion",
  88. "paranoia",
  89. "hypersomnia",
  90. "hatred",
  91. "blood curse",
  92. "blighted",
  93. }
  94. Goldenseal={
  95. "self-pity",
  96. "stupidity",
  97. "dizziness",
  98. "shyness",
  99. "epilepsy",
  100. "impatience",
  101. "dissonance",
  102. "infested",
  103. }
  104. kelp={
  105. "baldness",
  106. "clumsiness",
  107. "weariness",
  108. "limp veins",
  109. "asthma",
  110. "sensitivity",
  111. "hypochondria",
  112. "blood poisoning",
  113. "magic_impaired"
  114. }
  115. lobelia={
  116. "fear of commitment",
  117. "recklessness",
  118. "masochism",
  119. "agoraphobia",
  120. "lonely",
  121. "vertigo",
  122. "claustrophobia",
  123. "berserk"
  124. }
  125. ginseng={
  126. "body odor",
  127. "haemophilia",
  128. "sunlight_allergy",
  129. "lethargy",
  130. "vomiting",
  131. "thin blood",
  132. "addiction",
  133. }
  134. bellwort={
  135. "overwhelming pride",
  136. "pacifism",
  137. "peace",
  138. "justice",
  139. "generosity",
  140. "lover's effect",
  141. }
  142. bloodroot={
  143. "paralysis",
  144. "slickness",
  145. "earthrot",
  146. "heartflutter"
  147. }
  148. hawthorn={
  149. "restored-hearing"
  150. }
  151. bayberry={
  152. "not-blind"
  153. }
  154.  
  155.  
  156.  
  157. if plantEaten=="ash" or plantEaten=="bladder" then
  158. for _, key in ipairs(ash) do
  159. if enemyafflictionlist[key] and hasTimerExpired(enemyCanEat, 1.5)then
  160. enemyafflictionlist[key]=nil
  161. enemyCanEat = os.clock()
  162. end
  163. end
  164. elseif plantEaten=="bloodroot" or plantEaten=="lung" then
  165. for _, key in ipairs(bloodroot) do
  166. if enemyafflictionlist[key] and hasTimerExpired(enemyCanEat, 1.5)then
  167. enemyafflictionlist[key]=nil
  168. enemyCanEat = os.clock()
  169. end
  170. end
  171. elseif plantEaten=="lobelia" or plantEaten=="testis" then
  172. for _, key in ipairs(lobelia) do
  173. if enemyafflictionlist[key] and hasTimerExpired(enemyCanEat, 1.5)then
  174. enemyafflictionlist[key]=nil
  175. enemyCanEat = os.clock()
  176. end
  177. end
  178. elseif plantEaten=="ginseng" or plantEaten=="ovary" then
  179. for _, key in ipairs(ginseng) do
  180. if enemyafflictionlist[key] and hasTimerExpired(enemyCanEat, 1.5)then
  181. enemyafflictionlist[key]=nil
  182. enemyCanEat = os.clock()
  183. end
  184. end
  185. elseif plantEaten=="Goldenseal" or plantEaten=="liver" then
  186. for _, key in ipairs(Goldenseal) do
  187. if enemyafflictionlist[key] and hasTimerExpired(enemyCanEat, 1.5)then
  188. enemyafflictionlist[key]=nil
  189. enemyCanEat = os.clock()
  190. end
  191. end
  192. elseif plantEaten=="bellwort" or plantEaten=="castorite" then
  193. for _, key in ipairs(bellwort) do
  194. if enemyafflictionlist[key] and hasTimerExpired(enemyCanEat, 1.5)then
  195. enemyafflictionlist[key]=nil
  196. enemyCanEat = os.clock()
  197. end
  198. end
  199. elseif plantEaten=="kelp" or plantEaten=="eyeball" then
  200. for _, key in ipairs(kelp) do
  201. if enemyafflictionlist[key] and hasTimerExpired(enemyCanEat, 1.5)then
  202. enemyafflictionlist[key]=nil
  203. enemyCanEat = os.clock()
  204. end
  205. end
  206. elseif plantEaten=="hawthorn" or plantEaten=="heart" then
  207. for _, key in ipairs(hawthorn) do
  208. if enemyafflictionlist[key] and hasTimerExpired(enemyCanEat, 1.5)then
  209. enemyafflictionlist[key]=nil
  210. enemyCanEat = os.clock()
  211. print("fired2")
  212. end
  213. end
  214. elseif plantEaten=="bayberry" or plantEaten=="stomach" then
  215. for _, key in ipairs(bayberry) do
  216. if enemyafflictionlist[key] and hasTimerExpired(enemyCanEat, 1.5)then
  217. enemyafflictionlist[key]=nil
  218. enemyCanEat = os.clock()
  219.  
  220. end
  221. end
  222. end
  223.  
  224. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement