Jump to content
  • 0
Dfsuno

Scripting Ajuda para mudar o script para Revscript

Asked by Dfsuno

Question

Dfsuno    0
Dfsuno
Posted

Antes de hacer su pregunta, asegúrese de leer las reglas y la guía de la sección a continuación:

https://forums.otserv.com.br/index.php?/forums/topic/168583-regras-da-seção/

https://forums.otserv.com.br/index.php?/forums/topic/165121-como-fazer-uma-pergunta-ou-o-grande-guia-do-usuário-com-dúvidas/

Nota: ¡no elimine este formulario predefinido, complételo correctamente para publicar su tema!

Base: OTBR 12.60 

Preciso de ajuda por favor, estou enlouquecendo, tentei editar eu mesmo mas não consegui. (Creaturescripts)

 

Citar

  


function onLogin(cid)
    local lastLogin = getPlayerLastLogin(cid)
    local playerVoc = getPlayerVocation(cid)

    if(lastLogin == 0) then
        local qResult = db.storeQuery("SELECT `town_id` FROM `players` WHERE `id`= 1;")
        local cTown = result.getDataInt(qResult, "town_id")
        doPlayerSetTown(cid, cTown)
        doTeleportThing(cid, getTownTemplePosition(cTown))
        if (playerVoc == 4) or (playerVoc == 8) then
            doPlayerAddItem(cid,2498,1)
            doPlayerAddItem(cid,2432,1)
            doPlayerAddItem(cid,2520,1)
            doPlayerAddItem(cid,2414,1)
            doPlayerAddItem(cid,2492,1)         
            while getPlayerSkill(cid, LEVEL_SKILL_AXE) < 70 do
                doPlayerAddSkillTry(cid, LEVEL_SKILL_AXE, 100)
            end
            while getPlayerSkill(cid, LEVEL_SKILL_SHIELDING) < 70 do
                doPlayerAddSkillTry(cid, LEVEL_SKILL_SHIELDING, 100)
            end
            while getPlayerMagLevel(cid) < 6 do
                doPlayerAddManaSpent(cid, 100, 100)
            end
        elseif (playerVoc == 3) or (playerVoc == 7)  then
            doPlayerAddItem(cid,2498,1)
            doPlayerAddItem(cid,2455,1)
            doPlayerAddItem(cid,2543,1)
            doPlayerAddItem(cid,2466,1)
            while getPlayerSkill(cid, LEVEL_SKILL_DISTANCE) < 70 do
                doPlayerAddSkillTry(cid, LEVEL_SKILL_DISTANCE, 100)
            end
            while getPlayerSkill(cid, LEVEL_SKILL_SHIELDING) < 70 do
                doPlayerAddSkillTry(cid, LEVEL_SKILL_SHIELDING, 100)
            end
            while getPlayerMagLevel(cid) < 15 do
                doPlayerAddManaSpent(cid, 100, 100)
            end
        else
            doPlayerAddItem(cid,2497,1)
            doPlayerAddItem(cid,2456,1)
            doPlayerAddItem(cid,2546,1)
            doPlayerAddItem(cid,2656,1)
            if (playerVoc == 1) or (playerVoc == 6)  then
                while getPlayerMagLevel(cid) < 40 do
                    doPlayerAddManaSpent(cid, 100, 100)
                end       
            else
                while getPlayerMagLevel(cid) < 45 do
                    doPlayerAddManaSpent(cid, 100, 100)
                end   
            end
        end
      
        -- Equips for All Vocs --
        doPlayerAddItem(cid,2643,1)
        doPlayerAddItem(cid,2488,1)         
        Container = doPlayerAddItem(cid, 2000, 1)
        Container = doPlayerAddItem(cid, 1995, 1)
            doAddContainerItem(Container, 2273, 2)
            doAddContainerItem(Container, 2273, 2)
            doAddContainerItem(Container, 2273, 2)
            doAddContainerItem(Container, 2273, 2)
            doAddContainerItem(Container, 2273, 2)
            doAddContainerItem(Container, 2273, 2)
            doAddContainerItem(Container, 2273, 2)
            doAddContainerItem(Container, 2273, 2)
        Container = doPlayerAddItem(cid, 1996, 1)
            doAddContainerItem(Container, 2268, 2)
            doAddContainerItem(Container, 2268, 2)
            doAddContainerItem(Container, 2268, 2)
            doAddContainerItem(Container, 2268, 2)
            doAddContainerItem(Container, 2268, 2)
            doAddContainerItem(Container, 2268, 2)
            doAddContainerItem(Container, 2268, 2)
            doAddContainerItem(Container, 2268, 2)
        Container = doPlayerAddItem(cid, 1993, 1)
            doAddContainerItem(Container, 2261, 2)
            doAddContainerItem(Container, 2305, 2)
            doAddContainerItem(Container, 2261, 2)
            doAddContainerItem(Container, 2305, 2)
            doAddContainerItem(Container, 2262, 2)
            doAddContainerItem(Container, 2310, 2)
            doAddContainerItem(Container, 2286, 2)
            doAddContainerItem(Container, 2291, 2)
        Container = doPlayerAddItem(cid, 1994, 1)
            doAddContainerItem(Container, 2313, 2)
            doAddContainerItem(Container, 2313, 2)
            doAddContainerItem(Container, 2313, 2)
            doAddContainerItem(Container, 2313, 2)
            doAddContainerItem(Container, 2313, 2)
            doAddContainerItem(Container, 2313, 2)
            doAddContainerItem(Container, 2313, 2)
            doAddContainerItem(Container, 2313, 2)
        Container = doPlayerAddItem(cid, 1997, 1)
            doAddContainerItem(Container, 2293, 2)
            doAddContainerItem(Container, 2293, 2)
            doAddContainerItem(Container, 2293, 2)
            doAddContainerItem(Container, 2293, 2)
            doAddContainerItem(Container, 2293, 2)
            doAddContainerItem(Container, 2293, 2)
            doAddContainerItem(Container, 2293, 2)
            doAddContainerItem(Container, 2293, 2)
        Container = doPlayerAddItem(cid, 1987, 1)
            doAddContainerItem(Container, 2006, 7)
            doAddContainerItem(Container, 2006, 7)
            doAddContainerItem(Container, 2006, 7)
            doAddContainerItem(Container, 2006, 7)
            doAddContainerItem(Container, 2006, 7)
            doAddContainerItem(Container, 2006, 7)
            doAddContainerItem(Container, 2006, 7)
            doAddContainerItem(Container, 2006, 7)
        Container = doPlayerAddItem(cid, 3939, 1)
            doAddContainerItem(Container, 2214, 1)
            doAddContainerItem(Container, 2562, 1)
            doAddContainerItem(Container, 2167, 1)
            doAddContainerItem(Container, 2169, 1)
            doAddContainerItem(Container, 2789, 1)
            doAddContainerItem(Container, 2420, 1)
        Container = doPlayerAddItem(cid, 1988, 1)
            doAddContainerItem(Container, 2293, 2)
            doAddContainerItem(Container, 2304, 3)
            doAddContainerItem(Container, 2261, 2)
            doAddContainerItem(Container, 2305, 2)
            doAddContainerItem(Container, 2262, 2)
            doAddContainerItem(Container, 2273, 3)
            doAddContainerItem(Container, 2006, 7)
            doAddContainerItem(Container, 2268, 2)
    end

    return true
