Pisanie / Poprawa Questów !

Stelios · 18 Listopada 2011

Czesc , mam problem z questem , błąd :

syntax error : [string "start"]:20: `=' expected near `s'

loteria_z_biletem.quest:385:Abort (core dumped)

quest :
http://wklej.to/LvFWk
jak naprawi ktos miesiac like i 5* w prof.

Niepoprawny zapis..

say_item_vnum(50110 , " x 3")

Jeśli chcesz robić coś takiego jak chciałeś powinieneś napisać na wzór tego:

say_item(item_name(vnum), vnum, "")

@EDIT

Kilkukrotnie powtarzasz ten błąd.

SϒS™ · 18 Listopada 2011

50110

say_item(item_name(vnum), vnum, "")

moglbys mi dac przyklad jak to wykonac ? dla tamtego id

EDIT

usunalem tamto i zrobilem tego questa tak :

http://wklej.to/oSRGM

syntax error : [string "start"]:20: `=' expected near `s'

loteria_z_biletem.quest:385:Abort (core dumped)

ii dalej ten blad

z4z0l · 18 Listopada 2011

locale s = select("Tak, mam wszystko", "Nie, przyjde pozniej.. ")

nie locale tylko local, po raz kolejny to mówię

SϒS™ · 19 Listopada 2011

dzięki , zadziałało

SϒS™ · 19 Listopada 2011

czesc poprawi mi ktos tego questa tak aby co chwile mozna bylo by wybierać loterie ? bo tak to tylko co chwile jest ;/ znaczy sie

raz jak sie kliknie to dziala , raz nie .. np po 20sek jak podejdziesz dziala itp itd

Stelios · 19 Listopada 2011

czesc poprawi mi ktos tego questa tak aby co chwile mozna bylo by wybierać loterie ? bo tak to tylko co chwile jest ;/ znaczy sie

raz jak sie kliknie to dziala , raz nie .. np po 20sek jak podejdziesz dziala itp itd

