Advertisement
Guest User

Untitled

a guest
Aug 10th, 2019
125
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.69 KB | None | 0 0
  1. <!-- Cast -->
  2. <talkaction words="/cast;!cast" event="script" value="cast.lua"/>
  3.  
  4.  
  5. local config = {
  6. loginMessage = getConfigValue('loginMessage'),
  7. useFragHandler = getBooleanFromString(getConfigValue('useFragHandler'))
  8. }
  9.  
  10.  
  11. function onLogin(cid)
  12. if getCreatureOutfit(cid).lookType == 306 and getPlayerStorageValue(cid, 121219) ~= 1 then
  13. doCreatureChangeOutfit(cid, getPlayerSex(cid) == 0 and {lookType = 136} or {lookType = 128})
  14. end
  15.  
  16. if(getBooleanFromString(getConfigValue('accountManager')) == false) then
  17. if (getCreatureName(cid) == "Account Manager") then
  18. return doRemoveCreature(cid, true)
  19. end
  20. end
  21.  
  22.  
  23. function onLogin(cid)
  24. local loss = getConfigValue('deathLostPercent')
  25. if(loss ~= nil) then
  26. doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, loss * 10)
  27. end
  28.  
  29.  
  30. local accountManager = getPlayerAccountManager(cid)
  31. if(accountManager == MANAGER_NONE) then
  32. local lastLogin, str = getPlayerLastLoginSaved(cid), config.loginMessage
  33. if(lastLogin > 0) then
  34. doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
  35. str = "Your last visit was on " .. os.date("%a %b %d %X %Y", lastLogin) .. "."
  36. else
  37. str = str .. " Please choose your outfit."
  38. doPlayerSendOutfitWindow(cid)
  39. end
  40.  
  41. doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
  42. elseif(accountManager == MANAGER_NAMELOCK) then
  43. addEvent(valid(doCreatureSay), 500, cid, "Hello, it appears that your character has been locked for name violating rules, what new name would you like to have?", TALKTYPE_PRIVATE_NP, true, cid)
  44. elseif(accountManager == MANAGER_ACCOUNT) then
  45. addEvent(valid(doCreatureSay), 500, cid, "Hello, type {account} to manage your account. If you would like to start over, type {cancel} anywhere.", TALKTYPE_PRIVATE_NP, true, cid)
  46. else
  47. addEvent(valid(doCreatureSay), 500, cid, "Hello, type {account} to create an account or {recover} to recover an account.", TALKTYPE_PRIVATE_NP, true, cid)
  48. end
  49.  
  50. if(not isPlayerGhost(cid)) then
  51. doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT)
  52. end
  53. if getPlayerStorageValue(cid, 54304) > 0 then
  54. doPlayerSetStorageValue(cid, 54304, 0)
  55. end
  56. doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, "Bem Vindo!")
  57. if getPlayerLevel(cid) < 717217 then
  58. registerCreatureEvent(cid, "AdvanceTeleport")
  59. end
  60.  
  61.  
  62. registerCreatureEvent(cid, "DesertDeath")
  63. registerCreatureEvent(cid, "DesertCombat")
  64. registerCreatureEvent(cid, "BattleDeath")
  65. registerCreatureEvent(cid, "ZombieThink")
  66. registerCreatureEvent(cid, "ZombieDeath")
  67. registerCreatureEvent(cid, "BattleCombat")
  68. registerCreatureEvent(cid, "FireStorm")
  69. registerCreatureEvent(cid, "ctf")
  70. registerCreatureEvent(cid, "zombieevent")
  71. registerCreatureEvent(cid, "Idle")
  72. registerCreatureEvent(cid, "tpquest")
  73. registerCreatureEvent(cid, "CombatDodge")
  74. registerCreatureEvent(cid, "recompensa")
  75. registerCreatureEvent(cid, "SkullAmulet")
  76. registerCreatureEvent(cid, "BountyHunter")
  77. registerCreatureEvent(cid, "PlayerDeath")
  78. registerCreatureEvent(cid, "rewardpoints")
  79. registerCreatureEvent(cid, "autoloot")
  80. registerCreatureEvent(cid, "RecordIp")
  81. registerCreatureEvent(cid, "pvpsystem")
  82. if (InitArenaScript ~= 0) then
  83. InitArenaScript = 1
  84. -- make arena rooms free
  85. for i = 42300, 42309 do
  86. setGlobalStorageValue(i, 0)
  87. setGlobalStorageValue(i+100, 0)
  88. end
  89. end
  90. registerCreatureEvent(cid, "Mail")
  91. if(getPlayerOperatingSystem(cid) >= CLIENTOS_OTCLIENT_LINUX) then
  92. registerCreatureEvent(cid, "ExtendedOpcode")
  93. end
  94.  
  95. registerCreatureEvent(cid, "ReportBug")
  96. if(config.useFragHandler) then
  97. registerCreatureEvent(cid, "SkullCheck")
  98. end
  99.  
  100. registerCreatureEvent(cid, "GuildEvents")
  101. registerCreatureEvent(cid, "critical")
  102. registerCreatureEvent(cid, "BroadDeath")
  103. registerCreatureEvent(cid, "AdvanceSave")
  104. registerCreatureEvent(cid, "GuildMotd")
  105. registerCreatureEvent(cid, "fraglook")
  106. registerCreatureEvent(cid, "blesscheck")
  107. registerCreatureEvent(cid, "DeathBroadcast")
  108. registerCreatureEvent(cid, "addons")
  109. registerCreatureEvent(cid, "onPrepareDeath")
  110. registerCreatureEvent(cid, "fraglook")
  111. registerCreatureEvent(cid, "antimb")
  112. registerCreatureEvent(cid, "antimagebomb")
  113. registerCreatureEvent(cid, "FimVip")
  114. registerCreatureEvent(cid, "ExpVip")
  115. registerCreatureEvent(cid, "VipReceive")
  116. registerCreatureEvent(cid, "redSkullAmulet")
  117. registerCreatureEvent(cid, "FullHpMana")
  118. registerCreatureEvent(cid, "killitem")
  119. registerCreatureEvent(cid, "huntdeath")
  120. registerCreatureEvent(cid, "loguthunt")
  121. registerCreatureEvent(cid, "ReportBug")
  122. registerCreatureEvent(cid, "CastleExp")
  123. registerCreatureEvent(cid, "AdvEffect")
  124. registerCreatureEvent(cid, "BlessedPlayer")
  125.  
  126. registerCreatureEvent(cid, "dodge")
  127. registerCreatureEvent(cid, "town")
  128. registerCreatureEvent(cid, "recompensaLvl")
  129. if getPlayerStorageValue(cid, 48902) == -1 then
  130. setPlayerStorageValue(cid, 48902, 0)
  131. end
  132.  
  133. registerCreatureEvent(cid, "critical")
  134.  
  135.  
  136.  
  137.  
  138. if getPlayerName(cid) == "Account Manager" and #getPlayersByIp(getPlayerIp(cid)) > 10 then
  139. return false
  140. end
  141.  
  142. if getPlayerSlotItem(cid, 2).itemid == 7889 then
  143. doPlayerAddBlessing(cid, 1)
  144. doPlayerAddBlessing(cid, 2)
  145. doPlayerAddBlessing(cid, 3)
  146. doPlayerAddBlessing(cid, 4)
  147. doPlayerAddBlessing(cid, 5)
  148. doSendMagicEffect(getPlayerPosition(cid), 49)
  149. else
  150. doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT)
  151. end
  152.  
  153.  
  154. if getPlayerStorageValue(cid, 48903) == -1 and getPlayerStorageValue(cid, 48902) == -1 then
  155. setPlayerStorageValue(cid, 48903, 0)
  156. setPlayerStorageValue(cid, 48902, 0)
  157. end
  158. if getPlayerStorageValue(cid, 12036) == -1 then
  159. setPlayerStorageValue(cid, 12036, 1)
  160. end
  161.  
  162. return true
  163. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement