Pisanie / Poprawa Questów !

pati9428 · 30 Października 2012

Przerobi mi ktos ten quest i sprawdzi ? Bo pokickalem caly kod .:

quest move_ring begin
state start begin
when 40001.use begin
say_title("Pierscien Gracza:")
say(pc.get_name()..", gdzie chcesz się udać?:")
say("")
local s = select("Moje Miasto","Główne Miasta","Drugie Miasto","Ekspowiska Łatwe","Ekspowiska Trudne","Dalej","Wyjdź ")
if s == 1 then
local empire = pc . get_empire ( )
if empire == 1 then
pc . warp ( 474300 , 954800 )
elseif empire == 2 then
pc . warp ( 63800 , 166400 )
elseif empire == 3 then
pc . warp ( 959900 , 269200 )
return
end
elseif s == 2 then
say_title("Pierścień Teleportacji:")
say(pc.get_name().." do którego miasta chcesz się wybrać?")
local s = select ("Shinsoo","Chunjo","Jinno","Rezygnuję ")
if s == 1 then
pc.warp(474300,954800)
elseif 2 == s then
pc.warp (63800,166400)
elseif 3 == s then
pc.warp(959900,269200)
elseif 4 == s then
return
end
elseif s == 3 then
say_title("Pierścień Teleportacji:")
say(pc.get_name().." do którego miasteczka chcesz się wybrać?" )
local s = select("Shinsoo","Chunjo","Jinno","Wyjdź ")
if s == 1 then
pc.warp(353100,882900)
elseif 2 == s then
pc.warp(145500,240000)
elseif 3 == s then
pc.warp(863900,246000)
elseif 4 == s then
return
end
elseif s == 4 then
say_title("Pierścień Teleportacji:")
say("Wybierz miejsce do którego chcesz się udać ")
local s = select("Dolina Seungryong","Pustynia Yongbi","Góra Sohan","Loch Pająków v1","Ognista Ziema","Wyjdź " )
if s == 1 then
local empire = pc.get_empire()
if empire == 1 then
pc.warp ( 402100 , 673900 )
elseif empire == 2 then
pc.warp ( 270400 , 739900 )
elseif empire == 3 then
pc.warp ( 321300 , 808000 )
end
elseif 2 == s then
local empire = pc . get_empire ( )
if empire == 1 then
pc.warp ( 217800 , 627200 )
elseif empire == 2 then
pc.warp ( 221900 , 502700 )
elseif empire == 3 then
pc.warp ( 344000 , 502500 )
end

elseif 3 == s then
local empire = pc . get_empire ( )
if empire == 1 then
pc.warp ( 434200 , 290600 )
elseif empire == 2 then
pc.warp ( 375200 , 174900 )
elseif empire == 3 then
pc.warp ( 491800 , 173600 )
end
elseif 4 == s then
local empire = pc . get_empire ( )
if empire == 1 then
pc.warp ( 60000 , 496000 )
elseif empire == 2 then
pc.warp ( 60000 , 496000 )
elseif empire == 3 then
pc.warp ( 60000 , 496000 )
end
elseif 5 == s then
local empire = pc . get_empire ( )
if empire == 1 then
pc.warp ( 599400 , 756300 )
elseif empire == 2 then
pc.warp ( 597800 , 622200 )
elseif empire == 3 then
pc.warp ( 730700 , 689800 )
end
else
return
end

elseif s == 5 then
say_title("Pierścień Teleportacji:")
say("Wybierz miejsce do którego chcesz się udać ")
local s = select ("2 Poziom Lochu Pająków" , "Czerwony Las" , "Atlantyda", "2 Poziom Atlantydy", "Wyjdź ")
if s == 1 then
pc.warp(704100,464100)
elseif 2 == s then
pc.warp(1119900,70800)
elseif 3 == s then
pc.warp(100,1211700)

elseif 4 == s then
pc.warp(241800,1275000)

