robertynyo scrie:

[RaffaeL] scrie:

robertynyo scrie:Are cineva un quest functional zilnic ,gen sa omori 10 mobi sa primesti un obiect,dar sa fie doar 1 data pe zi.
Multumesc

Poftim:

Cod: Selectaţi tot

quest ucide_monstrii begin
        state start begin
                when login or levelup with pc.getqf("last_mission") >= 24*60*60 begin
                        set_state(information)
                end
        end
        state information begin
      when letter begin
         send_letter("Recompensa")
      end

      when info or button begin
         say_title("Misiune-Ucide monstrii") 
	 say("") 
	 say("Mergi si ucide 10 xxxxxxx") 
	 say("si vei putea alege recompensa") 
	 say("") 
	 say_reward("Pana acum ai ucis "..pc.getqf("kill_count").." monstrii!")
           pc.setqf("state", 10)
           q.set_counter("mobi", 10)
      end

      when yyyy.kill begin
         local count = pc.getqf("state") - 1
         if count <= 10 then
            pc.setqf("state", count)
               q.set_counter("mobi", count)
         end
         if count == 0 then
		 say_reward("Ai terminat misiunea cu succes")
		 say("")
		 say_reward("Alege-ti premiul")
		 local premiu = select ("Metal magic","Bless","Mantia curajului","PV/MP-full","Pana de scris rosie")
	      if premiu == 1 then
	      pc.give_item2(25041,3)
          say("Ai primit Metal magic 3x")
          elseif premiu == 2 then
          pc.give_item2(25040,3)
          say("Ai primit Bless 3x")
          elseif premiu == 3 then
          pc.give_item2(70038,3)
          say("Ai primit Mantia curajului 3x")
          elseif premiu == 4 then
          pc.give_item2(71020,3)
          say("Ai primit PV/MP-full 3x")
          elseif premiu == 5 then
          pc.give_item2(70029,3)
          say("Ai primit Pana de scris rosie3x")
          end
            clear_letter()
         end
      end
   end
end

Modifici tu "xxxxxx" si "yyyy", cu numele, respectiv vnum-ul mob-ului pe care il doresti in quest.
La terminarea misiunii, playerul poate sa isi aleaga premiul(m-am gandit ca este mai interesant asa... .)

Nu functioneaza,nu apare nimic in stanga

quest ucide_monstrii begin
        state start begin
                when login or levelup begin
					pc.setqf("last_mission")
                        set_state(information)
                end
        end
        state information begin
      when letter begin
         send_letter("Recompensa")
      end

      when info or button begin
		if pc.getqf("last_mission") >= 24*60*60 then 
         say_title("Misiune-Ucide monstrii") 
    say("") 
    say("Mergi si ucide 10 xxxxxxx") 
    say("si vei putea alege recompensa") 
    say("") 
    say_reward("Pana acum ai ucis "..pc.getqf("kill_count").." monstrii!")
           pc.setqf("state", 10)
           q.set_counter("mobi", 10)
		end
      end

      when yyyy.kill begin
         local count = pc.getqf("state") - 1
         if count <= 10 then
            pc.setqf("state", count)
               q.set_counter("mobi", count)
         end
         if count == 0 then
       say_reward("Ai terminat misiunea cu succes")
       say("")
       say_reward("Alege-ti premiul")
       local premiu = select ("Metal magic","Bless","Mantia curajului","PV/MP-full","Pana de scris rosie")
         if premiu == 1 then
         pc.give_item2(25041,3)
          say("Ai primit Metal magic 3x")
          elseif premiu == 2 then
          pc.give_item2(25040,3)
          say("Ai primit Bless 3x")
          elseif premiu == 3 then
          pc.give_item2(70038,3)
          say("Ai primit Mantia curajului 3x")
          elseif premiu == 4 then
          pc.give_item2(71020,3)
          say("Ai primit PV/MP-full 3x")
          elseif premiu == 5 then
          pc.give_item2(70029,3)
          say("Ai primit Pana de scris rosie3x")
          end
            clear_letter()
         end
      end
   end
end

[RaffaeL] scrie:

robertynyo scrie:

[RaffaeL] scrie:
Poftim:

Cod: Selectaţi tot