-------------------------------------------------------------------
---		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 loteria_z_biletem begin
state start begin
	when 14013.chat."Loteria! " begin
		say_title(mob_name(14013)..":")
		say("Witaj! Prowadze loterie! ")
		say("Jestes zainteresowany? ")
		say("")
		say("W loterii mozesz wygrac wiele ")
		say("przedmiotow, niektore cenne inne mniej! ")
		say("")
		wait()
		say_title(mob_name(14013)..":")
		say("Jesli jestes chetny na wziecie ")
		say("udzialu w loteri musisz speliac warunki")
		say("loterii! ")
		say("")
		say("A sa dwa warunki! ")
		say("")
		say("Misisz miec 1kkk yang ")
		say("oraz Bilet na jazde konna! ")
		say("")
		say("Posiadasz wszystko? ")
		local s = select("Tak, mam wszystko", "Nie, przyjde pozniej.. ")
			if s == 2 then
				say_title(mob_name(14013)..":")
				say("Dobrze ze sie przynales! ")
				say("Ja jestem juz stary, moglbym ")
				say("cos przypadkiem przeoczyc. ")
				say("")
				say("Dziekuje! Wroc kiedy bedziesz mial wszystko! ")
				say("")
			end
			if s == 1 then
				if pc.getqf("czas") <= get_time() then
				if pc.count_item(50083) >= 1 then
				if pc.get_money() >= 1000000000 then
					say_title(mob_name(14013)..":")
					say("No to dobrze! Cieszy mnie to, a wiec tak ")
					say("Za chwile zaczne losowanie przedmiotu ")
					say("dla ciebie. ")
					say("")
					say("Ale najpierw musze napisac ")
					say("na twoim bilecie numerek! ")
					say("")
					say("Jest to potrzebne, poniewaz bede ")
					say("wiedzial, ze bilet byl juz uzyty! ")
					say("")
					wait()
					say_title(mob_name(14013)..":")
					say("No wiec zaczynajmy loterie! ")
					say("Do wygrania jest ponad 30 rozych ")
					say("cennych przedmiotow! ")
					say("")
					say_reward("Pamietaj, ze nie wszystkie ")
					say_reward("przedmioty sa warte tyle samo! ")
					say("")
					wait()
					pc.setqf("czas", 60*2)
					local los = number(1, 35)
						if los == 1 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(30190)
							say("oraz")
							say_item_vnum(50033)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(30190, 1)
							pc.give_item2(50033, 1)
						end
						if los == 2 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(50110)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(50110, 3)
						end
						if los == 3 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(71051)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(71051, 1)
						end
						if los == 4 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(71051)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(71051, 1)
						end
						if los == 5 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(71051)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(71051, 1)
						end
						if los == 6 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(71051)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(71051, 1)
						end
						if los == 7 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(71051)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(71051, 1)
						end
						if los == 8 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(71052)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(71052, 1)
						end
						if los == 9 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(71052)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(71052, 1)
						end
						if los == 10 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(71052)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(71052, 1)
						end
						if los == 11 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(71052)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(71052, 1)
						end
						if los == 12 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(71052)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(71052, 1)
						end
						if los == 13 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(30190)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(30190, 1)
						end
						if los == 14 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(30190)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(30190, 1)
						end
						if los == 15 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(30190)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(30190, 1)
						end
						if los == 16 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(30190)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(30190, 1)
						end
						if los == 17 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(71054)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(71054, 1)
						end
						if los == 18 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(50033)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(50033, 1)
						end
						if los == 19 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(50033)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(50033, 1)
						end
						if los == 20 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(50033)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(50033, 1)
						end
						if los == 21 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(50033)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(50033, 1)
						end
						if los == 22 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(72002)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(72002, 1)
						end
						if los == 23 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(72002)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(72002, 1)
						end
						if los == 24 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(72002)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(72002, 1)
						end
						if los == 25 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(70301)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(70301, 1)
						end
						if los == 26 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(50058)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(50058, 1)
						end
						if los == 27 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(50059)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(50059, 1)
						end
						if los == 28 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(25040)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(25040, 1)
						end
						if los == 29 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(71082)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(71082, 2)
						end
						if los == 30 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(71095)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(71095, 100)
						end
						if los == 31 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(72023)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(72023, 1)
						end
						if los == 32 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(72038)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(72038, 200)
						end
						if los == 33 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(71042)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(71042, 1)
						end
						if los == 34 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(71043)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(71043, 1)
						end
						if los == 35 then
							say_title(mob_nem(14013)..": ")
							say("Wygrales: ")
							say_item_vnum(71028)
							say("")
							say("Gratuluje! ")
							say("")
							pc.give_item2(71028, 200)
						end
				end
				end
				else
					say("Jeszcze nie możesz losować. ")
					say("")
				end
			end
	end
end
end

Jeśli chcesz mienić czas oczekiwania na kolejne losowanie zmień pc.setqf("czas", 60*2) na taki czas jaki chcesz, 60*2 to 2 minuty.

MorlinkaUU11 · 19 Listopada 2011

trzeba mi następujący quest:

Dostajesz list przy osiągnięciu XXX poziomu, który każe Ci iść do NPC XXX , on daje Ci zadanie abyś poszedł do NPC A, tam gadasz z NPC A , który każe Ci iść do NPC B, ten natomiast po rozmowie do NPC C, potem NPC C każe Ci kogoś zabić, (z moba tego musi dropnąć jakiś item - szansa jakieś 20%), gdy zabijesz tego moba i zdobędziesz przedmiot pojawi się info, ze zdobyłeś to co trzeba, wracasz do NPC C, on Ci dziękuje i każe wrócić do NPC, który misję ci zlecił.

SϒS™ · 19 Listopada 2011

Cześć , mam pomysł na quest ale nie umiem pisać , prosiłbym o quest u npc 123443 (bankier):

Zakladka ''Kupno działki'' ''Przedostań się na działkę''

Czy chciałbys kupić działkę?

tak / nie

Jeżeli tak to musisz przynieść mi 100 krwistych kamieni .

Czy posiadasz tyle ?

tak / nie (niestety nie masz tyle , okno sie zamyka)

Widzę że masz tyle !

Którą działkę chciałbyś zakupić ?

Pokazują się zakladki

Działka 1 , 2, 3,4,5

Czy chcesz kupić działke nr 1 ?

tak /nie

Niestety ta działka jest już kupiona ? / Gratuluje ! Zakupiłeś działkę ! Masz tutaj unikatowe hasło aby się na nią dostać !