elseif 5 == s then
return
end
elseif s == 6 then
say_title("Pierścień Gracza:")
local z = select ("Inne","Dozorca","ItemShop","Usuń Efekt Polimorfii","Rezygnuję ")
if z == 1 then
say_title("Pierścień Gracza:")
local s = select ("Przed DT","Przed Świątynie","Mapa Przeklętych","Rezygnuję ")
if s == 1 then
pc.warp ( 590500 , 110500 )
if s == 2 then
pc.warp ( 332600, 746800 )
end
if s == 3 then
local a = select ( "Jungrang Shinsoo ", "Waryong Chunjo ", "Imha Jinno ", "Anuluj " )
if a == 1 then
pc.warp(135600, 4300)
elseif a == 2 then
pc.warp(221900, 9300)
elseif a == 3 then
pc.warp (271800, 13000)
elseif a == 4 then
elseif z == 2 then
game.open_safebox()
if z == 3 then
say("Dodać !")
if z == 4 then
say_title ("Czy Napewno Chcesz Kontynuowac?")
local scelta = select ( "Tak","Nie" )
if scelta==1 then
pc.polymorph ( 1, 1 )
elseif scelta==2 then
if z == 5 then
end
end
end
end
end
end
end
end
end
end
end
end

z gory dziekuje

Mam drugi quest do przerobienia :

Chciałbym aby pieczęć na która klikniemy była zakładana w slot gdzie buty wiatru , maska uczuc oraz zeby byl odliczany czas tylko wtedy kiedy ja uzywamy.

------------------------
--Jazda na wierzchowcu1
------------------------
quest M_03 begin
state start begin
when 71117.use begin
if pc.getqf("next_time_use") > get_time() then
local iRest = pc.getqf("next_time_use")-get_time()
syschat("By użyć pieczęci poczekaj "..iRest.." Sekund!")
elseif horse.get_level() < 11 then
syschat("By użyć Mocy Wierzchowca musisz posiadać conajmniej Konia Bojowego!")
else
local iMount03 = 20112 -- Id Wierzchowca
command("unmount")
horse.unsummon()
horse.summon() horse.ride()
pc.mount(iMount03, 180)
pc.setqf("next_time_use",get_time()+18*10)
pc.mount_bonus(apply.MOV_SPEED,50,180)
end
end
end
end

Spookie · 30 Października 2012

Witam.

Potrzebuje quest na start.

W quescie ma się znajdować:

-150lvl na start

-Stal+9

-Biżuteria 54+9

-Broń 65+9

-Militar 21lvl

-Księga militarnego konia, pierścień teleportacji, duże poty po 200, 200peleryn

Bardzo dziękuje osobie która pomoże, i wynagrodzę lajkami.

motobi17 · 31 Października 2012

quest blasku begin

state start begin

when kill begin

local szansa = number(1, 100)

if szansa == 1 then

game.drop_item(50011)

end

moze ktos mi przerobic quest zeby np jak mamy 20 lvl a potwor 30 to szkata nie dropnie czyli do 10 lvl moze miec postac od potwora zeby cos droplo przerobi ktos ? np tak jak jest na ravi .... jesli kto gral

sankixd · 31 Października 2012

Witam.

Potrzebuje quest na start.

W quescie ma się znajdować:

-150lvl na start

-Stal+9

-Biżuteria 54+9

-Broń 65+9

-Militar 21lvl

-Księga militarnego konia, pierścień teleportacji, duże poty po 200, 200peleryn

Bardzo dziękuje osobie która pomoże, i wynagrodzę lajkami.


quest itemy begin
state start begin
when login begin
if pc . getqf ( 'itemy' ) == 0 then
pc . setqf ( 'itemy' , 1 )
local item = 10
if pc . job == 0 then
pc . give_item2 ( '149' )
pc . give_item2 ( '3139' )
pc . give_item2 ( '11299' )
pc . give_item2 ( '12249' )
elseif pc . job == 1 then
pc . give_item2 ( '1109' )
pc . give_item2 ( '2149' )
pc . give_item2 ( '11499' )
pc . give_item2 ( '12389' )
elseif pc . job == 2 then
pc . give_item2 ( '159' )
pc . give_item2 ( '249' )
pc . give_item2 ( '11699' )
pc . give_item2 ( '12529' )
elseif pc . job == 3 then
pc . give_item2 ( '5109' )
pc . give_item2 ( '7139' )
pc . give_item2 ( '12669' )
pc . give_item2 ( '11899' )
end
if pc . countitem ( item ) == 0 and pc . weapon != item then
say(" Twoj tekst ")
say(" Twoj tekst ")
say(" Twoj tekst ")  
say(" Twoj tekst " )
say(" Twoj tekst " )
for i = 1, 150 do
pc.give_exp2(pc.get_next_exp())
end
pc . give_item2 ( 14209 )
pc . give_item2 ( 15209 )
pc . give_item2 ( 16209 )
pc . give_item2 ( 17209 )
pc . give_item2 ( 27003, 200 )
pc . give_item2 ( 27006, 200 )
pc . give_item2 ( 39006, 200 )
pc . give_item2 ( 50053 )
pc . give_item2 ( idpierscieniateleportacji )
horse.set_level ( 21 )
horse . ride ()
pc.set_skill_level ( 131 , 10 )
end
end
end
end
end