quest ucide_monstrii begin
        state start begin
                when login or levelup with pc.getqf("last_mission") >= 24*60*60 begin
                        set_state(information)
                end
        end
        state information begin
      when letter begin
         send_letter("Recompensa")
      end

      when info or button begin
         say_title("Misiune-Ucide monstrii") 
	 say("") 
	 say("Mergi si ucide 10 xxxxxxx") 
	 say("si vei putea alege recompensa") 
	 say("") 
	 say_reward("Pana acum ai ucis "..pc.getqf("kill_count").." monstrii!")
           pc.setqf("state", 10)
           q.set_counter("mobi", 10)
      end

      when yyyy.kill begin
         local count = pc.getqf("state") - 1
         if count <= 10 then
            pc.setqf("state", count)
               q.set_counter("mobi", count)
         end
         if count == 0 then
		 say_reward("Ai terminat misiunea cu succes")
		 say("")
		 say_reward("Alege-ti premiul")
		 local premiu = select ("Metal magic","Bless","Mantia curajului","PV/MP-full","Pana de scris rosie")
	      if premiu == 1 then
	      pc.give_item2(25041,3)
          say("Ai primit Metal magic 3x")
          elseif premiu == 2 then
          pc.give_item2(25040,3)
          say("Ai primit Bless 3x")
          elseif premiu == 3 then
          pc.give_item2(70038,3)
          say("Ai primit Mantia curajului 3x")
          elseif premiu == 4 then
          pc.give_item2(71020,3)
          say("Ai primit PV/MP-full 3x")
          elseif premiu == 5 then
          pc.give_item2(70029,3)
          say("Ai primit Pana de scris rosie3x")
          end
            clear_letter()
         end
      end
   end
end

Modifici tu "xxxxxx" si "yyyy", cu numele, respectiv vnum-ul mob-ului pe care il doresti in quest.
La terminarea misiunii, playerul poate sa isi aleaga premiul(m-am gandit ca este mai interesant asa... .)

Nu functioneaza,nu apare nimic in stanga

Incearca din nou:

Cod: Selectaţi tot

quest ucide_monstrii begin
        state start begin
                when login or levelup begin
					pc.setqf("last_mission")
                        set_state(information)
                end
        end
        state information begin
      when letter begin
         send_letter("Recompensa")
      end

      when info or button begin
		if pc.getqf("last_mission") >= 24*60*60 then 
         say_title("Misiune-Ucide monstrii") 
    say("") 
    say("Mergi si ucide 10 xxxxxxx") 
    say("si vei putea alege recompensa") 
    say("") 
    say_reward("Pana acum ai ucis "..pc.getqf("kill_count").." monstrii!")
           pc.setqf("state", 10)
           q.set_counter("mobi", 10)
		end
      end

      when yyyy.kill begin
         local count = pc.getqf("state") - 1
         if count <= 10 then
            pc.setqf("state", count)
               q.set_counter("mobi", count)
         end
         if count == 0 then
       say_reward("Ai terminat misiunea cu succes")
       say("")
       say_reward("Alege-ti premiul")
       local premiu = select ("Metal magic","Bless","Mantia curajului","PV/MP-full","Pana de scris rosie")
         if premiu == 1 then
         pc.give_item2(25041,3)
          say("Ai primit Metal magic 3x")
          elseif premiu == 2 then
          pc.give_item2(25040,3)
          say("Ai primit Bless 3x")
          elseif premiu == 3 then
          pc.give_item2(70038,3)
          say("Ai primit Mantia curajului 3x")
          elseif premiu == 4 then
          pc.give_item2(71020,3)
          say("Ai primit PV/MP-full 3x")
          elseif premiu == 5 then
          pc.give_item2(70029,3)
          say("Ai primit Pana de scris rosie3x")
          end
            clear_letter()
         end
      end
   end
end

