Hej, grzebałem troszkę w questach z pla, ale nie widziałem nigdzie questów związanych z księgą misji. Jest ktoś może w ich posiadaniu? 🙂 

Spoiler

LuaKod został skopiowany

quest questscroll1 begin    state start begin	when questscroll1.use begin	    local idx = item.get_socket(0)	    if idx == 0 then		idx = number(1,2)		item.set_socket(0, idx)	    end	    if idx>table.getn(special.questscroll) or idx <= 0 then		item.remove()	    elseif table.getn(special.questscroll[idx])!=5 then	    else		local table = special.questscroll[idx]		local rt = special.questscroll_reward[idx]		local t = table[1]		if  t == QUEST_SCROLL_TYPE_KILL_MOB then		    say(table[2])                     say(color(1,1,0),rt[2],locale.gold," ",locale.exp,rt[3]," ",(rt[4] != 0) and item_name(rt[4]) or ""," ",(rt[5] != 0) and item_name(rt    [5]) or ""," ", (rt[6] != 0) and item_name(rt[6]) or "", color(1,1,1)) 		    pc.setqf("idx", idx)		    pc.setqf("count", table[5])		    pc.setqf("target", mob_vnum(table[4]))		    q.set_title(table[3])		    q.set_counter(table[4],table[5])		    --q.set_clock("���� �ð�", 24*60*60)		    --loop_timer("timeupdate", 3)		    q.start()		    pc.setqf("timer", 24*60*60)		    setstate(kill_mob)		    item.remove()		    char_log(0, "QUEST", "questscroll1 start");		elseif t == QUEST_SCROLL_TYPE_KILL_ANOTHER_EMPIRE then		    --say(special.questscroll[idx][2])		    --setstate(kill_another_empire)		    --say(gameforge.questscroll1._10_say)		    say(table[2])		    pc.setqf("idx", idx)		    pc.setqf("count", table[5])		    q.set_title(table[3])		    q.set_counter(table[4],table[5])		    --q.set_clock("���� �ð�", 24*60*60)		    --loop_timer("timeupdate", 3)		    q.start()		    pc.setqf("timer", 24*60*60)		    setstate(kill_another_empire)		    item.remove()		else		    -- �̻��� ������		    item.remove()		end	    end	end    end    state kill_mob begin	    --local t= pc.getqf("timer")-3	    --pc.setqf("timer", t)	    --if t<0 then	    --end 	when questscroll1.use begin	    say(locale.questscroll.exist)	end 	when kill begin	    if npc.race == pc.getqf("target") then		pc.setqf("count", pc.getqf("count")-1)		q.set_counter_value(pc.getqf("count"))		if pc.getqf("count")>=0 then		    char_log(0, "QUEST", "questscroll1 kill "..pc.getqf("count"));		end		if pc.getqf("count") <= 0 then		    makequestbutton(locale.questscroll.finish_button)		end		setskin(NOWINDOW)	    end	end	when login begin	    if pc.getqf("count") <= 0 then		makequestbutton(locale.questscroll.finish_button)	    else		local table = special.questscroll[pc.getqf("idx")]		q.set_title(table[3])		q.set_counter(table[4],pc.getqf("count"))		q.start()	    end	    setskin(NOWINDOW)	end	when button begin	    setstate(start)	    q.done()	    local rt = special.questscroll_reward[pc.getqf("idx")]	    say(locale.questscroll.finish)	    say(rt[2],locale.gold)	    pc.changegold(rt[2])	    say(locale.exp .. " " .. rt[3])	    pc.give_exp2(rt[3])	    if rt[4] != 0 then say(item_name(rt[4])) pc.give_item2(rt[4]) end	    if rt[5] != 0 then say(item_name(rt[5])) pc.give_item2(rt[5]) end	    if rt[6] != 0 then say(item_name(rt[6])) pc.give_item2(rt[6]) end	    pc.setqf("idx", 0)	    char_log(0, "QUEST", "questscroll1 done")	end    end    state kill_another_empire begin	    --local t= pc.getqf("timer")-3	    --pc.setqf("timer", t)	    --if t<0 then	    --end	when questscroll1.use begin	    say(locale.questscroll.exist)	end	when kill begin	    if npc.is_pc() and npc.empire != pc.empire then		pc.setqf("count", pc.getqf("count")-1)		q.set_counter_value(pc.getqf("count"))		if pc.getqf("count")>=0 then		    char_log(0, "QUEST", "questscroll1 kill "..pc.getqf("count"));		end		if pc.getqf("count") <= 0 then		    makequestbutton(locale.questscroll.finish_button)		end		setskin(NOWINDOW)	    end	end	when login begin	    if pc.getqf("count") <= 0 then		makequestbutton(locale.questscroll.finish_button)	    else		local table = special.questscroll[pc.getqf("idx")]		q.set_title(table[3])		q.set_counter(table[4],pc.getqf("count"))		q.start()	    end	    setskin(NOWINDOW)	end	when button begin	    setstate(start)	    local rt = special.questscroll_reward[pc.getqf("idx")]	    say(locale.questscroll.finish)	    say(rt[2],locale.gold)	    pc.changegold(rt[2])	    say(locale.exp .. " " .. rt[3])	    pc.give_exp2(rt[3])	    if rt[4]!=0 then say(item_name(rt[4])) pc.give_item2(rt[4]) end	    if rt[5]!=0 then say(item_name(rt[5])) pc.give_item2(rt[5]) end	    if rt[6]!=0 then say(item_name(rt[6])) pc.give_item2(rt[6]) end	    q.done()	    pc.setqf("idx", 0)	end    endend

 