powinno śmigać. wpisz sobie id pierścienia teleportacji, nie wiem pod jakim masz.

z4z0l · 31 Października 2012

Spróbuj najpierw polskie znaki usunąć albo np
say_reward("Otrzymałes....")
przerób na:
say_reward(" Otrzymałeś... ")
tzn wyraz z polskim znakiem nie może być zaraz przy cudzysłowie. najprościej jest pousuwać polskie znaki i wtedy spróbować czy działa quest.

A jak wrzucasz na serwer (komenda ./qc nazwaquestu.quest) to nie wypluwa Ci jakichś błędów?

Ziomeczku źle mówisz. Nie może być takiej postaci :

say("TESTOWY TEKZD Z LICZBĄ")

Takie coś zadziała :

say("TESTOWĄ TEKZDÓWNĄ Z LICZBĄ ")

Najważniejsza jest spacja PRZED CUDZYSŁOWEM

sankixd · 31 Października 2012

@up

nie wiem czy wiesz, ale interpreter czyta ciąg znaków(string) a spacja czyli " " jest białym znakiem, wiec jeśli w słowie przy cudzysłowie będzie polski znak to nie zadziała. dlatego mu powiedziałem, żeby zmienił, więc czytaj ze zrozumieniem a tak nawiasem mówiąc, najważniejsze jest by polski znak nie był bezpośrednio przy cudzysłowie, bo sam mam nieraz tak, że raz zadziała jeśli polski znak był gdzieś w słowie przy cudzysłowie to raz śmigało a raz nie. Także wole mu przekazać żeby od razu tak robił

gryzon95 · 31 Października 2012

Nie używałem opcji ./qc przy wgrywaniu tego questa tylko komendę /reload q, więc żadnych błedów nie widzialem.

Wrócę do domu i spróbuję tak jak mówiliście ;p. Choć już wiedziałem o tych polskich znakach dlatego stawaiełm spacjęp rzed cudzysłowiem.

Myślałem, że popełniłem błąd gdzieś indziej ;x.

Veygr · 31 Października 2012

@up, reload q przeładowuje ci questy które są w object, a żeby one się tam znalazły to trzeba użyć ./qc.

@2up. Jeżeli zrobisz coś takiego ("Otrzymałeś") to będzie to błąd, ale jeżeli zrobisz ("Otrzymałeś "), czyli spacje między " a PL znakiem to quest wgra się poprawnie.

sankixd · 31 Października 2012

@up

no to o to mi chodziło ;D

baran860 · 31 Października 2012

Witam czy w ten sposób napisany quest jest poprawny ??

say("która aż pulswała energią, zanieśli więc ją do swojego Generała.")

say("Niestety nic więcej nie wiem ponieważ zauważyłem Uriela i przestaliśmy rozmawiać.")

say(" ")

say("Powinieneś jednak szukać informacji u generała Setaou.")

set_state(repor)

end

state repor begin

when letter begin

send_letter("Generał i informacje.")

end

when button or info begin

say("Niepokaźny pieszy powiedział Ci gdzie szukać informacji.")

say("Zabij więc Generała Setaou aby wiciągnąć odpowiednie informacje")

end

when 101.kill with pc.getqf("kill_count") >=1 begin

local v = find_npc_by_vnum(101)

if v != 0 then

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

end

when letter begin

send_letter("Tabliczka")

end

when button or info begin

say("Z Genarała wypadła jakaś tabliczka")

say("Zanieś ją do Uriel")

set_state(tabliczkadouriela)

end

state tabliczkadouriela begin

when __TARGET__.target.click or 20011.chat."Znaleziona Tabliczka" begin

target.delete("__TARGET__")

say_title("Uriel:")

say("")

say("Co!? Masz coś?")

Czy muszę to zapisać w ten sposób:

say("która aż pulswała energią, zanieśli więc ją do swojego Generała.")