quest daily_quesd begin
    state start begin
        when login with pc.getqf('daily_day') ~= tonumber(os.date('%d', os.time())) or
            pc.getqf('daily_month') ~= tonumber(os.date('%m', os.time())) begin
            local w,c = {},daily_quesd.works()
            for i = 1, table.getn(c) do
                if pc.get_level() >= c[1] and pc.get_level() <= c[2] then
                    table.insert(w,i)
                end
            end
            if table.getn(w) == 0 then chat('There are actually no tasks for you!') return end
            pc.setqf('daily_number', w[number(1,table.getn(w))])
            pc.setqf('daily_day', tonumber(os.date('%d', os.time())))
            pc.setqf('daily_month', tonumber(os.date('%m', os.time())))
            pc.setqf('daily_counter', 0)
            set_state(daily_run)
        end
    end
    state daily_run begin
        when letter begin
            send_letter('Daily Metin Quest: '..os.date('%A', os.time()))
        end
        when button or info begin
            say("Hello, this is your Daily Metin Quest.")
            say("Every day you get a new Quest.")
            say("")
            say_reward('Kill: '..mob_name(daily_quesd.works()[pc.getqf('daily_number')][3]))
            say_reward('Count: '..daily_quesd.works()[pc.getqf('daily_number')][4]..' times')
            say_reward('Currently killed: '..pc.getqf('daily_counter'))
        end
        when kill with npc.get_race() == daily_quesd.works()[pc.getqf('daily_number')][3] begin
            pc.setqf('daily_counter', pc.getqf('daily_counter')+1)
            if pc.getqf('daily_counter') >= daily_quesd.works()[pc.getqf('daily_number')][4] then
                say('Congratulation, Mission successful!')
                say('You get:')
                local z,u = number(1,table.getn(daily_quesd.rewards()[1])),number(1,table.getn(daily_quesd.rewards()[2]))
                say(item_name(daily_quesd.rewards()[1][z])..' and..')
                say(daily_quesd.rewards()[2]..' Gold!')
                pc.give_item2(daily_quesd.rewards()[1][z],1)
                pc.change_money(daily_quesd.rewards()[2])
                pc.setqf('daily_counter', 0)
                pc.setqf('daily_number', 0)
                clear_letter()
                set_state(start)
            end
        end
        function rewards()
            local t = {
                [1] = {71094,71001,71085,71084,50300,50050,25040,70005,70024,50011,50513},
                [2] = {5000,7000,9000,18000,25000,30000,50000,100000},
            }
            return t
        end
        function works()
            local t = {
                [1] = {1,25,8003,20},
                [2] = {1,25,8001,20},
                [3] = {1,25,8002,20},
                [4] = {1,25,8004,20},
                [5] = {1,25,8005,20},
                [6] = {25,40,8006,20},
                [7] = {25,40,8007,20},
                [8] = {25,40,8008,20},
                [9] = {40,55,8009,20},
                [10] = {40,55,8010,20},
                [11] = {40,55,8011,20},
                [12] = {55,70,8012,20},
                [13] = {55,70,8013,20},
                [14] = {55,70,8014,20},
                [15] = {70,99,8024,20},
                [16] = {70,99,8025,20},
                [17] = {70,99,8026,20},
                [18] = {70,99,8027,20},
            }
            return t
        end

robertynyo scrie:AM gasit eu un quest dar nu este tradus...