Spoiler

LuaKod został skopiowany

quest questscroll2 begin    state start begin	when questscroll2.use begin	    local idx = item.get_socket(0)	    if idx == 0 then		idx = number(3,9)		item.set_socket(0, idx)	    end	    if idx>table.getn(special.questscroll) or idx <= 0 then		item.remove()	    elseif table.getn(special.questscroll[idx])!=5 then	    else		local table = special.questscroll[idx]		local rt = special.questscroll_reward[idx]		local t = table[1]		if  t == QUEST_SCROLL_TYPE_KILL_MOB then		    say(table[2])		    say(color(1,1,0),rt[2],locale.gold," ",locale.exp,rt[3]," ",(rt[4] != 0) and item_name(rt[4]) or ""," ",(rt[5] != 0) and item_name(rt[5]) or ""," ", (rt[6] != 0) and item_name(rt[6]) or "", color(1,1,1))		    pc.setqf("idx", idx)		    pc.setqf("count", table[5])		    pc.setqf("target", mob_vnum(table[4]))		    q.set_title(table[3])		    q.set_counter(table[4],table[5])		    --q.set_clock("���� �ð�", 24*60*60)		    --loop_timer("timeupdate", 3)		    q.start()		    pc.setqf("timer", 24*60*60)		    setstate(kill_mob)		    item.remove()		    char_log(0, "QUEST", "questscroll2 start");		elseif t == QUEST_SCROLL_TYPE_KILL_ANOTHER_EMPIRE then		    --say(special.questscroll[idx][2])		    --setstate(kill_another_empire)		    --say(gameforge.questscroll1._10_say)		    say(table[2])		    pc.setqf("idx", idx)		    pc.setqf("count", table[5])		    q.set_title(table[3])		    q.set_counter(table[4],table[5])		    --q.set_clock("���� �ð�", 24*60*60)		    --loop_timer("timeupdate", 3)		    q.start()		    pc.setqf("timer", 24*60*60)		    setstate(kill_another_empire)		    item.remove()		else		    -- �̻��� ������		    item.remove()		end	    end	end    end    state kill_mob begin	when questscroll2.use begin	    say(locale.questscroll.exist)	end	when kill begin	    if npc.race == pc.getqf("target") then		pc.setqf("count", pc.getqf("count")-1)		q.set_counter_value(pc.getqf("count"))		if pc.getqf("count")>=0 then		    char_log(0, "QUEST", "questscroll3 kill "..pc.getqf("count"));		end		if pc.getqf("count") <= 0 then		    makequestbutton(locale.questscroll.finish_button)		end		setskin(NOWINDOW)	    end	end	when login begin	    if pc.getqf("count") <= 0 then		makequestbutton(locale.questscroll.finish_button)	    else		local table = special.questscroll[pc.getqf("idx")]		q.set_title(table[3])		q.set_counter(table[4],pc.getqf("count"))		q.start()	    end	    setskin(NOWINDOW)	end	when button begin	    setstate(start)	    q.done()	    local rt = special.questscroll_reward[pc.getqf("idx")]	    say(locale.questscroll.finish)	    say(rt[2],locale.gold)	    pc.changegold(rt[2])	    say(locale.exp, " ", rt[3])	    pc.give_exp2(rt[3])	    if rt[4]!=0 then say(item_name(rt[4])) pc.give_item2(rt[4]) end	    if rt[5]!=0 then say(item_name(rt[5])) pc.give_item2(rt[5]) end	    if rt[6]!=0 then say(item_name(rt[6])) pc.give_item2(rt[6]) end	    pc.setqf("idx", 0)	    char_log(0, "QUEST", "questscroll2 done")	end    end    state kill_another_empire begin	when questscroll2.use begin	    say(locale.questscroll.exist)	end	when kill begin	    if npc.is_pc() and npc.empire != pc.empire then		pc.setqf("count", pc.getqf("count")-1)		q.set_counter_value(pc.getqf("count"))		if pc.getqf("count")>=0 then		    char_log(0, "QUEST", "questscroll2 kill "..pc.getqf("count"));		end		if pc.getqf("count") <= 0 then		    makequestbutton(locale.questscroll.finish_button)		end		setskin(NOWINDOW)	    end	end	when login begin	    if pc.getqf("count") <= 0 then		makequestbutton(locale.questscroll.finish_button)	    else		local table = special.questscroll[pc.getqf("idx")]		q.set_title(table[3])		q.set_counter(table[4],pc.getqf("count"))		q.start()	    end	    setskin(NOWINDOW)	end	when button begin	    setstate(start)	    local rt = special.questscroll_reward[pc.getqf("idx")]	    say(locale.questscroll.finish)	    say(rt[2],locale.gold)	    pc.changegold(rt[2])	    say(locale.exp, " ", rt[3])	    pc.give_exp2(rt[3])	    if rt[4]!=0 then say(item_name(rt[4])) pc.give_item2(rt[4]) end	    if rt[5]!=0 then say(item_name(rt[5])) pc.give_item2(rt[5]) end	    if rt[6]!=0 then say(item_name(rt[6])) pc.give_item2(rt[6]) end	    q.done()	    pc.setqf("idx", 0)	end    endend

 