say("Niestety nic więcej nie wiem ponieważ zauważyłem Uriela i przestaliśmy rozmawiać.")

say(" ")

say("Powinieneś jednak szukać informacji u generała Setaou.")

set_state(repor)

end

state repor begin

when letter begin

send_letter("Generał i informacje.")

end

when button or info begin

say("Niepokaźny pieszy powiedział Ci gdzie szukać informacji.")

say("Zabij więc Generała Setaou aby wiciągnąć odpowiednie informacje")

end

when 101.kill with pc.getqf("kill_count") >=1 begin

local v = find_npc_by_vnum(101)

if v != 0 then

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

end

state tabliczkadouriela begin

when letter begin

send_letter("Tabliczka")

end

when button or info begin

say("Z Genarała wypadła jakaś tabliczka")

say("Zanieś ją do Uriel")

set_state(tabliczkadouriela)

end

when __TARGET__.target.click or 20011.chat."Znaleziona Tabliczka" begin

target.delete("__TARGET__")

say_title("Uriel:")

say("")

say("Co!? Masz coś?")

Chodzi mi o wysłanie tych listów zboku, czy mogę je "wysłać" na początku state i na końcu czy muszę utworzyć nowe state i wtedy "wysłać" Mam nadzieje że ktoś to zrozumie.

Całość questa:

http://wklej.to/SPFwD

Quest wgrywa mi się poprawnie natomiast w grze nawet go nie widać. Po wgraniu wpisywałem /reload q jak i restartowałem serwer ale nic ;/ mam 250lv ale quest w dalszym ciągu się nie pokazuje.

I kolejne pytanie a w zasadzie to dwa.

-Jeśli mam strasznie długi tekst to jak go podzielić tzn co zrobić aby był przycisk kontynuuj? Czy tekst automatycznie się podzieli?

-Co zrobić aby można było klikać ENTER i quest się zamknie podam przykład bo się nie umiem wysłowić

Klikam na księge przywołania konia i wyskakuje mi info że koń został przywołany i teraz mogę myszką nacisnąć OK ale ja chciałbym ENTEREM to zamykać, tak jak na PL'u.

sankixd · 31 Października 2012

Witam czy w ten sposób napisany quest jest poprawny ??

say("która aż pulswała energią, zanieśli więc ją do swojego Generała.")

say("Niestety nic więcej nie wiem ponieważ zauważyłem Uriela i przestaliśmy rozmawiać.")

say(" ")

say("Powinieneś jednak szukać informacji u generała Setaou.")

set_state(repor)

end

end

state repor begin

when letter begin

send_letter("Generał i informacje.")

end

when button or info begin

say("Niepokaźny pieszy powiedział Ci gdzie szukać informacji.")

say("Zabij więc Generała Setaou aby wiciągnąć odpowiednie informacje")

end

when 101.kill with pc.getqf("kill_count") >=1 begin

local v = find_npc_by_vnum(101)

if v != 0 then

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

end

end

when letter begin

send_letter("Tabliczka")

end

when button or info begin

say("Z Genarała wypadła jakaś tabliczka")

say("Zanieś ją do Uriel")

set_state(tabliczkadouriela)

end

end

state tabliczkadouriela begin

when __TARGET__.target.click or 20011.chat."Znaleziona Tabliczka" begin

target.delete("__TARGET__")

say_title("Uriel:")

say("")

say("Co!? Masz coś?")

Czy muszę to zapisać w ten sposób:

say("która aż pulswała energią, zanieśli więc ją do swojego Generała.")

say("Niestety nic więcej nie wiem ponieważ zauważyłem Uriela i przestaliśmy rozmawiać.")

say(" ")

say("Powinieneś jednak szukać informacji u generała Setaou.")

set_state(repor)

end

end

state repor begin

when letter begin

send_letter("Generał i informacje.")

end

when button or info begin

say("Niepokaźny pieszy powiedział Ci gdzie szukać informacji.")

say("Zabij więc Generała Setaou aby wiciągnąć odpowiednie informacje")

end

when 101.kill with pc.getqf("kill_count") >=1 begin

local v = find_npc_by_vnum(101)

if v != 0 then

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

end

end

end

state tabliczkadouriela begin

when letter begin

send_letter("Tabliczka")

end

when button or info begin

say("Z Genarała wypadła jakaś tabliczka")

