[SYSERR]Levelup.quest

SYSERR: Nov 24 16:24:07 :: RunState: LUA_ERROR: [string "levelup"]:10: attempt to concatenate field `level1' (a nil value)
SYSERR: Nov 24 16:24:07 :: WriteRunningStateToSyserr: LUA_ERROR: quest levelup.start letter

quest levelup begin
    -- ŔĚ şÎşĐ Áöżě¸é ·ąş§ľ÷ Äů˝şĆ®°ˇ µąÁö ľĘ´Â´Ů.
    -- ´Ů¸Ą Äů˝şĆ®żˇĽ* °ćÇčġ ÁŮ°ćżě ŔĚ ˝şĹ×ŔĚĆ®·Î ĽłÁ¤ÇŘľßÇŃ´Ů
    -- current ==0 ŔĚ¸é ·ąş§ Äů˝şĆ®°ˇ łˇł*»óĹÂ
    -- current !=0 ŔĚ¸é ·ąş§ Äů˝şĆ®°ˇ ÁřÇŕ»óĹ (ÇöŔç ·ąş§°ŞŔĚ µéľîŔÖ´Ů)
    -- select ´Â ·ąş§ Äů˝şĆ® Ľ±ĹĂÇŃ Áľ·ů¸¦ ¸»ÇŃ´Ů.
    -- buttonstate ·ąş§ Äů˝şĆ® »óĹ ÁřÇŕ
    -- buttonstate == -1 ąöĆ°ŔĚ ľřŔ˝
    -- buttonstate == 1 ÇŃąř ĽöÇŕÇĎ°í ł˛ľĆŔÖ´Â °ćżě
    -- buttonstate == 2 ľČł» ¸Ţ˝ĂÁö Ăâ·Â
    -- buttonstate == 3 żĎ·á

    state run begin
      when 20095.chat begin
	  local current = pc.getqf("current")
	  local completed_level = pc.getqf("complete");

	  -- ·ąş§ľ÷ Äů˝şĆ®°ˇ łˇł*»óĹÂżˇĽ*´Â current °ˇ 0 ŔĚ´Ů
	  if current == 0 and 
	      pc.get_level() > completed_level and 
	      pc.get_level() >  1 and 
	      pc.get_level() < 60 then

              local lev = pc.get_level()
              pc.setqf("buttonstate", 2)
              makequestbutton(locale.start ..' '..locale.level..lev..' '..locale.quest_word)
              pc.setqf("current", lev)
              pc.setqf("select", 1)
              pc.setqf("remain", special.levelup_quest[lev][2])
              setskin(NOWINDOW)
          end

          setstate(start)
      end
    end

    state start begin
	when info begin
	    local lev = pc.getqf("current")
	    if lev == 0 then return end

	    setskin(SCROLL)
	    setbgimage('level_bg.tga')
	    local s = pc.getqf("select")
	    if s == 0 then s = 1 end
	    addimage(20,12,special.levelup_img[special.levelup_quest[lev][s*2-1]])
	    setcolor(0,0,0)
                     say("")
                     say("")
                     say("")
	    say(locale.levelup.slay_them1,mob_name(special.levelup_quest[lev][s*2-1]),locale.levelup.slay_them2,"[ENTER]",locale.levelup.slay_target_count ," ", special.levelup_quest[lev][s*2])

	    raw_script(locale.reward.." ".. special.levelup_quest[lev][5].."% "..locale.exp..",")

	    if lev <= table.getn(special.levelup_reward1) then
			raw_script("[ENTER]"..item_name(special.levelup_reward1[lev][pc.job+1]))
	    elseif lev> table.getn(special.levelup_reward1) and lev < 26 then
			raw_script("[ENTER]"..locale.levelup.random_item)
		end	
	    if lev>=21 then
			raw_script(","..locale.levelup.gold)
	    end

	    raw_script(newline)

	    levelup.show_mob_pos(lev)

	    select(locale.confirm)
	    clearmapsignal()
	    setskin(NOWINDOW)
	end

	when login begin
	    local lev = pc.getqf("current")

	    if lev != 0 then
		if pc.getqf("remain") <= 0 then
		    setskin(NOWINDOW)
		    pc.setqf("buttonstate", 3)
		    makequestbutton(lev..' '..locale.level1..' - '..locale.complete1)
		else
		    setskin(NOWINDOW)
		    pc.setqf("buttonstate", 1)
		    makequestbutton(lev..' '..locale.level1..' '..locale.quest_word)
		end
	    end
	end

	when button begin
	    local lev = pc.getqf("current")

	    if lev == 0 then return end

	    if pc.getqf("buttonstate") == 3 then
		-- żĎ·á!
		local s = pc.getqf("select")
		if s == 0 then s = 1 end

		say_title(lev..' '..locale.level1..' - '..locale.complete1)
		say(locale.levelup.slayed_them)
		say("")
		wait()

		if lev <= 20 then -- ŔĚŔü ąć˝Ä´ë·Î ş¸»ó.
		    if lev <= table.getn(special.levelup_reward1) then
			pc.give_item("level"..lev.."item", special.levelup_reward1[lev][pc.job+1])
		    else
			local v = number(1,100)

			if v <= special.levelup_reward3[1][1] then
			    pc.give_item("level"..lev.."item",special.levelup_reward3[1][2],special.levelup_reward3[1][3])
			elseif v <= special.levelup_reward3[2][1] then
			    pc.give_item("level"..lev.."item",special.levelup_reward3[2][2],special.levelup_reward3[2][3])
			elseif v <= special.levelup_reward3[3][1] then
			    pc.give_item("level"..lev.."item",special.levelup_reward3[3][2],special.levelup_reward3[3][3])
			elseif v <= special.levelup_reward3[4][1] then
			    pc.give_item("level"..lev.."item",special.levelup_reward3[4][2],special.levelup_reward3[4][3])
			else
			    pc.give_item("level"..lev.."item",special.levelup_reward3[5][2],special.levelup_reward3[5][3])
			end
		    end

		    pc.give_exp_perc("level"..lev.."exp", lev, special.levelup_quest[lev][5])

		    if lev == 12 or lev == 14 or lev == 16 or lev == 18 or lev == 20 then
			pc.give_item2(50083)
			say_reward("Ŕň±o¤F"..item_name(50083) .. "")
		    end

		else
		    -- give item
		    local ll = lev - 20
		    if lev < 26 then
			
			local n = table.getn(special.levelup_reward_item_21[ll])
			local t = special.levelup_reward_item_21[ll][number(1, n)]
			say_reward(locale.reward .. " : ")
			if type(t) == 'table' then
			    pc.give_item2(t[1], t[2])
				  say_reward("Ŕň±o¤F"..t[2].."*Ó"..item_name(t[1]).."Ş««~.")
			else
			    pc.give_item2(t)
				   say_reward("Ŕň±o¤F"..item_name(t).."Ş««~.")
			end

		    end
		    local reward_gold = special.levelup_reward_gold21
		    local reward_exp = special.levelup_reward_exp21

		    if lev >= 31 and lev <= 40 then
			reward_gold = special.levelup_reward_gold31
			reward_exp = special.levelup_reward_exp31
		    elseif lev >= 41 and lev <= 50 then
			reward_gold = special.levelup_reward_gold41
			reward_exp = special.levelup_reward_exp41
    		    elseif lev >= 51 and lev <= 60 then
			reward_gold = special.levelup_reward_gold51
			reward_exp = special.levelup_reward_exp51
		    end

		    -- give money
		    n = number(0, 99)
		    local i = 0
		    for i = 1, table.getn(reward_gold) do
			if n < reward_gold[i][2] then
			    pc.change_money(reward_gold[i][1])
				  say_reward("Ŕň±o¤F"..reward_gold[i][1].."¨â.")
			    break
			else
			    n = n - reward_gold[i][2]
			end
		    end

		    -- give exp
		    n = number(0, 99)
		    i = 0
		    for i = 1, table.getn(reward_exp) do
			if n < reward_exp[i][2] then
			    pc.give_exp_perc("level"..lev.."exp", lev, reward_exp[i][1])
				  say_reward("Ŕň±o¤F"..reward_exp[i][1].."%¸gĹç*Č.")
			    break
			else
			    n = n - reward_exp[i][2]
			end
		    end

		    say("")

		end

		local old_lev = lev

		lev = lev + 1

		-- ÇöŔç ·ąş§ŔĚ ´ŮŔ˝ ·ąş§ Äů˝şĆ®¸¦ ÇŇ Ľö ŔÖ´Â ·ąş§ŔĚ¸é ąŮ·Î ˝ĂŔŰÇŘľß ÇŃ´Ů.
		if lev > 1 and lev < 60 and pc.level >= lev then
		    pc.setqf("buttonstate", 2)
		    makequestbutton(locale.start ..' '..locale.level..lev..' '..locale.quest_word)
		    pc.setqf("current", lev)
		    pc.setqf("select", 1)
		    pc.setqf("remain",special.levelup_quest[lev][2])
		    setskin(NOWINDOW)
		    return
		else
		    pc.setqf("complete", old_lev)
		    pc.setqf("current", 0)
		    q.done()
		end

	    elseif pc.getqf("buttonstate") == 2 then
		-- ·ąş§ľ÷ Äů˝şĆ® ľČł»Ă˘Ŕ» ¶çżň
		local lev = pc.getqf("current")
		if lev == 0 then
		    q.done()
		end

		say_title(locale.levelup.choice1)
		say(locale.levelup.choice2)

		local sel = select(
		mob_name(special.levelup_quest[lev][1]).." "..special.levelup_quest[lev][2].." "..locale.levelup.kill_count, 
		mob_name(special.levelup_quest[lev][3]).." "..special.levelup_quest[lev][4].." "..locale.levelup.kill_count
		)

		setskin(SCROLL)
		setbgimage('level_bg.tga')
		pc.setqf("select", sel)
		addimage(20, 12, special.levelup_img[special.levelup_quest[lev][sel*2-1]])
		setcolor(0,0,0)
                                 say("")
                                 say("")
                                 say("")
		say(locale.levelup.slay_them1, mob_name(special.levelup_quest[lev][sel*2-1]), locale.levelup.slay_them2, "[ENTER]", locale.levelup.slay_target_count ," ", special.levelup_quest[lev][sel*2])
		
			raw_script(locale.reward.." ".. special.levelup_quest[lev][5].."% "..locale.exp..",")
			
			if lev <=  table.getn(special.levelup_reward1) then
				raw_script("[ENTER]"..item_name(special.levelup_reward1[lev][pc.job+1]))
			elseif lev> table.getn(special.levelup_reward1) and lev < 26 then
				raw_script("[ENTER]"..locale.levelup.random_item)
			end
			if lev>=21 then 
				raw_script(","..locale.levelup.gold)
		end

		raw_script(newline)

		levelup.show_mob_pos(lev)

		local s = select(locale.levelup.lets_go)

		if s == 1 then
		    setskin(NOWINDOW)
		    pc.setqf("remain",special.levelup_quest[lev][sel*2])
		    syschat(locale.quest_word12.." "..mob_name(special.levelup_quest[lev][sel*2-1]), ". ")
		    q.set_title(mob_name(special.levelup_quest[lev][sel*2-1]).." "..locale.eliminate_on_begin1)
		    q.set_counter(locale.levelup.remain_count, pc.getqf("remain"))
		    q.start()
		end

		setskin(NOWINDOW)
		clearmapsignal()

	    elseif pc.getqf("buttonstate") == 1 then
		-- Áöł*ąř Äů˝şĆ®°ˇ łˇłŞÁö ľĘľĆĽ* ·Î±×ŔÎ ˝Ăżˇ ´Ů˝Ă ş¸ż©ÁŮ ¶§
			local s = pc.getqf("select")
			if s == 0 then s = 1 end

			local lev = pc.getqf("current")

			if lev != 0 then
		                                 say_title(locale.levelup.choice1)
				say(locale.levelup.prev_quest1.."[ENTER]"..pc.getqf("remain").." "..locale.levelup.prev_quest3..mob_name(special.levelup_quest[lev][s*2-1]).."[ENTER]"..locale.levelup.prev_quest4)
				local ss = select(locale.levelup.prev_quest_info,locale.levelup.prev_quest_go)

				if ss == 1 then
					setskin(SCROLL)
					setbgimage('level_bg.tga')
					addimage(20,12,special.levelup_img[special.levelup_quest[lev][s*2-1]])
					setcolor(0,0,0)
					 say("")
                                                                                   say("")
                                                                                   say("")
					 say(locale.levelup.slay_them1,mob_name(special.levelup_quest[lev][s*2-1]),locale.levelup.slay_them2,"[ENTER]",locale.levelup.slay_target_count," ", special.levelup_quest[lev][s*2])

					raw_script(locale.reward.." ".. special.levelup_quest[lev][5].."% "..locale.exp..",")
					
					if lev <=  table.getn(special.levelup_reward1) then
						raw_script("[ENTER]"..item_name(special.levelup_reward1[lev][pc.job+1]))
					elseif lev> table.getn(special.levelup_reward1) and lev < 26 then
						raw_script("[ENTER]"..locale.levelup.random_item)
					end	
					if lev>=21 then 
					raw_script(","..locale.levelup.gold)
					end

					raw_script(newline)

--					q.set_title(mob_name(special.levelup_quest[lev][s*2-1]).." "..locale.eliminate_on_begin1)
--					q.set_counter(locale.levelup.remain_count, pc.getqf("remain"))
--					q.start()

--					levelup.show_mob_pos(lev)

					select(locale.confirm)
					setskin(NOWINDOW)
					clearmapsignal()

				end

				setskin(NOWINDOW)
				q.set_title(mob_name(special.levelup_quest[lev][s*2-1]).." "..locale.eliminate_on_begin1)
				q.set_counter(locale.levelup.remain_count, pc.getqf("remain"))
				--q.set_icon(string.format("level_%02d.sub", lev))
				q.start()
			end
	    end

	    pc.setqf("buttonstate", -1)
	end
	
	when 20095.chat begin
	    local lev = pc.getqf("current");

	    if lev == 0 then
		lev = pc.level

		-- ·ąş§ 2şÎĹÍ 60±îÁö¸¸ Äů˝şĆ®°ˇ ˝ÇÇŕµÇľîľß ÇŃ´Ů.
		if lev < 2 or lev > 60 then return end

		pc.setqf("buttonstate", 2)
		makequestbutton(locale.start ..' '..locale.level..lev..' '..locale.quest_word)
		pc.setqf("current", lev)
		pc.setqf("select", 1)
		pc.setqf("remain", special.levelup_quest[lev][2])
		setskin(NOWINDOW)
	    end
	end

	when kill begin
	    local sel = pc.getqf("select")

	    if sel == 0 then
		sel = 1
	    end

	    local lev = pc.getqf("current")

	    if lev != 0 and npc.race == (special.levelup_quest[lev][sel*2-1]) and pc.getqf("buttonstate") == -1 then
		local remain = pc.getqf("remain") - 1

		if remain <= 0 then
		    pc.setqf("remain", 0)
		    q.set_counter_value(0)
		    setskin(NOWINDOW)
		    makequestbutton(lev..' '..locale.level1..' - '..locale.complete1)
		    pc.setqf("buttonstate", 3)
		else
		    pc.setqf("remain", remain)
		    q.set_counter_value(remain)
		end
	    end
	end

	function show_mob_pos(lev)
	    map_index = pc.get_map_index()

	    if map_index <= 0 then
		test_chat("show_mob_pos: map_index("..map_index..") < 0")
		return 
	    end

	    if map_index > table.getn(special.lvq_map) then
		test_chat("show_mob_pos: map_index("..map_index..") > max("..table.getn(special.lvq_map)..")")
		return
	    end

	    lev_quest_list = special.lvq_map[map_index]
	    if not lev_quest_list then
		test_chat("show_mob_pos: special.lvq_map[map_index("..map_index..")] is nil")
		return
	    end

	    mob_pos_list = lev_quest_list[lev]
	    if not mob_pos_list then
		test_chat("show_mob_pos: special.lvq_map[map_index("..map_index..")][lev("..lev..")] is nil")
		return
	    end

	    table.foreachi(
	    mob_pos_list, 
	    function (n, mob_pos) 
		test_chat("addmapsignal("..mob_pos[1]..", "..mob_pos[2]..")")
		addmapsignal(mob_pos[1]*100, mob_pos[2]*100) 
	    end
	    )
	    setmapcenterposition(200, 0)
	end
end

end

SYSERR: Nov 24 17:55:59 :: RunState: LUA_ERROR: [string "levelup"]:136: attempt to concatenate field `prev_quest4' (a nil value)
SYSERR: Nov 24 17:55:59 :: WriteRunningStateToSyserr: LUA_ERROR: quest levelup.start click