Spoiler

HTMLKod został skopiowany

quest questscroll3 begin    state start begin	when questscroll3.use begin	    local idx = item.get_socket(0)	    if idx == 0 then		idx = number(10,19)		item.set_socket(0, idx)	    end	    if idx>table.getn(special.questscroll) or idx <= 0 then		item.remove()	    elseif table.getn(special.questscroll[idx])!=5 then	    else		local table = special.questscroll[idx]		local rt = special.questscroll_reward[idx]		local t = table[1]		if  t == QUEST_SCROLL_TYPE_KILL_MOB then		    say(table[2])		    say(color(1,1,0),rt[2],locale.gold," ",locale.exp,rt[3]," ",(rt[4] != 0) and item_name(rt[4]) or ""," ",(rt[5] != 0) and item_name(rt[5]) or ""," ", (rt[6] != 0) and item_name(rt[6]) or "", color(1,1,1))		    pc.setqf("idx", idx)		    pc.setqf("count", table[5])		    pc.setqf("target", mob_vnum(table[4]))		    q.set_title(table[3])		    q.set_counter(table[4],table[5])		    q.start()		    pc.setqf("timer", 24*60*60)		    setstate(kill_mob)		    item.remove()		    char_log(0, "QUEST", "questscroll3 start");		elseif t == QUEST_SCROLL_TYPE_KILL_ANOTHER_EMPIRE then		    say(table[2])		    pc.setqf("idx", idx)		    pc.setqf("count", table[5])		    q.set_title(table[3])		    q.set_counter(table[4],table[5])		    q.start()		    pc.setqf("timer", 24*60*60)		    setstate(kill_another_empire)		    item.remove()		else		    item.remove()		end	    end	end    end    state kill_mob begin	when questscroll3.use begin	    say(locale.questscroll.exist)	end	when kill begin	    if npc.race == pc.getqf("target") then		pc.setqf("count", pc.getqf("count")-1)		q.set_counter_value(pc.getqf("count"))		if pc.getqf("count")>=0 then		    char_log(0, "QUEST", "questscroll3 kill "..pc.getqf("count"));		end		if pc.getqf("count") <= 0 then		    makequestbutton(locale.questscroll.finish_button)		end		setskin(NOWINDOW)	    end	end	when login begin	    if pc.getqf("count") <= 0 then		makequestbutton(locale.questscroll.finish_button)	    else		local table = special.questscroll[pc.getqf("idx")]		q.set_title(table[3])		q.set_counter(table[4],pc.getqf("count"))		q.start()	    end	    setskin(NOWINDOW)	end	when button begin	    setstate(start)	    q.done()	    local rt = special.questscroll_reward[pc.getqf("idx")]	    say(locale.questscroll.finish)	    say(rt[2],locale.gold)	    pc.changegold(rt[2])	    say(locale.exp ..  " " .. rt[3])	    pc.give_exp2(rt[3])	    if rt[4]!=0 then say(item_name(rt[4])) pc.give_item2(rt[4]) end	    if rt[5]!=0 then say(item_name(rt[5])) pc.give_item2(rt[5]) end	    if rt[6]!=0 then say(item_name(rt[6])) pc.give_item2(rt[6]) end	    pc.setqf("idx", 0)	    char_log(0, "QUEST", "questscroll3 done")	end    end    state kill_another_empire begin	when questscroll3.use begin	    say(locale.questscroll.exist)	end	when kill begin	    if npc.is_pc() and npc.empire != pc.empire then		pc.setqf("count", pc.getqf("count")-1)		q.set_counter_value(pc.getqf("count"))		if pc.getqf("count")>=0 then		    char_log(0, "QUEST", "questscroll3 kill "..pc.getqf("count"));		end		if pc.getqf("count") <= 0 then		    makequestbutton(locale.questscroll.finish_button)		end		setskin(NOWINDOW)	    end	end	when login begin	    if pc.getqf("count") <= 0 then		makequestbutton(locale.questscroll.finish_button)	    else		local table = special.questscroll[pc.getqf("idx")]		q.set_title(table[3])		q.set_counter(table[4],pc.getqf("count"))		q.start()	    end	    setskin(NOWINDOW)	end	when button begin	    setstate(start)	    local rt = special.questscroll_reward[pc.getqf("idx")]	    say(locale.questscroll.finish)	    say(rt[2],locale.gold)	    pc.changegold(rt[2])	    say(locale.exp .. " " .. rt[3])	    pc.give_exp2(rt[3])	    if rt[4]!=0 then say(item_name(rt[4])) pc.give_item2(rt[4]) end	    if rt[5]!=0 then say(item_name(rt[5])) pc.give_item2(rt[5]) end	    if rt[6]!=0 then say(item_name(rt[6])) pc.give_item2(rt[6]) end	    q.done()	    pc.setqf("idx", 0)	end    endend

 