say("Zanieś ją do Uriel")

set_state(tabliczkadouriela)

end

when __TARGET__.target.click or 20011.chat."Znaleziona Tabliczka" begin

target.delete("__TARGET__")

say_title("Uriel:")

say("")

say("Co!? Masz coś?")

Chodzi mi o wysłanie tych listów zboku, czy mogę je "wysłać" na początku state i na końcu czy muszę utworzyć nowe state i wtedy "wysłać" Mam nadzieje że ktoś to zrozumie.

Całość questa:
http://wklej.to/SPFwD
Quest wgrywa mi się poprawnie natomiast w grze nawet go nie widać. Po wgraniu wpisywałem /reload q jak i restartowałem serwer ale nic ;/ mam 250lv ale quest w dalszym ciągu się nie pokazuje.

I kolejne pytanie a w zasadzie to dwa.

-Jeśli mam strasznie długi tekst to jak go podzielić tzn co zrobić aby był przycisk kontynuuj? Czy tekst automatycznie się podzieli?

-Co zrobić aby można było klikać ENTER i quest się zamknie podam przykład bo się nie umiem wysłowić

Klikam na księge przywołania konia i wyskakuje mi info że koń został przywołany i teraz mogę myszką nacisnąć OK ale ja chciałbym ENTEREM to zamykać, tak jak na PL'u.

1 pyt. - jeśli masz strasznie długi tekst, to możesz go podzielić poprzez wpisanie w tym tekscie [ENTER] np. say(" to jest taki jakis fajny tekst[ENTER]a to juz jest w następnej linii ") bądź też po prostu poprzez wpisywanie linijke w następnym say'u.

2 pyt - nie mam pojęcia, dopiero odświeżam swoją wiedzę.

co do Twojego questu,


state tabliczkadouriela begin

when letter begin
send_letter("Tabliczka")
end

when button or info begin
say("Z Genarała wypadła jakaś tabliczka")
say("Zanieś ją do Uriel")
set_state(tabliczkadouriela)
end

nie ma to najmniejszego sensu. zapętla Ci się state, w zasadzie wogole to wogole nie zadziała.

Sprawdź w tekstach, czy czasem nie masz przy jakimś cudzysłowie polskiego znaku, literówka i cały quest moze nie śmigać.

a co do pierwszego pytania, nie musisz w nowym state dawać, byle by przed

when button or info begin...

był wysłany list

when letter begin...
send_letter("tekst")...

piotrekkkkkk · 31 Października 2012

Czy można odczytać qf z danego questa w innym queście typu

mam quest abc, w którym qf("abcd") wynosi 20 i chcę ten qf ("abcd") odczytać w queście xyz

Czy jest to możliwe?

dLuKaShs · 31 Października 2012

Witam. Może ktoś napisać lub ma działający quest żeby co 5-10min wysyłał wiadomość np: Administracja nie prosi o passy do konta itd Z góry dzięki

sankixd · 31 Października 2012

Witam. Może ktoś napisać lub ma działający quest żeby co 5-10min wysyłał wiadomość np: Administracja nie prosi o passy do konta itd Z góry dzięki


quest automatyczna  begin
       state start  begin
               when 20095.chat."Automatyczna wiadomosc" with pc.is_gm()  begin
                       say_title("Seon-Hae:")
                       say("Czy chcesz uruchomic automatyczne wyswietlanie?")
                       say("Wiadomosc na czacie co 10 minut?")
                       local s = select("Tak", "Nie")
                       if s == 2 then
                               return
                       elseif s == 1 then
                               clear_server_timer('notice_on_chat', get_server_timer_arg())
                               server_timer('notice_on_chat', 10*60, get_server_timer_arg())
                       end
               end
               when notice_on_chat.server_timer  begin
                       notice_all(" Wszelkie Bugi oraz błędy zgłaszać na forum w odpowiednim dziale. ")
notice_all(" Serwer jest dopracowywany, prosimy o cierpliwość i wyrozumialosc ")
                                               clear_server_timer('notice_on_chat', get_server_timer_arg())
                       server_timer('notice_on_chat', 10*60, get_server_timer_arg())
               end
       end
end

co 10 min, teksty w notice_all("tekstteksttekst") sobie przeedytuj.

gryzon95 · 1 Listopada 2012

