PHP Code:
mysql_query('INSERT INTO player.karrierendb ...')
Db arbeiten soll.
mysql_query('INSERT INTO player.karrierendb ...')
quest warp begin
state start begin
when levelup with pc.get_level() == 25 begin
say("Hier text")
if pc.get_empire() == 1 then -- Rotes reich
pc.warp(12345,45643)
elseif pc.get_empire() == 2 then -- Gelbes reich
pc.warp(00000,00000)
else
pc.warp(00000,00000)
end
end
end
end
mysql_query('INSERT INTO player.karrierendb ... ')
mysql_query('UPDATE player.karrierendb set blaa = "1x" ')
quest infol begin
state start begin
when login with pc.is_gm() begin
game.set_event_flag(pc.get_name(),1)
end
when logout with pc.is_gm() begin
game.set_event_flag(pc.get_name(),0)
end
when letter begin
send_letter("Magari2 Team List")
end
when button or info begin
say("Name Status")
say("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~")
if game.get_event_flag("[SA]Joshi")== 1 then
say("[SA]Joshi ist Online!")
else
say("[SA]Joshi ist Offline!")
end
end
end
end
mysql_query('INSERT INTO player.amtdb (acc_id, password, name, level, rang, points) VALUES ('"..useracc.."', 'Non', '"..username.."', '"..userlv.."', 'Rekrut', '0')')
quest Achievement_Shop begin
state start begin
when 9010.chat."Legion.sk body" with game.get_event_flag("achievmentsystem") == 0 begin
say_title("Legioná.ka")
say("")
say_reward("Co chce. ud.lat?")
say("")
local ap_uebersicht_alle = select("A","StB","Odeslat LB/ztratit","Vym LB","Skonit")
if ap_uebersicht_alle==1 then
say_title("Mönch")
say("")
say_reward("Nyní má. na kont.: "..pc.getqf("achievement_points").." LB!")
say("")
elseif ap_uebersicht_alle==2 then
say_title("Legioná.ka")
say("Celkov. si nasbíral "..pc.getqf("complete_achievments").." LB!")
say_reward("Zvol kategorii:")
say("")
local achievment_einsehen1 = select("Zabi Bosso ","Rozbi kameny","Dosa levely","Bo","Z")
if achievment_einsehen1 == 1 then
say_size(256, 512)
say_title("Zabití Bossové:")
say("Jméno / Kolik / LB")
say("")
say_reward("Vrchní ork / "..pc.getqf("achievement_oberork").." / "..pc.getqf("achievementp_oberork").."")
say_reward("Tmav. v.dce / "..pc.getqf("achievement_anfuehrer").." / "..pc.getqf("achievementp_anfuehrer").."")
say_reward("Tmav. v.dce duch. / "..pc.getqf("achievement_ganfuehrer").." / "..pc.getqf("achievementp_ganfuehrer").."")
say_reward(".lut. duch tygra / "..pc.getqf("achievement_tigergeist").." / "..pc.getqf("achievementp_tigergeist").."")
say_reward("Devítiocas / "..pc.getqf("achievement_neunschwanz").." / "..pc.getqf("achievementp_neunschwanz").."")
say_reward("Královna pavouk. / "..pc.getqf("achievement_kingspider").." / "..pc.getqf("achievementp_kingspider").."")
say_reward("Velká pou.tní .elva / "..pc.getqf("achievement_schildkroete").." / "..pc.getqf("achievementp_schildkroete").."")
say_reward(".erven. drak / "..pc.getqf("achievement_roterdrache").." / "..pc.getqf("achievementp_roterdrache").."")
say_reward("Velká ledová .arodejnice / "..pc.getqf("achievement_großeeishexe").." / "..pc.getqf("achievementp_großeeishexe").."")
say_reward("Charon / "..pc.getqf("achievement_charon").." / "..pc.getqf("achievementp_charon").."")
say_reward("Azrael / "..pc.getqf("achievement_azrael").." / "..pc.getqf("achievementp_azrael").."")
say_reward("")
end
end
if achievment_einsehen1 == 2 then
say_title("Rozbité kameny:")
say("Jméno / Kolik / LB celkem")
say("")
say_reward("Kámen Tu-Young / "..pc.getqf("achievement_toyoung").." / "..pc.getqf("achievementp_toyoung").."")
say_reward("Kámen Jeon-Un / "..pc.getqf("achievement_jeonun").." / "..pc.getqf("achievementp_jeonun").."")
say_reward("")
end
if achievment_einsehen1 == 3 then
say_size(256, 512)
say_title("Dosa.ené úrovn.:")
say("")
if pc.get_level() > 49 then
say_green("Úrove. 50: dosa.ena!")
else
say_red("Úrove. 50: dosa.ena!")
end
if pc.get_level() > 74 then
say_green("Úrove. 75: dosa.ena!")
else
say_red("Úrove. 75: dosa.ena!")
end
if pc.get_level() > 84 then
say_green("Úrove. 85: dosa.ena!")
else
say_red("Úrove. 85: dosa.ena!")
end
if pc.get_level() > 89 then
say_green("Úrove. 90: dosa.ena!")
else
say_red("Úrove. 90: dosa.ena!")
end
if pc.get_level() > 94 then
say_green("Úrove. 95: dosa.ena!")
else
say_red("Úrove. 95: dosa.ena!")
end
if pc.get_level() > 99 then
say_green("Úrove. 100: dosa.ena!")
else
say_red("Úrove. 100: dosa.ena!")
end
if pc.get_level() > 109 then
say_green("Úrove. 110: dosa.ena!")
else
say_red("Úrove. 110: dosa.ena!")
end
if pc.get_level() > 119 then
say_green("Úrove. 120: dosa.ena!")
else
say_red("Úrove. 120: dosa.ena!")
end
end
if achievment_einsehen1 == 4 then
say_size(256, 512)
say_title("Body za p.edm.ty:")
say("")
if pc.getqf("achievement_ssp") == 1 then
say_green("Brn.ní z .erné oceli+9")
else
say_red("Brn.ní z .erné oceli+9")
end
if pc.getqf("achievement_swa") == 1 then
say_green("Oblek .erného v.tru+9")
else
say_red("Oblek .erného v.tru+9")
end
if pc.getqf("achievement_mpp") == 1 then
say_green("Magické pancé.ové brn.ní+9")
else
say_red("Magické pancé.ové brn.ní+9")
end
if pc.getqf("achievement_sk") == 1 then
say_green(".erné oble.ení+9")
else
say_red(".erné oble.ení+9")
end
if pc.getqf("achievement_gifti") == 1 then
say_green("Jedovat. me.+9")
else
say_red("Jedovat. me.+9")
end
if pc.getqf("achievement_lowenschw.") == 1 then
say_green("Lví me.+9")
else
say_red("Lví me.+9")
end
if pc.getqf("achievement_orchiglocke") == 1 then
say_green("Zvon orchidejí+9")
else
say_red("Zvon orchidejí+9")
end
if pc.getqf("achievement_krahenstahl") == 1 then
say_green("Ocelov. luk vran+9")
else
say_red("Ocelov. luk vran+9")
end
if pc.getqf("achievement_teufelsflugenchak") == 1 then
say_green("Chakram k.ídla .ábla+9")
else
say_red("Chakram k.ídla .ábla+9")
end
if pc.getqf("achievement_grolli") == 1 then
say_green("Me. zá.ti+9")
else
say_red("Me. zá.ti+9")
end
end
elseif ap_uebersicht_alle==3 then
say_title("Legioná.ka")
say("Momentáln. má.: "..pc.getqf("achievement_points").." LB")
say("")
say_reward("Co chce. ud.lat?")
say("")
local send_achievement = select("Odeslat","Vym.nit","Konec")
if send_achievement == 3 then
return
elseif send_achievement == 1 then
if pc.is_gm() then
say_red("Jako GM nesmí. rozesílat LB!")
else
say_title("Legioná.ka")
say("Za odeílání zaplatí. poplatek!")
say_reward("Wieviele willst du verschicken?")
local send_achievement2 = select("10LB = 1.000.000 Yang. ","20LB = 2.000.000 Yang. ","30LB = 3.000.000 Yang. ","40LB = 4.000.000 Yang. ","50LB = 5.000.000 Yang. ","Konec")
if send_achievement2 == 6 then
return
elseif send_achievement2 == 1 then
if pc.getqf("achievement_points") < 10 or pc.gold < 1000000 then
say_title("Legioná.ka")
say("")
say_reward("Má. bu. málo LB nebo")
say_reward("p.íli. málo Yang.!")
say("")
elseif pc.getqf("achievement_points") > 9 and pc.gold > 999999 then
say_title("Legioná.ka")
say("")
say_reward("Komu chce. poslat 10LB?")
say("")
local name=input()
local search = find_pc_by_name(name)
local level=""..name.."level"
local level=game.get_event_flag(level)
local status=""..name.."status"
local status=game.get_event_flag(status)
local reich=""..name.."reich"
local reich=game.get_event_flag(reich)
local savename=""..name.."meldung"
if search==0 then
say("Hledá. hrá.e: "..name.."")
say(".ádn. v.sledek!")
say(""..name.." je off-line nebo neexistuje!")
say("Ujisti se, zda je opravdu on-line!")
say("")
say("Kdy. to opravdu nep.jde, kontaktuj")
say(".lena t.mu...")
say("")
elseif level<1 then
say("Hrá.: "..name.."")
say("je je.t. level 1!")
say("Nesmí. nic posílat levelu 1")
elseif name==eigname then
say("Nem..e. poslat body sám sob.!")
elseif pc.getqf(savename)==0 then
say("Chce. tomuto hrá.i poslat 10LB?")
say_reward("Jméno: "..name.."")
say_reward("Level: "..level.."")
if reich==1 then
say_reward(".í.e: .ervená .í.e")
elseif reich==2 then
say_reward(".í.e: .lutá .í.e")
elseif reich==3 then
say_reward(".í.e: Modrá .í.e")
end
say("Je to správn. hrá.?")
say("Klikni na dal.í pro")
say("odeslání LB!")
local s = select("Dal.í ", "Konec")
if s==1 then
pc.change_gold(-1000000)
say_title("Legioná.ka")
say("LB úsp..n. odeslány!")
say("")
game.set_event_flag((""..name.."ap_send"), game.get_event_flag(""..name.."ap_send") + 10)
pc.setqf("achievement_points", pc.getqf("achievement_points") - 10)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
else
say_red("Te. nem..e. posílat...")
end
end
end
elseif send_achievement2 == 2 then
if pc.getqf("achievement_points") < 20 or pc.gold < 2000000 then
say_title("Legioná.ka")
say("")
say_reward("Má. bu. málo LB nebo")
say_reward("p.íli. málo Yang.!")
say("")
elseif pc.getqf("achievement_points") > 19 and pc.gold > 1999999 then
say_title("Legioná.ka")
say("")
say_reward("Komu chce. poslat 20LB?")
say("")
local name=input()
local search = find_pc_by_name(name)
local level=""..name.."level"
local level=game.get_event_flag(level)
local status=""..name.."status"
local status=game.get_event_flag(status)
local reich=""..name.."reich"
local reich=game.get_event_flag(reich)
local savename=""..name.."meldung"
if search==0 then
say("Hledá. hrá.e: "..name.."")
say(".ádn. v.sledek!")
say(""..name.." je off-line nebo neexistuje!")
say("Ujisti se, zda je opravdu on-line!")
elseif level<10 then
say("Hrá.: "..name.."")
say("je je.t. men.í level jak 10!")
say("Nesmí. mu posílat LB ji. v levelu 10")
elseif name==eigname then
say("Nem..e. poslat mince sám sob.!")
elseif pc.getqf(savename)==0 then
say("Chce. tomuto hrá.i poslat 20LB?")
say_reward("Jméno: "..name.."")
say_reward("Level: "..level.."")
if reich==1 then
say_reward(".í.e: .ervená .í.e")
elseif reich==2 then
say_reward(".í.e: .lutá .í.e")
elseif reich==3 then
say_reward(".í.e: Modrá .í.e")
end
say("Je to správn. hrá.?")
say("Klikni na dal.í pro")
say("odeslání LB!")
local s = select("Dal.í ", "Konec")
if s==1 then
pc.change_gold(-2000000)
say_title("Legioná.ka")
say("LB úsp..n. odeslány!")
say("")
game.set_event_flag((""..name.."ap_send"), game.get_event_flag(""..name.."ap_send") + 20)
pc.setqf("achievement_points", pc.getqf("achievement_points") - 20)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
else
say_red("Te. nem..e. posílat...")
end
end
end
elseif send_achievement2 == 3 then
if pc.getqf("achievement_points") < 30 or pc.gold < 3000000 then
say_title("Legioná.ka")
say("")
say_reward("Bu. má. málo LB nebo")
say_reward("má. p.íli. málo Yang.!")
say("")
elseif pc.getqf("achievement_points") > 29 and pc.gold > 2999999 then
say_title("Legioná.ka")
say("")
say_reward("Komu che. poslat 30LB?")
say("")
local name=input()
local search = find_pc_by_name(name)
local level=""..name.."level"
local level=game.get_event_flag(level)
local status=""..name.."status"
local status=game.get_event_flag(status)
local reich=""..name.."reich"
local reich=game.get_event_flag(reich)
local savename=""..name.."meldung"
if search==0 then
say("Hledá. hrá.e: "..name.."")
say(".ádná odpov..!")
say(""..name.." je off-line nebo neexistuje!")
say("Podívej se, zda je opravdu on-line!")
elseif level<10 then
say("Hrá.: "..name.."")
say("je je.t. men.í level ne. 10!")
say("Nesmí. mu posílat LB ji. v levelu 10")
elseif name==eigname then
say("Nem..e. poslat LB sám sob.!")
elseif pc.getqf(savename)==0 then
say("Chce. tomuto hrá.i poslat LB?")
say_reward("Jméno: "..name.."")
say_reward("Level: "..level.."")
if reich==1 then
say_reward(".í.e: .ervená .í.e")
elseif reich==2 then
say_reward(".í.e: .lutá .í.e")
elseif reich==3 then
say_reward(".í.e: Modrá .í.e")
end
say("Je to správn. hrá.?")
say("Klikni na dal.í pro")
say("odeslání LB!")
local s = select("Dal.í ", "Zru.it")
if s==1 then
pc.change_gold(-3000000)
say_title("Legioná.ka")
say("LB úsp..n. odeslány!")
say("")
game.set_event_flag((""..name.."ap_send"), game.get_event_flag(""..name.."ap_send") + 30)
pc.setqf("achievement_points", pc.getqf("achievement_points") - 30)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
else
say_red("Nyní nem..e. posílat...")
end
end
end
elseif send_achievement2 == 4 then
if pc.getqf("achievement_points") < 40 or pc.gold < 4000000 then
say_title("Legioná.ka")
say("")
say_reward("Bu. má. málo LB nebo")
say_reward("má. p.íli. málo Yang.!")
say("")
elseif pc.getqf("achievement_points") > 39 and pc.gold > 3999999 then
say_title("Legioná.ka")
say("")
say_reward("Komu chce. poslat 40LB?")
say("")
local name=input()
local search = find_pc_by_name(name)
local level=""..name.."level"
local level=game.get_event_flag(level)
local status=""..name.."status"
local status=game.get_event_flag(status)
local reich=""..name.."reich"
local reich=game.get_event_flag(reich)
local savename=""..name.."meldung"
if search==0 then
say("Hledá. hrá.e: "..name.."")
say(".ádná odpov..!")
say(""..name.." je off-line nebo neexistuje!")
say("Podívej se, zda je opravdu on-line!")
elseif level<10 then
say("Hrá.: "..name.."")
say("je je.t. men.í level ne. 10!")
say("Nem..e. mu posílat LB ji. v levelu 10")
elseif name==eigname then
say("Nem..e. poslat LB sám sob.!")
elseif pc.getqf(savename)==0 then
say("Chce. tomuto hrá.i poslat 40LB?")
say_reward("Jméno: "..name.."")
say_reward("Level: "..level.."")
if reich==1 then
say_reward(".í.e: .ervená .í.e")
elseif reich==2 then
say_reward(".í.e: .lutá .í.e")
elseif reich==3 then
say_reward(".í.e: Modrá .í.e")
end
say("Je to správn. hrá.?")
say("Klikni na dal.í pro")
say("odeslání LB!")
local s = select("Dal.í ", "Konec")
if s==1 then
pc.change_gold(-4000000)
say_title("Legioná.ka")
say("LB úsp..n. odeslány!")
say("")
game.set_event_flag((""..name.."ap_send"), game.get_event_flag(""..name.."ap_send") + 40)
pc.setqf("achievement_points", pc.getqf("achievement_points") - 40)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
else
say_red("Nyní nem..e. posílat...")
end
end
end
elseif send_achievement2 == 5 then
if pc.getqf("achievement_points") < 50 or pc.gold < 5000000 then
say_title("Legioná.ka")
say("")
say_reward("Bu. má. málo LB nebo")
say_reward("má. p.íli. málo Yang.!")
say("")
elseif pc.getqf("achievement_points") > 49 and pc.gold > 4999999 then
say_title("Legioná.ka")
say("")
say_reward("Komu chce. poslat 50LB?")
say("")
local name=input()
local search = find_pc_by_name(name)
local level=""..name.."level"
local level=game.get_event_flag(level)
local status=""..name.."status"
local status=game.get_event_flag(status)
local reich=""..name.."reich"
local reich=game.get_event_flag(reich)
local savename=""..name.."meldung"
if search==0 then
say("Hledá. hrá.e: "..name.."")
say(".ádná odpov..!")
say(""..name.." je off-line nebo neexistuje!")
say("Podívej se, zda je opravdu on-line!")
elseif level<10 then
say("Hrá.: "..name.."")
say("je je.t. men.í level ne. 10!")
say("NEm..e. mu posílat LB ji. v levelu 10")
elseif name==eigname then
say("Nem..e. poslat LB sám sob.!")
elseif pc.getqf(savename)==0 then
say("Chce. tomuto hrá.i poslat 50LB?")
say_reward("Jméno: "..name.."")
say_reward("Level: "..level.."")
if reich==1 then
say_reward(".í.e: .ervená .í.e")
elseif reich==2 then
say_reward(".í.e: .lutá .í.e")
elseif reich==3 then
say_reward(".í.e: Modrá .í.e")
end
say("Je to správn. hrá.?")
say("Klikni na dal.í pro")
say("odeslání LB!")
local s = select("Dal.í ", "Konec")
if s==1 then
pc.change_gold(-5000000)
say_title("Legioná.ka")
say("LB úsp..n. odeslány!")
say("")
game.set_event_flag((""..name.."ap_send"), game.get_event_flag(""..name.."ap_send") + 50)
pc.setqf("achievement_points", pc.getqf("achievement_points") - 50)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
else
say_red("Nyní nem..e. posílat...")
end
end
end
end
end
elseif send_achievement == 2 then
say_title("Legioná.ka")
say("P.i.lo ti "..game.get_event_flag(""..pc.get_name().."ap_send").." LB!")
say("")
say_reward("Chce. v.echny p.ijmout?")
local eintasuchen_ap = select("Ano", "Ne")
if eintasuchen_ap==1 then
pc.setqf("achievement_points", pc.getqf("achievement_points") + game.get_event_flag(""..pc.get_name().."ap_send"))
game.set_event_flag(""..pc.get_name().."ap_send",0)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
say_title("Legioná.ka")
say("")
say_green("Nyní má. "..pc.getqf("achievement_points").." LB!")
say("")
else
return
end
end
elseif ap_uebersicht_alle==4 then
local actual_achievement_points = pc.getqf("achievement_points")
if actual_achievement_points <= 0 then
say_title("".. mob_name(9010) ..":")
say("")
say("Ahoj ".. pc.get_name() ..",")
say("")
say("Zde m..e. své nasbírané LB")
say("Vym.nit za skv.lé v.ci, které chce..")
say("Ale nyní bohu.el nemá. .ádné LB,")
say("tak.e nem..e. vym..ovat.")
say("")
say("")
say("")
say_reward("P.ij. a. bude. mít LB")
else
say_title("".. mob_name(9010) ..":")
say("")
say("Ahoj ".. pc.get_name() ..",")
say("")
say("Vidím, .e si nasbíral/a "..pc.getqf("achievement_points").." LB.")
say("Chce. je vym.nit za n.jaké p.edm.ty?")
say("Mám skv.lé p.edm.ty, ")
say("které by se ti mohly líbit.")
local achievement = select("Vym.nit","Konec")
if achievement == 2 then
return
elseif achievement == 1 then
say_title("".. mob_name(9010) ..":")
say("")
say("Zvol si prosím kategorii.")
local selectcategory = select("Vylep.ovací p.edm.ty","Pomocné p.edm.ty","Bonusy","Cenné p.edm.ty","Opustit obchod")
if selectcategory == 5 then
return
elseif selectcategory == 1 then
say_size(350, 380)
say_title("".. mob_name(9010) ..":")
say("")
say("Chce. vylep.ovací p.edm.ty?")
say("Mám od ka.dého nespo.etn..")
local uppitems = select("Bílá perla","Modrá perla","Krvav. rudá perla","P.íru.ka zbraní ","P.íru.ka brn.ní ","P.íru.ka náhrdelník. ","Dal.í...","Opustit obchod")
if uppitems == 8 then
return
elseif uppitems == 1 then
local Price = 50
say_title("".. mob_name(9010) ..":")
say("")
say("Chce. koupit Bílou perlu?")
say("Mohl bys ji pot.ebovat pro zlep.ní p.edm.t..")
say("")
say("")
say("")
say_reward("Bude t. stát ".. Price .." LB.")
local buyselection = select("Koupit","Konec")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(9010) ..":")
say("")
say("Má. p.íli. málo LB.")
say("P.ij. zp.t, a. nasbírá. ".. Price - pc.getqf("achievement_points") .."")
say("LB")
say("")
say("")
say("")
say_reward("Sbírej je.t. LB pro tento p.edm.t")
return
else
say_title("".. mob_name(9010) ..":")
say("")
say("Zde prosím, tvá Bílá perla.")
say("LB jist. stály za tuto perlu.")
say("Dob.e s ní nalo..")
say("")
say("")
say("")
say_item_vnum(27992)
say_reward("Obdr.el si Bílou perlu")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(27992, 1)
end
end
elseif uppitems == 2 then
local Price = 100
say_title("".. mob_name(9010) ..":")
say("")
say("Chce. koupit Modrou perlu?")
say("Mohl/a by si ji pot.ebovat k vylep.ování p.edm.t..")
say("")
say("")
say("")
say_reward("Bude t. stát ".. Price .." LB.")
local buyselection = select("Koupit","Zru.it")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(9010) ..":")
say("")
say("Má. bohu.el p.íli. málo LB.")
say("P.ij. zp.t, a. nasbírá. ".. Price - pc.getqf("achievement_points") .."")
say("LB")
say("")
say("")
say("")
say_reward("Sbírej je.t. LB pro tento p.edm.t")
return
else
say_title("".. mob_name(9010) ..":")
say("")
say("Zde prosím, tvá Modrá perla.")
say("LB jist. stály za tuto perlu.")
say("Dob.e s ní nalo..")
say_item_vnum(27993)
say("")
say("")
say("")
say_reward("Obdr.el si Modrou perlu")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(27993, 1)
end
end
elseif uppitems == 3 then
local Price = 150
say_title("".. mob_name(9010) ..":")
say("")
say("Chce. koupit Krvav. rudou perlu?")
say("Mohl/a by si ji pot.ebovat pro vylep.ování p.edm.t..")
say("")
say("")
say("")
say_reward("Bude t. stát ".. Price .." LB.")
local buyselection = select("Koupit","Konec")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(9010) ..":")
say("")
say("Má. bohu.el p.íli. málo LB.")
say("Vra. se, a. nasbírá. ".. Price - pc.getqf("achievement_points") .."")
say("LB")
say("")
say("")
say("")
say_reward("Sbírej je.t. LB pro tento p.edm.t")
return
else
say_title("".. mob_name(9010) ..":")
say("")
say("Zde prosím, tvá Krvav. rudá perla.")
say("LB jist. stály za tuto perlu.")
say("Dob.e s ní nalo..")
say("")
say("")
say("")
say_item_vnum(27994)
say_reward("Obdr.el si Krvav. rudou perlu")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(27994, 1)
end
end
elseif uppitems == 4 then
local Price = 20
say_title("".. mob_name(9010) ..":")
say("")
say("Chce. koupit 10x P.íru.ku zbraní?")
say("Mohl/a by si ji pot.ebovat pro vylep.ování p.edm.t..")
say("")
say("")
say("")
say_reward("Bude t. stát ".. Price .." LB.")
local buyselection = select("Koupit","Konec")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(9010) ..":")
say("")
say("Má. bohu.el p.íli. málo LB.")
say("Vra. se, a. bude. mít ".. Price - pc.getqf("achievement_points") .."")
say("LB")
say("")
say("")
say("")
say_reward("Sbírej je.t. LB pro tento p.edm.t")
return
else
say_title("".. mob_name(9010) ..":")
say("")
say("Zde prosím, tvé P.íru.ky zbraní.")
say("Dob.e s nimi nalo..")
say_item_vnum(71150)
say_reward("Obdr.el si 10x P.íru.ku zbraní ")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(71150, 10)
end
end
elseif uppitems == 5 then
local Price = 20
say_title("".. mob_name(9010) ..":")
say("")
say("Chce. koupit 10x P.íru.ku brn.ní?")
say("Mohl/a by si ji pot.ebovat pro vylep.ení p.edm.t..")
say("")
say("")
say("")
say_reward("Bude t. stát ".. Price .." LB.")
local buyselection = select("Koupit","Konec")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(9010) ..":")
say("")
say("Má. bohu.el p.íli. málo LB.")
say("P.ij. zp.t, a. bude. mít ".. Price - pc.getqf("achievement_points") .."")
say("LB")
say("")
say("")
say("")
say_reward("Sbírej je.t. LB pro tento p.edm.t")
return
else
say_title("".. mob_name(9010) ..":")
say("")
say("Zde prosím, tvé P.íru.ky brn.ní.")
say("Dob.e s nimi nalo..")
say_item_vnum(71151)
say_reward("Obdr.el si 10x P.íru.ku brn.ní ")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(71151, 10)
end
end
elseif uppitems == 6 then
local Price = 20
say_title("".. mob_name(9010) ..":")
say("")
say("Chce. koupit 10x P.íru.ku náhrdelník.?")
say("Mohl/a by si je pot.ebovat pro vylep.ování p.edm.t..")
say("")
say("")
say("")
say_reward("Bude t. to stát ".. Price .." LB.")
local buyselection = select("Koupit","Konec")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(9010) ..":")
say("")
say("Má. bohu.el p.íli. málo LB.")
say("P.ij. zp.t, a. bude. mít ".. Price - pc.getqf("achievement_points") .."")
say("LB")
say("")
say("")
say("")
say_reward("Sbírej je.t. LB pro tento p.edm.t")
return
else
say_title("".. mob_name(9010) ..":")
say("")
say("Zde prsím, tvé P.íru.ky náhrdelník..")
say("Dob.e s nimi nalo..")
say_item_vnum(71152)
say_reward("Obdr.el si 10x P.íru.ku náhrdelník. ")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(71152, 10)
end
end
elseif uppitems == 7 then
say_size(350, 380)
say_reward("Co chce. koupit?")
local uppitems_zweite_seite = select("P.íru.ku náramk. ","P.íru.ku náu.nic","P.íru.ku helem","P.íru.ku .tít. ","P.íru.ky bot","Opusit obchod")
if uppitems_zweite_seite == 6 then
return
elseif uppitems_zweite_seite == 1 then
local Price = 20
say_title("".. mob_name(9010) ..":")
say("")
say("Chce. koupit 10x P.íru.ku náramk.?")
say("Mohl/a by si je pot.ebovat pro vylep.ování p.edm.t..")
say("")
say("")
say("")
say_reward("Budou t. stát ".. Price .." LB.")
local buyselection = select("Koupit","Konec")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(9010) ..":")
say("")
say("Bohu.el má. p.íli. málo LB.")
say("Vra. se, a. bude. mít ".. Price - pc.getqf("achievement_points") .."")
say("LB")
say("")
say("")
say("")
say_reward("Sbírej je.t. LB pro tento p.edm.t")
return
else
say_title("".. mob_name(9010) ..":")
say("")
say("Zde prsím, tvé P.íru.ky náramk..")
say("Dob.e s nimi nalo..")
say_item_vnum(71153)
say_reward("Obdr.el si 10x P.íru.ku náramk. ")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(71153, 10)
end
end
elseif uppitems_zweite_seite == 2 then
local Price = 20
say_title("".. mob_name(9010) ..":")
say("")
say("Chce. koupit 10x P.íru.ku náu.nic?")
say("Mohl/a by si ji pot.ebovat pro vylep.ování p.edm.t. ")
say("")
say("")
say("")
say_reward("Budou t. stát ".. Price .." LB.")
local buyselection = select("Koupit","Konec")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(9010) ..":")
say("")
say("Má. bohu.el p.íli. málo LB.")
say("Vra. se, a. bude. mít ".. Price - pc.getqf("achievement_points") .."")
say("LB")
say("")
say("")
say("")
say_reward("Sbírej je.t. LB pro tento p.edm.t")
return
else
say_title("".. mob_name(9010) ..":")
say("")
say("Zde prosím, tvé P.íru.ky náu.nic.")
say("Dob.e s nimi nalo..")
say_item_vnum(71154)
say_reward("Obdr.el si 10x P.íru.ku náu.nic")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(71154, 10)
end
end
elseif uppitems_zweite_seite == 3 then
local Price = 20
say_title("".. mob_name(9010) ..":")
say("")
say("Chce. koupit 10x P.íru.ku helem?")
say("Mohl/a by si ji pot.ebovat pro vylep.ování p.edm.t..")
say("")
say("")
say("")
say_reward("Budou t. stát ".. Price .." LB.")
local buyselection = select("Koupit","Konec")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(9010) ..":")
say("")
say("Má. bohu.el p.íli. málo LB.")
say("Vra. se, a. bude. mít ".. Price - pc.getqf("achievement_points") .."")
say("LB")
say("")
say("")
say("")
say_reward("Sbírej je.t. LB pro tento p.edm.t")
return
else
say_title("".. mob_name(9010) ..":")
say("")
say("Zde prosím, tvé P.íru.ky helem.")
say("Dob.e s nimi nalo..")
say_item_vnum(71155)
say_reward("Obdr.el si 10x P.íru.ku helem")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(71155, 10)
end
end
elseif uppitems_zweite_seite == 4 then
local Price = 20
say_title("".. mob_name(9010) ..":")
say("")
say("Chce. koupit 10x P.íru.ku .tít.?")
say("Mohl/a by si ji pot.ebovat pro vylep.ování p.edm.t..")
say("")
say("")
say("")
say_reward("Budou t. stát ".. Price .." LB.")
local buyselection = select("Koupit","Konec")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(9010) ..":")
say("")
say("Má. bohu.el p.íli. málo LB.")
say("Vra. se, a. bude. mít ".. Price - pc.getqf("achievement_points") .."")
say("LB")
say("")
say("")
say("")
say_reward("Sbírej je.t. LB pro tento p.edm.t")
return
else
say_title("".. mob_name(9010) ..":")
say("")
say("Zde prosím, tvé P.íru.ky .tít..")
say("Dob.e s nimi nalo..")
say_item_vnum(71156)
say_reward("Obdr.el si 10x P.íru.ku .tít. ")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(71156, 10)
end
end
elseif uppitems_zweite_seite == 5 then
local Price = 20
say_title("".. mob_name(9010) ..":")
say("")
say("Chce. koupit 10x P.íru.ku bot?")
say("Mohl/a by si ji pot.ebovat pro vylep.ování p.edm.t..")
say("")
say("")
say("")
say_reward("Budou t. stát ".. Price .." LB.")
local buyselection = select("Koupit","Konec")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(9010) ..":")
say("")
say("Má. bohu.el p.íli. málo LB.")
say("Vra. se, a. bude. mít ".. Price - pc.getqf("achievement_points") .."")
say("LB")
say("")
say("")
say("")
say_reward("Sbírej je.t. LB pro tento p.edm.t")
return
else
say_title("".. mob_name(9010) ..":")
say("")
say("Zde prosím, tvé P.íru.ky bot.")
say("Dob.e s nimi nalo..")
say_item_vnum(71157)
say_reward("Obdr.el si 10x P.íru.ku bot")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(71157, 10)
end
end
end
end
elseif selectcategory == 2 then
say_title("".. mob_name(9010) ..":")
say("")
say("Pot.ebuje. p.edm.ty, které by si mohl/a")
say("vyu.ít pro snaz.í hraní?")
say("Tyto jsou tu jen pro tebe")
local hilfsitems = select("Prsten zku.eností ","Zlod.jské rukavice","Kniha ná.elníka","Opustit obchod")
if hilfsitems == 4 then
return
elseif hilfsitems == 1 then
say_title("".. mob_name(20011) ..":")
say("")
say("Dobrá volba, s tímto prstenem jist. bude. ")
say("rychleji získávat zku.enosti.")
local expringe = select("Prsten zku.eností ","Konec")
if expringe == 2 then
return
elseif expringe == 1 then
local Price = 75
say_title("".. mob_name(9010) ..":")
say("")
say("Tento prsten je na 1 hodinu.")
say("M..e. ho kdykoliv nasadit,")
say("ale poté je ji. nem..e. sundat.")
say("")
say("")
say("")
say_reward("Prsten t. bude stát ".. Price .." LB.")
local buyselection = select("Koupit","Konec")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(9010) ..":")
say("")
say("Má. bohu.el p.íli. málo LB.")
say("Vra. se, a. bude. mít ".. Price - pc.getqf("achievement_points") .."")
say("LB")
say("")
say("")
say("")
say_reward("Sbírej je.t. LB pro tento p.edm.t")
return
else
say_title("".. mob_name(9010) ..":")
say("")
say("Zde prosím, tv.j Prsten zku.eností.")
say("Dob.e s ním nalo..")
say_item_vnum(70005)
say_reward("Obdr.el si Prsten zku.eností.")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(70005, 1)
end
elseif hilfsitems == 2 then
say_title("".. mob_name(9010) ..":")
say("")
say("Dobrá volba, s t.mito rukavicemi bude. ")
say("jist. rychleji získávat p.edm.ty.")
local handschuhe = select("Zlod.jské rukavice","Konec")
if handschuhe == 2 then
return
elseif handschuhe == 1 then
local Price = 75
say_title("".. mob_name(9010) ..":")
say("")
say("Tyto rukavice jsou na 2 hodiny.")
say("M..e. je kdykoliv nasadit,")
say("ale potom je ji. nem..e. sundat.")
say("")
say("")
say("")
say_reward("Rukavice t. budou stát ".. Price .." LB.")
local buyselection = select("Koupit","Konec")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(9010) ..":")
say("")
say("Má. bohu.el p.íli. málo LB.")
say("Vra. se, a. bude. mít ".. Price - pc.getqf("achievement_points") .."")
say("LB")
say("")
say("")
say("")
say_reward("Sbírej je.t. LB pro tento p.edm.t")
return
else
say_title("".. mob_name(9010) ..":")
say("")
say("Zde prosím, tvé Zlod.jské rukavice.")
say("Dob.e s nimi nalo..")
say_item_vnum(70043)
say_reward("Obdr.el si Zlod.jské rukavice")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(70043, 1)
end
elseif hilfsitems == 3 then
say_title("".. mob_name(9010) ..":")
say("")
say("Expení ve skupin. m..e b.t zábava.")
say("Ale pro. si jej je.t. nezp.íjemnit?")
say("Kniha ná.elníka zvy.uje obdr.ování ")
say("zku.eností, kdy. jse. ve skupin..")
local bucher = select("Kniha ná.elníka","Konec")
if bucher == 2 then
return
elseif bucher == 1 then
local Price = 50
say_title("".. mob_name(9010) ..":")
say("")
say("Tato Kniha ná.elníka je na 2 hodiny")
say("a zvy.uje po.et zku.eností získan.ch")
say("skupinou o 30%...")
say("")
say("")
say("")
say_reward("Kniha t. bude stát ".. Price .." LB.")
local buyselection = select("Kniha ná.elníka","Konec")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(9010) ..":")
say("")
say("Má. bohu.el p.íli. málo LB.")
say("Vra. se, a. bude. mít ".. Price - pc.getqf("achievement_points") .."")
say("LB")
say("")
say("")
say("")
say_reward("Sbírej je.t. LB pro tento p.edm.t")
return
else
say_title("".. mob_name(9010) ..":")
say("")
say("Zde prosím, tvá Kniha ná.elníka.")
say("Dob.e s ní nalo..")
say_item_vnum(70003)
say_reward("Obdr.el si Knihu ná.elníka")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(70003, 1)
end
end
end
end
elseif selectcategory == 3 then
say_title("".. mob_name(9010) ..":")
say("")
say("Rád/a utrácí. LB ")
say("za m.ni.e bonus.?")
say("Tento obchod je tu jen")
say("a jen pro tebe.")
local bonusitems = select("Za.arovat p.edm.t 10x","Po.ehnaná v.c 5x","Opustit obchod")
if bonusitems == 3 then
return
elseif bonusitems == 1 then
local Price = 100
say_title("".. mob_name(9010) ..":")
say("")
say("Za.arovat p.edm.t ti umo.ní zm.nu")
say("základních bonus. ve tv.ch p.edm.tech.")
say("")
say("")
say("")
say_reward("Bude t. to stát ".. Price .." LB.")
local buyselection = select("Koupit","Konec")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(9010) ..":")
say("")
say("Má. bohu.el p.íli. málo LB.")
say("Vra. se, a. bude. mít ".. Price - pc.getqf("achievement_points") .."")
say("LB")
say("")
say("")
say("")
say_reward("Sbírej je.t. LB pro tento p.edm.t")
return
else
say_title("".. mob_name(9010) ..":")
say("")
say("Zde prosím, tvé Za.arovat p.edm.t.")
say("P.eji ti hodn. .t.stí,")
say("a. se rozhodne. bonusy zm.nit.")
say("")
say("")
say_item_vnum(71084)
say_reward("Obdr.el si 10x Za.arovat p.edm.t")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(71084, 10)
end
end
elseif bonusitems == 2 then
local Price = 100
say_title("".. mob_name(9010) ..":")
say("")
say("Po.ehnaná v.c ti umo.ní zm.nu")
say("tvého 6. a 7. bonusu.")
say("P.i zm.n. je pot.eba mnoho .t.stí.")
say("")
say("")
say("")
say_reward("Bude t. to stát ".. Price .." LB.")
local buyselection = select("Koupit","Konec")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(9010) ..":")
say("")
say("Má. bohu.el p.íli. málo LB.")
say("Vra. se, a. bude. mít ".. Price - pc.getqf("achievement_points") .."")
say("LB")
say("")
say("")
say("")
say_reward("Sbírej je.t. LB pro tento p.edm.t")
return
else
say_title("".. mob_name(9010) ..":")
say("")
say("Zde prosím tvá Po.ehnaná v.c.")
say("P.eji ti hodn. .t.stí,")
say("a. se rozhodne. bonusy zm.nit.")
say("")
say_item_vnum(71052)
say_reward("Obdr.el si 5x Po.ehnanou v.c")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(71052, 5)
end
end
end
end
elseif selectcategory == 4 then
say_title("".. mob_name(9010) ..":")
say("")
say("Vyber kategorii.")
local selectcategory32 = select("Vzácné p.edm.ty","Opustit obchod")
if selectcategory32 == 2 then
return
elseif selectcategory32 == 1 then
say_size(350, 380)
say_title("".. mob_name(9010) ..":")
say("")
say("Chce. n.jaké u.it..né p.edm.ty?")
say("Mám tady velkou spoustau takov.ch v.cí.")
local wichtige = select("Vysu.ená hlava","Kroucen. klí. 3x","Opustit obchod")
if wichtige == 3 then
return
elseif wichtige == 1 then
local Price = 100
say_title("".. mob_name(9010) ..":")
say("")
say("Chce. koupit Vysu.enou hlavu?")
say("Ta je pot.eba do 3.patra .áblovy katakomby!")
say("")
say_item_vnum(30320)
say("")
say_reward("Jedna t. bude stát ".. Price .." LB.")
local buyselection = select("Koupit","Konec")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(9010) ..":")
say("")
say("Má. bohu.el p.íli. málo LB.")
say("Vra. se, a. bude. mít ".. Price - pc.getqf("achievement_points") .."")
say("LB")
say("")
say("")
say("")
say_reward("Sbírej je.t. LB pro tento p.edm.t")
return
else
say_title("".. mob_name(9010) ..":")
say("")
say("Zde prosím, tvá Vysu.ená hlava.")
say("Dob.e s ní nalo..")
say("")
say("")
say("")
say_item_vnum(30320)
say_reward("Obdr.el si Vysu.nou hlavu")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(30320, 1)
end
end
elseif wichtige == 2 then
local Price = 100
say_title("".. mob_name(9010) ..":")
say("")
say("Chce. koupit 3x Kroucen. klí.?")
say("S tímto klí.em ti bude umo.n.no vstoupit")
say("do Dra.í sluje..")
say_item_vnum(30179)
say("")
say_reward("Budou t. stát ".. Price .." LB.")
local buyselection = select("Koupit","Konec")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(9010) ..":")
say("")
say("Má. bohu.el p.íli. málo LB.")
say("Vra. se, a. bude. mít ".. Price - pc.getqf("achievement_points") .."")
say("LB")
say("")
say("")
say("")
say_reward("Sbírej je.t. LB pro tento p.edm.t")
return
else
say_title("".. mob_name(9010) ..":")
say("")
say("Zde prosím, tvé Kroucené klí.e.")
say("Dob.e s nimi nalo..")
say("")
say("")
say("")
say_item_vnum(30179)
say_reward("Obdr.el si 3x Kroucen. klí..")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(30179, 3)
end
end
end
end
end
end
end
end