quest daily_quesd begin
    state start begin
        when login with pc.getqf('daily_day') ~= tonumber(os.date('%d', os.time())) or
            pc.getqf('daily_month') ~= tonumber(os.date('%m', os.time())) begin
            local w,c = {},daily_quesd.works()
            for i = 1, table.getn(c) do
                if pc.get_level() >= c[1] and pc.get_level() <= c[2] then
                    table.insert(w,i)
                end
            end
            if table.getn(w) == 0 then chat('There are actually no tasks for you!') return end
            pc.setqf('daily_number', w[number(1,table.getn(w))])
            pc.setqf('daily_day', tonumber(os.date('%d', os.time())))
            pc.setqf('daily_month', tonumber(os.date('%m', os.time())))
            pc.setqf('daily_counter', 0)
            set_state(daily_run)
        end
    end
    state daily_run begin
        when letter begin
            send_letter('Daily Metin Quest: '..os.date('%A', os.time()))
        end
        when button or info begin
            say("Hello, this is your Daily Metin Quest.")
            say("Every day you get a new Quest.")
            say("")
            say_reward('Kill: '..mob_name(daily_quesd.works()[pc.getqf('daily_number')][3]))
            say_reward('Count: '..daily_quesd.works()[pc.getqf('daily_number')][4]..' times')
            say_reward('Currently killed: '..pc.getqf('daily_counter'))
        end
        when kill with npc.get_race() == daily_quesd.works()[pc.getqf('daily_number')][3] begin
            pc.setqf('daily_counter', pc.getqf('daily_counter')+1)
            if pc.getqf('daily_counter') >= daily_quesd.works()[pc.getqf('daily_number')][4] then
                say('Congratulation, Mission successful!')
                say('You get:')
                local z,u = number(1,table.getn(daily_quesd.rewards()[1])),number(1,table.getn(daily_quesd.rewards()[2]))
                say(item_name(daily_quesd.rewards()[1][z])..' and..')
                say(daily_quesd.rewards()[2]..' Gold!')
                pc.give_item2(daily_quesd.rewards()[1][z],1)
                pc.change_money(daily_quesd.rewards()[2])
                pc.setqf('daily_counter', 0)
                pc.setqf('daily_number', 0)
                clear_letter()
                set_state(start)
            end
        end
        function rewards()
            local t = {
                [1] = {71094,71001,71085,71084,50300,50050,25040,70005,70024,50011,50513},
                [2] = {5000,7000,9000,18000,25000,30000,50000,100000},
            }
            return t
        end
        function works()
            local t = {
                [1] = {1,25,8003,20},
                [2] = {1,25,8001,20},
                [3] = {1,25,8002,20},
                [4] = {1,25,8004,20},
                [5] = {1,25,8005,20},
                [6] = {25,40,8006,20},
                [7] = {25,40,8007,20},
                [8] = {25,40,8008,20},
                [9] = {40,55,8009,20},
                [10] = {40,55,8010,20},
                [11] = {40,55,8011,20},
                [12] = {55,70,8012,20},
                [13] = {55,70,8013,20},
                [14] = {55,70,8014,20},
                [15] = {70,99,8024,20},
                [16] = {70,99,8025,20},
                [17] = {70,99,8026,20},
                [18] = {70,99,8027,20},
            }
            return t
        end

quest daily_quesd begin
    state start begin
        when login with pc.getqf('daily_day') ~= tonumber(os.date('%d', os.time())) or
            pc.getqf('daily_month') ~= tonumber(os.date('%m', os.time())) begin
            local w,c = {},daily_quesd.works()
            for i = 1, table.getn(c) do
                if pc.get_level() >= c[1] and pc.get_level() <= c[2] then
                    table.insert(w,i)
                end
            end
            if table.getn(w) == 0 then chat('In acest moment nu ai nici o misiune!') return end
            pc.setqf('daily_number', w[number(1,table.getn(w))])
            pc.setqf('daily_day', tonumber(os.date('%d', os.time())))
            pc.setqf('daily_month', tonumber(os.date('%m', os.time())))
            pc.setqf('daily_counter', 0)
            set_state(daily_run)
        end
    end
    state daily_run begin
        when letter begin
            send_letter('Misiune zilnica: '..os.date('%A', os.time()))
        end
        when button or info begin
            say("Salut.Aceasta este misiunea ta zilnica.")
            say("Zilnic vei primi o noua misiune.")
            say("")
            say_reward('Ucide: '..mob_name(daily_quesd.works()[pc.getqf('daily_number')][3]))
            say_reward('Ai de ucis: '..daily_quesd.works()[pc.getqf('daily_number')][4]..'')
            say_reward('Pana acum ai ucis: '..pc.getqf('daily_counter'))
        end
        when kill with npc.get_race() == daily_quesd.works()[pc.getqf('daily_number')][3] begin
            pc.setqf('daily_counter', pc.getqf('daily_counter')+1)
            if pc.getqf('daily_counter') >= daily_quesd.works()[pc.getqf('daily_number')][4] then
                say('Felicitari, ai terminat misiunea!')
                say('Vei primi:')
                local z,u = number(1,table.getn(daily_quesd.rewards()[1])),number(1,table.getn(daily_quesd.rewards()[2]))
                say(item_name(daily_quesd.rewards()[1][z])..' si..')
                say(daily_quesd.rewards()[2]..' Yang!')
                pc.give_item2(daily_quesd.rewards()[1][z],1)
                pc.change_money(daily_quesd.rewards()[2])
                pc.setqf('daily_counter', 0)
                pc.setqf('daily_number', 0)
                clear_letter()
                set_state(start)
            end
        end
        function rewards()
            local t = {
                [1] = {71094,71001,71085,71084,50300,50050,25040,70005,70024,50011,50513},
                [2] = {5000,7000,9000,18000,25000,30000,50000,100000},
            }
            return t
        end
        function works()
            local t = {
                [1] = {1,25,8003,20},
                [2] = {1,25,8001,20},
                [3] = {1,25,8002,20},
                [4] = {1,25,8004,20},
                [5] = {1,25,8005,20},
                [6] = {25,40,8006,20},
                [7] = {25,40,8007,20},
                [8] = {25,40,8008,20},
                [9] = {40,55,8009,20},
                [10] = {40,55,8010,20},
                [11] = {40,55,8011,20},
                [12] = {55,70,8012,20},
                [13] = {55,70,8013,20},
                [14] = {55,70,8014,20},
                [15] = {70,99,8024,20},
                [16] = {70,99,8025,20},
                [17] = {70,99,8026,20},
                [18] = {70,99,8027,20},
            }
            return t
        end
	end