Pamiętaj nie podawaj go nikomu !

''Przedostań się na działkę''

Czy chcesz dostać się na działkę ?

tak/nie

wybierz którą działkę wybierasz 1-5

Aby się na nią dostać wpisz hasło :

np: maslo -takie wymyslił ktoś

Jak zle wpisze to wylacza się quest..

jak dobrze wpisał to przenosi go na koordy które sam napiszę ,zrobcie mi miejsce =))

Jezeli ktos napisze mi ten quest !! Dostanie Limit Lubię to ,5* w profilu i dam mu passy do vpsa debian 6.0 ,oplacony jeszcze na miesiąc ..(zmieni se haslo i se np zainstaluje serwer mc'ka , cs'a albo jakiejs innej gry =p)

z4z0l · 19 Listopada 2011

A jaki jest problem w napisaniu takiego questa ?

old_kwiatosz · 19 Listopada 2011

@upx2

Pozamykaj to co nie pozamykałem endami, bo nie mam do tego głowy o 24 :<

Masz szkielecik tak jakby tego questa, przepisz sobie go poprawnie:


quest kwiatmix begin
state start begin
when npc_id.chat."Kupno działki" begin
say("Chcesz kupić działkę?")
local kupno = select("Tak", "Nie")
if kupno == 2 then
return
end
if kupno == 1 then
say("Musisz mieć 100 krwistych kamieni.")
say("Masz tyle?")
local mam = select("Tak", "Nie")
if mam == 2 then
return
end
if mam == 1 then
if pc.count_item(id)
local dzialki = select("działka 1", "dzialka 2", "dzialka 3", "dzialka 4", "dzialka 5")
else
say("Nie masz kamieni!")
end
if dzialki == 1 then
local kupno1 = select("tak", "nie")
if kupno1 == 2 then
return
end
if kupno1 == 1 then
say("Chcesz kupić tą działkę?")
local wybor = select("tak", "nie")
if wybor == 2 then
return
end
if wybor == then
if pc.getqf("kupiona") == 0 then
say("Kupiłeś działkę pomyślnie, masz tutaj hasło:")
say_reward("hasło")
pc.setqf("kupiona", 1)
else
say("ta działka jest już kupiona")
end
end

if dzialki == 2 then
local kupno2 = select("tak", "nie")
if kupno2 == 2 then
return
end
if kupno2 == 1 then
say("Chcesz kupić tą działkę?")
local wybor2 = select("tak", "nie")
if wybor2 == 2 then
return
end
if wybor2 1 == then
if pc.getqf("kupiona1") == 0 then
say("Kupiłeś działkę pomyślnie, masz tutaj hasło:")
say_reward("hasło")
pc.setqf("kupiona1", 1)
else
say("ta działka jest już kupiona")
end
end
if dzialki == 3 then
local kupno3 = select("tak", "nie")
if kupno3 == 2 then
return
end
if kupno3 == 1 then
say("Chcesz kupić tą działkę?")
local wybor3 = select("tak", "nie")
if wybor3 == 2 then
return
end
if wybor3 1 == then
if pc.getqf("kupiona2") == 0 then
say("Kupiłeś działkę pomyślnie, masz tutaj hasło:")
say_reward("hasło")
pc.setqf("kupiona2", 1)
else
say("ta działka jest już kupiona")
end
end
if dzialki == 4 then
local kupno4 = select("tak", "nie")
if kupno4 == 2 then
return
end
if kupno4 == 1 then
say("Chcesz kupić tą działkę?")
local wybor4 = select("tak", "nie")
if wybor4 == 2 then
return
end
if wybor4 1 == then
if pc.getqf("kupiona3") == 0 then
say("Kupiłeś działkę pomyślnie, masz tutaj hasło:")
say_reward("hasło")
pc.setqf("kupiona3", 1)
else
say("ta działka jest już kupiona")
end
end
if dzialki == 5 then
local kupno5 = select("tak", "nie")
if kupno5 == 2 then
return
end
if kupno5 == 1 then
say("Chcesz kupić tą działkę?")
local wybor5 = select("tak", "nie")
if wybor5 == 2 then
return
end
if wybor5 1 == then
if pc.getqf("kupiona4") == 0 then
say("Kupiłeś działkę pomyślnie, masz tutaj hasło:")
say_reward("hasło")
pc.setqf("kupiona4", 1)
else
say("ta działka jest już kupiona")
end
end
when id_npc.chat."Chcę się telnąć na działkę " begin
local dzialeczki = select("działka 1", "dzialka 2", "dzialka 3", "dzialka 4", "dzialka 5")
if dzialeczki == 1 then
say("wpisz hasło")
local haslo = input()

                                                                       if haslo == "haslo_do_dzialki_1" then