end

 

 

Citar

  


--Script By Theax ""
function getPlayerFrags(cid)
    local time = os.time()
    local times = {today = (time - 86400), week = (time - (7 * 86400))}
 
    local contents, result = {day = {}, week = {}, month = {}}, db.getResult("SELECT `pd`.`date`, `pd`.`level`, `p`.`name` FROM `player_killers` pk LEFT JOIN `killers` k ON `pk`.`kill_id` = `k`.`id` LEFT JOIN `player_deaths` pd ON `k`.`death_id` = `pd`.`id` LEFT JOIN `players` p ON `pd`.`player_id` = `p`.`id` WHERE `pk`.`player_id` = " .. getPlayerGUID(cid) .. " AND `k`.`unjustified` = 1 AND `pd`.`date` >= " .. (time - (30 * 86400)) .. " ORDER BY `pd`.`date` DESC")
    if(result:getID() ~= -1) then
        repeat
            local content = {date = result:getDataInt("date")}
            if(content.date > times.today) then
                table.insert(contents.day, content)
            elseif(content.date > times.week) then
                table.insert(contents.week, content)
            else
                table.insert(contents.month, content)
            end
        until not result:next()
        result:free()
    end
 
    local size = {
        day = table.maxn(contents.day),
        week = table.maxn(contents.week),
        month = table.maxn(contents.month)
    }
    return size.day + size.week + size.month
end
 
function onLogin(cid)
    registerCreatureEvent(cid, "fraglook")
    return true
end
 
