Pisanie / Poprawa Questów !

nfsfankp50098 · 31 Sierpnia 2012

Witam pisałem questa na podstawie biologa i mam problem nie dropia mi itemki z potworów

wszystko się dobrze wgrywa wszystko działa bo testowałem ale itemki nie dropią z potworów

QUEST

http://wklej.to/VeGn4

Proszę o pilną pomoc jeszcze dziś

Kijana300 · 31 Sierpnia 2012

Co w tym jest źle ?

Gdy próbuje wgrać wyskakuje mi "qc in malloc() error allocation failed"Abort (core dumped)

quest czwarty begin

state start begin

when login or levelup* with pc.get_level >= 4

pc . give_item2 ( 13009 )

chat ("Dostales tarcze na 1LvL.")

end

Comthun · 31 Sierpnia 2012

Proszę o napisanie questa, gdy klikniemy na npc "handlarka roz." pojawi nam się napis " Zmiana bonusów " , Gdy klikniemy to pojawi sie pewna informacja , te urządzenie ,pozwala na mieszanie bonusów w przedmiotu w 1 pozycji ekwipunku itd " , ogólnie chodzi o quest który będzie zmieniał bony u npc.

Nagroda : Pakiet Lajków 10 X 5 ( 10 Lajków przez 5 dni)

Sunushi · 31 Sierpnia 2012

Proszę o napisanie questa, gdy klikniemy na npc "handlarka roz." pojawi nam się napis " Zmiana bonusów " , Gdy klikniemy to pojawi sie pewna informacja , te urządzenie ,pozwala na mieszanie bonusów w przedmiotu w 1 pozycji ekwipunku itd " , ogólnie chodzi o quest który będzie zmieniał bony u npc.

Nagroda : Pakiet Lajków 10 X 5 ( 10 Lajków przez 5 dni)

Może jeszcze frytki do tego? Napisz do Sui'ego albo ogólnie do ekipy Tiverii a na pewno się z nimi dogadasz. Możesz też napisać do Destructa bo też coś z tym kombinował (na 100% otrzymasz odpowiedź z całym questem + dodatkami)

Co w tym jest źle ?

Gdy próbuje wgrać wyskakuje mi "qc in malloc() error allocation failed"Abort (core dumped)

quest czwarty begin

state start begin

when login or levelup* with pc.get_level >= 4

pc . give_item2 ( 13009 )

chat ("Dostales tarcze na 1LvL.")

end

end

quest czwarty begin
state start begin
 when login or levelup with pc.get_level() >= 4 begin
  pc.give_item2(13009)
  chat("Dostales tarcze na 1LvL.")
 end
end
end

Mychuś · 31 Sierpnia 2012