say("HASŁO POPRAWNE")
wait()
pc.warp()
else
say("HASŁO jest złe!")
end
end
-----------dalsza czesc questa

SϒS™ · 20 Listopada 2011

@kwiatamix , dziękuje :* mógłbyś dzisiaj go dokończyć ?

Qbusek · 20 Listopada 2011

Czesć, niewiem czy jest to możliwe ale poprosze o questa ktory polega na tym gdy klikam ja jakis itemek on znika i na postaci pojawa sie buff (np. pomoc smoka) i po jakims czasie on zinka. Z góry dziekuje

Stelios · 20 Listopada 2011

Czesć, niewiem czy jest to możliwe ale poprosze o questa ktory polega na tym gdy klikam ja jakis itemek on znika i na postaci pojawa sie buff (np. pomoc smoka) i po jakims czasie on zinka. Z góry dziekuje

Mi nic nie wiadomo o takiej możliwości,

ale można dodać bonus na ustalony czas (coś typu dłoń krytyka itp.)

ExPuma12 · 20 Listopada 2011

Mam do was pytanie czy jest jakaś funkcja do questów która automatycznie włącza tryb wolny ?

OnlyTime · 20 Listopada 2011

Proszę o edytowanie tego Questa Tak by za kazdy wybrany skill było pobierane Yang wysokości 10kk :

quest uriel_skille_g1 begin

state start begin

when 20011.chat."Chciałbym otrzymac skille na G1" with pc.level >= 5 begin

say_title("Witaj wedrowcze!,")

say("Moge awansowac wszystkie twoje skille na poziom")

say("G1 jezeli tylko mnie poprosisz.")

say("")

say("Czy chcesz otrzymac skille na G1?")

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

if wybierz == 1 then

if pc . get_job() == 0 and pc . get_skill_group()==1 then

pc . set_skill_level (1, 30)

pc . set_skill_level (2, 30)

pc . set_skill_level (3, 30)

pc . set_skill_level (4, 30)

pc . set_skill_level (5, 30)

elseif pc . get_job()==0 and pc . get_skill_group()==2 then

pc . set_skill_level (16, 30)

pc . set_skill_level (17, 30)

pc . set_skill_level (18, 30)

pc . set_skill_level (19, 30)

pc . set_skill_level (20, 30)

elseif pc . get_job()==1 and pc . get_skill_group()==1 then

pc.set_skill_level(31, 30)

pc.set_skill_level(32, 30)

pc.set_skill_level(33, 30)

pc.set_skill_level(34, 30)

pc.set_skill_level(35, 30)

elseif pc . get_job()==1 and pc . get_skill_group()==2 then

pc.set_skill_level(46, 30)

pc.set_skill_level(47, 30)

pc.set_skill_level(48, 30)

pc.set_skill_level(49, 30)

pc.set_skill_level(50, 30)

elseif pc . get_job()==2 and pc . get_skill_group()==1 then

pc.set_skill_level(61, 30)

pc.set_skill_level(62, 30)

pc.set_skill_level(63, 30)

pc.set_skill_level(64, 30)

pc.set_skill_level(65, 30)

pc.set_skill_level(66, 30)

elseif pc . get_job()==2 and pc . get_skill_group()==2 then

pc.set_skill_level(76, 30)

pc.set_skill_level(77, 30)

pc.set_skill_level(78, 30)

pc.set_skill_level(79, 30)

pc.set_skill_level(80, 30)

pc.set_skill_level(81, 30)

elseif pc . get_job()==3 and pc . get_skill_group()==1 then

pc.set_skill_level(91, 30)

pc.set_skill_level(92, 30)

pc.set_skill_level(93, 30)