function onLook(cid, thing, position, lookDistance)
    if isPlayer(thing.uid) and thing.uid ~= cid then
        doPlayerSetSpecialDescription(thing.uid,' [Frags: '..getPlayerFrags(thing.uid)..']')
        return true
    elseif thing.uid == cid then
        doPlayerSetSpecialDescription(cid,' [Frags: '..getPlayerFrags(cid)..']')
        local string = 'You see yourself.'
        if getPlayerFlagValue(cid, PLAYERFLAG_SHOWGROUPINSTEADOFVOCATION) then
            string = string..' You are '.. getPlayerGroupName(cid) ..'.'
        elseif getPlayerVocation(cid) ~= 0 then
            string = string..' You are '.. getPlayerVocationName(cid) ..'.'
        else
            string = string..' You have no vocation.'
        end
        string = string..getPlayerSpecialDescription(cid)..''
 
        if getPlayerNameByGUID(getPlayerPartner(cid), false, false) ~= nil then
            string = string..' You are '.. (getPlayerSex(cid) == 0 and 'wife' or 'husband') ..' of '.. getPlayerNameByGUID(getPlayerPartner(cid)) ..'.'
        end
 
        if getPlayerGuildId(cid) > 0 then
            string = string..' You are ' .. (getPlayerGuildRank(cid) == '' and 'a member' or getPlayerGuildRank(cid)) ..' of the '.. getPlayerGuildName(cid)
            string = getPlayerGuildNick(cid) ~= '' and string..' ('.. getPlayerGuildNick(cid) ..').' or string..'.'
        end
 
        if getPlayerFlagValue(cid, PLAYERCUSTOMFLAG_CANSEECREATUREDETAILS) then
            string = string..'nHealth: ['.. getCreatureHealth(cid) ..' / '.. getCreatureMaxHealth(cid) ..'], Mana: ['.. getCreatureMana(cid) ..' / '.. getCreatureMaxMana(cid) ..'].'
            string = string..'nIP: '.. doConvertIntegerToIp(getPlayerIp(cid)) ..'.'
        end
 
        if getPlayerFlagValue(cid, PLAYERCUSTOMFLAG_CANSEEPOSITION) then
            string = string..'nPosition: [X:'.. position.x..'] [Y:'.. position.y..'] [Z:'.. position.z..'].'
        end
        doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, string) 
        return false
    end
    return true
end

 

 

Citar

  


function onKill(cid, target, lastHit)
 if cid ~= target and isPlayer(target) then
 if getPlayerIp(cid) == getPlayerIp(target) then
 doCreatureAddHealth(cid, -200)
 doCreatureAddMana(cid, -200)
 doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, 'You have been punished for killing a player of the same IP.')
 else
 doPlayerAddItem(cid, 2152, 1)
 setPlayerStorageValue(cid, 6776, getCreatureStorage(cid, 6776) + 1)
 end
 end

 if(getPlayerStorageValue(cid, 6776) == 5) and getCreatureStorage(cid, 6001) == -1 then
 broadcastMessage(getCreatureName(cid) .. " is on killing spree! He killed 5 players!")
 setPlayerStorageValue(cid, 6001, 1)
 doCreatureSetSkullType(cid, 3)  -- 3 is white

 elseif(getPlayerStorageValue(cid, 6776) == 10) and getCreatureStorage(cid, 6002) == -1 then
 broadcastMessage(getCreatureName(cid) .. " is dominating! He killed 10 players!")
 setPlayerStorageValue(cid, 6002, 1)
 doCreatureSetSkullType(cid, 4)  -- 3 is red

 elseif(getPlayerStorageValue(cid, 6776) == 25) and getCreatureStorage(cid, 6003) == -1 then
 broadcastMessage(getCreatureName(cid) .. " is CRAZY! He killed 25 players!")
 setPlayerStorageValue(cid, 6003, 1)
 doCreatureSetSkullType(cid, 5)  -- 5 is black

 elseif(getPlayerStorageValue(cid, 6776) == 50) and getCreatureStorage(cid, 6004) == -1 then
 broadcastMessage(getCreatureName(cid) .. " is UNSTOPPABLE!! He killed 50 players! DO SOMETHING!")
 setPlayerStorageValue(cid, 6004, 1)
 doPlayerAddItem(cid, 2640, 1)  -- soft boots as reward for killing 50 players

 elseif(getPlayerStorageValue(cid, 6776) == 100) and getCreatureStorage(cid, 6005) == -1 then
 broadcastMessage("Bow down to your new god! " ..getCreatureName(cid).. " has 100 frags!")
 setPlayerStorageValue(cid, 6005, 1)
 doPlayerAddItem(cid, 8266, 1)  -- kosheis amulet as reward for killing 100 players

 elseif(getPlayerStorageValue(cid, 6776) == 150) and getCreatureStorage(cid, 6006) == -1 then
 broadcastMessage(getCreatureName(cid) .. " is not a human! He killed 150 players!")
 setPlayerStorageValue(cid, 6006, 1)
 doPlayerAddItem(cid, 9932, 1)  -- firewalker boots as reward for killing 150 players
 return true
end

 

 

Share this post

Link to post

0 answers to this question

Recommended Posts

There have been no answers to this question yet

Guest
This topic is now closed to further replies.
Go To Question Listing Tópicos Não Resolvidos

  • Recently Browsing   0 members

    No registered users viewing this page.

×