This My Power Mount Traning system
it's very simple
but the lang is arabic so i u need to make the eng speak
PHP Code:
quest dwapsystem begin
state start begin
when 20349.chat."I Want Tran a Mount" begin
say_title("Text")
say("")
say("Text")
say("Text")
say("")
wait()
say_title("Text")
say("Text")
say("Text")
say("Text")
say("Text")
wait()
say_title("Text")
say("Chose Your Mount Type")
local data01 = {
-- Name vnum give_vnum
{"Lion Certificate", 52701, 52030},
{"Tiger Certificate", 52702, 52045},
{"Wild Boar Certificate", 52703, 52000},
{"Wolf Certificate", 52704, 52015},
{"Reindeer Certificate (m)", 52705, 52080},
{"Reindeer Certificate (f)", 52706, 52060},
{"Dragor Certificate", 52707, 52090},
{"Moa Certificate", 52708, 52105},
{"Close", 0, 0}
}
local menu01 = {}
for num1,str1 in ipairs(data01) do
table.insert(menu01, str1[1])
end
local seltab01 = select_table(menu01, "Close")
local count_check = pc.count_item(data01[seltab01][2])
if seltab01 == table.getn(menu01) then return end
say(" Are u Sure u want trade ".. data01[seltab01][1] .." ")
if select("Yes, sure","No , Thx") == 2 then return end
if count_check < 1 then syschat("U Dont Have the Item") return end
say_title("Plz Select The Addone type")
local bonus01 = {
-- Name vnum
{"Vs Monster", 1},
{"plus exp", 2},
{"plus life pont", 3},
{"plus defnce power", 4},
{"plus attck power", 5},
{"Close", 0}
}
local menu02 = {}
for num2,str2 in ipairs(bonus01) do
table.insert(menu02, str2[1])
end
local seltab02 = select_table(menu02, "Close")
if seltab02 == table.getn(menu02) then return end
local final01 = data01[seltab01][3]+bonus01[seltab02][2]
say_reward(" U Get : "..item_name(data01[seltab01][3]+1).." ")
pc.removeitem(data01[seltab01][2], 1)
pc.give_item2(final01, 1)
end -- when
end -- state
end -- quest