pc.set_skill_level(94, 30)

pc.set_skill_level(95, 30)

pc.set_skill_level(96, 30)

elseif pc . get_job()==3 and pc . get_skill_group()==2 then

pc.set_skill_level(106, 30)

pc.set_skill_level(107, 30)

pc.set_skill_level(108, 30)

pc.set_skill_level(109, 30)

pc.set_skill_level(110, 30)

pc.set_skill_level(111, 30)

end

say_title("Uriel")

say("Zrobione, Gratuluje!")

say_reward("Dzieki mocy swietlistej aury otrzymales skille na G1")

else

return

end

wah0lz · 20 Listopada 2011

Cześć , wiecie może jak dodać itemy na start na plikach sherera ? , Były już wgrane jakieś na start, ale nie wiem gdzie , bo jak zmienię w give_base_weapon , lub main_qest_lvl1, to dalej jak sie loguje są te co już były wgrane, więc gdzie one są ? ... ;/

Proszę o pomoc !!

Stelios · 20 Listopada 2011

Cześć , wiecie może jak dodać itemy na start na plikach sherera ? , Były już wgrane jakieś na start, ale nie wiem gdzie , bo jak zmienię w give_base_weapon , lub main_qest_lvl1, to dalej jak sie loguje są te co już były wgrane, więc gdzie one są ? ... ;/

Proszę o pomoc !!

Zapewne w object / nottarget / login czy jakoś tak i tam w tych pliku give_basic_weapon

Nie pamiętam dokładnie, ale tak było w niektórych plikach.

Pamiętaj, że to tylk opropozycja - zrób kopię przez zmianą czegokolwiek i robisz to na własne ryzyko.

@EDIT

Pytanko, jakie ID mają sztabki 500k , 1kk i 2kk ? :P

SϒS™ · 20 Listopada 2011

moglby ktos dokonczyc tego questa? :

Cześć , mam pomysł na quest ale nie umiem pisać , prosiłbym o quest u npc 123443 (bankier):

Zakladka ''Kupno działki'' ''Przedostań się na działkę''

Czy chciałbys kupić działkę?

tak / nie

Jeżeli tak to musisz przynieść mi 100 krwistych kamieni .

Czy posiadasz tyle ?

tak / nie (niestety nie masz tyle , okno sie zamyka)

Widzę że masz tyle !

Którą działkę chciałbyś zakupić ?

Pokazują się zakladki

Działka 1 , 2, 3,4,5

Czy chcesz kupić działke nr 1 ?

tak /nie

Niestety ta działka jest już kupiona ? / Gratuluje ! Zakupiłeś działkę ! Masz tutaj unikatowe hasło aby się na nią dostać !

Pamiętaj nie podawaj go nikomu !

''Przedostań się na działkę''

Czy chcesz dostać się na działkę ?

tak/nie

wybierz którą działkę wybierasz 1-5

Aby się na nią dostać wpisz hasło :

np: maslo -takie wymyslił ktoś

Jak zle wpisze to wylacza się quest..

jak dobrze wpisał to przenosi go na koordy które sam napiszę ,zrobcie mi miejsce =))

@upx2

Pozamykaj to co nie pozamykałem endami, bo nie mam do tego głowy o 24 :<

Masz szkielecik tak jakby tego questa, przepisz sobie go poprawnie:

quest kwiatmix begin

state start begin

when npc_id.chat."Kupno działki" begin

say("Chcesz kupić działkę?")

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

if kupno == 2 then

return

end

if kupno == 1 then

say("Musisz mieć 100 krwistych kamieni.")

say("Masz tyle?")

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

if mam == 2 then

return

end

if mam == 1 then

if pc.count_item(id)

local dzialki = select("działka 1", "dzialka 2", "dzialka 3", "dzialka 4", "dzialka 5")

else

say("Nie masz kamieni!")

end

if dzialki == 1 then

local kupno1 = select("tak", "nie")

if kupno1 == 2 then

return

end

if kupno1 == 1 then

say("Chcesz kupić tą działkę?")

local wybor = select("tak", "nie")

if wybor == 2 then

return

end

if wybor == then

if pc.getqf("kupiona") == 0 then

say("Kupiłeś działkę pomyślnie, masz tutaj hasło:")

