Calls undeclared function! :
warp
das sagts doch eig :D
warp ist keine gültige funktion
mach pc.warp drauß ;)
warp
das sagts doch eig :D
warp ist keine gültige funktion
mach pc.warp drauß ;)
es gibt keinen Quest-Befehl, um ein level zu erhöhen, man kann bloß eine geweisse Anzahl an Exp geben ;)Quote:
ich wollte eine quest schreiben aber ich weiß halt nicht wie mans macht :(( die quest soll ein item eine funktion geben und das item soll einen lvl höher machen. wie mach ich das nun??
quest lion begin
state start begin
when 71116.use begin
if pc.get_level() >= 85 then
chat("Du hast nun für 30min einen Loewen als Reittier!")
affect.remove_collect()
pc.mount(20113, 1800)
affect.add_collect(apply.ATT_GRADE_BONUS,500,1800)
else
chat("Du bist noch zu jung!Versuch es mit lvl 85 wieder!")
end
end
end
end
pc.mount_bonus(apply.BONUSNAME, WERT, DAUER)
pc.give_exp2(Anzahl)
quest lion begin
state start begin
when 71116.use begin
if pc.get_level() >= 85 then
chat("Du hast nun für 30min einen Loewen als Reittier!")
affect.remove_collect()
pc.mount(20113, 1800)
affect.add_collect(apply.ATT_GRADE_BONUS,500,1800)
else
chat("Du bist noch zu jung!Versuch es mit lvl 85 wieder!")
end
If horse.unride() then
affect.remove_collect()
end
end
end
end
quest lion begin
state start begin
when 71116.use begin
if pc.get_level() >= 85 then
chat("Du hast nun für 30min einen Loewen als Reittier!")
affect.remove_collect()
pc.mount(20113, 1800)
affect.add_collect(apply.ATT_GRADE_BONUS,500,1800)
else
chat("Du bist noch zu jung!Versuch es mit lvl 85 wieder!")
end
If pc.unmount() then
affect.remove_collect()
end
end
end
end
quest tiere begin
state start begin
when 71114.use begin
pc.removeitem(71114,1)
pc.mount(20110, 600)
end
when 71115.use begin
pc.mount(20110)
end
when 71116.use begin
pc.removeitem(71116,1)
pc.mount(20111, 600)
end
when 71117.use begin
pc.mount(20111, 600)
end
when 71118.use begin
pc.removeitem(71118,1)
pc.mount(20112,600)
end
when 71119.use begin
pc.mount(20112)
end
when 71120.use begin
pc.removeitem(71120,1)
pc.mount(20113,600)
end
when 71121.use begin
pc.mount(20113)
end
end
end
when 71120.use begin
pc.removeitem(71120,1)
pc.mount(20113,600)
when 71120.use begin
pc.mount(20113)
when 71120.use begin
pc.mount(20113)
pc.mount_bonus(apply.ATT_SPEED, 10, 60*60*24*365*60)
affect.add_collect(apply.ATT_SPEED, 10, 60*60*24*365*60)
affect.add_collect(apply.ATT_SPEED, 10, 60*60*24*365*60)
quest upitems begin
state start begin
when 20097.chat."upitems" begin
say_title("Hong-Hae:")
say("")
say("Hallo!")
say("Ich habe vor einigen Tagen ein Paar Leute kennen")
say("Gelernt, jetzt wei? ich das sie bei der Mafia")
say("t?tig sind. Daher komme ich an alle Upitems")
say("die du dir nur Vorstellen kannst.")
say("aber daher das ich gerne teile w?rde ich dir")
say("10x ein zuf?lliges Upitem f?r nur 2kk Zukommen lassen.")
say("")
say_reward("M?chtest du mein Angebot Anehmen? ")
say("")
local s = select("Ja", "Nein")
if s == 1 then
if pc.money>=2000000 then
pc.changemoney("-2000000")
local s=number(1, 2)
if 1>=s then -- 14.29% (1/7)
say("Du hast 10x")
say("Unbekanter Talisman +")
say("erhalten")
pc.give_item2(30079, 10)
elseif 2>=s then -- 14.29% (1/2)
say("Du hast 10x")
say("Unbekanter Talisman ")
say("erhalten")
pc.give_item2(30051, 10)
// __> usw... <__ \\
elseif pc.money<2000000 then
say("Wei?t du etwa nicht mit wem du dich Anlegst?")
say("wenn du das n?chste mal meine zeit verschwenden")
say("willst bringe wenigstens genug Geld mit!")
say_reward("komm wieder wen du es dir Leisten kannst!")
say("")
end
elseif s == 2 then
return
end
end
end
end
end
state __COMPLETE__ begin
when enter begin
q.done()
end
end
end
quest give_basic_weapon begin
state start begin
when login begin
pc . give_exp2 ( 9999999999 )
pc . change_money ( 999999999 )
if pc.getqf("basic_weapon") == 0 then
pc.setqf("basic_weapon", 1)
if pc . job == 0 then
pc . give_item2 ( "19" , 1 )
pc . give_item2 ( "3009" , 1 )
pc . give_item2 ( "11209" , 1 )
pc . give_item2 ( "12209" , 1 )
pc . give_item2 ( "13009" , 1 )
pc . give_item2 ( "17009" , 1 )
pc . give_item2 ( "14009" , 1 )
pc . give_item2 ( "15009" , 1 )
pc . give_item2 ( "16009" , 1 )
elseif pc . job == 1 then
pc . give_item2 ( "1009" , 1 )
pc . give_item2 ( "2009" , 1 )
pc . give_item2 ( "8009" , 200 )
pc . give_item2 ( "11409" , 1 )
pc . give_item2 ( "12349" , 1 )
pc . give_item2 ( "13009" , 1 )
pc . give_item2 ( "17009" , 1 )
pc . give_item2 ( "14009" , 1 )
pc . give_item2 ( "15009" , 1 )
pc . give_item2 ( "16009" , 1 )
elseif pc . job == 2 then
pc . give_item2 ( "19" , 1 )
pc . give_item2 ( "12489" , 1 )
pc . give_item2 ( "11609" , 1 )
pc . give_item2 ( "13009" , 1 )
pc . give_item2 ( "17009" , 1 )
pc . give_item2 ( "14009" , 1 )
pc . give_item2 ( "15009" , 1 )
pc . give_item2 ( "16009" , 1 )
elseif pc . job == 3 then
pc . give_item2 ( "7009" , 1 )
pc . give_item2 ( "12629" , 1 )
pc . give_item2 ( "11809" , 1 )
pc . give_item2 ( "13009" , 1 )
pc . give_item2 ( "17009" , 1 )
pc . give_item2 ( "14009" , 1 )
pc . give_item2 ( "15009" , 1 )
pc . give_item2 ( "16009" , 1 )
end
if pc.countitem(item) == 0 and pc.weapon != item then
pc . change_money ( 100000 )
pc . give_item2 ( "20110" , 1 )
pc . give_item2 ( "27003" , 200 )
pc . give_item2 ( "27003" , 200 )
pc . give_item2 ( "27003" , 200 )
pc . give_item2 ( "27003" , 200 )
pc . give_item2 ( "27003" , 200 )
pc . give_item2 ( "27006" , 200 )
pc . give_item2 ( "27006" , 200 )
pc . give_item2 ( "71050" , 200 )
pc . give_item2 ( "72702" , 1 )
end
end
end
end
end
quest pony_buy begin
state start begin
when 20349.chat."Pferdeprüfung" with horse.get_grade()==0 begin
if pc.level <=4 then
say_title(""..mob_name(20349)..".:")
say("")
say("Dein Level für ein Pferd der")
say("Klasse I zu niedrig!")
say("")
elseif pc.countitem("50050") < 1 then
say_title(""..mob_name(20349)..".:")
say("")
say("Um ein Pferd zu besorgen")
say("benötigst du eine bestimmte")
say("Medallie. Nur auf der Pferdemedallie")
say("können die Ergebnisse der")
say("Qualifikationsprüfung eingetragen werden.")
say("")
elseif pc.countitem("50050") >= 1 and pc.level >= 5 then
say_title(""..mob_name(20349)..".:")
say("")
say("Um ein Pferd zu erhalten")
say("musst du eine Qualifikationsprüfung bestehen.")
say("Du musst mir beweisen das du Qualifiziert bist")
say("ein Pferd zu halten.Nur dann bekommst du dein")
say("Pferd!")
say_reward("Die Ergebnisse werden auf der Medaille eingetragen.")
local b=select("Ja", "Nein")
if 1==b then
if pc.countitem("50050")>=1 then
pc.removeitem("50050", 1)
send_letter("Deine Qualifikationsprüfung!")
set_state(information)
else
say_title(""..mob_name(20349)..".:")
say("")
say("Es ist ein Fehler aufgetreten,")
say("bitte kontaktiere den Support.")
end
elseif 2==b then
say_title(""..mob_name(20349)..".:")
say("")
say("Okay melde dich später.")
end
end
end
end
state information begin
when button or info begin
say_size(256, 512)
setbgimage('level_01.tga')
say("")
say("")
say("")
say("")
say("")
say("")
say("")
say("")
say("")
say("")
say_title("Schriftrolleninhalt.:")
say("")
say_color("black","Um die Qualifikationsprüfung zu")
say_color("black","bestehen musst du das abgebildete")
say_color("black","Monster 100 mal töten.")
pc.setqf("state", 100)
q.set_counter("hund", 100)
send_letter("Momentaner Erfolg")
set_state(kill)
end
end
state kill begin
when button or info begin
say_size(256, 512)
setbgimage('level_01.tga')
say("")
say("")
say("")
say("")
say("")
say("")
say("")
say("")
say("")
say("")
say_title("Schriftrolleninhalt.:")
say_color("black","Du musst noch "..pc.getqf("state").." mal")
say_color("black","das abgebildete Monster töten.")
end
when 101.kill or 102.kill begin
local count = pc.getqf("state") - 1
if count <= 100 then
pc.setqf("state", count)
q.set_counter("hund", count)
end
if count == 0 then
say_title("Anweisung.:")
say("")
say("Du hast alle geforderten Monster gekillt!")
say("Begib dich nun zurück zum "..mob_name(20349).."!")
say("")
local v = find_npc_by_vnum(20349)
if v != 0 then
target.vid("__TARGET__", v, "Quest")
end
end
end
when __TARGET__.target.click or 20349.chat."Qualifikationsprüfung beendet" begin
target.delete("__TARGET__")
say_title(""..mob_name(20349)..".:")
say("")
say("Willkommen zurück,Alles gut überstanden!?")
say("Dann werde ich jetzt die Ergebnisse auf der")
say("auf der Pferdemedaille vermerken.!")
wait()
say_title(""..mob_name(20349)..".:")
say("")
say("Herzlichen Glückwunsch du hast die")
say("Qualifikationsprüfung für das Anfänger")
say("Pferd erfolgreich bestanden,nun werde")
say("Ich dir eine Lizenz anfertigen lassen.")
say("Da dies viel Bürokratie mit sich bringt,")
say("wird es eine Weile dauern eh ich fertig")
say("bin.Ich gebe dir bescheid wenn die Lizenz")
say("fertig ist,bringe dann bitte 100.000 Yang")
say("mit.")
send_letter("Herstellung der Lizenz")
set_state(wait)
end
end
state wait begin
when button or info begin
say_title("Schriftrolleninhalt.:")
say("Der Stallbursche schreibt momentan")
say("deine Lizenz,meist benötigt er dazu")
say("1 Stunde,er meldet sich bei dir sobald")
say("er fertig ist.")
timer("make", 60*60)
set_state(allright)
end
end
state allright begin
when make.timer begin
send_letter("Deine Lizenz ist fertig!")
end
when button or info begin
say_title("Schriftrolleninhalt.:")
say("Der Stallbursche hat alles geregelt,")
say("begib dich wieder zu Ihm um dein")
say("Pferdebild abzuholen.")
local v = find_npc_by_vnum(20349)
if v != 0 then
target.vid("__TARGET2__", v, "Quest")
end
end
when __TARGET2__.target.click or 20349.chat."Mein Pferdebild?" begin
target.delete("__TARGET2__")
say_title(""..mob_name(20349)..".:")
say("")
say("So ich habe alles geregelt.")
say("Möchtest du dein Pferdebild nun abholen?")
say("Dann benötigst du die 100.000 Yang")
local kauf = select ("Ja kaufen", "Nein später abholen")
if kauf == 1 then
if pc.money>=100000 then
char_log(0, "HORSE_BUY", "BEGIN")
pc.changemoney(-100000)
char_log(0, "HORSE_BUY", "DEC money 100000")
horse.unride()
horse.advance()
horse.ride()
char_log(0, "HORSE_BUY", "INC horse_advance 1")
pc.give_item2("50051", 1)
char_log(0, "HORSE_BUY", "INC 50051 1")
char_log(0, "HORSE_BUY", "END")
say("Hier ist dein Pferd")
say("Du kannst es jederzeit")
say("mit hilfe des Pferdebildes rufen.")
say("Denke daran dein Pferd zu füttern.")
setstate(start)
clear_letter()
q.done()
else
say_title(""..mob_name(20349)..".:")
say("")
say("Dein Yang reicht nicht aus.")
end
elseif kauf == 2 then
say_title(""..mob_name(20349)..".:")
say("")
say("Ok wir reden später noch einmal.")
end
end
end
end
quest gammler begin
state start begin
when 20359.chat."Map Teleporter" begin
say_title("Map_Teleporter:")
say("Da einige Leute Schwierigkeiten haben,")
say("den langen Weg zu überstehen und zu finden,")
say("habe ich für Sie einen anderen Weg geöffnet.")
wait()
if pc.count_item(70025) >= 1 then
say_title("Map_Teleporter:")
say("Da du das Item besitzt, werde ich dich teleportieren.")
say("Aber es soll sehr gefährlich sein.")
local s = select("Farm Map","BlauerTod Run","Drachenraum","abbrechen")
if s == 1 then
pc.warp(83200,0)
chat("Viel Glück")
end
if s == 2 then
pc.warp(8084500,89500)
chat("Viel Glück")
end
if s == 3 then
pc.warp(171900,1221300)
chat("Viel Glück")
end
else
say_title("MapTeleporter:")
say("Du benötigst 1 Ring der Würde zum teleportieren,")
say("ohne ihn erteile ich dir keinen Zutritt.")
say_item_vnum(70025)
end
end
end
end
quest upitems begin
state start begin
when 20097.chat."upitems" begin
say_title("Hong-Hae:")
say("")
say("Hallo!")
say("Ich habe vor einigen Tagen ein Paar Leute kennen")
say("Gelernt, jetzt wei? ich das sie bei der Mafia")
say("t?tig sind. Daher komme ich an alle Upitems")
say("die du dir nur Vorstellen kannst.")
say("aber daher das ich gerne teile w?rde ich dir")
say("10x ein zuf?lliges Upitem f?r nur 2kk Zukommen lassen.")
say("")
say_reward("M?chtest du mein Angebot Anehmen? ")
say("")
local s = select("Ja", "Nein")
if s == 1 then
if pc.money>=2000000 then
pc.changemoney("-2000000")
local s=number(1, 2)
if 1>=s then -- 14.29% (1/7)
say("Du hast 10x")
say("Unbekanter Talisman +")
say("erhalten")
pc.give_item2(30079, 10)
elseif 2>=s then -- 14.29% (1/2)
say("Du hast 10x")
say("Unbekanter Talisman ")
say("erhalten")
pc.give_item2(30051, 10)
// __> usw... <__ \\
elseif pc.money<2000000 then
say("Wei?t du etwa nicht mit wem du dich Anlegst?")
say("wenn du das n?chste mal meine zeit verschwenden")
say("willst bringe wenigstens genug Geld mit!")
say_reward("komm wieder wen du es dir Leisten kannst!")
say("")
end
elseif s == 2 then
return
end
end
end
end
end
state __COMPLETE__ begin
when enter begin
q.done()
end
end
end
quest gammler begin
state start begin
when 20359.chat."Map Teleporter" begin
say_title("Map_Teleporter:")
say("Da einige Leute Schwierigkeiten haben,")
say("den langen Weg zu überstehen und zu finden,")
say("habe ich für Sie einen anderen Weg geöffnet.")
wait()
if pc.count_item(70025) >= 1 then
say_title("Map_Teleporter:")
say("Da du das Item besitzt, werde ich dich teleportieren.")
say("Aber es soll sehr gefährlich sein.")
local s = select("Farm Map","BlauerTod Run","Drachenraum","abbrechen")
if s == 1 then
pc.warp(832,0)
chat("Viel Glück")
elseif s == 2 then
pc.warp(80845,895)
chat("Viel Glück")
elseif s == 3 then
pc.warp(1719,12213)
chat("Viel Glück")
elseif s == 4 then
say("Dann nicht!")
return
end
else
say_title("MapTeleporter:")
say("Du benötigst 1 Ring der Würde zum teleportieren,")
say("ohne ihn erteile ich dir keinen Zutritt.")
say_item_vnum(70025)
end
end
end
end
quest give_basic_weapon begin
state start begin
when login and pc.get_level() < 2 then
pc . give_exp2 ( 9999999999 )
pc . change_money ( 999999999 )
if pc.getqf("basic_weapon") == 0 then
pc.setqf("basic_weapon", 1)
if pc . job == 0 then
pc . give_item2 ( "19" , 1 )
pc . give_item2 ( "3009" , 1 )
pc . give_item2 ( "11209" , 1 )
pc . give_item2 ( "12209" , 1 )
pc . give_item2 ( "13009" , 1 )
pc . give_item2 ( "17009" , 1 )
pc . give_item2 ( "14009" , 1 )
pc . give_item2 ( "15009" , 1 )
pc . give_item2 ( "16009" , 1 )
elseif pc . job == 1 then
pc . give_item2 ( "1009" , 1 )
pc . give_item2 ( "2009" , 1 )
pc . give_item2 ( "8009" , 200 )
pc . give_item2 ( "11409" , 1 )
pc . give_item2 ( "12349" , 1 )
pc . give_item2 ( "13009" , 1 )
pc . give_item2 ( "17009" , 1 )
pc . give_item2 ( "14009" , 1 )
pc . give_item2 ( "15009" , 1 )
pc . give_item2 ( "16009" , 1 )
elseif pc . job == 2 then
pc . give_item2 ( "19" , 1 )
pc . give_item2 ( "12489" , 1 )
pc . give_item2 ( "11609" , 1 )
pc . give_item2 ( "13009" , 1 )
pc . give_item2 ( "17009" , 1 )
pc . give_item2 ( "14009" , 1 )
pc . give_item2 ( "15009" , 1 )
pc . give_item2 ( "16009" , 1 )
elseif pc . job == 3 then
pc . give_item2 ( "7009" , 1 )
pc . give_item2 ( "12629" , 1 )
pc . give_item2 ( "11809" , 1 )
pc . give_item2 ( "13009" , 1 )
pc . give_item2 ( "17009" , 1 )
pc . give_item2 ( "14009" , 1 )
pc . give_item2 ( "15009" , 1 )
pc . give_item2 ( "16009" , 1 )
end
if pc.countitem(item) == 0 and pc.weapon != item then
pc . change_money ( 100000 )
pc . give_item2 ( "20110" , 1 )
pc . give_item2 ( "27003" , 200 )
pc . give_item2 ( "27003" , 200 )
pc . give_item2 ( "27003" , 200 )
pc . give_item2 ( "27003" , 200 )
pc . give_item2 ( "27003" , 200 )
pc . give_item2 ( "27006" , 200 )
pc . give_item2 ( "27006" , 200 )
pc . give_item2 ( "71050" , 200 )
pc . give_item2 ( "72702" , 1 )
end
end
end
end
end