Salutare, mai jos aveti un quest pentru a va crea un panoul al utilizatorului, ce poate fi folosit de fiecare jucator de pe orice server.
Questul contine urmatoarele:
Teleportare
Banca
Tutorial instalare quest:
1. Salvaţi conţinutul quest-ului într-un fişier text numit de exemplu nume_quest.quest .
2. Vă conectaţi la filezilla / winscp şi întrati în /usr/home/game/share/locale/germany/quest (depinde ce server aveţi).
3. Îl puneţi acolo (să fie .quest) şi da-ţi permisiuni 777.
4. Te loghezi în FreeBSD / putty şi scrii în felul următor: cd /usr/home/game/share/locale/germany/quest apoi ./qc nume_quest.quest
5. Intraţi pe server şi scrieţi /reload q.
6. Testaţi quest-ul.
Questul contine urmatoarele:
Teleportare
Banca
Cod: Selectaţi tot
quest userpannel begin
state start begin
when 30003.use begin
say_title("Panoul utilizatorului:")
say("Fiecare utilizator al acestui inel beneficiaza")
say("de urmatoarele:")
say_reward("Banca")
say_gold(">Ideal pentru depozitarea yang-ului.")
say_reward("Depozit")
say_gold(">Un mod mai simplu pentru depozitarea obiectelor.")
say_reward("Teleportare")
say_gold(">Ai o distanta lunga de parcurs si ti-e lene?")
local main_set33 = select("Banca","Deschide depozitul","Teleportare","Iesire")
if main_set33 == 1 then
say_title("Banca:")
say("Doresti sa-ti pastrezi yang-ul pentru ocazii")
say("mai importante? La noi totul iti va fi totul")
say("garantat. Yang-ul depus va fi pastrat in")
say("siguranta.")
say("")
local action = select("Alimentare cont", "Extrage din cont", "Inchide")
if action == 1 then
say_title("Banca:")
if pc.gold < 1 then
say("Nu aveti niciun yang.")
say("")
return
end
say("Detii "..pc.gold.." Yang.")
say("Cat de mult vrei sa adaugi in cont?")
local yang = tonumber(input())
if yang < 0 then
return
end
if yang > pc.gold then
yang = pc.gold
end
pc.changegold(-yang)
local saved_rest = tonumber(pc.getqf("saved_rest"))
local saved_signed_longs = tonumber(pc.getqf("saved_signed_longs"))
if saved_rest + yang > 2147483647 then
pc.setqf("saved_signed_longs", saved_signed_longs + 1)
pc.setqf("saved_rest", saved_rest + yang - 2147483647)
else
pc.setqf("saved_rest", saved_rest + yang)
end
say_title("Banca:")
say("Ai adaugat in cont "..yang.." yang.")
say("")
return
elseif action == 2 then
local saved_rest = tonumber(pc.getqf("saved_rest"))
local saved_signed_longs = tonumber(pc.getqf("saved_signed_longs"))
local saved_yang = saved_signed_longs*2147483647+saved_rest
say_title("Banca:")
if saved_yang < 1 then
say("Nu poti adauga aceasta suma in cont!")
return
end
say("Va puteti extrage yangul din cont")
say("oricand vreti ยบi aveti posibilitatea.")
say("")
say_reward("Soldul contului: "..saved_yang.." Yang")
say("")
say("Cat yang doriti sa extrageti?")
local yang = tonumber(input())
if yang < 0 then
return
end
if yang > saved_yang then
yang = saved_yang
end
if pc.gold + yang > 1899999999 then
yang = 1899999999 - pc.gold
end
if yang > saved_yang then
yang = saved_yang
end
if saved_rest - yang < 0 then
pc.setqf("saved_signed_longs", saved_signed_longs - 1)
pc.setqf("saved_rest", 2147483647 - yang + saved_rest)
else
pc.setqf("saved_rest", saved_rest - yang)
end
pc.changegold(yang)
say_title("Banca:")
say("Ati extras din cont "..yang.." yang.")
say("Multumim!")
say("")
end
end
if main_set33 == 2 then
game.open_safebox()
end
if main_set33 == 3 then
local map = pc.get_map_index()
local empire = pc.get_empire()
local level = pc.get_level()
local cost = math.floor(level / 5) * 1000
-- ?? ????
if cost < 1000 then
cost = 1000
end
say_title("Teleporter:")
say("Unde vrei sa te teleportezi?")
say_reward(string.format("Te costa %d Yang.", cost))
-- ?? ?? ???? ?? ?? (? ?? 1,2 ??)
if map == 1 or map == 3 or map == 21 or map == 23 or map == 41 or map == 43 then
local guild_map_names = {
"Zona Breslei",
"Zona Breslei",
"Zona Breslei",
}
guild_map_name = guild_map_names[empire]
local empire_castle={
"Lupta Regatelor",
"Lupta Regatelor",
"Lupta Regatelor",
}
empire_castle =empire_castle[empire]
local sub_set = 0
if level < 60 then -- 60?? : ?????, ???, ????, ???
sub_set = select(guild_map_name, "Valea Seungryong", "Desertul Yongbi", "Muntele Sohan", "Inchide")
if sub_set == 5 then -- ??
return
end
else -- 61?? : ????, ???, ????, ????
sub_set = select(guild_map_name, "Valea Seungryong", "Desertul Yongbi", "Muntele Sohan", "Pagina urmatoare")
if sub_set == 5 then -- ??
say_title("Teleporter:")
say("Unde vrei sa te teleportezi?")
say_reward(string.format("Te costa %d Yang.", cost))
sub_set = select("Tara de foc", "Turnul demonilor", "Cave2", "Padurea rosie", "Pagina anterioara", "Inchide") + 4
if sub_set == 10 then -- ??
return
end
if sub_set == 9 then -- ??
say_title("Teleporter:")
say("Unde vrei sa te teleportezi?")
--- l
say_reward(string.format("Te costa %d Yang.", cost))
sub_set = select(guild_map_name, "Valea Seungryong", "Desertul Yongbi", "Muntele Sohan", "Pagina urmatoare")
if sub_set == 5 then -- ??
say_title("Teleporter:")
say("Unde vrei sa te teleportezi?")
say_reward(string.format("Te costa %d Yang.", cost))
sub_set = select("Tara de foc", "Turnul demonilor", "Cave2", "Padurea rosie", "Inchide") + 4
if sub_set == 9 then -- ??
return
end
end
end
end
end
if pc.gold < cost then
say("Nu ai suficient Yang")
say_title("Teleporter:")
say("Te-as teleporta si pe gratis, dar")
say("am familie numeroasa, si ca sa o intretin")
say("trebuie sa castig...")
say_reward(string.format("Te costa %d Yang.", cost))
return
end
pc.changegold(-cost)
local warp = {
-- guild_map
{
{ 128500, 1000 },
{ 179500, 1000 },
{ 271800, 13000 },
},
-- 64 map_n_threeway
{
{ 402100, 673900 },
{ 270400, 739900 },
{ 321300, 808000 },
},
-- 63 metin2_map_n_desert_01
{
{ 217800, 627200 },
{ 221900, 502700 },
{ 344000, 502500 },
},
-- 61 map_n_snowm_01
{
{ 434200, 290600 },
{ 375200, 174900 },
{ 491800, 173600 },
},
-- 62 metin2_map_n_flame_01
{
{ 599400, 756300 },
{ 597800, 622200 },
{ 730700, 689800 },
},
-- devil_tower
{
{ 590500, 110500 },
{ 590500, 110500 },
{ 590500, 110500 },
},
-- cave2
{
{ 704200, 463300 },
{ 704200, 463300 },
{ 704200, 463300 },
},
-- red_forest
{
{ 1119900, 70800 },
{ 1119900, 70800 },
{ 1119900, 70800 },
},
}
test_chat(warp[sub_set][empire][1]..warp[sub_set][empire][2])
say_title("Teleporter:")
say("Vei fii teleportat intr-un loc periculos.")
say("Ai grija de tine!")
say("Mult noroc!")
wait()
pc.warp(warp[sub_set][empire][1], warp[sub_set][empire][2])
else -- ? ?? 1,2 ? ??? ?????? ? ?? 1,2 ? ??? ?? ??
local sub_set2 = 3
--sub_set2 = select(locale.vileage1_name[empire], locale.vileage2_name[empire], locale.cancel)
if empire==1 then
sub_set2 = select("Yongan","Jayang" , locale.cancel)
elseif empire ==2 then
sub_set2 = select("Joan","Bokjung" , locale.cancel)
elseif empire ==3 then
sub_set2 = select("Pyungmoo","Bakra" , locale.cancel)
end
if sub_set2 != 3 then
if pc.gold < cost then
say_title("Teleporter:")
say("Te-as teleporta si pe gratis, dar")
say("am familie numeroasa, si ca sa o intretin")
say("trebuie sa castig...")
say_reward(string.format("Te costa %d Yang.", cost))
else
if sub_set2 == 1 then
say_title("Teleporter:")
say("Vei fii teleportat.")
wait()
if empire == 1 then
pc.warp(474300,954800)
elseif empire == 2 then
pc.warp(63800,166400)
elseif empire == 3 then
pc.warp(959900,269200)
end
elseif sub_set2 == 2 then
say_title("Teleporter:")
say("Vei fii teleportat.")
wait()
if empire == 1 then
pc.warp(353100,882900)
elseif empire == 2 then
pc.warp(145500,240000)
elseif empire == 3 then
pc.warp(863900,246000)
end
end
pc.changegold(-cost)
end
end
end
end
end
end
end1. Salvaţi conţinutul quest-ului într-un fişier text numit de exemplu nume_quest.quest .
2. Vă conectaţi la filezilla / winscp şi întrati în /usr/home/game/share/locale/germany/quest (depinde ce server aveţi).
3. Îl puneţi acolo (să fie .quest) şi da-ţi permisiuni 777.
4. Te loghezi în FreeBSD / putty şi scrii în felul următor: cd /usr/home/game/share/locale/germany/quest apoi ./qc nume_quest.quest
5. Intraţi pe server şi scrieţi /reload q.
6. Testaţi quest-ul.
][*] [**] [*] [/color]
de