say_reward("hasło")

pc.setqf("kupiona", 1)

else

say("ta działka jest już kupiona")

end

if dzialki == 2 then

local kupno2 = select("tak", "nie")

if kupno2 == 2 then

return

end

if kupno2 == 1 then

say("Chcesz kupić tą działkę?")

local wybor2 = select("tak", "nie")

if wybor2 == 2 then

return

end

if wybor2 1 == then

if pc.getqf("kupiona1") == 0 then

say("Kupiłeś działkę pomyślnie, masz tutaj hasło:")

say_reward("hasło")

pc.setqf("kupiona1", 1)

else

say("ta działka jest już kupiona")

end

if dzialki == 3 then

local kupno3 = select("tak", "nie")

if kupno3 == 2 then

return

end

if kupno3 == 1 then

say("Chcesz kupić tą działkę?")

local wybor3 = select("tak", "nie")

if wybor3 == 2 then

return

end

if wybor3 1 == then

if pc.getqf("kupiona2") == 0 then

say("Kupiłeś działkę pomyślnie, masz tutaj hasło:")

say_reward("hasło")

pc.setqf("kupiona2", 1)

else

say("ta działka jest już kupiona")

end

if dzialki == 4 then

local kupno4 = select("tak", "nie")

if kupno4 == 2 then

return

end

if kupno4 == 1 then

say("Chcesz kupić tą działkę?")

local wybor4 = select("tak", "nie")

if wybor4 == 2 then

return

end

if wybor4 1 == then

if pc.getqf("kupiona3") == 0 then

say("Kupiłeś działkę pomyślnie, masz tutaj hasło:")

say_reward("hasło")

pc.setqf("kupiona3", 1)

else

say("ta działka jest już kupiona")

end

if dzialki == 5 then

local kupno5 = select("tak", "nie")

if kupno5 == 2 then

return

end

if kupno5 == 1 then

say("Chcesz kupić tą działkę?")

local wybor5 = select("tak", "nie")

if wybor5 == 2 then

return

end

if wybor5 1 == then

if pc.getqf("kupiona4") == 0 then

say("Kupiłeś działkę pomyślnie, masz tutaj hasło:")

say_reward("hasło")

pc.setqf("kupiona4", 1)

else

say("ta działka jest już kupiona")

end

when id_npc.chat."Chcę się telnąć na działkę " begin

local dzialeczki = select("działka 1", "dzialka 2", "dzialka 3", "dzialka 4", "dzialka 5")

if dzialeczki == 1 then

say("wpisz hasło")

local haslo = input()

if haslo == "haslo_do_dzialki_1" then

say("HASŁO POPRAWNE")

wait()

pc.warp()

else

say("HASŁO jest złe!")

end

-----------dalsza czesc questa

2.Szukam questa ktory po nakliknieciu na npc 42343 pojawia sie zakladka :

Niewidoczny poziom

i po kliknieciu pojawia sie tekst:

czy chcesz aby twoj poziom stał się niewidoczy?

Pamiętaj że dostaniesz wtedy 0lv! Stracisz swój poprzedni poziom !

Chcesz skorzystać ? (daje lvl 0 ,tak 0 nie 124 albo 1 tylko zero)

Tak / Nie

a druga zakladka to:

Widoczny poziom

Chcesz aby Twoj poziom byl znow widoczny ?

Pamietaj ze dostaniesz wtedy 1lvl !

chcesz skorzystac?

tak /nie

trzecie zakladka to :

Bryła Złota

Czy chcesz wymienic 20 krwistych kamieni na bryłę złota ?

tak/nie

niestety nie masz tyle

czwarta

Odtruty Miecz

Witaj podrozniku ! Czy widziales kiedys odtruty miesz? Bog Smokow pracowal nad nim kilkaset wiekow !

Az wrescie sie pojawil w naszym swiecie ! Aby go zdobyc udaj się do PINDOLPIZDONGA aby go zdobyć !

Pamiętaj ! Zabierz ze sobą bryłę złota !

Adame3ek · 21 Listopada 2011

Cześć , możecie mi zrobić jakiś item np pierścień, że jak 'nacisne' to mi się pojawią ku do wyboru np:

