Skocz do zawartości
  • 👋 Witaj na MPCForum!

    Przeglądasz forum jako gość, co oznacza, że wiele świetnych funkcji jest jeszcze przed Tobą! 😎

    • Pełny dostęp do działów i ukrytych treści
    • Możliwość pisania i odpowiadania w tematach
    • System prywatnych wiadomości
    • Zbieranie reputacji i rozwijanie swojego profilu
    • Członkostwo w jednej z największych społeczności graczy

    👉 Dołączenie zajmie Ci mniej niż minutę – a zyskasz znacznie więcej!

    Zarejestruj się teraz

Szukam Quest na sklep za Achi


Rekomendowane odpowiedzi

Opublikowano

 

 

quest achievement begin
    state start begin        
        --LOGIN
        when login begin
            local actual_achievement_points = pc.getqf("achievement_points")
            if pc.getqf("firstlogin") != 1 then
                local Reward = 1
                pc.setqf("firstlogin", 1)
                pc.setqf("achievement_points", actual_achievement_points + Reward)
                cmdchat("achievement Dein_erster_Login%".. actual_achievement_points + Reward .."")
            else
                cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
            end
        end
    
        --BOSSE
        when 691.kill begin
            local Reward = 2
            local Achievement = "Oberork"
            local killcount = pc.getqf("691")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("691", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 791.kill begin
            local Reward = 3
            local Achievement = "Dunkler_Anführer"
            local killcount = pc.getqf("791")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("791", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 792.kill begin
            local Reward = 4
            local Achievement = "Dunkler_Geist-Anführer"
            local killcount = pc.getqf("792")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("792", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 1093.kill begin
            local Reward = 5
            local Achievement = "Sensenmann"
            local killcount = pc.getqf("1093")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("1093", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 1094.kill begin
            local Reward = 5
            local Achievement = "Dämonen_Oberhaupt"
            local killcount = pc.getqf("1094")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("1094", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 1095.kill begin
            local Reward = 10
            local Achievement = "Blauer_Tod"
            local killcount = pc.getqf("1095")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("1095", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 1192.kill begin
            local Reward = 12
            local Achievement = "Große_Eishexe"
            local killcount = pc.getqf("1192")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("1192", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 1304.kill begin
            local Reward = 5
            local Achievement = "Gelber_Tigergeist"
            local killcount = pc.getqf("1304")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("1304", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 1901.kill begin
            local Reward = 4
            local Achievement = "Neunschwanz"
            local killcount = pc.getqf("1901")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("1901", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 2091.kill begin
            local Reward = 3
            local Achievement = "Königinnenspinne"
            local killcount = pc.getqf("2091")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("2091", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 2206.kill begin
            local Reward = 3
            local Achievement = "Flammenkönig"
            local killcount = pc.getqf("2206")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("2206", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 2191.kill begin
            local Reward = 5
            local Achievement = "Große_Wüstenschildkröte"
            local killcount = pc.getqf("2191")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("2191", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 2493.kill begin
            local Reward = 25
            local Achievement = "Beran-Setaou"
            local killcount = pc.getqf("2493")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("2493", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        
        --METINS
        when 8020.kill begin
            local Reward = 5
            local Achievement = "Shinsoo-Felsen"
            local killcount = pc.getqf("8020")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("8020", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 8021.kill begin
            local Reward = 5
            local Achievement = "Jinno-Felsen"
            local killcount = pc.getqf("8021")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("8021", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 8022.kill begin
            local Reward = 5
            local Achievement = "Chunjo-Felsen"
            local killcount = pc.getqf("8022")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("8022", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 8023.kill begin
            local Reward = 5
            local Achievement = "Kaiserfelsen"
            local killcount = pc.getqf("8023")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("8023", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 8026.kill begin
            local Reward = 2
            local Achievement = "Tu-Young"
            local killcount = pc.getqf("8026")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("8026", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 8027.kill begin
            local Reward = 3
            local Achievement = "Jeon-Un"
            local killcount = pc.getqf("8027")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("8027", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 8029.kill begin
            local Reward = 3
            local Achievement = "Metin des Schreckens"
            local killcount = pc.getqf("8029")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("8029", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 8030.kill begin
            local Reward = 3
            local Achievement = "Metin des Zorns"
            local killcount = pc.getqf("8030")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("8030", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 8031.kill begin
            local Reward = 3
            local Achievement = "Metin der Barmherzigkeit"
            local killcount = pc.getqf("8031")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("8031", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 8032.kill begin
            local Reward = 3
            local Achievement = "Metin der Unterwelt"
            local killcount = pc.getqf("8032")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("8032", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 8033.kill begin
            local Reward = 3
            local Achievement = "Metin der Wiedergeburt"
            local killcount = pc.getqf("8033")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("8033", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end

        --LEVELS
        when login or levelup with pc.get_level() >= 50 and pc.getqf("Level50") != 1 begin
            local Reward = 2
            local Achievement = "Level_50"
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("Level50", 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)            
            cmdchat("achievement ".. Achievement .."_erreicht%".. actual_achievement_points + Reward .."")
        end
        when login or levelup with pc.get_level() >= 75 and pc.getqf("Level75") != 1 begin
            local Reward = 5
            local Achievement = "Level_75"
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("Level75", 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)            
            cmdchat("achievement ".. Achievement .."_erreicht%".. actual_achievement_points + Reward .."")
        end
        when login or levelup with pc.get_level() >= 85 and pc.getqf("Level85") != 1 begin
            local Reward = 10
            local Achievement = "Level_85"
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("Level85", 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)            
            cmdchat("achievement ".. Achievement .."_erreicht%".. actual_achievement_points + Reward .."")
        end
        when login or levelup with pc.get_level() >= 90 and pc.getqf("Level90") != 1 begin
            local Reward = 25
            local Achievement = "Level_90"
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("Level90", 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)            
            cmdchat("achievement ".. Achievement .."_erreicht%".. actual_achievement_points + Reward .."")
        end
        when login or levelup with pc.get_level() >= 95 and pc.getqf("Level95") != 1 begin
            local Reward = 50
            local Achievement = "Level_95"
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("Level95", 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)            
            cmdchat("achievement ".. Achievement .."_erreicht%".. actual_achievement_points + Reward .."")
        end
        when login or levelup with pc.get_level() >= 99 and pc.getqf("Level99") != 1 begin
            local Reward = 100
            local Achievement = "Level_99"
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("Level99", 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)            
            cmdchat("achievement ".. Achievement .."_erreicht%".. actual_achievement_points + Reward .."")
        end
        when login or levelup with pc.get_level() >= 105 and pc.getqf("Level105") != 1 begin
            local Reward = 200
            local Achievement = "Level_105"
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("Level105", 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)            
            cmdchat("achievement ".. Achievement .."_erreicht%".. actual_achievement_points + Reward .."")
        end
        
        --CHECK EQUIP
        when login begin
            loop_timer("check_eq", 10)
        end
        when check_eq.timer begin
            local russi = pc.get_armor()
            local waffe = pc.get_weapon()
            local actual_achievement_points = pc.getqf("achievement_points")
            local Reward = 5
            if russi==11299 and pc.getqf("achievement_ssp") != 1 then
                pc.setqf("achievement_ssp", 1)
                pc.setqf("achievement_points", actual_achievement_points + Reward)
                cmdchat("achievement Schwarzstahl-Panzer+9%".. actual_achievement_points + Reward .."")
            elseif russi==11499 and pc.getqf("achievement_swa") != 1 then
                pc.setqf("achievement_swa", 1)
                pc.setqf("achievement_points", actual_achievement_points + Reward)
                cmdchat("achievement Schwarzwindanzug+9%".. actual_achievement_points + Reward .."")
            elseif russi==11699 and pc.getqf("achievement_mpp") != 1 then
                pc.setqf("achievement_mpp", 1)
                pc.setqf("achievement_points", actual_achievement_points + Reward)
                cmdchat("achievement Magie-Plattenpanzer+9%".. actual_achievement_points + Reward .."")
            elseif russi==11899 and pc.getqf("achievement_sk") != 1 then
                pc.setqf("achievement_sk", 1)
                pc.setqf("achievement_points", actual_achievement_points + Reward)
                cmdchat("achievement Schwarze_Kleidung+9%".. actual_achievement_points + Reward .."")
            elseif waffe==189 and pc.getqf("achievement_gifti") != 1 then
                pc.setqf("achievement_gifti", 1)
                pc.setqf("achievement_points", actual_achievement_points + Reward)
                cmdchat("achievement Giftschwert+9%".. actual_achievement_points + Reward .."")
            elseif waffe==199 and pc.getqf("achievement_lowenschw.") != 1 then
                pc.setqf("achievement_lowenschw.", 1)
                pc.setqf("achievement_points", actual_achievement_points + Reward)
                cmdchat("achievement Löwenschwert+9%".. actual_achievement_points + Reward .."")
            elseif waffe==5129 and pc.getqf("achievement_orchiglocke") != 1 then
                pc.setqf("achievement_orchiglocke", 1)
                pc.setqf("achievement_points", actual_achievement_points + Reward)
                cmdchat("achievement Orchideenglocke+9%".. actual_achievement_points + Reward .."")
            elseif waffe==2179 and pc.getqf("achievement_krahenstahl") != 1 then
                pc.setqf("achievement_krahenstahl", 1)
                pc.setqf("achievement_points", actual_achievement_points + Reward)
                cmdchat("achievement Krähenstahlbogen+9%".. actual_achievement_points + Reward .."")
            elseif waffe==1139 and pc.getqf("achievement_teufelsflugenchak") != 1 then
                pc.setqf("achievement_teufelsflugenchak", 1)
                pc.setqf("achievement_points", actual_achievement_points + Reward)
                cmdchat("achievement Teufelsflügel-Chakram+9%".. actual_achievement_points + Reward .."")
            elseif waffe==3169 and pc.getqf("achievement_Grolli") != 1 then
                pc.setqf("achievement_Grolli", 1)
                pc.setqf("achievement_points", actual_achievement_points + Reward)
                cmdchat("achievement Grollschwert+9%".. actual_achievement_points + Reward .."")
            end
        end
    end
end

 

 

Opublikowano

 

 

quest achievement begin
    state start begin        
        --LOGIN
        when login begin
            local actual_achievement_points = pc.getqf("achievement_points")
            if pc.getqf("firstlogin") != 1 then
                local Reward = 1
                pc.setqf("firstlogin", 1)
                pc.setqf("achievement_points", actual_achievement_points + Reward)
                cmdchat("achievement Dein_erster_Login%".. actual_achievement_points + Reward .."")
            else
                cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
            end
        end
    
        --BOSSE
        when 691.kill begin
            local Reward = 2
            local Achievement = "Oberork"
            local killcount = pc.getqf("691")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("691", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 791.kill begin
            local Reward = 3
            local Achievement = "Dunkler_Anführer"
            local killcount = pc.getqf("791")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("791", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 792.kill begin
            local Reward = 4
            local Achievement = "Dunkler_Geist-Anführer"
            local killcount = pc.getqf("792")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("792", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 1093.kill begin
            local Reward = 5
            local Achievement = "Sensenmann"
            local killcount = pc.getqf("1093")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("1093", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 1094.kill begin
            local Reward = 5
            local Achievement = "Dämonen_Oberhaupt"
            local killcount = pc.getqf("1094")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("1094", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 1095.kill begin
            local Reward = 10
            local Achievement = "Blauer_Tod"
            local killcount = pc.getqf("1095")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("1095", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 1192.kill begin
            local Reward = 12
            local Achievement = "Große_Eishexe"
            local killcount = pc.getqf("1192")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("1192", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 1304.kill begin
            local Reward = 5
            local Achievement = "Gelber_Tigergeist"
            local killcount = pc.getqf("1304")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("1304", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 1901.kill begin
            local Reward = 4
            local Achievement = "Neunschwanz"
            local killcount = pc.getqf("1901")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("1901", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 2091.kill begin
            local Reward = 3
            local Achievement = "Königinnenspinne"
            local killcount = pc.getqf("2091")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("2091", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 2206.kill begin
            local Reward = 3
            local Achievement = "Flammenkönig"
            local killcount = pc.getqf("2206")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("2206", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 2191.kill begin
            local Reward = 5
            local Achievement = "Große_Wüstenschildkröte"
            local killcount = pc.getqf("2191")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("2191", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 2493.kill begin
            local Reward = 25
            local Achievement = "Beran-Setaou"
            local killcount = pc.getqf("2493")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("2493", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        
        --METINS
        when 8020.kill begin
            local Reward = 5
            local Achievement = "Shinsoo-Felsen"
            local killcount = pc.getqf("8020")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("8020", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 8021.kill begin
            local Reward = 5
            local Achievement = "Jinno-Felsen"
            local killcount = pc.getqf("8021")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("8021", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 8022.kill begin
            local Reward = 5
            local Achievement = "Chunjo-Felsen"
            local killcount = pc.getqf("8022")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("8022", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 8023.kill begin
            local Reward = 5
            local Achievement = "Kaiserfelsen"
            local killcount = pc.getqf("8023")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("8023", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 8026.kill begin
            local Reward = 2
            local Achievement = "Tu-Young"
            local killcount = pc.getqf("8026")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("8026", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 8027.kill begin
            local Reward = 3
            local Achievement = "Jeon-Un"
            local killcount = pc.getqf("8027")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("8027", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 8029.kill begin
            local Reward = 3
            local Achievement = "Metin des Schreckens"
            local killcount = pc.getqf("8029")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("8029", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 8030.kill begin
            local Reward = 3
            local Achievement = "Metin des Zorns"
            local killcount = pc.getqf("8030")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("8030", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 8031.kill begin
            local Reward = 3
            local Achievement = "Metin der Barmherzigkeit"
            local killcount = pc.getqf("8031")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("8031", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 8032.kill begin
            local Reward = 3
            local Achievement = "Metin der Unterwelt"
            local killcount = pc.getqf("8032")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("8032", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end
        when 8033.kill begin
            local Reward = 3
            local Achievement = "Metin der Wiedergeburt"
            local killcount = pc.getqf("8033")
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("8033", killcount + 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
        end

        --LEVELS
        when login or levelup with pc.get_level() >= 50 and pc.getqf("Level50") != 1 begin
            local Reward = 2
            local Achievement = "Level_50"
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("Level50", 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)            
            cmdchat("achievement ".. Achievement .."_erreicht%".. actual_achievement_points + Reward .."")
        end
        when login or levelup with pc.get_level() >= 75 and pc.getqf("Level75") != 1 begin
            local Reward = 5
            local Achievement = "Level_75"
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("Level75", 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)            
            cmdchat("achievement ".. Achievement .."_erreicht%".. actual_achievement_points + Reward .."")
        end
        when login or levelup with pc.get_level() >= 85 and pc.getqf("Level85") != 1 begin
            local Reward = 10
            local Achievement = "Level_85"
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("Level85", 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)            
            cmdchat("achievement ".. Achievement .."_erreicht%".. actual_achievement_points + Reward .."")
        end
        when login or levelup with pc.get_level() >= 90 and pc.getqf("Level90") != 1 begin
            local Reward = 25
            local Achievement = "Level_90"
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("Level90", 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)            
            cmdchat("achievement ".. Achievement .."_erreicht%".. actual_achievement_points + Reward .."")
        end
        when login or levelup with pc.get_level() >= 95 and pc.getqf("Level95") != 1 begin
            local Reward = 50
            local Achievement = "Level_95"
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("Level95", 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)            
            cmdchat("achievement ".. Achievement .."_erreicht%".. actual_achievement_points + Reward .."")
        end
        when login or levelup with pc.get_level() >= 99 and pc.getqf("Level99") != 1 begin
            local Reward = 100
            local Achievement = "Level_99"
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("Level99", 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)            
            cmdchat("achievement ".. Achievement .."_erreicht%".. actual_achievement_points + Reward .."")
        end
        when login or levelup with pc.get_level() >= 105 and pc.getqf("Level105") != 1 begin
            local Reward = 200
            local Achievement = "Level_105"
            local actual_achievement_points = pc.getqf("achievement_points")
            pc.setqf("Level105", 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)            
            cmdchat("achievement ".. Achievement .."_erreicht%".. actual_achievement_points + Reward .."")
        end
        
        --CHECK EQUIP
        when login begin
            loop_timer("check_eq", 10)
        end
        when check_eq.timer begin
            local russi = pc.get_armor()
            local waffe = pc.get_weapon()
            local actual_achievement_points = pc.getqf("achievement_points")
            local Reward = 5
            if russi==11299 and pc.getqf("achievement_ssp") != 1 then
                pc.setqf("achievement_ssp", 1)
                pc.setqf("achievement_points", actual_achievement_points + Reward)
                cmdchat("achievement Schwarzstahl-Panzer+9%".. actual_achievement_points + Reward .."")
            elseif russi==11499 and pc.getqf("achievement_swa") != 1 then
                pc.setqf("achievement_swa", 1)
                pc.setqf("achievement_points", actual_achievement_points + Reward)
                cmdchat("achievement Schwarzwindanzug+9%".. actual_achievement_points + Reward .."")
            elseif russi==11699 and pc.getqf("achievement_mpp") != 1 then
                pc.setqf("achievement_mpp", 1)
                pc.setqf("achievement_points", actual_achievement_points + Reward)
                cmdchat("achievement Magie-Plattenpanzer+9%".. actual_achievement_points + Reward .."")
            elseif russi==11899 and pc.getqf("achievement_sk") != 1 then
                pc.setqf("achievement_sk", 1)
                pc.setqf("achievement_points", actual_achievement_points + Reward)
                cmdchat("achievement Schwarze_Kleidung+9%".. actual_achievement_points + Reward .."")
            elseif waffe==189 and pc.getqf("achievement_gifti") != 1 then
                pc.setqf("achievement_gifti", 1)
                pc.setqf("achievement_points", actual_achievement_points + Reward)
                cmdchat("achievement Giftschwert+9%".. actual_achievement_points + Reward .."")
            elseif waffe==199 and pc.getqf("achievement_lowenschw.") != 1 then
                pc.setqf("achievement_lowenschw.", 1)
                pc.setqf("achievement_points", actual_achievement_points + Reward)
                cmdchat("achievement Löwenschwert+9%".. actual_achievement_points + Reward .."")
            elseif waffe==5129 and pc.getqf("achievement_orchiglocke") != 1 then
                pc.setqf("achievement_orchiglocke", 1)
                pc.setqf("achievement_points", actual_achievement_points + Reward)
                cmdchat("achievement Orchideenglocke+9%".. actual_achievement_points + Reward .."")
            elseif waffe==2179 and pc.getqf("achievement_krahenstahl") != 1 then
                pc.setqf("achievement_krahenstahl", 1)
                pc.setqf("achievement_points", actual_achievement_points + Reward)
                cmdchat("achievement Krähenstahlbogen+9%".. actual_achievement_points + Reward .."")
            elseif waffe==1139 and pc.getqf("achievement_teufelsflugenchak") != 1 then
                pc.setqf("achievement_teufelsflugenchak", 1)
                pc.setqf("achievement_points", actual_achievement_points + Reward)
                cmdchat("achievement Teufelsflügel-Chakram+9%".. actual_achievement_points + Reward .."")
            elseif waffe==3169 and pc.getqf("achievement_Grolli") != 1 then
                pc.setqf("achievement_Grolli", 1)
                pc.setqf("achievement_points", actual_achievement_points + Reward)
                cmdchat("achievement Grollschwert+9%".. actual_achievement_points + Reward .."")
            end
        end
    end
end

 

 

 

Koleś chciał sklep do systemu osiągnięć,  ty mu dałeś questa naliczającego punkty. Poza tym masa warunków kill, która powinna zostać zamknięta w jednym "when" z odpowiednią tablicą. No i oczywiście znów bez sensu warunek sprawdzający nasze eq, który wykonuje się co 5 sekund non stop. Po co  ma np. wojownikowi sprawdzać, czy ma założoną stalkę dla ninja i odwrotnie? Po co ma nadal sprawdzać ten warunek, gdy gracz już ma all pkt przyznane? Ogólnie quest syf, co było podkreślone kilkukrotnie na forum

 

Jeśli chodzi o sklep to możesz wykorzystać ten quest (nie cały, tylko funkcje do sklep i kod odpowiedzialny za włączenie sklepu i musisz zmienić nazwy zmiennych odpowiedzialnych za ilość pkt):

http://www.mpcforum.pl/topic/1139869-achievement-systemav-shop/
Opublikowano

2x up, tego questa już mam, potrzebuję ten na sklep i 

 

@up czy mógłbyś sprawdzić tego questa ? nie chce się coś wgrać ;/

 

 

 

quest achievement begin
	state start begin	
		when 20094.chat."Wymien 'PZ' na przedmioty" begin	
			local actual_achievement_points = pc.getqf("achievement_points")
				say_title("Medrzec:")
				say("")
				say("Czesc ".. pc.get_name() ..",")
				say("")
				say("Tutaj mozesz wymienic swoje Punkty Zadan na")
				say("super przedmioty, które w grze nie sa ")
				say("latwe do zdobycia!")
				say("Pamietaj, ze wymieniajac sie..")
				say("stracisz 'PZ', a ich liczba jest zawsze napisana.")
				say("")
				say_reward("Wybierz kategorie, która Cie interesuje:")
			local s1 = select ("Bonusy", "Przedmioty z IS", "Pieniadze", "Wyjdz ")
			if s1 == 3 then
				say_title("Medrzec:")
				say("")
				say_reward(pc.get_name()..", Wybierz, co chcesz:")
				say("")
			local k1 = select ("Bryla Zlota / 300 PZ", "Wyjdz ")
			local Price21 = 300
			if pc.getqf("achievement_points") <= Price21 then
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(80008)
				say_lazur("Cena:")
				say("300 Punktów Zadan (PZ)")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				say("")
				say_title("Nie masz tyle Punktów Zadan (PZ)")
			else
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(80008)
				say_lazur("Cena:")
				say("300 Punktów Zadan (PZ)")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
			local kup21 = select ("Tak", "Nie")
			if kup21 == 2 then
			return
				elseif kup21 == 1 then
					chat("Odebrano 300'PZ' i otrzymales 'Bryle Zlota'")
					pc.give_item2(80008, 1)
					pc.setqf("achievement_points", pc.getqf("achievement_points") - Price21)
							end
						end
					end			
			if s1 == 2 then
				say_title("Medrzec:")
				say("")
				say_reward(pc.get_name()..", Wybierz, co chcesz:")
				say("")				
				local m1 = select ("Cukier dla konia / 60 PZ", "Eliksir Slonca (M) / 50PZ", "Eliksir Ksiezyca (M) / 60PZ", "Wyjdz ")
				if m1 == 3 then
				local Price13 = 60
				if pc.getqf("achievement_points") <= Price13 then
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(72727)
				say_lazur("Cena:")
				say("60 Punktów Zadan (PZ)")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				say("")
				say_title("Nie masz tyle Punktów Zadan (PZ)")
			else
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(72727)
				say_lazur("Cena:")
				say("60 Punktów Zadan (PZ)")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				local kup13 = select ("Tak", "Nie")
				if kup13 == 2 then
				return
				elseif kup13 == 1 then
				chat("Odebrano 60'PZ' i otrzymales 'Eliksir Ksiezyca (M)'")
				pc.give_item2(72727, 1)
				pc.setqf("achievement_points", pc.getqf("achievement_points") - Price13)
							end
						end
					end
				if m1 == 2 then
				local Price12 = 50
				if pc.getqf("achievement_points") <= Price12 then
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(72723)
				say_lazur("Cena:")
				say("50 Punktów Zadan (PZ)")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				say("")
				say_title("Nie masz tyle Punktów Zadan (PZ)")
			else
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(72723)
				say_lazur("Cena:")
				say("50 Punktów Zadan (PZ)")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				local kup12 = select ("Tak", "Nie")
				if kup12 == 2 then
				return
				elseif kup12 == 1 then
				chat("Odebrano 50'PZ' i otrzymales 'Eliksir Slonca (M)'")
				pc.give_item2(72723, 1)
				pc.setqf("achievement_points", pc.getqf("achievement_points") - Price12)
							end
						end
					end
				if m1 == 1 then
				local Price11 = 60
				if pc.getqf("achievement_points") <= Price11 then
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(71110)
				say_lazur("Cena:")
				say("60 Punktów Zadan (PZ)")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				say("")
				say_title("Nie masz tyle Punktów Zadan (PZ)")
			else
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(71110)
				say_lazur("Cena:")
				say("60 Punktów Zadan (PZ)")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				local kup11 = select ("Tak", "Nie")
				if kup11 == 2 then
				return
				elseif kup11 == 1 then
				chat("Odebrano 60'PZ' i otrzymales 'Cukier dla konia'")
				pc.give_item2(71110, 1)
				pc.setqf("achievement_points", pc.getqf("achievement_points") - Price11)
							end
						end
					end
				end
				if s1 == 1 then
				say_title("Medrzec:")
				say("")
				say_reward(pc.get_name()..", Wybierz, co chcesz:")
				say("")
				local s1x = select ("Pierscien Dosw. 1h / 20 PZ", "Pierscien Dosw. 3h	/ 50 PZ", "Pierscien Dosw. 12h / 125 PZ", "Rekawica Zlodzieja 3h / 50 PZ", "Szczesliwa Zlota Moneta 3h / 50 PZ", "Wyjdz ")
				if s1x == 5 then
				local Price5 = 50
				if pc.getqf("achievement_points") <= Price5 then
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(71017)
				say_lazur("Cena:")
				say("50 Punktów Zadan (PZ)")
				say_lazur("Czas:")
				say("3h przebywania w grze")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				say("")
				say_title("Nie masz tyle Punktów Zadan (PZ)")
			else
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(71017)
				say_lazur("Cena:")
				say("50 Punktów Zadan (PZ)")
				say_lazur("Czas:")
				say("3h przebywania w grze")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				local kup4 = select ("Tak", "Nie")
			if kup4 == 2 then
				return
			elseif kup4 == 1 then
				chat("Odebrano 50'PZ' i otrzymales Zlota Szczesliwa Monete na 3h")
				pc.give_item2(71017, 1)
				pc.setqf("achievement_points", pc.getqf("achievement_points") - Price5)
						end
					end
				end
			if s1x == 4 then
				local Price4 = 50
			if pc.getqf("achievement_points") <= Price4 then
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(70043)
				say_lazur("Cena:")
				say("50 Punktów Zadan (PZ)")
				say_lazur("Czas:")
				say("3h przebywania w grze")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				say("")
				say_title("Nie masz tyle Punktów Zadan (PZ)")
			else
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(70043)
				say_lazur("Cena:")
				say("50 Punktów Zadan (PZ)")
				say_lazur("Czas:")
				say("3h przebywania w grze")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				local kup3 = select ("Tak", "Nie")
				if kup3 == 2 then
				return
			elseif kup3 == 1 then
				chat("Odebrano 50'PZ' i otrzymales Rekawice Zlodzieja na 3h")
				pc.give_item2(70043, 1)
				pc.setqf("achievement_points", pc.getqf("achievement_points") - Price4)
						end
					end
				end
				if s1x == 3 then
				local Price3 = 125
				if pc.getqf("achievement_points") <= Price3 then
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(70005)
				say_lazur("Cena:")
				say("125 Punktów Zadan (PZ)")
				say_lazur("Czas:")
				say("12h przebywania w grze")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				say("")
				say_title("Nie masz tyle Punktów Zadan (PZ)")
			else
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(70005)
				say_lazur("Cena:")
				say("125 Punktów Zadan (PZ)")
				say_lazur("Czas:")
				say("12h przebywania w grze")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				local kup2 = select ("Tak", "Nie")
				if kup2 == 2 then
				return
				elseif kup2 == 1 then
				chat("Odebrano 125'PZ' i otrzymales Pierscien Dosw. na 12h")
				pc.give_item2(70005, 1)
				pc.setqf("achievement_points", pc.getqf("achievement_points") - Price3)
						end
					end
				end
				if s1x == 2 then
				local Price2 = 50
				if pc.getqf("achievement_points") <= Price2 then
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(70005)
				say_lazur("Cena:")
				say("50 Punktów Zadan (PZ)")
				say_lazur("Czas:")
				say("3h przebywania w grze")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				say("")
				say_title("Nie masz tyle Punktów Zadan (PZ)")
			else
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(70005)
				say_lazur("Cena:")
				say("50 Punktów Zadan (PZ)")
				say_lazur("Czas:")
				say("3h przebywania w grze")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				local kup1 = select ("Tak", "Nie")
				if kup1 == 2 then
				return
				elseif kup1 == 1 then
				chat("Odebrano 50'PZ' i otrzymales Pierscien Dosw. na 3h")
				pc.give_item2(70005, 1)
				pc.setqf("achievement_points", pc.getqf("achievement_points") - Price2)
						end
					end
				end
				if s1x == 1 then
				local Price1 = 20
				if pc.getqf("achievement_points") <= Price1 then
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(70005)
				say_lazur("Cena:")
				say("20 Punktów Zadan (PZ)")
				say_lazur("Czas:")
				say("1h przebywania w grze")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				say("")
				say_title("Nie masz tyle Punktów Zadan (PZ)")
			else
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(70005)
				say_lazur("Cena:")
				say("20 Punktów Zadan (PZ)")
				say_lazur("Czas:")
				say("1h przebywania w grze")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				local kup = select ("Tak", "Nie")
				if kup == 2 then
				return
				elseif kup == 1 then
				chat("Odebrano 20'PZ' i otrzymales Pierscien Dosw. na 1h")
				pc.give_item2(70005, 1)
				pc.setqf("achievement_points", pc.getqf("achievement_points") - Price1)
				end
			end
			end		
		end		
        end
	when 20094.chat."Dodaj PZ" with pc.is_gm begin
		say("Chcesz dodac 1000pkt?")
		local gm = select ("Tak", "Nie")
		if gm == 1 then
		pc.setqf("achievement_points", pc.getqf("achievement_points") + 1000)
		say("..")
		say("...")
		say_reward("Done!")
		end
	end
	when 20094.chat."Sprzedaj Sztabki" begin
		say("DUPA")
		say("DU"..pc.count_item(77001).."")
	end
end
end 

 

 

Opublikowano

2x up, tego questa już mam, potrzebuję ten na sklep i 

 

@up czy mógłbyś sprawdzić tego questa ? nie chce się coś wgrać ;/

 

 

 

quest achievement begin
	state start begin	
		when 20094.chat."Wymien 'PZ' na przedmioty" begin	
			local actual_achievement_points = pc.getqf("achievement_points")
				say_title("Medrzec:")
				say("")
				say("Czesc ".. pc.get_name() ..",")
				say("")
				say("Tutaj mozesz wymienic swoje Punkty Zadan na")
				say("super przedmioty, które w grze nie sa ")
				say("latwe do zdobycia!")
				say("Pamietaj, ze wymieniajac sie..")
				say("stracisz 'PZ', a ich liczba jest zawsze napisana.")
				say("")
				say_reward("Wybierz kategorie, która Cie interesuje:")
			local s1 = select ("Bonusy", "Przedmioty z IS", "Pieniadze", "Wyjdz ")
			if s1 == 3 then
				say_title("Medrzec:")
				say("")
				say_reward(pc.get_name()..", Wybierz, co chcesz:")
				say("")
			local k1 = select ("Bryla Zlota / 300 PZ", "Wyjdz ")
			local Price21 = 300
			if pc.getqf("achievement_points") <= Price21 then
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(80008)
				say_lazur("Cena:")
				say("300 Punktów Zadan (PZ)")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				say("")
				say_title("Nie masz tyle Punktów Zadan (PZ)")
			else
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(80008)
				say_lazur("Cena:")
				say("300 Punktów Zadan (PZ)")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
			local kup21 = select ("Tak", "Nie")
			if kup21 == 2 then
			return
				elseif kup21 == 1 then
					chat("Odebrano 300'PZ' i otrzymales 'Bryle Zlota'")
					pc.give_item2(80008, 1)
					pc.setqf("achievement_points", pc.getqf("achievement_points") - Price21)
							end
						end
					end			
			if s1 == 2 then
				say_title("Medrzec:")
				say("")
				say_reward(pc.get_name()..", Wybierz, co chcesz:")
				say("")				
				local m1 = select ("Cukier dla konia / 60 PZ", "Eliksir Slonca (M) / 50PZ", "Eliksir Ksiezyca (M) / 60PZ", "Wyjdz ")
				if m1 == 3 then
				local Price13 = 60
				if pc.getqf("achievement_points") <= Price13 then
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(72727)
				say_lazur("Cena:")
				say("60 Punktów Zadan (PZ)")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				say("")
				say_title("Nie masz tyle Punktów Zadan (PZ)")
			else
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(72727)
				say_lazur("Cena:")
				say("60 Punktów Zadan (PZ)")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				local kup13 = select ("Tak", "Nie")
				if kup13 == 2 then
				return
				elseif kup13 == 1 then
				chat("Odebrano 60'PZ' i otrzymales 'Eliksir Ksiezyca (M)'")
				pc.give_item2(72727, 1)
				pc.setqf("achievement_points", pc.getqf("achievement_points") - Price13)
							end
						end
					end
				if m1 == 2 then
				local Price12 = 50
				if pc.getqf("achievement_points") <= Price12 then
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(72723)
				say_lazur("Cena:")
				say("50 Punktów Zadan (PZ)")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				say("")
				say_title("Nie masz tyle Punktów Zadan (PZ)")
			else
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(72723)
				say_lazur("Cena:")
				say("50 Punktów Zadan (PZ)")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				local kup12 = select ("Tak", "Nie")
				if kup12 == 2 then
				return
				elseif kup12 == 1 then
				chat("Odebrano 50'PZ' i otrzymales 'Eliksir Slonca (M)'")
				pc.give_item2(72723, 1)
				pc.setqf("achievement_points", pc.getqf("achievement_points") - Price12)
							end
						end
					end
				if m1 == 1 then
				local Price11 = 60
				if pc.getqf("achievement_points") <= Price11 then
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(71110)
				say_lazur("Cena:")
				say("60 Punktów Zadan (PZ)")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				say("")
				say_title("Nie masz tyle Punktów Zadan (PZ)")
			else
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(71110)
				say_lazur("Cena:")
				say("60 Punktów Zadan (PZ)")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				local kup11 = select ("Tak", "Nie")
				if kup11 == 2 then
				return
				elseif kup11 == 1 then
				chat("Odebrano 60'PZ' i otrzymales 'Cukier dla konia'")
				pc.give_item2(71110, 1)
				pc.setqf("achievement_points", pc.getqf("achievement_points") - Price11)
							end
						end
					end
				end
				if s1 == 1 then
				say_title("Medrzec:")
				say("")
				say_reward(pc.get_name()..", Wybierz, co chcesz:")
				say("")
				local s1x = select ("Pierscien Dosw. 1h / 20 PZ", "Pierscien Dosw. 3h	/ 50 PZ", "Pierscien Dosw. 12h / 125 PZ", "Rekawica Zlodzieja 3h / 50 PZ", "Szczesliwa Zlota Moneta 3h / 50 PZ", "Wyjdz ")
				if s1x == 5 then
				local Price5 = 50
				if pc.getqf("achievement_points") <= Price5 then
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(71017)
				say_lazur("Cena:")
				say("50 Punktów Zadan (PZ)")
				say_lazur("Czas:")
				say("3h przebywania w grze")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				say("")
				say_title("Nie masz tyle Punktów Zadan (PZ)")
			else
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(71017)
				say_lazur("Cena:")
				say("50 Punktów Zadan (PZ)")
				say_lazur("Czas:")
				say("3h przebywania w grze")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				local kup4 = select ("Tak", "Nie")
			if kup4 == 2 then
				return
			elseif kup4 == 1 then
				chat("Odebrano 50'PZ' i otrzymales Zlota Szczesliwa Monete na 3h")
				pc.give_item2(71017, 1)
				pc.setqf("achievement_points", pc.getqf("achievement_points") - Price5)
						end
					end
				end
			if s1x == 4 then
				local Price4 = 50
			if pc.getqf("achievement_points") <= Price4 then
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(70043)
				say_lazur("Cena:")
				say("50 Punktów Zadan (PZ)")
				say_lazur("Czas:")
				say("3h przebywania w grze")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				say("")
				say_title("Nie masz tyle Punktów Zadan (PZ)")
			else
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(70043)
				say_lazur("Cena:")
				say("50 Punktów Zadan (PZ)")
				say_lazur("Czas:")
				say("3h przebywania w grze")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				local kup3 = select ("Tak", "Nie")
				if kup3 == 2 then
				return
			elseif kup3 == 1 then
				chat("Odebrano 50'PZ' i otrzymales Rekawice Zlodzieja na 3h")
				pc.give_item2(70043, 1)
				pc.setqf("achievement_points", pc.getqf("achievement_points") - Price4)
						end
					end
				end
				if s1x == 3 then
				local Price3 = 125
				if pc.getqf("achievement_points") <= Price3 then
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(70005)
				say_lazur("Cena:")
				say("125 Punktów Zadan (PZ)")
				say_lazur("Czas:")
				say("12h przebywania w grze")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				say("")
				say_title("Nie masz tyle Punktów Zadan (PZ)")
			else
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(70005)
				say_lazur("Cena:")
				say("125 Punktów Zadan (PZ)")
				say_lazur("Czas:")
				say("12h przebywania w grze")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				local kup2 = select ("Tak", "Nie")
				if kup2 == 2 then
				return
				elseif kup2 == 1 then
				chat("Odebrano 125'PZ' i otrzymales Pierscien Dosw. na 12h")
				pc.give_item2(70005, 1)
				pc.setqf("achievement_points", pc.getqf("achievement_points") - Price3)
						end
					end
				end
				if s1x == 2 then
				local Price2 = 50
				if pc.getqf("achievement_points") <= Price2 then
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(70005)
				say_lazur("Cena:")
				say("50 Punktów Zadan (PZ)")
				say_lazur("Czas:")
				say("3h przebywania w grze")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				say("")
				say_title("Nie masz tyle Punktów Zadan (PZ)")
			else
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(70005)
				say_lazur("Cena:")
				say("50 Punktów Zadan (PZ)")
				say_lazur("Czas:")
				say("3h przebywania w grze")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				local kup1 = select ("Tak", "Nie")
				if kup1 == 2 then
				return
				elseif kup1 == 1 then
				chat("Odebrano 50'PZ' i otrzymales Pierscien Dosw. na 3h")
				pc.give_item2(70005, 1)
				pc.setqf("achievement_points", pc.getqf("achievement_points") - Price2)
						end
					end
				end
				if s1x == 1 then
				local Price1 = 20
				if pc.getqf("achievement_points") <= Price1 then
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(70005)
				say_lazur("Cena:")
				say("20 Punktów Zadan (PZ)")
				say_lazur("Czas:")
				say("1h przebywania w grze")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				say("")
				say_title("Nie masz tyle Punktów Zadan (PZ)")
			else
				say_title("Medrzec:")
				say("")
				say("Chcesz kupic:")
				say_item_vnum(70005)
				say_lazur("Cena:")
				say("20 Punktów Zadan (PZ)")
				say_lazur("Czas:")
				say("1h przebywania w grze")
				say("")
				say_reward("Chcesz kupic ten przedmiot?")
				local kup = select ("Tak", "Nie")
				if kup == 2 then
				return
				elseif kup == 1 then
				chat("Odebrano 20'PZ' i otrzymales Pierscien Dosw. na 1h")
				pc.give_item2(70005, 1)
				pc.setqf("achievement_points", pc.getqf("achievement_points") - Price1)
				end
			end
			end		
		end		
        end
	when 20094.chat."Dodaj PZ" with pc.is_gm begin
		say("Chcesz dodac 1000pkt?")
		local gm = select ("Tak", "Nie")
		if gm == 1 then
		pc.setqf("achievement_points", pc.getqf("achievement_points") + 1000)
		say("..")
		say("...")
		say_reward("Done!")
		end
	end
	when 20094.chat."Sprzedaj Sztabki" begin
		say("DUPA")
		say("DU"..pc.count_item(77001).."")
	end
end
end 

 

 

 

Ten quest działa. Kompiluje się bez błędu i w grze też działa

Opublikowano

na plikach terenzo jest to /qc bez wpisywania cd /usr ... :)


ewentualnie ten quest 

 

 

quest system_osiagniec begin
	state start begin
		function shop()
			local v = {}
			local itemTable = {
				-- [n] = {id itemu, ilosc, koszt},
				[1] = {25040, 1, 5},
				[2] = {25041, 1, 10},
			}
			for i = 1, table.getn(itemTable) do
				table.insert(v, item_name(itemTable[i][1]))
			end
			table.insert(v, "Anuluj")
			local s = select_table(v)
			if v == table.getn(itemTable)+1 then return end
			say_title(mob_name(npc.race)..":")
			say_item_vnum(itemTable[s][1])
			say("Sztuk przedmiotu: "..itemTable[s][2])
			say("Koszt w punktach: "..itemTable[s][3])
			say()
			say_reward("Posiadasz punktów: "..pc.getqf("achievement_points")..".")
			local x = select("Zakup","Wstecz","Anuluj")
			if x == 1 then
				if itemTable[s][3] > pc.getqf("achievement_points") then
					say_title(mob_name(npc.race)..":")
					say("Potrzebujesz "..itemTable[s][3].." PO aby zakupic "..item_name(itemTable[s][1]))
					return
				end
				say_title(mob_name(npc.race)..":")
				say_green("Pomyslnie zakupiono przedmiot. Milego dnia!")
				say_item_vnum(itemTable[s][1])
				pc.give_item2(itemTable[s][1], itemTable[s][2])
				pc.setqf("achievement_points", pc.getqf("achievement_points")-itemTable[s][3])
			elseif x == 2 then
				system_osiagniec.shop()
			else
				return
			end
		end
		when 20011.chat."AP Shop" begin
			system_osiagniec.shop()
		end
	end
end 

 

 

 tylko nie wiem gdzie ucisnąć 

local actual_achievement_points = pc.getqf("achievement_points")

żeby odczytywało bo jak narazie to cały czas 0

Zarchiwizowany

Ten temat przebywa obecnie w archiwum. Dodawanie nowych odpowiedzi zostało zablokowane.

×
×
  • Dodaj nową pozycję...