Cześć, napisałem dziś mojego pierwszego questa, proszę o sprawdzenie i wskazanie mi błędów..
									   state start begin
														    when login or lebelup with pc.get_level(=5
																							 set_state(info)
			  end
	  end  
state info begin
																		    when letter begin
																										    local v = find_npc_by_vnum(xxx)
																										    if v !=0 then
																																		    target.vid("__TARGET__", v, "Nazwa Npc")				 
																										    end
																										    send_letter("Zielarstwo")
when button or info begin
																										    say_title("Zielarstwo")
																										    say("Udaj się do biologa")
																										    say("Ma on dla ciebie misje")
when_TARGET_.target.click or
																										    2011.chat."Podejdz bliżej, mam dla ciebie misje" begin   
																										    target.delete(_TARGET_")						
say("Musisz mi pomóc")
																										    say("Idz i zdobądz je dla mnie")
																										    say("Ostatnio widziałem jak mają je czarne orki")
																										    set_state(zdobadz kwiat)
																										    local s = select ("Tak" , "Nie")
																						    if s == 2 then
																														    say_title("Biolog:")
																														    say("No trudno, dozobaczenia.")
																														    set_state(__COMPLETE__)
																						    elseif s == 1 then
																														    say_title("Swietnie!")
																														    say("świetnie!")
																														    say("No ruszaj już!")
																														    set_state(krol)
				    end
									  end
 end
state kolejne_state begin
																							  when letter begin
												    send_letter("zdobądz kwiat")
		    end
									  when button or info begin
																	  say("zdobądz kwiat")
									  end
																	  when 100.kill with pc.countitem(xxx)==0 begin
										    local random = math.random(1)
										    if random == 1 then
										    pc.give_item2(xxx, 1)
										    say("zdobyłeś kwiat! Przynieś go Biologowi")
									  local v = find_npc_vnum(xxx)
									  if v != 0 then 
													  target.vid("_TARGET_", v, "Biolog")
									  end
	 end
    end
when 20016.chat."Udało Ci się!" with pc.countitem(xxx)>0 begin
target.delete("__TARGET__")
																		    say_title("Świetnie! Udało Ci się zdobyć kwiat")
																		    say("Dzięki tobie, teraz będę mógł zbadać ten kwiat.")
																		    say_reward("Oto twoja nagroda:")
																				    pc.remove_item(xxx, 1)
																							  pc.give+_item2(YYY)
								    set_state(_COMPLETE_)
								    end
			  end
																		    state __COMPLETE__  begin
						    end
end

Ultimate-Games · 31 Sierpnia 2012

Witam, mam problem z questem, mianowicie nie teleportuje na podane regeny:

http://wklej.to/6oJOo

TheHikariYami · 31 Sierpnia 2012

Dobrze napisany? Mój pierwszy quest

quest Inwazja_Smokow begin

state start begin

when login or levelup with pc.get_level >=** 75*

set_state(Poczatek)

end

state Poczatek begin

when letter begin

local v = find_npc_by_vnum(20355)

if v != 0 then

target.vid("__TARGET__", v, "Kapitan")

end

send_letter("Inwazja_Smokow")

when button or Poczatek begin

say_title("Smocza Inwazja!")

say("Smocze dziecie! Alduin dokonał kolejnego ataku na miasto, udaj się do Kapitana i porozmawiaj z nim")

say_reward("Pośpiesz się!")

end

when __TARGET__.target.click or 20355.chat.

"Inwazja_Smokow" begin

target.delete("__TARGET__")

say_title("Alduin znów atakuje!")

say("Smocze dziecie! Alduin zaatakował wszystkie chaty rybaków. Do odbudowy potrzebujemy dykt. Prosze, znajdź je.")

set_state(Szukanie)

end

state Szukanie begin

when letter begin

send_letter("Znajdź Dykte")

end

when button or Inwazja_Smokow begin

say("Znajdź Dykte")

end

when 2313.kill with pc.countitem(90012)==0 begin

local random = math.random(3)

if random == 1 then

pc.give_item2(90012, 50)

say("Znalazłes dykty!")

local v = find_npc_by_vnum(20355)

if v != 0 then

target.vid("__TARGET__", v, "Kapitan")

end

when 20355.chat."Inwazja Smokow" with pc.countitem(90012)>0 begin

target.delete("__TARGET__")

say_title("Gratulacje, udało Ci się!")

say("Bardzo dziękuje Smocze Dziecie, to bardzo nam pomoże!")

say("Oto Twoja nagroda!")

say_reward("Otrzymałeś KD Obrony oraz Uchylenia +5")

say("")

pc.remove_item(90012, 50)

pc.give_item2(28538)

pc.give_item2(28542)

set_state(__COMPLETE__)

end

I prosiłbym o zmienienie, że zamiast jednej dykty to 50x i 50x kamień fundacyjny.

Cięcina · 1 Września 2012

Może ktoś mi poprawić tego questa bo mam problem gdyż.. , wpisuje cd/usr/home/game/share.../quest

potem ./qc nazwaquest.quest

to mi go ścina przy wczytywaniu

gdzie tu jest problem proszę o pomoc

quest miastoduchow begin
state start begin
when 20095.chat."Teleportacja" begin
local main = select ( "pierwszy warp" , "Loch V3" , "Zombie V1" , "Anuluj" )
if main == 1 then
if pc . count_item ( 30001 ) >= 1 then
if pc . get_level ( ) >= 90 then
say_title ( "Miasto Duchów" )
say ( "Wchodzisz do miasta duchów? " )
say_item_vnum ( 30001 )
local wejdz = select ( "Tak" , "Nie" )
if wejdz == 1 then
pc . warp ( 105100 , 99 )
pc . remove_item ( 30001 , 1 )
end
else
say ( "Nie masz 90 poziomu." )
end
else
say ( "Nie masz listu." )
end
elseif main == 2 then
if pc . count_item ( 30001 ) >= 1 then
if pc . get_level ( ) >= 90 then
say_title ( "Drugi warp" )
say ( "Wchodzisz do drugiego warpa? " )
say_item_vnum ( 30001 )
local wejdz = select ( "Tak" , "Nie" )
if wejdz == 1 then
pc . warp ( 51200 , 563200 )
pc . remove_item ( 30001 , 1 )
end
else
say ( "Nie masz 90 poziomu." )
end
else
say ( "Nie masz listu." )
end
elseif main == 3 then
if pc . get_gold ( ) >= 1 then
if pc . get_level ( ) >= 80 then
say_title ( "Zombie V1" )
say ( "Czy jesteś pewień że chcesz wejść do Zombie V1? " )
local wejdz = select ( "Tak" , "Nie" )
if wejdz == 1 then
pc . warp ( 1.024e+06 , 537600 )
pc . change_gold ( - 1 )
end
else
say ( "Nie masz 90 poziomu." )
end
else
say ( "Nie masz 1 yang." )
end
end

DaMianOPLXD · 1 Września 2012

Potrzebuję quest, że gdy pójdę do npc o id 20114 (a raczej moba bo to wierzchowic ) To gdy na niego kliknę to mi się pojawiają 3 opcje:

Jaskinia Smoków

Katakumby

Wyjdź

Gdy kliknie Jaskinia smoków wyświetla mu się tekst: "Czy na pewno nie handlowałeś w ciągu ostatnich 10 sekund?"

Jest Tak lub Nie

Gdy kliknie Tak to go przenosi na kordy 666 666, ale najpierw zabiera mu item o id 10019

Gdy kliknie Nie to po prostu mu wychodzi z tego okna.

Katakumby:

Dzieje się to samo co @UP

Wyjdź: wychodzi z okienka.

Dziękuję!

szymano123 · 1 Września 2012

Proszę na napisanie questa:

lv 5.Ah-Yu : Witaj ! Mam wielki problem moje dziecko ma katar, nie spało od 3dni, jedynym lekarstwem jest receptura od Biologa. Pomożesz mu ?
Ja : Tak / Nie
Ah-Yu : Udaj się do biologa i poproś go o recepture.
Ja : Witaj, Ah-Yu prosiła o recepture, dasz mi ją ?
Biolog : Niestety, nie mam go już pewnego razu zabrały mi ją psy które mnie napadły, są one zaklęte w metinie walki.
Ja : Co mam z tym zrobic ?
Biolog : Rozbij 5metinów walki powinny z nich wypadac kiszki wilka, przynieś mi je a ja dam składniki dla Ah-Yu.
Ja : Ok
( po rozbiciu udajemy się do biologa i przekazujemy mu kiszki )
Nagroda za wykonianie zadania : 200k yang, 200dużych czerwonych potek.

Poleci limit przez tydzień i 5.

Cięcina · 1 Września 2012

Może ktoś mi poprawić tego questa bo mam problem gdyż.. , wpisuje cd/usr/home/game/share.../quest

potem ./qc nazwaquest.quest

to mi go ścina przy wczytywaniu

gdzie tu jest problem proszę o pomoc

Spoiler

quest miastoduchow begin

state start begin

when 20095.chat."Teleportacja" begin

local main = select ( "pierwszy warp" , "Loch V3" , "Zombie V1" , "Anuluj" )

if main == 1 then

if pc . count_item ( 30001 ) >= 1 then

if pc . get_level ( ) >= 90 then

say_title ( "Miasto Duchów" )

say ( "Wchodzisz do miasta duchów? " )

say_item_vnum ( 30001 )

local wejdz = select ( "Tak" , "Nie" )

if wejdz == 1 then

pc . warp ( 105100 , 99 )

pc . remove_item ( 30001 , 1 )

end

else

say ( "Nie masz 90 poziomu." )

end

else

say ( "Nie masz listu." )

end

elseif main == 2 then

if pc . count_item ( 30001 ) >= 1 then

if pc . get_level ( ) >= 90 then

say_title ( "Drugi warp" )

say ( "Wchodzisz do drugiego warpa? " )

say_item_vnum ( 30001 )

local wejdz = select ( "Tak" , "Nie" )

if wejdz == 1 then

pc . warp ( 51200 , 563200 )

pc . remove_item ( 30001 , 1 )

end

else

say ( "Nie masz 90 poziomu." )

end

else

say ( "Nie masz listu." )

end

elseif main == 3 then

if pc . get_gold ( ) >= 1 then

if pc . get_level ( ) >= 80 then

say_title ( "Zombie V1" )

say ( "Czy jesteś pewień że chcesz wejść do Zombie V1? " )

local wejdz = select ( "Tak" , "Nie" )

if wejdz == 1 then

pc . warp ( 1.024e+06 , 537600 )

pc . change_gold ( - 1 )

end

else

say ( "Nie masz 90 poziomu." )

end

else

say ( "Nie masz 1 yang." )

end

DaMianOPLXD · 1 Września 2012

Poprawi ktoś to? Będę wdzięczny

quest warpy begin
   state start begin
    when 20114.chat."Teleportacja"  begin
	    local main = select { "Jaskinia Smoka" , "Ukryta Krypta" , "Anuluj" }
    if main == 1 then
if pc.count_item("30190") >= 1 then
if pc.get_level ( ) >= 75 then
say_title ( "Straznik krypt: " )
say ( "Czy na pewno w ciagu ostatnich " )
say ( "10 sekund nie otwierales zadnego sklepiku? " )
say_item_vnum ("30190")
local wejdz = select ( "Tak!" , "Nie!" )
if wejdz == 1 then
pc.warp ( 378 , 680 )
pc.remove_item ( 30190 , 1 )
end
elseif
say ( "Nie masz 75 poziomu." )
end
elseif
say ( "Potrzebujesz Serce Bera!" )
end
elseif main == 2 then
if pc.count_item ( 30190 ) >= 1 then
if pc.get_level ( ) >= 100 then
say_title ( "Drugi warp" )
say ( "Czy na pewno w ciagu ostatnich " )
say ( "10 sekund nie otwierales zadnego sklepiku? " )
say_item_vnum ( 30190 )
local wejdz = select ( "Tak!" , "Nie!" )
if wejdz == 1 then
pc.warp ( 51200 , 563200 )
pc.remove_item ( 30190 , 1 )
end
elseif
say ( "Nie masz 100 poziomu." )
end
elseif
say ( "Potrzebujesz Krwistego Kamienia!" )
end
end

JonyNawa1ony · 1 Września 2012

DaMianOPLXD,

dodaj 3 x end na końcu.

DaMianOPLXD · 1 Września 2012

@UP Nadl nie działa

ZbieramPlusiki · 2 Września 2012

Sproboj z 3 endami

elseif

say ( "Potrzebujesz Krwistego Kamienia!" )

end

JonyNawa1ony · 2 Września 2012

No ale napisz co dokładnie nie działa!

Czy przy wgrywaniu questa na serwer, czy w grze do pewnego momentu.

Tak to nie wiadomo co trzeba poprawić...

kron123 · 3 Września 2012

Chciałbym aby ktoś napisał mi, jak zrobić, aby serwer posiadał maksymalny lvl, czyli 250. Na serwie teraz mam 150.

misiecki2 · 3 Września 2012

Czy mógłby ktoś napisać mi questa na reborn czyli:

Dobijamy 250

Idziemy do jakiegoś npc

Klikamy

Wybieramy opcję reborn

gadamy

Ten npc zeruje na lvl (do 1lvl) ale daje w każdy status po x punktów czyli siła zręczność itp.

Cięcina · 4 Września 2012

Elo

Czy ktoś może poprawić mi tego questa bo wyskakuje mi błąd przy wczytywaniu ;/

say_size(256,256) - wymiary
setbgimage("papirus.tga") - wywolanie obrazka
---------------------------------------------
-- Itemshop Informationen -
---------------------------------------------
quest shop_info begin
state start begin
when login begin
send_letter("SikiMT2")
end
when button or info begin
say_title("SikiMT2")
say_trawa("")
say_trawa("SikiMT2 Medium Dedyk")
say_trawa("Pamietaj! Uzywanie hackow oraz przeklinanie")
say_trawa("Moze grozic banem!")
say_trawa("Widzisz kogos kto uzywa cheatow?")
say_trawa("Koniecznie wejdz na ")
say_trawa("Forum i zgłoś to!")
say_banan("Team SikiMT2 Zyczy milej Gry")
say(" ")
end
end
end

misiecki2 · 5 Września 2012

Siema. Wpisuję ścieżkę do quest, wpisuję ./qc reborn.quest i wywala mi takie coś:

must start with 'quest'

reborn.quest:1:Abort (core dumped)

http://wklej.to/lzOAp

Czy może ktoś to poprawić. Z góry dzięki.

misiecki2 · 5 Września 2012

Teraz mam takie coś:

http://wklej.to/OIoxV

Działa ale po tej gadaninie ze dostaniesz to to i to, wciskam kontynuuj i wyłącza się quest i nic się nie dzieje, może ktoś sprawdzić?

Cięcina · 5 Września 2012

Elo poprawiłby mi ktoś tego questa

http://wklej.to/QOuP2

bo wyskakuje mi błąd oto ss :

http://imageshack.us/photo/my-images/440/beztytuuein.jpg/

Mateo193 · 5 Września 2012

Elo poprawiłby mi ktoś tego questa

http://wklej.to/QOuP2

bo wyskakuje mi błąd oto ss :

http://imageshack.us...eztytuuein.jpg/

używaj tabulatorów.

http://wklej.to/7WLs1

PS. jak nie działa to masz wgl ten obrazek i te funckje.? (np. say_trawa)

misiecki2 · 6 Września 2012

Mógłby ktoś poprawić tego questa:

quest reborn begin
state start begin
when login or levelup with pc.get_level() == 250 begin
set_state(poczatek)
end
end

state poczatek begin
when 20004.chat."Dodatki" begin
local brak_kasa = "Niestety, ale nie masz 200.000.000 Yang."
local zly_lvl = "Niestety potrzebujesz 250lvl"
local reborn = pc.getqf("reborn")
local money = 200000000
local lvl = pc.get_level()
local a = select("Zrób Reborna","Anuluj")
if a == 1 then
 if pc.get_level () == 250 then
 if pc.get_money() >= money then
 say(" Oto bonusy jakie otrzymasz po rebornach ")
 say(" Po pierwszym +500 ataku ")
 say(" Po drugim + 1500 obrony ")
 say(" Po trzecim + 40% speeda ")
 say(" Po czwartym + 30% szybkości ataku ")
 say(" Dodatkowo będziesz mieć 1 lvl ")
 wait()
 pc.set_level ( '50' )

 if reborn == 1 then
	 affect.add_collect(apply.ATT_GRADE_BONUS, 500, 60*60*24*365*60)
	 pc.setqf("reborn", pc.getqf("reborn")+1)
 elseif reborn == 2 then
	 affect.add_collect(apply.DEF_GRADE_BONUS, 1500, 60*60*24*365*60)
	 pc.setqf("reborn", pc.getqf("reborn")+1)
 elseif reborn == 3 then
	 affect.add_collect(apply.MOV_SPEED, 40, 60*60*24*365*60)
	 pc.setqf("reborn", pc.getqf("reborn")+1)
 elseif reborn == 4 then
	 affect.add_collect(apply.ATT_SPEED, 30, 60*60*24*365*60)
	 pc.setqf("reborn", pc.getqf("reborn")+1)
 elseif reborn >= 5 then
	 say("Nie możesz zrobić więcej rebornów ")
	 return
 end
 else
 chat(brak_kasa)
 return
 end
 else
 chat(zly_lvl)
 return
 end
end
end
end
end

Questa wczytało, ale nie wiem czy dobrze jest to: pc.set_level ( '50' )

Bo być może przez to nie chcę po wciśnięciu dodatki--->Zrób reborna

nie miałem kasy pojawiło się, dodałem kasę wracam:

dodatki---> zrób reborna i pojawia sie co dostanę --->kontynuuj---->Wyłacza sie okienko i nic się nie dzieje, eq jak coś zdjęte

Sunushi · 6 Września 2012

Mógłby ktoś poprawić tego questa:

quest reborn begin
state start begin
when login or levelup with pc.get_level() == 250 begin
set_state(poczatek)
end
end

state poczatek begin
when 20004.chat."Dodatki" begin
local brak_kasa = "Niestety, ale nie masz 200.000.000 Yang."
local zly_lvl = "Niestety potrzebujesz 250lvl"
local reborn = pc.getqf("reborn")
local money = 200000000
local lvl = pc.get_level()
local a = select("Zrób Reborna","Anuluj")
if a == 1 then
 if pc.get_level () == 250 then
 if pc.get_money() >= money then
 say(" Oto bonusy jakie otrzymasz po rebornach ")
 say(" Po pierwszym +500 ataku ")
 say(" Po drugim + 1500 obrony ")
 say(" Po trzecim + 40% speeda ")
 say(" Po czwartym + 30% szybkości ataku ")
 say(" Dodatkowo będziesz mieć 1 lvl ")
 wait()
 pc.set_level ( '50' )

 if reborn == 1 then
	 affect.add_collect(apply.ATT_GRADE_BONUS, 500, 60*60*24*365*60)
	 pc.setqf("reborn", pc.getqf("reborn")+1)
 elseif reborn == 2 then
	 affect.add_collect(apply.DEF_GRADE_BONUS, 1500, 60*60*24*365*60)
	 pc.setqf("reborn", pc.getqf("reborn")+1)
 elseif reborn == 3 then
	 affect.add_collect(apply.MOV_SPEED, 40, 60*60*24*365*60)
	 pc.setqf("reborn", pc.getqf("reborn")+1)
 elseif reborn == 4 then
	 affect.add_collect(apply.ATT_SPEED, 30, 60*60*24*365*60)
	 pc.setqf("reborn", pc.getqf("reborn")+1)
 elseif reborn >= 5 then
	 say("Nie możesz zrobić więcej rebornów ")
	 return
 end
 else
 chat(brak_kasa)
 return
 end
 else
 chat(zly_lvl)
 return
 end
end
end
end
end

Questa wczytało, ale nie wiem czy dobrze jest to: pc.set_level ( '50' )

Bo być może przez to nie chcę po wciśnięciu dodatki--->Zrób reborna

nie miałem kasy pojawiło się, dodałem kasę wracam:

dodatki---> zrób reborna i pojawia sie co dostanę --->kontynuuj---->Wyłacza sie okienko i nic się nie dzieje, eq jak coś zdjęte

Nie da się cofnąć poziomu, już Ci to pisałem.

Elo poprawiłby mi ktoś tego questa

http://wklej.to/QOuP2

bo wyskakuje mi błąd oto ss :

http://imageshack.us...eztytuuein.jpg/

---------------------------------------------
-- Itemshop Informationen -
---------------------------------------------
quest shop_info begin
state start begin
 when login begin
  send_letter("TwierdzaMT2")
 end

 when button or info begin
  say_size(256,256)
  setbgimage("papirus.tga")
  say_title("TwierdzaMT2")
  say_trawa("")
  say_trawa("TwierdzaMT2 Medium Dedyk")
  say_trawa("Pamietaj! Uzywanie hackow oraz przeklinanie")
  say_trawa("Moze grozic banem!")
  say_trawa("Widzisz kogos kto uzywa cheatow?")
  say_trawa("Koniecznie wejdz na ")
  say_trawa("Forum i zgłoś to!")
  say_banan("Team TwierdzaMT2 Zyczy milej Gry")
  set_state(__COMPLETE__)
 end
end

state __COMPLETE__ begin
end
end

Zaloguj się

👋 Witaj na MPCForum!

Pisanie / Poprawa Questów !

Rekomendowane odpowiedzi

Zarchiwizowany