Na jaką profesje chcesz księgę umiejętności:

-Wojownik

-Ninja

-Szaman

-Sura

Dajmy na to że wybieram wojownik i pisze:

- Mental

- Body

(Wybieram Body i pisze):

-Aura Miecza,,,, itd ( daje aura miecza i w pojawia mi się Aura Miecza w ekwikwipunku)

Pon.Lok · 21 Listopada 2011

STS. 0 lv nie da bo GAME po prostu się nie da... Nie wiem o co Ci chodzi z tym widoczny/niewidoczny poziom, ale i tak znowu ta sprawa siedzi w GAME jeśli myślę o tym ,że chcesz poprzez questa wyłączyć poziom koło rangi (może się mylę.). Co do questa z działkami nie rozumiem o co Ci chodzi .... jeśli chcesz sprzedawać pięć działek to musisz mieć pięć nowych map... chyba ,że zrobisz to na takiej samej zasadzie jak Ziemie Gildijne. Po za tym nowa tabelka w mysql gdzie była by zapisana ów posiadłość, a potem dorzucić do questa PHP aby sprawdzał czy działka jest zajęta czy nie. Bynajmniej ja bym tak zrobił. Większość z was prosi o questy w których trzeba użyć więcej języków nić tylko lua bądź takie questy które są trudne do zrobienia ale do zrobienia lecz nikt dobrego czy też działającego questa nie da za darmo to nie te czasy co kiedyś na MPC.

Pozdrawiam.

Pon.Lok

ExPuma12 · 21 Listopada 2011

Mam do was pytanie czy jest jakaś funkcja do questów która automatycznie włącza tryb wolny ?

Pon.Lok · 21 Listopada 2011

Nie! Tryb Wolny znowu w GAME siedzi bądź w clinecie w bince, więc nie idzie tego poprzez questa zrobić.

Nigahiga · 21 Listopada 2011

Nie! Tryb Wolny znowu w GAME siedzi bądź w clinecie w bince, więc nie idzie tego poprzez questa zrobić.

when login begin
command("pkmode 3")
end

albo

cmdchat("pkmode 3")

Stelios · 21 Listopada 2011

Cześć , możecie mi zrobić jakiś item np pierścień, że jak 'nacisne' to mi się pojawią ku do wyboru np:

Na jaką profesje chcesz księgę umiejętności:

-Wojownik

-Ninja

-Szaman

-Sura

Dajmy na to że wybieram wojownik i pisze:

- Mental

- Body

(Wybieram Body i pisze):

-Aura Miecza,,,, itd ( daje aura miecza i w pojawia mi się Aura Miecza w ekwikwipunku)

Uzupełniasz id_item oraz id dla itemków i nazwy skilli dla danego ku