Witam. Poprawił by mi ktoś quest Pierścienia Teleportacji ? Dodałem pozycję 7 "Zestaw expowicza". Próbowałem znaleźć błędy ale nie udało mi się. Po przeładowaniu questów pierścien nie otwiera sie.

http://wklej.to/cMhFV

Z góry dziękuje. Nagradzam lajkami i +.

Ponawiam ;/. Podpowie mi ktoś czemu ustrojstwo nie chce działać ;x ?

P.S dodałem spacje " say_reward("blbalbla ") "

piotrekkkkkk · 1 Listopada 2012

a gdzie masz

quest nazwa begin
state start begin
when id_pierscienia.use begin

?

sankixd · 1 Listopada 2012

Witam. Poprawił by mi ktoś quest Pierścienia Teleportacji ? Dodałem pozycję 7 "Zestaw expowicza". Próbowałem znaleźć błędy ale nie udało mi się. Po przeładowaniu questów pierścien nie otwiera sie.

http://wklej.to/cMhFV

Z góry dziękuje. Nagradzam lajkami i +.

Ponawiam ;/. Podpowie mi ktoś czemu ustrojstwo nie chce działać ;x ?

P.S dodałem spacje " say_reward("blbalbla ") "

a wgrywa Ci się dobrze komendą ./qc ~ ? nie daje żadnych błędów ? no i tak jak piotrekkkkkk mowil gdzie masz początek questu

TheKamilPolska · 1 Listopada 2012

Proszę o napisanie questa.

Typ:List po lewej stronie

Wymiana 480kk na bryłkę.

Ilosc razy:nie skonczona

Dziękuje.

JonyNawa1ony · 1 Listopada 2012

TheKamilPolska, proszę:

http://wklej.to/2cVwg

quest wymiana_yang begin
state start begin
when login begin
set_state(kaska)
end
end

state kaska begin
when letter begin
send_letter("Potrzebuję 480kk Yang")
end

when button or info begin
say_title("Darmowa kasa")
say("")
say_reward("Czy chciałbyś otrzymać 480.000.000Yang?")
local wybor = select("Tak","Nie")
if wybor == 2 then
return
elseif wybor == 1 then
if pc.get_money() >= 1520000000 then
say_title("Darmowa kasa")
say("")
say("Niestety posiadasz za dużo Yang.")
else
say_title("Darmowa kasa")
say("")
say_reward("Otrzymałeś: 480.000.000Yang.")
pc.change_money(480000000)
say("")
say_title("Informacja:")
say_reward("Z tej funkcji możesz korzystać do woli.")
end
end
end
end
end

TheKamilPolska · 1 Listopada 2012

dzienks

Kossik · 1 Listopada 2012

ktoś poprawi mi tego questa ?

-------------------------------------------------------------------
---  Misja by Czarny dla CzarnyMT2 oraz Czarny-questy.cba.pl ---
--- Prosze o nie przypisywanie sobie cudzej pracy! Pozdrawiam ---
---    Życzę miłej zabawy i powodzenia     ---
-------------------------------------------------------------------

quest wymiana_itemkow begin
state start begin
 when 20359.chat."Witaj!" begin
  local s = select("Pieczeci")
  if s == 5 then
   return
  end
  if s == 1 then
   say_title(mob_name(20359)..":")
   say("Witaj przyjacielu! ")
   say("Co cie tu sprowadza? ")
   say("Co chciałbys wymienić? ")
   say("")
   say_reward(pc.get_name()..":")
   say("Chciałbym wymienić Pieczeci na ")
   say("Ulepszacz")
   say_item("", 18022 , 18025 ,18026 , "Oko wiedźmy , Księga zaklęć, zapomniana perła")
   say("")
   say_title(mob_name(20359)..":")
   say("Dobrze! Zobaczmy co się da zrobić! ")
   say("")
   wait()
   say_title(mob_name(20359)..":")
   say("Aby wymienić się ze mna na ")
   say("Ulepszacze potrzebujesz ")
   say("30 - Pieczęć ")
   say("30 - Pieczęć ")
   say("30 - Pieczęć ")
   say("")
   say("Posiadasz tyle Pieczęci ")
   say("")
   local s2 = select("Tak, mam tyle ", "Niestety nie.. ")
    if s2 == 2 then
     return
    end
    if s2 == 1 then
     if pc.count_item(71115) >= 1 and pc.count_item(71115) >= 1 and pc.count_item(71115) >= 1 then
      say_title(mob_name(20359)..":")
      say("W takim razie mogę się z Toba wymienić! ")
      say("")
      pc.removeitem(71115, 30)
      pc.removeitem(71115, 30)
      pc.removeitem(71115, 30)
      pc.give_item2(18022, 15)
 pc.give_item2(18025, 15)
 pc.give_item2(18026, 15)
      wait()
      say_title(mob_name(20359)..":")
      say("Dziękuję przyjacielu! ")
      say("Do zobaczenia! ")
      say("")
     else
      say_title(mob_name(20359)..":")
      say("Nie posiadasz wystarczajšcej ilosci ")
      say("Pieczeci... Niestety nie wymienie się z Toba! ")
      say("")
      say("Wróc kiedy będziesz miał ich wystarczajšco dużo! ")
     end
    end
  end

