-
skills script
Galera preciso de um script assim: no primeiro login em jogo após ter criado o personagem no site paladinos ao logar ganham 100 de distance e 60 de shield, mages ganham 80 de ml , knights ganham 75 de axe e 75 de shield. lembrando é tfs 1.0 por sources em linux. ESSE É MEU CREATE CHARACTER DO SITE SE PODER FAZER QUE NA CRIAÇÃO DO PERSONAGEM NO SITE JÁ GANHE OS SKILLS QUE MENCIONEI ACIMA TAMBÉM IRÁ ME AJUDAR. // ---------------- \\ // Create Character \\ // ---------------- \\ // Max characters on each account: $config['max_characters'] = 7; // Available character vocation users can create. $config['available_vocations'] = array(1, 2, 3, 4); // Available towns (specify town ids, etc: (0, 1, 2); to display 3 town options (town id 0, 1 and 2). $config['available_towns'] = array(1); $config['level'] = 8; $config['health'] = 185; $config['mana'] = 40; $config['cap'] = 435; $config['soul'] = 100; $config['maleOutfitId'] = 128; $config['femaleOutfitId'] = 138; // No vocation info (if user select vocation id 0, we force thees configurations on him $config['nvlevel'] = 1; $config['nvHealth'] = 150; $config['nvMana'] = 5; $config['nvCap'] = 1000; $config['nvSoul'] = 100; $config['nvForceTown'] = 0; // Force a town to no vocation even though he selected something else? 0 = no, 1 = yes. $config['nvTown'] = 0; // Town id to force no vocations to get to, if nvForceTown is 1. // Minimum allowed character name letters. Etc 4 letters: "Kåre". $config['minL'] = 4; // Maximum allowed character name letters. Etc 20 letters: "Bobkåreolesofiesberg" $config['maxL'] = 20; // Maximum allowed character name words. Etc 2 words = "Bob Kåre", 3 words: "Bob Arne Kåre" as max char name words. $config['maxW'] = 2;
-
-
(Resolvido)Perdas de loot zero
ae champz: local deathListEnabled = true local maxDeathRecords = 5 function onDeath(cid, corpse, killer, mostDamage, unjustified, mostDamage_unjustified) local player = Player(cid) player:sendTextMessage(MESSAGE_EVENT_ADVANCE, "You are dead.") if player:getStorageValue(cid, 1101) > 0 then player:setStorageValue(1101, 0) end if not deathListEnabled then return end local byPlayer = 0 local killerCreature = Creature(killer) if killerCreature == nil then killerName = "field item" else if killerCreature:isPlayer() then byPlayer = 1 else local master = killerCreature:getMaster() if master and master ~= killerCreature and master:isPlayer() then killerCreature = master byPlayer = 1 end end killerName = killerCreature:getName() end local byPlayerMostDamage = 0 if mostDamage == 0 then mostDamageName = "field item" else local mostDamageKiller = Creature(mostDamage) if mostDamageKiller:isPlayer() then byPlayerMostDamage = 1 else local master = mostDamageKiller:getMaster() if master and master ~= mostDamageKiller and master:isPlayer() then mostDamageKiller = master byPlayerMostDamage = 1 end end mostDamageName = mostDamageKiller:getName() end local playerGuid = player:getGuid() db.query("INSERT INTO `player_deaths` (`player_id`, `time`, `level`, `killed_by`, `is_player`, `mostdamage_by`, `mostdamage_is_player`, `unjustified`, `mostdamage_unjustified`) VALUES (" .. playerGuid .. ", " .. os.time() .. ", " .. player:getLevel() .. ", " .. db.escapeString(killerName) .. ", " .. byPlayer .. ", " .. db.escapeString(mostDamageName) .. ", " .. byPlayerMostDamage .. ", " .. unjustified .. ", " .. mostDamage_unjustified .. ")") local resultId = db.storeQuery("SELECT `player_id` FROM `player_deaths` WHERE `player_id` = " .. playerGuid) local deathRecords = 0 local tmpResultId = resultId while tmpResultId ~= false do tmpResultId = result.next(resultId) deathRecords = deathRecords + 1 end if resultId ~= false then result.free(resultId) end while deathRecords > maxDeathRecords do db.query("DELETE FROM `player_deaths` WHERE `player_id` = " .. playerGuid .. " ORDER BY `time` LIMIT 1") deathRecords = deathRecords - 1 end if byPlayer == 1 then local playerGuild = player:getGuild() if playerGuild then local killerGuild = killerCreature:getGuild() if playerGuild ~= killerGuild and isInWar(cid, killerCreature) then local warId = false resultId = db.storeQuery("SELECT `id` FROM `guild_wars` WHERE `status` = 1 AND ((`guild1` = " .. killerGuild:getId() .. " AND `guild2` = " .. playerGuild:getId() .. ") OR (`guild1` = " .. playerGuild:getId() .. " AND `guild2` = " .. killerGuild:getId() .. "))") if resultId ~= false then warId = result.getDataInt(resultId, "id") result.free(resultId) end if warId ~= false then db.query("INSERT INTO `guildwar_kills` (`killer`, `target`, `killerguild`, `targetguild`, `time`, `warid`) VALUES (" .. db.escapeString(killerName) .. ", " .. db.escapeString(player:getName()) .. ", " .. killerGuild:getId() .. ", " .. playerGuild:getId() .. ", " .. os.time() .. ", " .. warId .. ")") end end end end end já resolvi graças a você sanado Grato!
-
skills stages
Se alguem tiver um stages de skills para tfs 1.0 por favor posta ai.
-
loot e gold
Bom galera preciso de um script de servidores de war, após matar ganha exp e gold, porém se matar mc do mesmo ip não ganha nada. qual a minha dificuldade? o server tem varios porém nenhum funciona pois estou usando a tfs 1.0 via linux por sources, caso alguem consiga desenvolver agradeço muito.
-
(Resolvido)Perdas de loot zero
Bom mano troquei o login agora é esse aqui: function onLogin(cid) local player = Player(cid) local loginStr = "Welcome to " .. configManager.getString(configKeys.SERVER_NAME) .. "!" if player:getLastLoginSaved() <= 0 then loginStr = loginStr .. " Please choose your outfit." player:sendOutfitWindow() else if loginStr ~= "" then player:sendTextMessage(MESSAGE_STATUS_DEFAULT, loginStr) end loginStr = string.format("Your last visit was on %s.", os.date("%a %b %d %X %Y", player:getLastLoginSaved())) end player:sendTextMessage(MESSAGE_STATUS_DEFAULT, loginStr) player:registerEvent("PlayerDeath") player:registerEvent("AdvanceSave") player:registerEvent("StorageConversion") player:registerEvent("ProtectLevel") return true end e o creature scripts: <?xml version="1.0" encoding="UTF-8"?> <creaturescripts> <!-- Others --> <event type="login" name="PlayerLogin" script="others/login.lua"/> <event type="death" name="PlayerDeath" script="others/playerdeath.lua"/> <event type="advance" name="AdvanceSave" script="others/advance_save.lua"/> <event type="kill" name="FragReward" script="onkill.lua"/> <event type="login" name="AntiMultiClient" script="antimc.lua"/> <event type="advance" name="Addons" script="Addons.lua"/> <event type="preparedeath" name="ProtectLevel" script="lowlvl.lua"/> <event type="kill" name="FragReward" script="onkill.lua"/> <event type="login" name="FirstItems" script="others/firstitems.lua"/> </creaturescripts>
-
(Resolvido)Perdas de loot zero
Nem false nem 0 deu certo ;s segue meu login local config = { loginMessage = getConfigValue('loginMessage'), useFragHandler = getBooleanFromString(getConfigValue('useFragHandler')) } function onLogin(cid) local loss = getConfigValue('deathLostPercent') if(loss ~= nil) then doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, loss * 5) doPlayerAddBlessing(cid, 1) doPlayerAddBlessing(cid, 2) doPlayerAddBlessing(cid, 3) doPlayerAddBlessing(cid, 4) doPlayerAddBlessing(cid, 5) doPlayerAddPremiumDays(cid, 2) doCreatureSetDropLoot(cid, 0) doPlayerSetPromotionLevel(cid, 1) end local accountManager = getPlayerAccountManager(cid) if(accountManager == MANAGER_NONE) then local lastLogin, str = getPlayerLastLoginSaved(cid), config.loginMessage if(lastLogin > 0) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str) str = "Your last visit was on " .. os.date("%a %b %d %X %Y", lastLogin) .. "." else str = str .. " Please choose your outfit." doPlayerSendOutfitWindow(cid) end doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str) elseif(accountManager == MANAGER_NAMELOCK) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, it appears that your character has been namelocked, what would you like as your new name?") elseif(accountManager == MANAGER_ACCOUNT) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to manage your account and if you want to start over then type 'cancel'.") else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to create an account or type 'recover' to recover an account.") end if(not isPlayerGhost(cid)) then doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT) end registerCreatureEvent(cid, "kill") registerCreatureEvent(cid, "onPrepareDeath") registerCreatureEvent(cid, "PlayerLogout") registerCreatureEvent(cid, "nada") registerCreatureEvent(cid, "onPrepareDeath") registerCreatureEvent(cid, "deathBroadcast") registerCreatureEvent(cid, "ProtectLevel") registerCreatureEvent(cid, "DeathBroadcast") registerCreatureEvent(cid, "playerkill") registerCreatureEvent(cid, "Idle") if(config.useFragHandler) then registerCreatureEvent(cid, "SkullCheck") end return true end
-
(Resolvido)Perdas de loot zero
Bom galera pesquisei no tk e em vários fóruns mais na tfs 1.0 não consegui um script funcional que ao morrer sem bless e sem aol o player ainda assim não perde nenhum item do set, caso alguem consiga bolar eu agradeço!
-
-
-
Clean House
vou testar mais agradeço novamente a intenção de ajuda
-
Clean House
AlekysRocha vou testar mais desde já fico grato, ja foi reputado. deu [warning - event : checkscript] event onthink not found. scripts/houseclean.lua tem algo que nao deixa ele rodar na tfs 1.0
-
- Clean House
-
Clean House
valew champz mais esse ai nao funciona, nao tenho MODS no meu servidor (10,41) creio que o que precise seje por globalevents
-
Clean House
Bom galera se alguem tiver um clean house funcional para tfs 1.0 eu agradeço, do que se trata o clean house? script creio que por globalevents para limpar a casa e mandar os items para o depo do player que não loga a 10 dias por exemplo, sendo assim liberando para outro player poder comprar a casa, se alguem tiver eu agradeço.
-
[PEDIDO] Script XP extra TFS 1.0
Bom llucas75 eu sei o bastante para adicionar uma creaturescripts, meu servidor é tfs 1.0 a função value=" " nem funciona mais, eu adicionei a tag no login e ao creaturescripts.xml porém não funcionou, foi isso que disse.
-
[PEDIDO] Script XP extra TFS 1.0
Aqui nao funcionou, add essa tag ao creaturescripts player:registerEvent(" ") recomenda outra?
-
[PEDIDO] Script XP extra TFS 1.0
estou precisando de algum script de exp bonus para tfs 1.0 também achei algo bom relativo na otland mais parece que ainda nao conseguirão programar, segue o script achado : obs: ele add 20% na exp de cada monstro morto mais não tem correlação com a premium function onKill(cid, target, lastHit) local attackMonster = MonsterType(getCreatureName(target)) if not attackMonster then return true end local creature = Creature(target) local damageMap = creature:getDamageMap() for id, damage in pairs(damageMap) do local player = Player(id) if player then if getPlayerVipTime(player) > 100 then player:addExperience(math.floor(attackMonster:getExperience() * 0.2), true) end end end return true end creditos do imkingran