quest ku_prof begin
   state start begin
       when id_item.use begin
           say("Wybierz dla kogo chcesz księge. ")
           say("")
           local s = select("Wojownik", "Sura", "Ninja", "Szaman", "Anuluj")
               if s == 5 then
                   return
               end
               if s == 1 then
                   local a = select("Body", "Mental", "Anuluj")
                       if a == 3 then
                           return
                       end
                       if a == 1 then
                           local q = select("Trzystronne ciecie", "Wir Miecza", "Berserk", "Aura Miecza", "Szarza")
                               if q == 1 then
                                   pc.give_item2( id , 1)
                               end
                               if q == 2 then
                                   pc.give_item2( id , 1)
                               end
                               if q == 3 then
                                   pc.give_item2( id , 1)
                               end
                               if q == 4 then
                                   pc.give_item2( id , 1)
                               end
                               if q == 5 then
                                   pc.give_item2( id , 1)
                               end
                       end
                       if a == 2 then
                           local q2 = select("cos tam1 ", "cos tam2 ", " cos tam3 ", "cos tam4 ", " cos tam5")
                               if q2 == 1 then
                                   pc.give_item2( id , 1)
                               end
                               if q2 == 2 then
                                   pc.give_item2( id , 1)
                               end
                               if q2 == 3 then
                                   pc.give_item2( id , 1)
                               end
                               if q2 == 4 then
                                   pc.give_item2( id , 1)
                               end
                               if q2 == 5 then
                                   pc.give_item2( id , 1)
                               end
                       end
               end
               if s == 2 then
                   local a2 = select("BM", "WP", "Anuluj")
                       if a2 == 3 then
                           return
                       end
                       if a2 == 1 then
                           local q3 = select("cos", "cos", "cos", "cos", "cos")
                               if q3 == 1 then
                                   pc.give_item2( id , 1)
                               end
                               if q3 == 2 then
                                   pc.give_item2( id , 1)
                               end
                               if q3 == 3 then
                                   pc.give_item2( id , 1)
                               end
                               if q3 == 4 then
                                   pc.give_item2( id , 1)
                               end
                               if q3 == 5 then
                                   pc.give_item2( id , 1)
                               end
                       end
                       if a2 == 2 then
                           local q4 = select("cos tam1 ", "cos tam2 ", " cos tam3 ", "cos tam4 ", " cos tam5")
                               if q4 == 1 then
                                   pc.give_item2( id , 1)
                               end
                               if q4 == 2 then
                                   pc.give_item2( id , 1)
                               end
                               if q4 == 3 then
                                   pc.give_item2( id , 1)
                               end
                               if q4 == 4 then
                                   pc.give_item2( id , 1)
                               end
                               if q4 == 5 then
                                   pc.give_item2( id , 1)
                               end
                       end
               end
               if s == 3 then
                   local a3 = select("Archer", "Dagger", "Anuluj")
                       if a3 == 3 then
                           return
                       end
                       if a3 == 1 then
                           local q5 = select("cos", "cos", "cos", "cos", "cos")
                               if q5 == 1 then
                                   pc.give_item2( id , 1)
                               end
                               if q5 == 2 then
                                   pc.give_item2( id , 1)
                               end
                               if q5 == 3 then
                                   pc.give_item2( id , 1)
                               end
                               if q5 == 4 then
                                   pc.give_item2( id , 1)
                               end
                               if q5 == 5 then
                                   pc.give_item2( id , 1)
                               end
                       end
                       if a3 == 2 then
                           local q6 = select("cos tam1 ", "cos tam2 ", " cos tam3 ", "cos tam4 ", " cos tam5")
                               if q6 == 1 then
                                   pc.give_item2( id , 1)
                               end
                               if q6 == 2 then
                                   pc.give_item2( id , 1)
                               end
                               if q6 == 3 then
                                   pc.give_item2( id , 1)
                               end
                               if q6 == 4 then
                                   pc.give_item2( id , 1)
                               end
                               if q6 == 5 then
                                   pc.give_item2( id , 1)
                               end
                       end
               end
               if s == 4 then
                   local a4 = select("BM", "WP", "Anuluj")
                       if a4 == 3 then
                           return
                       end
                       if a4 == 1 then
                           local q7 = select("cos", "cos", "cos", "cos", "cos")
                               if q7 == 1 then
                                   pc.give_item2( id , 1)
                               end
                               if q7 == 2 then
                                   pc.give_item2( id , 1)
                               end
                               if q7 == 3 then
                                   pc.give_item2( id , 1)
                               end
                               if q7 == 4 then
                                   pc.give_item2( id , 1)
                               end
                               if q7 == 5 then
                                   pc.give_item2( id , 1)
                               end
                       end
                       if a4 == 2 then
                           local q8 = select("cos tam1 ", "cos tam2 ", " cos tam3 ", "cos tam4 ", " cos tam5")
                               if q8 == 1 then
                                   pc.give_item2( id , 1)
                               end
                               if q8 == 2 then
                                   pc.give_item2( id , 1)
                               end
                               if q8 == 3 then
                                   pc.give_item2( id , 1)
                               end
                               if q8 == 4 then
                                   pc.give_item2( id , 1)
                               end
                               if q8 == 5 then
                                   pc.give_item2( id , 1)
                               end
                       end
               end
       end
   end
end

SϒS™ · 22 Listopada 2011

ma ktos quest który po kliknieciu w item 23455 daje lvl 0 ? bo komenda gm;a sie da

a jak mowicie ze sie nie da to dajcie questa na 1lv i sprawdze czy sie da :P

Zaloguj się

👋 Witaj na MPCForum!

Pisanie / Poprawa Questów !

Rekomendowane odpowiedzi

Zarchiwizowany