API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Sep 16th, 2019
176
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 11.68 KB | None | 0 0
raw download clone embed print report
  1. local config = {
  2. loginMessage = getConfigValue('loginMessage'),
  3. useFragHandler = getBooleanFromString(getConfigValue('useFragHandler'))
  4. }
  5.  
  6. function onLogin(cid)
  7.  
  8. if getPlayerLevel(cid) >= 1 and getPlayerLevel(cid) <= 10 then --alterado v1.8
  9. doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, 0)
  10. else
  11. doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, (getPlayerLevel(cid) >= 200 and 100 or math.floor(getPlayerLevel(cid)/2)) )
  12. end
  13. doCreatureSetDropLoot(cid, false)
  14.  
  15. local accountManager = getPlayerAccountManager(cid)
  16.  
  17. if(accountManager == MANAGER_NONE) then
  18. local lastLogin, str = getPlayerLastLoginSaved(cid), config.loginMessage
  19. if(lastLogin > 0) then
  20. doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
  21. str = "Sua última visita foi em " .. os.date("%a %b %d %X %Y", lastLogin) .. "."
  22. else
  23. str = str
  24. end
  25.  
  26. sendMsgToPlayer(cid, 20, "Seja bem-vindo(a) ao Pokemon StarWind!")
  27.  
  28. doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
  29.  
  30. elseif(accountManager == MANAGER_NAMELOCK) then
  31. doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, it appears that your character has been namelocked, what would you like as your new name?")
  32. elseif(accountManager == MANAGER_ACCOUNT) then
  33. doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to manage your account and if you want to start over then type 'cancel'.")
  34. else
  35. doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to create an account or type 'recover' to recover an account.")
  36. end
  37.  
  38. if getCreatureName(cid) == "Account Manager" then
  39. local outfit = {}
  40. if accountManagerRandomPokemonOutfit then
  41. outfit = {lookType = getPokemonXMLOutfit(oldpokedex[math.random(151)][1])}
  42. else
  43. outfit = accountManagerOutfit
  44. end
  45.  
  46. doSetCreatureOutfit(cid, outfit, -1)
  47. return true
  48. end
  49.  
  50. if(not isPlayerGhost(cid)) then
  51. doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT)
  52. end
  53.  
  54. local outfit = {}
  55.  
  56. if getPlayerVocation(cid) == 0 then
  57. doPlayerSetMaxCapacity(cid, 7)
  58. doPlayerSetVocation(cid, 1)
  59. setCreatureMaxMana(cid, 6)
  60. doPlayerAddSoul(cid, -getPlayerSoul(cid))
  61. setPlayerStorageValue(cid, 19898, 0)
  62. if getCreatureOutfit(cid).lookType == 128 then
  63. outfit = {lookType = 510, lookHead = math.random(0, 132), lookBody = math.random(0, 132), lookLegs = math.random(0, 132), lookFeet = math.random(0, 132)}
  64. elseif getCreatureOutfit(cid).lookType == 136 then
  65. outfit = {lookType = 511, lookHead = math.random(0, 132), lookBody = math.random(0, 132), lookLegs = math.random(0, 132), lookFeet = math.random(0, 132)}
  66. end
  67. doCreatureChangeOutfit(cid, outfit)
  68. end
  69.  
  70. registerCreatureEvent(cid, "dropStone")
  71. registerCreatureEvent(cid, "ShowPokedex")
  72. registerCreatureEvent(cid, "ClosePokedex")
  73. registerCreatureEvent(cid, "WatchTv")
  74. registerCreatureEvent(cid, "StopWatchingTv")
  75. registerCreatureEvent(cid, "WalkTv")
  76. registerCreatureEvent(cid, "RecordTv")
  77. registerCreatureEvent(cid, "PlayerLogout")
  78. registerCreatureEvent(cid, "EventLogout")
  79. registerCreatureEvent(cid, "BlockBp")
  80. registerCreatureEvent(cid, "WildAttack")
  81. registerCreatureEvent(cid, "Idle")
  82. registerCreatureEvent(cid, "EffectOnAdvance")
  83. registerCreatureEvent(cid, "GeneralConfiguration")
  84. registerCreatureEvent(cid, "SaveReportBug")
  85. registerCreatureEvent(cid, "LookSystem")
  86. registerCreatureEvent(cid, "T1")
  87. registerCreatureEvent(cid, "T2")
  88. registerCreatureEvent(cid, "atkz")
  89. registerCreatureEvent(cid, "atk")
  90. registerCreatureEvent(cid, "magica")
  91. registerCreatureEvent(cid, "Effect")
  92. registerCreatureEvent(cid, "bonuspremium")
  93. registerCreatureEvent(cid, "PassiveSystem")
  94. registerCreatureEvent(cid, "Teste")
  95. registerCreatureEvent(cid, "atacar")
  96. registerCreatureEvent(cid, "UpAbsolute")
  97. registerCreatureEvent(cid, "Outfit250")
  98. registerCreatureEvent(cid, "Outfit150")
  99. registerCreatureEvent(cid, "onlinebonus")
  100. registerCreatureEvent(cid, "BlockSkills")
  101. registerCreatureEvent(cid, "GodLight")
  102. registerCreatureEvent(cid, "OpenChannelDialog")
  103. registerCreatureEvent(cid, "upspeed")
  104. registerCreatureEvent(cid, "Monster Hunterl")
  105. registerCreatureEvent(cid, "Monster Hunter")
  106. registerCreatureEvent(cid, "MonsterKill")
  107. registerCreatureEvent(cid, "bossKill")
  108.  
  109.  
  110. if getPlayerStorageValue(cid, 99284) == 1 then
  111. setPlayerStorageValue(cid, 99284, -1)
  112. end
  113.  
  114. if isBiking(cid) then
  115. cancelBike(cid)
  116. end
  117.  
  118. if getPlayerStorageValue(cid, 6598754) >= 1 or getPlayerStorageValue(cid, 6598755) >= 1 then
  119. setPlayerStorageValue(cid, 6598754, -1)
  120. setPlayerStorageValue(cid, 6598755, -1)
  121. doRemoveCondition(cid, CONDITION_OUTFIT) --alterado v1.9 \/
  122. doTeleportThing(cid, posBackPVP, false)
  123. doCreatureAddHealth(cid, getCreatureMaxHealth(cid))
  124. end
  125.  
  126. doChangeSpeed(cid, -(getCreatureSpeed(cid)))
  127.  
  128. --///////////////////////////////////////////////////////////////////////////--
  129. local storages = {17000, 63215, 17001, 13008, 5700}
  130. for s = 1, #storages do
  131. if not tonumber(getPlayerStorageValue(cid, storages[s])) then
  132. if s == 3 then
  133. setPlayerStorageValue(cid, storages[s], 1)
  134. elseif s == 4 then
  135. setPlayerStorageValue(cid, storages[s], -1)
  136. else
  137. if isBeingUsed(getPlayerSlotItem(cid, 8).itemid) then
  138. setPlayerStorageValue(cid, storages[s], 1)
  139. else
  140. setPlayerStorageValue(cid, storages[s], -1)
  141. end
  142. end
  143. doPlayerSendTextMessage(cid, 27, "Sorry, but a problem occurred on the server, but now it's alright")
  144. end
  145. end
  146. --/////////////////////////////////////////////////////////////////////////--
  147. if getPlayerStorageValue(cid, 17000) >= 1 then -- fly
  148.  
  149. local item = getPlayerSlotItem(cid, 8)
  150. local poke = getItemAttribute(item.uid, "poke")
  151. doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))
  152. doRemoveCondition(cid, CONDITION_OUTFIT)
  153. local addonfly = getPlayerSlotItem(cid, 8).uid
  154. local addofly = getItemAttribute(addonfly,"addonfly")
  155. if not addofly then
  156. doSetItemAttribute(addonfly,"addonfly",0)
  157. doSetCreatureOutfit(cid, {lookType = flys[poke][1] + 351}, -1)
  158.  
  159. end
  160. if addofly > 0 then
  161. doSetCreatureOutfit(cid, {lookType = addofly}, -1)
  162.  
  163. end
  164.  
  165. local item = getPlayerSlotItem(cid, 8)
  166. local poke = getItemAttribute(item.uid, "poke")
  167. doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))
  168. doRemoveCondition(cid, CONDITION_OUTFIT)
  169. doSetCreatureOutfit(cid, {lookType = flys[poke][1] + 351}, -1)
  170.  
  171. local apos = getFlyingMarkedPos(cid)
  172. apos.stackpos = 0
  173.  
  174. if getTileThingByPos(apos).itemid <= 2 then
  175. doCombatAreaHealth(cid, FIREDAMAGE, getFlyingMarkedPos(cid), 0, 0, 0, CONST_ME_NONE)
  176. doCreateItem(460, 1, getFlyingMarkedPos(cid))
  177. end
  178.  
  179. doTeleportThing(cid, apos, false)
  180. if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then
  181. sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")]) --alterado v1.8
  182. end
  183.  
  184. local posicao = getTownTemplePosition(getPlayerTown(cid))
  185. markFlyingPos(cid, posicao)
  186.  
  187. elseif getPlayerStorageValue(cid, 63215) >= 1 then -- surf
  188.  
  189. local item = getPlayerSlotItem(cid, 8)
  190. local poke = getItemAttribute(item.uid, "poke")
  191. local addonsurf = getPlayerSlotItem(cid, 8).uid
  192. local addosurf = getItemAttribute(addonsurf,"addonsurf")
  193. if not addosurf then
  194. doSetItemAttribute(addonsurf,"addonsurf",0)
  195. doSetCreatureOutfit(cid, {lookType = surfs[poke].lookType + 351}, -1)
  196.  
  197. end
  198. if addosurf > 0 then
  199. doSetCreatureOutfit(cid, {lookType = addosurf}, -1)
  200.  
  201. end
  202. doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))
  203. if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then
  204. sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")]) --alterado v1.8
  205. end
  206.  
  207. elseif getPlayerStorageValue(cid, 17001) >= 1 then -- ride
  208.  
  209. local item = getPlayerSlotItem(cid, 8)
  210. local poke = getItemAttribute(item.uid, "poke")
  211.  
  212.  
  213. local item = getPlayerSlotItem(cid, 8)
  214. local poke = getItemAttribute(item.uid, "poke")
  215.  
  216.  
  217. if rides[poke] then
  218. doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))
  219. doRemoveCondition(cid, CONDITION_OUTFIT)
  220. local addonride = getPlayerSlotItem(cid, 8).uid
  221. local addoride = getItemAttribute(addonride,"addonride")
  222. if not addofly then
  223. doSetItemAttribute(addonride,"addonride",0)
  224. doSetCreatureOutfit(cid, {lookType = rides[poke][1] + 351}, -1)
  225.  
  226. end
  227. if addoride > 0 then
  228. doSetCreatureOutfit(cid, {lookType = addoride}, -1)
  229.  
  230. end
  231. if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then
  232. sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")]) --alterado v1.8
  233. end
  234. else
  235. setPlayerStorageValue(cid, 17001, -1)
  236. doRegainSpeed(cid)
  237. end
  238.  
  239. local posicao2 = getTownTemplePosition(getPlayerTown(cid))
  240. markFlyingPos(cid, posicao2)
  241.  
  242. elseif getPlayerStorageValue(cid, 13008) >= 1 then -- dive
  243. if not isInArray({5405, 5406, 5407, 5408, 5409, 5410}, getTileInfo(getThingPos(cid)).itemid) then
  244. setPlayerStorageValue(cid, 13008, 0)
  245. doRegainSpeed(cid)
  246. doRemoveCondition(cid, CONDITION_OUTFIT)
  247. return true
  248. end
  249.  
  250. if getPlayerSex(cid) == 1 then
  251. doSetCreatureOutfit(cid, {lookType = 1034, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet}, -1)
  252. else
  253. doSetCreatureOutfit(cid, {lookType = 1035, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet}, -1)
  254. end
  255. doChangeSpeed(cid, 800)
  256.  
  257. elseif getPlayerStorageValue(cid, 32001) > 0 then --bike
  258. doChangeSpeed(cid, -getCreatureSpeed(cid))
  259. doChangeSpeed(cid, getPlayerStorageValue(cid, 32001)) --alterado v1.8
  260. if getPlayerSex(cid) == 1 then
  261. doSetCreatureOutfit(cid, {lookType = 603}, -1)
  262. else
  263. doSetCreatureOutfit(cid, {lookType = 602}, -1)
  264. end
  265.  
  266. elseif getPlayerStorageValue(cid, 75846) >= 1 then --alterado v1.9 \/
  267. doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)), false)
  268. setPlayerStorageValue(cid, 75846, -1)
  269. sendMsgToPlayer(cid, 20, "You have been moved to your town!")
  270. else
  271. doRegainSpeed(cid)
  272. end
  273.  
  274. if getPlayerStorageValue(cid, 22545) >= 1 then
  275. setPlayerStorageValue(cid, 22545, -1)
  276. doTeleportThing(cid, getClosestFreeTile(cid, posBackGolden), false)
  277. setPlayerRecordWaves(cid)
  278. end
  279.  
  280. setPlayerStorageValue(cid, 243656, 0)
  281.  
  282. doSetPlayerSpeedLevel(cid)
  283.  
  284. doPlayerSetMaxCapacity(cid, 7)
  285.  
  286.  
  287. return true
  288.  
  289. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!