Jump to content

JwDoK

Inactive Member
  • Posts

    12
  • Joined

  • Last visited

  • Feedback

    0%

Posts posted by JwDoK

  1. I tried solving your [007] DawisHU at that bug fail ...

    I dropped the system because of that bug, a las quest if I can help you with him

    quest pet_system begin
        state start begin
            when letter begin
                cmdchat("petguihideshow "..q.getcurrentquestindex())
            end
            
            function givebonus(x)
                local mobVnum = pc.getqf("mobVnum")
                local y,boni = {17,16,1},pet_system.bonusliste()
                table.foreach(boni[x],function(i,l)  cmdchat("HaustierBonus"..i.." "..l.."") affect.add_collect(y[i],l,60*60*24*365*60) end )
                cmdchat("HaustierLevel "..pc.getqf('petlevel_'..mobVnum).."")
                cmdchat("HaustierName "..pc.get_name().."")
                pc.setqf("petruf",1)
                pc.setqf("petguishow",1)
            end
            
            function bonusliste()
                return {
                    [1] = {1,1,200},
                    [2] = {2,2,300},
                    [3] = {3,3,400},
                    [4] = {4,4,500},
                    [5] = {5,5,600},
                    [6] = {6,6,700},
                    [7] = {7,7,800},
                    [8] = {8,8,900},
                    [9] = {9,9,1000},
                    [10] = {10,10,1100},
    				[11] = {11,11,1200},
                    [12] = {12,12,1300},
                    [13] = {13,13,1400},
                    [14] = {14,14,1500},
                    [15] = {15,15,1600},
                    [16] = {16,16,1700},
                    [17] = {17,17,1800},
                    [18] = {18,18,1900},
                    [19] = {19,19,1950},
                    [20] = {20,20,2000},
                }
            end
            
            function removebonus(x)
                local y,boni = {17,16,1},pet_system.bonusliste()
                table.foreach(boni[x],function(i,l) affect.remove_collect(y[i],l,60*60*24*365*60) end )
                pc.setqf("petruf",0)
                --cmdchat("HidePetGui")
                pc.setqf("petguishow",0)
                cleartimer("bugcheck")
            end
            
            function get_pet_info(itemVnum)
                pet_info_map = {
                --  [ITEM VNUM] MOB_VNUM, DEFAULT NAME, buff_idx, spawn_effect_idx
    
                    [53225]     = { 34029, "-Sigiliu Clopotel de Nea", 1},
                }
    
                itemVnum = tonumber(itemVnum)
    
                return pet_info_map[itemVnum]
            end
            function get_spawn_effect_file(idx)
                effect_table = {
                    [0] = nil,
                    [1] = "d:ymir workeffectetcappear_diemonster_appear.mse",
                }
                return effect_table [idx]
            end
            when 53007.use or 53013.use or 53012.use or 53011.use or 53010.use or
            53005.use or 53006.use or 53003.use or 53002.use or 53001.use or 53014.use or
            53015.use or 53017.use or 53018.use or 53019.use or 53016.use or 53008.use or
            53009.use or 53020.use or 53021.use or 53022.use or 53023.use or 53024.use or
            53224.use or 53225.use begin
                local pet_info = pet_system.get_pet_info(item.vnum)
    
                if null != pet_info then
    
                    local mobVnum = pet_info[1]
                    local petName = pet_info[2]
                    local spawn_effect_file_name = pet_system.get_spawn_effect_file(pet_info[4])
                    
                    pc.setqf("mobVnum",mobVnum)
    
                    if true == pet.is_summon(mobVnum) then
                        if spawn_effect_file_name != nil then
                            pet.spawn_effect (mobVnum, spawn_effect_file_name)
                        end
                        pet.unsummon(mobVnum)
                        pet_system.removebonus(pc.getqf('petlevel_'..mobVnum))
                        cmdchat("HidePetGui")
                        syschat("Animalul de companie a fost alungat")
                    else
                        if pet.count_summoned() < 1 then
                            pet.summon(mobVnum, petName, false)
                            if pet_info[4] ~= nil then
                            cmdchat(pet_info[4])
                            end
                            if pc.getqf('petlevel_'..mobVnum) == 0 then
                            pc.setqf('petlevel_'..mobVnum,1)
                            end
                            syschat("Animalul de companie a fost chemat.")
                            pet_system.givebonus(pc.getqf('petlevel_'..mobVnum))
                            local expprocent1 = {20, 40, 60, 80, 100, 120, 140, 160, 180, 200, 220, 240, 260, 280, 300, 320, 350, 400, 450, 500}
                            cmdchat("PetProcentExp "..(pc.getqf("exp_"..mobVnum)/expprocent1[pc.getqf("petlevel_"..mobVnum)]).."")                 
                            cmdchat("ShowPetGui")
                            loop_timer("bugcheck", 0.2)
                        else
                            syschat("Ai deja chemat un animalut!")
                        end
                        if spawn_effect_file_name != nil then
                            pet.spawn_effect(mobVnum, spawn_effect_file_name)
                        end
                    end -- if pet.is_summon
                end  -- if null != pet_info
            end -- when
            when kill with not npc.is_pc() begin
                local mobVnum = pc.getqf("mobVnum")        
                if pc.getqf("petlevel_"..mobVnum) == 20 then
                    return
                else
                if pc.getqf("petruf")==1 then
                --intervall = 10
                --if pc.get_level() <= mob.get_level(npc.get_race())+ intervall then -- Poate fi doar lvl max 10 peste monstru
                pc.setqf("exp_"..mobVnum,pc.getqf("exp_"..mobVnum)+1)
                        local exp2up = {2000, 4000, 6000, 8000, 10000, 12000, 14000, 16000, 18000, 20000, 22000, 24000, 26000, 28000, 30000, 32000, 35000, 40000, 45000, 50000}
                        local expprocent = {20, 40, 60, 80, 100, 120, 140, 160, 180, 200, 220, 240, 260, 280, 300, 320, 350, 400, 450, 500}
                        cmdchat("PetProcentExp "..(pc.getqf("exp_"..mobVnum)/expprocent[pc.getqf("petlevel_"..mobVnum)]).."")
                        if pc.getqf("exp_"..mobVnum) == exp2up[pc.getqf("petlevel_"..mobVnum)] then
                            if pc.getqf("petlevel_"..mobVnum) == 19 then
                                say_title("Animal de companie")
                                say("Animalut de companie Level "..(pc.getqf("petlevel_"..mobVnum)+1).."")
                                say_reward("Acesta a fost ultimul nivel!")
                            end
                            say_title("Animal de companie")
                            say("Animalut de companie Level "..(pc.getqf("petlevel_"..mobVnum)+1).."")
                            say("Felicitarii!")
                            pc.setqf("petlevel_"..mobVnum,pc.getqf("petlevel_"..mobVnum)+1)
                            pc.setqf("exp_"..mobVnum,0)
                            pet_system.removebonus(pc.getqf('petlevel'))
                        end
                    end -- if not...
                end -- if pc.get...
            end -- when
            
                    -- Bugschutz
            
            when bugcheck.timer begin
                if pc.is_dead() then
                    pet_system.removebonus(pc.getqf('petlevel'))
                end
            end
     
    		when login or dead or logout or disconnect with pc.getqf("petruf") == 1 begin
    			local mobVnum = pc.getqf("petlevel_")
    			pet_system.removebonus(petlevel_)
            end
                
        end -- state
    end -- quest

     

  2. It was already set so ... I keep getting that error

    HOSTNAME: channel1_1
    CHANNEL: 1
    PORT: 12345
    P2P_PORT: 50000
    DB_PORT: 15000
    DB_ADDR: localhost
    MAP_ALLOW: 1 3 4 5 21 23 24 25 200 209 41 43 44 45 61 62 63 64 65 119 120 121 66 67 193
    TABLE_POSTFIX:
    PASSES_PER_SEC: 25
    SAVE_EVENT_SECOND_CYCLE: 180
    PING_EVENT_SECOND_CYCLE: 180
    PLAYER_SQL: localhost m2user m2pass@# player
    COMMON_SQL: localhost m2user m2pass@# common
    LOG_SQL: localhost m2user m2pass@# log
    NO_PK: 1
    VIEW_RANGE: 6000
    CHECK_MULTIHACK: 0
    LOCALE_SERVICE: germany
    MAX_LEVEL: 250
    adminpage_ip: 127.0.0.1
    adminpage_password: 21279Hdfs432dsfqwa3e2qw4erKBdsaLJHGdsa323weqw
    FN_log_adminpage: 1
    mark_server 1
    mark_min_level 1
    traffic_profile: 1
    empire_whisper: 1
    user_limit: 1500
    #hackshield_enable: 1
    #hackshield_first_check_time: 10
    #hackshield_check_cycle_time: 10
    speedhack_limit_count: 10
    speedhack_limit_bonus: 10
    spam_block_duration: 10
    spam_block_score: 10
    spam_block_reload_cycle: 10
    spam_block_max_level: 90
    protect_normal_player: 1
    CheckClientVersion: 1
    ClientVersion: 1215955269

     

×
×
  • Create New...

Important Information

Terms of Use / Privacy Policy / Guidelines / We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.