Register for your free account! | Forgot your password?

Go Back   elitepvpers > World of Warcraft > WoW Addons
You last visited: Today at 00:56

  • Please register to post and access all features, it's quick, easy and FREE!


quest automatisch annehmen ?

Closed Thread
 
Old   #1
 
elite*gold: 0
Join Date: Dec 2009
Posts: 347
Received Thanks: 23
quest automatisch annehmen ?

hallo ich wollt fragen ob es ein addon gibt das quest annimmt.



MyKnoppers is offline  
Old 01/15/2010, 23:24   #2
 
elite*gold: 0
Join Date: Aug 2008
Posts: 334
Received Thanks: 92
[Stolen] ^^
Nimmt q an wenn du kannst und gibt ab wenn du kannst

Code:
QUELLTEXT
if(QuestAutomation==true)  then
local addon = CreateFrame('Frame')
addon.completed_quests = {}
addon.uncompleted_quests = {}

function addon:canAutomate ()
    if IsShiftKeyDown() then
        return false
    else
        return true
    end
end

function addon:strip_text (text)
    if not text then return end
    text = text:gsub('%[.*%]%s*','')
    text = text:gsub('|c%x%x%x%x%x%x%x%x(.+)|r','%1')
    text = text:gsub('(.+) %(.+%)', '%1')
    text = text:trim()
    return text
end

function addon:QUEST_PROGRESS ()
    if not self:canAutomate() then return end
    if IsQuestCompletable() then
        CompleteQuest()
    end
end

function addon:QUEST_LOG_UPDATE ()
    if not self:canAutomate() then return end
    local start_entry = GetQuestLogSelection()
    local num_entries = GetNumQuestLogEntries()
    local title
    local is_complete
    local no_objectives

    self.completed_quests = {}
    self.uncompleted_quests = {}

    if num_entries > 0 then
        for i = 1, num_entries do
            SelectQuestLogEntry(i)
            title, _, _, _, _, _, is_complete = GetQuestLogTitle(i)
            no_objectives = GetNumQuestLeaderBoards(i) == 0
            if title and (is_complete or no_objectives) then
                self.completed_quests[title] = true
            else
                self.uncompleted_quests[title] = true
            end
        end
    end

    SelectQuestLogEntry(start_entry)
end

function addon:GOSSIP_SHOW ()
    if not self:canAutomate() then return end

    local button
    local text

    for i = 1, 32 do
        button = _G['GossipTitleButton' .. i]
        if button:IsVisible() then
            text = self:strip_text(button:GetText())
            if button.type == 'Available' then
                button:Click()
            elseif button.type == 'Active' then
                if self.completed_quests[text] then
                    button:Click()
                end
            end
        end
    end
end

function addon:QUEST_GREETING (...)
    if not self:canAutomate() then return end

    local button
    local text

    for i = 1, 32 do
        button = _G['QuestTitleButton' .. i]
        if button:IsVisible() then
            text = self:strip_text(button:GetText())
            if self.completed_quests[text] then
                button:Click()
            elseif not self.uncompleted_quests[text] then
                button:Click()
            end
        end
    end
end

function addon:QUEST_DETAIL ()
    if not self:canAutomate() then return end
    AcceptQuest()
end

function addon:QUEST_COMPLETE (event)
    if not self:canAutomate() then return end
    if GetNumQuestChoices() <= 1 then
        GetQuestReward(QuestFrameRewardPanel.itemChoice)
    end
end

function addon.onevent (self, event, ...)
    if self[event] then
        self[event](self, ...)
    end
end

addon:SetScript('OnEvent', addon.onevent)
addon:RegisterEvent('GOSSIP_SHOW')
addon:RegisterEvent('QUEST_COMPLETE')
addon:RegisterEvent('QUEST_DETAIL')
addon:RegisterEvent('QUEST_FINISHED')
addon:RegisterEvent('QUEST_GREETING')
addon:RegisterEvent('QUEST_LOG_UPDATE')
addon:RegisterEvent('QUEST_PROGRESS')

_G.idQuestAutomation = addon
end
Wenn du net weist was du damit tun sollst melden ^^


Varti is offline  
Old 01/15/2010, 23:42   #3
 
elite*gold: 0
Join Date: Dec 2009
Posts: 347
Received Thanks: 23
ich bin erlich ich weis net was ich damit tun soll ;-)
MyKnoppers is offline  
Old 01/15/2010, 23:59   #4
 
elite*gold: 0
Join Date: Aug 2008
Posts: 334
Received Thanks: 92
Bitte
Falls net geht guck ich selber ma schnell sollte aber eig
Attached Files
File Type: rar AutoQuest.rar (1.1 KB, 142 views)


Varti is offline  
Thanks
1 User
Old 01/17/2010, 08:44   #5
 
elite*gold: 0
Join Date: Nov 2009
Posts: 466
Received Thanks: 186
Oder einfach ITurn usen.
Denny x3 is offline  
Old 01/18/2010, 10:41   #6
 
elite*gold: 500
Join Date: May 2007
Posts: 60,435
Received Thanks: 28,017


#closed


Obilee is offline  
Closed Thread



« Recount gesucht | Performace verlust durch blockierende funktion »

Similar Threads
[B] Lockerzeinladungen annehmen
03/19/2010 - elite*gold Trading - 0 Replies
Huhu, nehme eure Lockerzeinladungen an. Schreibt mir eine Pn mit der Anzahl der Emailaddressen und was ihr an Elitegold gebt!
Item annehmen
12/25/2008 - WoW Main - Discussions / Questions - 1 Replies
Hi, wollte mal fragen ( nach dem ich das Forum durchsucht hab ^^ ) ob es eine Möglichkeit gibt das man ein BoP item binden kann ohne dabei auf ja zu klicken um zu bestätigen, einfaches enter geht schonmal nicht^^ :) danke im Vorraus
Erneut annehmen bug???
12/05/2008 - Metin2 Main - Discussions / Questions - 5 Replies
hi Leute wisst ihr vielleicht wie der bug mit dem erneuten annehmen funktioniert also z.B hab ich gelesen man handelt mit einem er tut z.B dpp+9 rein ihr 10kk dann drückt er auf annehmen und ihr ("macht den bug den ich wissen will") und er muss dan erneut annehmen und ihr könnt dann den betrag wechseln weis einer von euch wie er vieleicht geht???
erneut annehmen?
11/05/2008 - Metin2 Main - Discussions / Questions - 2 Replies
hallo leute wollte mal fragen wie man andere leute dazu bringt erneut anzunehmen obwohl sie schon annehmen gedrückt haben??
[S] Addon zum automatisch AV quest abgeben
04/14/2008 - WoW Addons - 3 Replies
Hiho, Ich suche ein Addon womit man die Rüstungsfetzten und das blut, fleisch etc ohne ständiges klicken abgeben kann. Ich hab mal einen im Av gesehen der das gemacht hat aber hab net gefragt x(. Kennt jemand so eins? +thx für den jenigen der eins findet.



All times are GMT +1. The time now is 00:56.


Powered by vBulletin®
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Abuse
Copyright ©2018 elitepvpers All Rights Reserved.