end

[RaffaeL] scrie:

robertynyo scrie:AM gasit eu un quest dar nu este tradus...

quest daily_quesd begin
    state start begin
        when login with pc.getqf('daily_day') ~= tonumber(os.date('%d', os.time())) or
            pc.getqf('daily_month') ~= tonumber(os.date('%m', os.time())) begin
            local w,c = {},daily_quesd.works()
            for i = 1, table.getn(c) do
                if pc.get_level() >= c[1] and pc.get_level() <= c[2] then
                    table.insert(w,i)
                end
            end
            if table.getn(w) == 0 then chat('There are actually no tasks for you!') return end
            pc.setqf('daily_number', w[number(1,table.getn(w))])
            pc.setqf('daily_day', tonumber(os.date('%d', os.time())))
            pc.setqf('daily_month', tonumber(os.date('%m', os.time())))
            pc.setqf('daily_counter', 0)
            set_state(daily_run)
        end
    end
    state daily_run begin
        when letter begin
            send_letter('Daily Metin Quest: '..os.date('%A', os.time()))
        end
        when button or info begin
            say("Hello, this is your Daily Metin Quest.")
            say("Every day you get a new Quest.")
            say("")
            say_reward('Kill: '..mob_name(daily_quesd.works()[pc.getqf('daily_number')][3]))
            say_reward('Count: '..daily_quesd.works()[pc.getqf('daily_number')][4]..' times')
            say_reward('Currently killed: '..pc.getqf('daily_counter'))
        end
        when kill with npc.get_race() == daily_quesd.works()[pc.getqf('daily_number')][3] begin
            pc.setqf('daily_counter', pc.getqf('daily_counter')+1)
            if pc.getqf('daily_counter') >= daily_quesd.works()[pc.getqf('daily_number')][4] then
                say('Congratulation, Mission successful!')
                say('You get:')
                local z,u = number(1,table.getn(daily_quesd.rewards()[1])),number(1,table.getn(daily_quesd.rewards()[2]))
                say(item_name(daily_quesd.rewards()[1][z])..' and..')
                say(daily_quesd.rewards()[2]..' Gold!')
                pc.give_item2(daily_quesd.rewards()[1][z],1)
                pc.change_money(daily_quesd.rewards()[2])
                pc.setqf('daily_counter', 0)
                pc.setqf('daily_number', 0)
                clear_letter()
                set_state(start)
            end
        end
        function rewards()
            local t = {
                [1] = {71094,71001,71085,71084,50300,50050,25040,70005,70024,50011,50513},
                [2] = {5000,7000,9000,18000,25000,30000,50000,100000},
            }
            return t
        end
        function works()
            local t = {
                [1] = {1,25,8003,20},
                [2] = {1,25,8001,20},
                [3] = {1,25,8002,20},
                [4] = {1,25,8004,20},
                [5] = {1,25,8005,20},
                [6] = {25,40,8006,20},
                [7] = {25,40,8007,20},
                [8] = {25,40,8008,20},
                [9] = {40,55,8009,20},
                [10] = {40,55,8010,20},
                [11] = {40,55,8011,20},
                [12] = {55,70,8012,20},
                [13] = {55,70,8013,20},
                [14] = {55,70,8014,20},
                [15] = {70,99,8024,20},
                [16] = {70,99,8025,20},
                [17] = {70,99,8026,20},
                [18] = {70,99,8027,20},
            }
            return t
        end