Spoiler

HTMLKod został skopiowany

quest questscroll4 begin    state start begin	when questscroll4.use begin	    local idx = item.get_socket(0)	    if idx == 0 then		idx = 20		item.set_socket(0, idx)	    end	    if idx>table.getn(special.questscroll) or idx <= 0 then		item.remove()	    elseif table.getn(special.questscroll[idx])!=5 then	    else		local table = special.questscroll[idx]		local rt = special.questscroll_reward[idx]		local t = table[1]		if  t == QUEST_SCROLL_TYPE_KILL_MOB then		    say(table[2])		    say(color(1,1,0),rt[2],locale.gold," ",locale.exp,rt[3]," ",(rt[4] != 0) and item_name(rt[4]) or ""," ",(rt[5] != 0) and item_name(rt[5]) or ""," ", (rt[6] != 0) and item_name(rt[6]) or "", color(1,1,1))		    pc.setqf("idx", idx)		    pc.setqf("count", table[5])		    pc.setqf("target", mob_vnum(table[4]))		    q.set_title(table[3])		    q.set_counter(table[4],table[5])		    q.start()		    pc.setqf("timer", 24*60*60)		    setstate(kill_mob)		    item.remove()		    char_log(0, "QUEST", "questscroll4 start");		elseif t == QUEST_SCROLL_TYPE_KILL_ANOTHER_EMPIRE then		    say(table[2])		    pc.setqf("idx", idx)		    pc.setqf("count", table[5])		    q.set_title(table[3])		    q.set_counter(table[4],table[5])		    q.start()		    pc.setqf("timer", 24*60*60)		    setstate(kill_another_empire)		    item.remove()		else		    item.remove()		end	    end	end    end    state kill_mob begin	when questscroll4.use begin	    say(locale.questscroll.exist)	end	when kill begin	    if npc.race == pc.getqf("target") then		pc.setqf("count", pc.getqf("count")-1)		q.set_counter_value(pc.getqf("count"))		if pc.getqf("count")>=0 then		    char_log(0, "QUEST", "questscroll4 kill "..pc.getqf("count"));		end		if pc.getqf("count") <= 0 then		    makequestbutton(locale.questscroll.finish_button)		end		setskin(NOWINDOW)	    end	end	when login begin	    if pc.getqf("count") <= 0 then		makequestbutton(locale.questscroll.finish_button)	    else		local table = special.questscroll[pc.getqf("idx")]		q.set_title(table[3])		q.set_counter(table[4],pc.getqf("count"))		q.start()	    end	    setskin(NOWINDOW)	end	when button begin	    setstate(start)	    q.done()	    local rt = special.questscroll_reward[pc.getqf("idx")]	    say(locale.questscroll.finish)	    say(rt[2],locale.gold)	    pc.changegold(rt[2])	    say(locale.exp ..  " " .. rt[3])	    pc.give_exp2(rt[3])	    if rt[4]!=0 then say(item_name(rt[4])) pc.give_item2(rt[4]) end	    if rt[5]!=0 then say(item_name(rt[5])) pc.give_item2(rt[5]) end	    if rt[6]!=0 then say(item_name(rt[6])) pc.give_item2(rt[6]) end	    pc.setqf("idx", 0)	    char_log(0, "QUEST", "questscroll4 done")	end    end    state kill_another_empire begin	when questscroll4.use begin	    say(locale.questscroll.exist)	end	when kill begin	    if npc.is_pc() and npc.empire != pc.empire then		pc.setqf("count", pc.getqf("count")-1)		q.set_counter_value(pc.getqf("count"))		if pc.getqf("count")>=0 then		    char_log(0, "QUEST", "questscroll4 kill "..pc.getqf("count"));		end		if pc.getqf("count") <= 0 then		    makequestbutton(locale.questscroll.finish_button)		end		setskin(NOWINDOW)	    end	end	when login begin	    if pc.getqf("count") <= 0 then		makequestbutton(locale.questscroll.finish_button)	    else		local table = special.questscroll[pc.getqf("idx")]		q.set_title(table[3])		q.set_counter(table[4],pc.getqf("count"))		q.start()	    end	    setskin(NOWINDOW)	end	when button begin	    setstate(start)	    local rt = special.questscroll_reward[pc.getqf("idx")]	    say(locale.questscroll.finish)	    say(rt[2],locale.gold)	    pc.changegold(rt[2])	    say(locale.exp .. " " .. rt[3])	    pc.give_exp2(rt[3])	    if rt[4]!=0 then say(item_name(rt[4])) pc.give_item2(rt[4]) end	    if rt[5]!=0 then say(item_name(rt[5])) pc.give_item2(rt[5]) end	    if rt[6]!=0 then say(item_name(rt[6])) pc.give_item2(rt[6]) end	    q.done()	    pc.setqf("idx", 0)	end    endend

 

 

