[OFFİCİAL]Full Energy System

[bakam321]

Hello Epvp Full Energy System

PHP Code:

quest energy_system begin
    state start begin
        when alchemist.chat.locale.energy_system.title_1 begin
            say_title (mob_name(20001))
            say("")
            say (locale.energy_system.say_1)
            wait()
            say_title (mob_name(20001))
            say("")
            say (locale.energy_system.say_2)
            wait()
            say_title("System:")
            say("")
            say (locale.energy_system.say_3)
            setstate (can_make)
        end
    end

    state can_make begin
        function setting () 
            return
            {
                ["prob_acc_table"] = 
                {
                    ["35to50"] = {30,55,70,80,90,95,97,98,99,100},
                    ["51to70"] = {20,40,60,75,85,91,96,98,99,100},
                    ["upto70"] = {10,25,45,65,80,88,94,97,99,100}
                },
                ["item_num_table"] ={0,1,2,3,4,6,8,10,12,15},
                ["energy_stone"] = 51001,
                ["charging_stone"] = 51002,
            }
        end    
        function getItemNum ( str, r )
            local setting = energy_system.setting()
            for i = 1, 10 do
                if r < setting.prob_acc_table[str][i] then
                    return setting.item_num_table[i]
                end
            end
            return 0
        end

        when alchemist.chat.locale.energy_system.title_2 begin
            say_title("System:")
            say("")
            say (locale.energy_system.say_4)
            wait()
            say_title("System:")
            say("")
            say (locale.energy_system.say_5)
            wait()
            if pc.get_level() < 40 then 
                say_title("System:")
                say("")
                say (locale.energy_system.say_6)
            else
                say_title("System:")
                say("")
                say (locale.energy_system.say_7)
            end
        end

        when alchemist.take begin
            if pc.get_level() < 40 then 
                say_title(mob_name(20001))
                say("")
                say(locale.energy_system.say_8)
                return
            end
            local item_vnum = item.vnum
            local levelLimit = item.get_level_limit(item_vnum)
            local setting = energy_system.setting()
            if levelLimit == nil then
                say_title (mob_name(20001))
                say("")
                say (locale.energy_system.say_9)
                wait()
            elseif item.get_type() == ITEM_WEAPON and item.get_sub_type() == WEAPON_ARROW then
                say_title (mob_name(20001)) 
                say("")
                say (locale.energy_system.say_9)
                wait()
            elseif levelLimit < 35 then
                -- kind of impossible condition?
                say_title (mob_name(20001))
                say("")
                say (locale.energy_system.say_10)
            else
                say_title (mob_name(20001))
                say("")
                say (item_name(item_vnum))
                say (locale.energy_system.say_11)
                say("")
                local s = select (locale.energy_system.say_12,locale.energy_system.say_13)
                if s == 1 then
                    item.remove()
                    local r = number (1, 100)
                    local n
                    if levelLimit >= 40 and levelLimit <= 50 then
                        n = energy_system.getItemNum ("35to50",r)
                    elseif levelLimit > 50 and levelLimit <= 70 then
                        n = energy_system.getItemNum ("51to70",r)
                    else
                        n = energy_system.getItemNum ("upto70",r)
                    end
                    if (n == 0) then
                        say_title("System:")
                        say("")
                        say (locale.energy_system.say_14)
                    else
                        pc.give_item2(setting.energy_stone, n)
                        say_title("System:") 
                        say("")
                        say("Enhancement succeded.")
                        say(""..n.." Vitality Ores were produced.")
                        say("")
                    end
                end
            end
        end

        when alchemist.chat.locale.energy_system.say_16 begin
            local setting = energy_system.setting()
            local need = 30
            say_title (mob_name(20001))
            say("")
            say("Hello young hero!")
            say("If you give me 30 Vitality Ores I can try")
            say("to create a Vitality Stone for you.")
            say("")
            wait()
            
            if pc.get_level() < 40 then 
                say_title (mob_name(20001))
                say("")
                say (locale.energy_system.say_6)
                return
            end
            
            if pc.count_item (setting.energy_stone) < need then
                say_title (mob_name(20001)) 
                say("")
                say("You don't have enough Vitality Ores.")
                say("You need 30 to fuse a Vitality Stone.")
                return
            else
                say_title (mob_name(20001))
                say("")
                say("I see, so you brought me 30 Vitality Ores.")
                say("Wonderful!")
                say("Just one moment please...")
                wait()
            end
            
            local charge = 100000
            say_title (mob_name(20001)) 
            say("")
            say("Preperations are complete!")
            say("So do you want me to try and fuse a Vitality Stone?")
            say("It costs 100.000 Yang and the enhancement can fail!")
            say("")
            local s = select (locale.energy_system.say_21,locale.energy_system.say_22 )
            if s == 2 then
                say_title (mob_name(20001)) 
                say("")
                say (locale.energy_system.say_23)
                return
            end

            if pc.get_gold() < charge then
                say_title (mob_name(20001))
                say("")
                say (locale.energy_system.say_24)
                return
            end

            pc.change_gold (-charge)
            pc.remove_item (setting.energy_stone, need)

            if pc.getqf ("hasExperience") == 0 then
                say_title (mob_name(20001))
                say("")
                say (locale.energy_system.say_25)
                pc.give_item2 (setting.charging_stone, 1)
                pc.setqf ("hasExperience", 1);
                return
            end

            local r = number (1, 100)
            if r > 30 then
                say_title (mob_name(20001))
                say("")
                say (locale.energy_system.say_26)
                return
            end
            say_title (mob_name(20001)) 
            say("")
            say (locale.energy_system.say_27)
            pc.give_item2 (setting.charging_stone, 1)
                    
--            setskin(NOWINDOW)
--            command("cube open")
        end
    end
end 


[.XXShuzZzle]

It is already pub
and you forgot to share locale.lua as well

[.CHHorny]

#Reported...


Fehlt einfach zu viel und das ist schon in den SG Files drinne die public sind.

[Ocelot2606]

Ich versteh es nicht wieso der und dieser Minton immer noch nicht banned sind die Posten andauernd Schwachsinn und Fragen im Release Bereich

[Nunuh91]

I receive this error why? :/

RunState: LUA_ERROR: [string "energy_system"]:7: attempt to call field `get_level_limit' (a nil value)
WriteRunningStateToSyserr: LUA_ERROR: quest energy_system.can_make click

[Lord iRemix]

Das passiert, wenn man zu dumm zum rippen ist =)

#closerequest

[Nunuh91]

Ok, obrigado pela resposta mais estúpida que podias ter dado!

[Prince43™]

PHP Code:

quest ironie begin
    state start begin
         when quest.release do
         if pc.getqf("ironie") == 0 then
            pc.setqf("ironie", 1)
            csay_red("Darf ich auch alle SG quests usw Releasen wenn ich Thanks dafür bekomme *-* ??")
            end 
     end
end 


Kind Regards

Prince43™

[.Bender]

Ja, wir verzichten mal auf Clientside und machen es einfach alles über eine Quests. #YOLO