Poftim, l-am tradus si inchis eu pentru tine(nu erau ultimele "end-uri", pentru a inchide questul.):

quest daily_quesd begin
    state start begin
        when login with pc.getqf('daily_day') ~= tonumber(os.date('%d', os.time())) or
            pc.getqf('daily_month') ~= tonumber(os.date('%m', os.time())) begin
            local w,c = {},daily_quesd.works()
            for i = 1, table.getn(c) do
                if pc.get_level() >= c[1] and pc.get_level() <= c[2] then
                    table.insert(w,i)
                end
            end
            if table.getn(w) == 0 then chat('In acest moment nu ai nici o misiune!') return end
            pc.setqf('daily_number', w[number(1,table.getn(w))])
            pc.setqf('daily_day', tonumber(os.date('%d', os.time())))
            pc.setqf('daily_month', tonumber(os.date('%m', os.time())))
            pc.setqf('daily_counter', 0)
            set_state(daily_run)
        end
    end
    state daily_run begin
        when letter begin
            send_letter('Misiune zilnica: '..os.date('%A', os.time()))
        end
        when button or info begin
            say("Salut.Aceasta este misiunea ta zilnica.")
            say("Zilnic vei primi o noua misiune.")
            say("")
            say_reward('Ucide: '..mob_name(daily_quesd.works()[pc.getqf('daily_number')][3]))
            say_reward('Ai de ucis: '..daily_quesd.works()[pc.getqf('daily_number')][4]..'')
            say_reward('Pana acum ai ucis: '..pc.getqf('daily_counter'))
        end
        when kill with npc.get_race() == daily_quesd.works()[pc.getqf('daily_number')][3] begin
            pc.setqf('daily_counter', pc.getqf('daily_counter')+1)
            if pc.getqf('daily_counter') >= daily_quesd.works()[pc.getqf('daily_number')][4] then
                say('Felicitari, ai terminat misiunea!')
                say('Vei primi:')
                local z,u = number(1,table.getn(daily_quesd.rewards()[1])),number(1,table.getn(daily_quesd.rewards()[2]))
                say(item_name(daily_quesd.rewards()[1][z])..' si..')
                say(daily_quesd.rewards()[2]..' Yang!')
                pc.give_item2(daily_quesd.rewards()[1][z],1)
                pc.change_money(daily_quesd.rewards()[2])
                pc.setqf('daily_counter', 0)
                pc.setqf('daily_number', 0)
                clear_letter()
                set_state(start)
            end
        end
        function rewards()
            local t = {
                [1] = {71094,71001,71085,71084,50300,50050,25040,70005,70024,50011,50513},
                [2] = {5000,7000,9000,18000,25000,30000,50000,100000},
            }
            return t
        end
        function works()
            local t = {
                [1] = {1,25,8003,20},
                [2] = {1,25,8001,20},
                [3] = {1,25,8002,20},
                [4] = {1,25,8004,20},
                [5] = {1,25,8005,20},
                [6] = {25,40,8006,20},
                [7] = {25,40,8007,20},
                [8] = {25,40,8008,20},
                [9] = {40,55,8009,20},
                [10] = {40,55,8010,20},
                [11] = {40,55,8011,20},
                [12] = {55,70,8012,20},
                [13] = {55,70,8013,20},
                [14] = {55,70,8014,20},
                [15] = {70,99,8024,20},
                [16] = {70,99,8025,20},
                [17] = {70,99,8026,20},
                [18] = {70,99,8027,20},
            }
            return t
        end
	end
end

Questul este creat pentru pietre metin.
Pentru a schimba cu monstrii, trebuie sa modifici sub functia"function works()", codul metinelor cu coduri de mob.
De asemeni, este functional pana la un lvl mai mic sau egal cu 99.