Spoiler

LuaKod został skopiowany

quest questscroll5 begin    state start begin        when 50317.use begin            local s=0            local t=select("Aa", "Ab", "Ba", "Bb", "Bc", "Ca", "Cb", "Cc", "Cd", "Da", "Db")            if 1==t then                s=select(                questscroll5.get_menu(1),                questscroll5.get_menu(2),                questscroll5.get_menu(3),                questscroll5.get_menu(4),                questscroll5.get_menu(5),                questscroll5.get_menu(6)                )+1-1            elseif 2==t then                s=select(                questscroll5.get_menu(7),                questscroll5.get_menu(8),                questscroll5.get_menu(9),                questscroll5.get_menu(10),                questscroll5.get_menu(11)                )+7-1            elseif 3==t then                s=select(                questscroll5.get_menu(12),                questscroll5.get_menu(13),                questscroll5.get_menu(14),                questscroll5.get_menu(15)                )+12-1            elseif 4==t then                s=select(                questscroll5.get_menu(16),                questscroll5.get_menu(17),                questscroll5.get_menu(18),                questscroll5.get_menu(19),                questscroll5.get_menu(20),                questscroll5.get_menu(21)                )+16-1            elseif 5==t then                s=select(                questscroll5.get_menu(22),                questscroll5.get_menu(23),                questscroll5.get_menu(24),                questscroll5.get_menu(25)                )+22-1            elseif 6==t then                s=select(                questscroll5.get_menu(26),                questscroll5.get_menu(27),                questscroll5.get_menu(28),                questscroll5.get_menu(29),                questscroll5.get_menu(30),                questscroll5.get_menu(31)                )+26-1            elseif 7==t then                s=select(                questscroll5.get_menu(32),                questscroll5.get_menu(33),                questscroll5.get_menu(34),                questscroll5.get_menu(35)                )+32-1            elseif 8==t then                s=select(                questscroll5.get_menu(36),                questscroll5.get_menu(37),                questscroll5.get_menu(38),                questscroll5.get_menu(39),                questscroll5.get_menu(40),                questscroll5.get_menu(41)                )+36-1            elseif 9==t then                s=select(                questscroll5.get_menu(42),                questscroll5.get_menu(43),                questscroll5.get_menu(44),                questscroll5.get_menu(45),                questscroll5.get_menu(46),                questscroll5.get_menu(47),                questscroll5.get_menu(48),                questscroll5.get_menu(49)                )+42-1            elseif 10==t then                s=select(                questscroll5.get_menu(50),                questscroll5.get_menu(51),                questscroll5.get_menu(52),                questscroll5.get_menu(53)                )+50-1            elseif 11==t then                s=select(                questscroll5.get_menu(54),                questscroll5.get_menu(55),                questscroll5.get_menu(56)                )+54-1            end	            questscroll5.set_mission(s)            item.remove()        end        when 50318.use begin            local s=0            if is_test_server() then                test_chat(gameforge.questscroll5._30_chat)                s=select(                questscroll5.get_menu(1),                questscroll5.get_menu(2),                questscroll5.get_menu(3),                questscroll5.get_menu(4),                questscroll5.get_menu(5),                questscroll5.get_menu(6),                questscroll5.get_menu(7),                questscroll5.get_menu(8),                questscroll5.get_menu(9),                questscroll5.get_menu(10),                questscroll5.get_menu(11)                )+1-1            else                s=number(1, 11)            end            questscroll5.set_mission(s)            item.remove()        end        when 50319.use begin            local s=0            if is_test_server() then                test_chat(gameforge.questscroll5._40_chat)                s=select(                questscroll5.get_menu(12),                questscroll5.get_menu(13),                questscroll5.get_menu(14),                questscroll5.get_menu(15),                questscroll5.get_menu(16),                questscroll5.get_menu(17),                questscroll5.get_menu(18),                questscroll5.get_menu(19),                questscroll5.get_menu(20),                questscroll5.get_menu(21),                questscroll5.get_menu(22),                questscroll5.get_menu(23),                questscroll5.get_menu(24),                questscroll5.get_menu(25)                )+12-1            else                s=number(12, 25)            end            questscroll5.set_mission(s)            item.remove()        end        when 50320.use begin            local s=0            if is_test_server() then                test_chat(gameforge.questscroll5._50_chat)                s=select(                questscroll5.get_menu(26),                questscroll5.get_menu(27),                questscroll5.get_menu(28),                questscroll5.get_menu(29),                questscroll5.get_menu(30),                questscroll5.get_menu(31),                questscroll5.get_menu(32),                questscroll5.get_menu(33),                questscroll5.get_menu(34),                questscroll5.get_menu(35),                questscroll5.get_menu(36),                questscroll5.get_menu(37),                questscroll5.get_menu(38),                questscroll5.get_menu(39),                questscroll5.get_menu(40),                questscroll5.get_menu(41),                questscroll5.get_menu(42),                questscroll5.get_menu(43),                questscroll5.get_menu(44),                questscroll5.get_menu(45),                questscroll5.get_menu(46),                questscroll5.get_menu(47),                questscroll5.get_menu(48),                questscroll5.get_menu(49)                )+26-1            else                s=number(26, 49)            end            questscroll5.set_mission(s)            item.remove()        end        when 50321.use begin            local s=0            if is_test_server() then                test_chat(gameforge.questscroll5._60_chat)                s=select(                questscroll5.get_menu(50),                questscroll5.get_menu(51),                questscroll5.get_menu(52),                questscroll5.get_menu(53),                questscroll5.get_menu(54),                questscroll5.get_menu(55),                questscroll5.get_menu(56)                )+50-1            else                s=number(50, 56)            end            questscroll5.set_mission(s)            item.remove()        end        function get_menu(mission_index)            return locale.questscroll5.mission[mission_index][3]        end        function set_mission(mission_index)            pc.setqf("mission_index", mission_index)             local mission_type=questscroll5.get_mission_type()            if mission_type==QUEST_SCROLL_TYPE_KILL_MOB then                test_chat(gameforge.questscroll5._70_chat)                set_state("kill1")            elseif mission_type==QUEST_SCROLL_TYPE_KILL_MOB2 then                test_chat(gameforge.questscroll5._80_chat)                set_state("kill2")            end        end        function get_mission_type()            return questscroll5.get_mission()[1]        end        function notify_already_running()            say_title(gameforge.questscroll5._90_sayTitle)            say(gameforge.questscroll5._100_say)        end        function show_mission_menu()            local s= select(gameforge.locale.levelup.prev_quest_go, gameforge.locale.cancel)            if s==2 then                say_title(string.format(gameforge.questscroll5._110_sayTitle, questscroll5.get_title()))                say(gameforge.questscroll5._120_say)                local a= select(gameforge.questscroll5._130_select, gameforge.locale.guild.no)                if a==1 then                    say(string.format(gameforge.questscroll5._140_say, questscroll5.get_title()))                    restart_quest()                end            end        end    end    state kill1 begin        when questscroll1.use or             50317.use or             50318.use or             50319.use or             50320.use or             50321.use or             50322.use or             50323.use or             50324.use or             50325.use begin            questscroll5.notify_already_running()        end        when letter begin            send_letter(questscroll5.get_title())        end        when button or info begin            say_title(questscroll5.get_title())            say(questscroll5.get_desc())            say_reward(questscroll5.get_summ())            say_reward(string.format(gameforge.questscroll5._150_sayReward, questscroll5.get_mob1_name(), questscroll5.get_mob1_rest_kill_count() ))            questscroll5.show_mission_menu()        end        when enter begin            pc.setqf("mob1_kill_count", 0)        end        when leave begin            pc.setqf("mob1_kill_count", 0)        end        when letter begin            q.set_counter(questscroll5.get_mob1_name(), questscroll5.get_mob1_rest_kill_count())        end        when kill begin            test_chat(string.format(gameforge.questscroll5._160_chat, npc.get_race().." [ENTER]questscroll5.dest_race:"..questscroll5.get_mob1_vnum()))            if npc.get_race()==questscroll5.get_mob1_vnum() then                local mob1_kill_count=questscroll5.get_mob1_cur_kill_count()+1                questscroll5.set_mob1_cur_kill_count(mob1_kill_count)                q.set_counter(questscroll5.get_mob1_name(), questscroll5.get_mob1_rest_kill_count())                if mob1_kill_count>=questscroll5.get_mob1_max_kill_count() then                    set_state(reward)                end            end        end    end    state kill2 begin        when questscroll1.use or             50317.use or             50318.use or             50319.use or             50320.use or             50321.use or             50322.use or             50323.use or             50324.use or             50325.use begin             questscroll5.notify_already_running()        end        when letter begin            send_letter(questscroll5.get_title())        end        when button or info begin            say_title(questscroll5.get_title())            say(questscroll5.get_desc())            say_reward(questscroll5.get_summ())             say_reward(string.format(gameforge.questscroll5._170_sayReward, questscroll5.get_mob1_name(), questscroll5.get_mob1_rest_kill_count(), questscroll5.get_mob2_name(), questscroll5.get_mob2_rest_kill_count() ))            questscroll5.show_mission_menu()        end        when enter begin            pc.setqf("mob1_kill_count", 0)            pc.setqf("mob2_kill_count", 0)        end        when leave begin            pc.setqf("mob1_kill_count", 0)            pc.setqf("mob2_kill_count", 0)        end        when letter begin            q.set_counter(questscroll5.get_mob1_name(), questscroll5.get_mob1_rest_kill_count())        end        when kill begin            local npc_race=npc.get_race()            local mob1_kill_count=questscroll5.get_mob1_cur_kill_count()            local mob2_kill_count=questscroll5.get_mob2_cur_kill_count()             test_chat(string.format(gameforge.questscroll5._180_chat, npc_race.." [ENTER]questscroll5.dest_race1: ["..questscroll5.get_mob1_vnum().."] [ENTER]questscroll5.dest_race2: ["..questscroll5.get_mob2_vnum()))            if npc_race==questscroll5.get_mob1_vnum() then                mob1_kill_count=mob1_kill_count+1                questscroll5.set_mob1_cur_kill_count(mob1_kill_count)                q.set_counter(questscroll5.get_mob1_name(), questscroll5.get_mob1_rest_kill_count())            elseif npc_race==questscroll5.get_mob2_vnum() then                mob2_kill_count=mob2_kill_count+1                questscroll5.set_mob2_cur_kill_count(mob2_kill_count)                q.set_counter(questscroll5.get_mob2_name(), questscroll5.get_mob2_rest_kill_count())            end             if	mob1_kill_count>=questscroll5.get_mob1_max_kill_count() and                mob2_kill_count>=questscroll5.get_mob2_max_kill_count() then                set_state(reward)            end        end    end    state reward begin        when letter begin            send_letter(questscroll5.get_complete_title())        end        when button or info begin            restart_quest()             say_title(questscroll5.get_complete_title())             say(gameforge.questscroll5._190_say)            local reward_type=questscroll5.get_reward_type()            if number(0, 100)<=90 then                local s=number(1, 3)                if 1==s then                    questscroll5.reward_exp(reward_type)                    questscroll5.reward_money(reward_type)                elseif 2==s then                    questscroll5.reward_money(reward_type)                    questscroll5.reward_item(reward_type)                elseif 3==s then                    questscroll5.reward_exp(reward_type)                    questscroll5.reward_item(reward_type)                end            else                questscroll5.reward_exp(reward_type)                questscroll5.reward_money(reward_type)                questscroll5.reward_item(reward_type)            end                     end        -- pimped according mantis #118754 to prevent mantis #0042898        function get_mission()            -- add addtional check routine for player that have a invalid mission index            local mission_index = pc.getqf("mission_index")                        if mission_index > 56 then               mission_index = number(50, 56)							 questscroll5.set_mission(mission_index)            end                        return locale.questscroll5.mission[mission_index]         end                function get_title()            return questscroll5.get_mission()[3]        end        function get_complete_title()            return string.format(gameforge.questscroll5._200_stringFormat, questscroll5.get_title())        end        function get_desc()            return "[WINDOW_SIZE width;360|height;280]"..questscroll5.get_mission()[4]        end        function get_summ()            return questscroll5.get_mission()[5]        end        function get_mob1_name()            return mob_name(questscroll5.get_mob1_vnum())        end        function get_mob1_max_kill_count()            return questscroll5.get_mission()[7]        end        function get_mob1_vnum()            return tonumber(questscroll5.get_mission()[6])        end        function get_mob1_rest_kill_count()            local ret=questscroll5.get_mob1_max_kill_count()-questscroll5.get_mob1_cur_kill_count()            if ret<0 then return 0 end            return ret        end        function set_mob1_cur_kill_count(value)            pc.setqf("mob1_kill_count", value)        end        function get_mob1_cur_kill_count()            return pc.getqf("mob1_kill_count")        end         function get_mob2_name()            return mob_name(questscroll5.get_mob2_vnum())        end        function get_mob2_max_kill_count()            return questscroll5.get_mission()[9]        end        function get_mob2_vnum()            return tonumber(questscroll5.get_mission()[8])        end        function get_mob2_rest_kill_count()            local ret=questscroll5.get_mob2_max_kill_count()-questscroll5.get_mob2_cur_kill_count()            if ret<0 then return 0 end            return ret        end        function set_mob2_cur_kill_count(value)            pc.setqf("mob2_kill_count", value)        end        function get_mob2_cur_kill_count()            return pc.getqf("mob2_kill_count")        end         function reward_table_get_prob_sum(item_array)            local sum=0            for i=1, table.getn(item_array) do                sum=sum+item_array[i][2]            end            return sum        end        function reward_table_get_value(item_array)            local prob_sum=questscroll5.reward_table_get_prob_sum(item_array)            local prob_pos=number(0, prob_sum)             test_chat(string.format(gameforge.questscroll5._210_chat, prob_pos))            for i=1, table.getn(item_array) do                prob_cur=item_array[i][2]                if prob_pos<=prob_cur then                    return item_array[i][1]                end                prob_pos=prob_pos-prob_cur            end             chat(gameforge.questscroll5._220_chat)            return 0        end        function get_reward_type()            return questscroll5.get_mission()[2]        end        function get_reward_money(reward_type)            return questscroll5.reward_table_get_value(locale.questscroll5.reward_money[reward_type])        end        function get_reward_exp(reward_type)            return questscroll5.reward_table_get_value(locale.questscroll5.reward_exp[reward_type])        end        function get_reward_item(reward_type)            return questscroll5.reward_table_get_value(locale.questscroll5.reward_item[reward_type])        end        function reward_money(reward_type)            local reward_money=questscroll5.get_reward_money(reward_type)            if reward_money>1000 and reward_money<=200000 then                pc.change_money(reward_money)                say_reward(string.format(gameforge.questscroll5._230_sayReward, reward_money))            else                chat(string.format(gameforge.questscroll5._240_chat, reward_type))            end        end        function reward_exp(reward_type)            local reward_exp=questscroll5.get_reward_exp(reward_type)            if reward_exp>1000 and reward_exp<=300000 then                pc.give_exp2(reward_exp)                set_quest_state("levelup", "run")                say_reward(string.format(gameforge.questscroll5._250_sayReward, reward_exp))            else                chat(string.format(gameforge.questscroll5._260_chat, reward_type))            end        end        function reward_item(reward_type)            local reward_item=questscroll5.get_reward_item(reward_type)            pc.give_item2(reward_item)            say_reward(string.format(gameforge.questscroll5._270_sayReward, item_name(reward_item)))        end    endend

 

Trzymaj to są stare questy