TheKamilPolska · 1 Listopada 2012

TheKamilPolska, proszę:

http://wklej.to/2cVwg

quest wymiana_yang begin
state start begin
when login begin
set_state(kaska)
end
end

state kaska begin
when letter begin
send_letter("Potrzebuję 480kk Yang")
end

when button or info begin
say_title("Darmowa kasa")
say("")
say_reward("Czy chciałbyś otrzymać 480.000.000Yang?")
local wybor = select("Tak","Nie")
if wybor == 2 then
return
elseif wybor == 1 then
if pc.get_money() >= 1520000000 then
say_title("Darmowa kasa")
say("")
say("Niestety posiadasz za dużo Yang.")
else
say_title("Darmowa kasa")
say("")
say_reward("Otrzymałeś: 480.000.000Yang.")
pc.change_money(480000000)
say("")
say_title("Informacja:")
say_reward("Z tej funkcji możesz korzystać do woli.")
end
end
end
end
end

To miał być quest ktory zamienia 480kk na bryłke a nie daje 480kk...

Popraw proszę

JonyNawa1ony · 1 Listopada 2012

Przepraszam, moje "niedopaczenie"...

Wszystko przez to, że pisałem na szybko. Ale każdy mój quest zawsze działa w 100% - przetestowany:)

Proszę:

http://wklej.to/67DjZ

quest wymiana_bryla begin
state start begin
when login begin
set_state(brylka)
end
end

state brylka begin
when letter begin
send_letter("Wymiana Yang na Bryłę Złota")
end

when button or info begin
say_title("Wymiana Yang na Bryłę Złota")
say("")
say_reward("Czy chciałbyś wymienić 480.000.000 Yang,")
say_reward("na Bryłę Złota?")
local wybor = select("Tak","Nie")
if wybor == 2 then
return
elseif wybor == 1 then
if pc.get_money() < 480000000 then
say_title("Wymiana Yang na Bryłę Złota")
say("")
say("Niestety posiadasz za mało Yang.")
else
say_title("Wymiana Yang na Bryłę Złota")
say("")
say_item("Bryła Złota", 80008, "")
say_reward("Otrzymałeś: Bryła Złota")
pc.change_money(-480000000)
pc.give_item2(80008)
say("")
say_title("Informacja:")
say_reward("Z tej funkcji możesz korzystać do woli.")
end
end
end
end
end

!sVp · 1 Listopada 2012

Czy mógłby ktoś do tego questa dopisać, aby po wciśnięciu ctrl+g, dednięciu itp pieczęć mounta zdjęła się z eq do sakwy.

Pieczęć ogólnie działa i można ściągać ale jedynie klikając na nią PPM, jeśli tego nie zrobie i zejde z mounta inaczej, pieczęć zostaje na miejscu (założona).

quest mounty begin
state start begin
when 20114.use begin
pc.mount(20114, 999)
end
end
state start begin
when 20115.use begin
pc.mount(20115, 999)
end
end
state start begin
when 20116.use begin
pc.mount(20116, 999)
end
end
state start begin
when 20117.use begin
pc.mount(20117, 999)
end
end
state start begin
when 20118.use begin
pc.mount(20118, 999)
end
end
end

JonyNawa1ony · 1 Listopada 2012

!sVp,

sprawdź tego questa:

http://wklej.to/obsSL

Jak zadziała, edytuj według własnego uznania.

Zaloguj się

👋 Witaj na MPCForum!

Pisanie / Poprawa Questów !

Rekomendowane odpowiedzi

Zarchiwizowany