[Release]Petgui + Quest [Levelbar]

quest pets begin
    state start begin    
    
        function givebonus(x)
            local y,boni = {53,54,1},pets.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').."")
            cmdchat("HaustierName "..pc.get_name().."")
            pc.setqf("petruf",1)                
        end
        function bonusliste()
            return {
                [1] = {200,100,500},
                [2] = {250,150,1000},
                [3] = {300,200,1500},
                [4] = {350,250,2000},
                [5] = {400,300,3000},
            }
        end    
        function removebonus(x)
            local y,boni = {53,54,1},pets.bonusliste()
            table.foreach(boni[x],function(i,l) affect.remove_collect(y[i],l,60*60*24*365*60) end )
            horse.unsummon()
            pc.setqf("petruf",0)
            horse.set_level("21")
            cmdchat("HidePetGui")
            cleartimer("bugcheck")
        end        
    
        when 53001.use begin
            if pc.is_mount() then
                say_title("Entschuldigung")
                say("Bitte steige von deinem Mount ab!")
                return
            end
            if pc.getqf('petlevel') == 0 then
                pc.setqf('petlevel',1)
            end
            if pc.getqf("petruf") == 0 then
                local Horselevel = 29-pc.getqf('petlevel')
                horse.set_level(Horselevel)
                horse.unsummon() horse.summon()
                chat("Dein Haustier wurde gerufen.")
                pets.givebonus(pc.getqf('petlevel'))
                local expprocent1 = {20, 80, 160, 350, 400}
                cmdchat("PetProcentExp "..(pc.getqf("exp")/expprocent1[pc.getqf("petlevel")]).."")                
                cmdchat("ShowPetGui")
                loop_timer("bugcheck", 0.2)
            elseif pc.getqf("petruf") == 1 then        
                pets.removebonus(pc.getqf('petlevel'))
                chat("Dein Haustier verabschiedet sich nun.")
            end        
        end
        
        
        when kill with pc.getqf("petruf") == 1 begin
            if pc.getqf("petlevel") == 5 then
                return
            end    
            if not npc.is_pc() then
                pc.setqf("exp",pc.getqf("exp")+1)
                local exp2up = {2000, 8000, 16000, 35000, 40000}
                local expprocent = {20, 80, 160, 350, 400}
                cmdchat("PetProcentExp "..(pc.getqf("exp")/expprocent[pc.getqf("petlevel")]).."")
                if pc.getqf("exp") == exp2up[pc.getqf("petlevel")] then
                    if pc.getqf("petlevel") == 4 then
                        say_title("Herzlichen Glückwunsch")
                        say("Dein Haustier erreicht Level "..(pc.getqf("petlevel")+1).."")
                        say_reward("Dies war das letzte Level!")
                    end
                    say_title("Herzlichen Glückwunsch")
                    say("Dein Haustier erreicht Level "..(pc.getqf("petlevel")+1).."")
                    say("Rufe dein Pet bitte erneut!")
                    pc.setqf("petlevel",pc.getqf("petlevel")+1)
                    pc.setqf("exp",0)
                    pets.removebonus(pc.getqf('petlevel'))
                end
            end
        end
        
        -- Bugschutz
        
        when bugcheck.timer begin
            if pc.is_mount() then
                horse.unride()
            end
            if pc.count_item(53001) == 0 then
                say_title("Buguser")
                say("Bugusing festgestellt!")
                pets.removebonus(pc.getqf('petlevel'))
            end
        end
        
        when login or logout or disconnect with pc.getqf("petruf") == 1 begin
            pets.removebonus(pc.getqf('petlevel'))
            chat("Dein Haustier ist nicht mitgekommen...")
            chat("Rufe es erneut!")    
        end        
        
    end    
end