Pisanie / Poprawa Questów !

adm · 15 Stycznia 2012

Taby są tylko nie wiem czemu nie wkleiło się z tabami. Każde state, when i if zamknięte tylko nie wiem czy if są zamknięte w odpowiednich miejscach.

chcesz mogę Ci posłać pliczek txt z tabulatorami

Rower1310 · 15 Stycznia 2012

jak dać np. 200 pelerynek bo chyba jest inny sposób niż wpisanie do questu 200 razy

say_item(70038)

adm · 15 Stycznia 2012

@up

nie say_item

tylko jak juz coś to

pc.give_item2(70038, 200)

Stelios · 15 Stycznia 2012

Taby są tylko nie wiem czemu nie wkleiło się z tabami. Każde state, when i if zamknięte tylko nie wiem czy if są zamknięte w odpowiednich miejscach.

quest biciemobow begin
state start begin
when 20004.chat."Bicie mobów - Trudny" begin
say_reward("Ubijanie mobów na czas jest B.Trudnym wyzwaniem!")
say("Musisz ubić kilka potworów i zobaczysz po ubiciu wszystkich jaki miałeś czas")
say("Jeżeli nagrasz film z ubijaniem potworów i zdobędziesz najlepszy czas ze wszystkich wygrasz nagrody!")
say_reward("Czy chcesz wejść na mapę?")
local wejscie = select("Chcę się spróbować ", ("Jednak nie chce wejść ")
if wejscie == 2 then
return
elseif wejscie == 1 then
if pc.get_level() < 65 then
say("Wybacz, nie mogę Cię wpuścić. ")
say("")

return
if party.get_near_count() > 0
say("Wybacz, nie możesz iść z żadnymi członkami w PT na mapę.")
say("")

return
if party.is_leader() then
say("Nie możesz mieć PT na mapie ")
say("")

return

else
say("OK, ale by pokonać wszystkie potwory musisz")
say("być jeszcze silniejszy, pomogę Ci w tym.")
say("Możesz sobie wybrać jeden bonus.")
end
local bony = select("10% szybkość ataku", "+200 siła ataku", "30% szansa na krytyczne uderzenie", "30% na otrucie", "Nie chce")
if bony == 1 then
affect.add(apply.MOV_SPEED, 10, 60*60*24*365*60)
set_state(wybierz_marmur)

elseif bony == 2 then
											   affect.add(apply.ATT_GRADE_BONUS, 200, 60*60*24*365*60)
											   set_state(wybierz_marmur)

											elseif bony == 3 then
											   affect.add(apply.ATT_POINT_CRITICAL_PCT, 30, 60*60*24*365*60)
											   set_state(wybierz_marmur)

											elseif bony == 4 then
											   affect.add(apply.ATT_POINT_POISON_PCT, 30, 60*60*24*365*60)
											   set_state(wybierz_marmur)
elseif bony == 5 then
set_state(wybierz_marmur)
end
end
end

state wybierz_marmur begin
say("Ok, teraz wybierz sobie marmur.")
say("")
local marmur == select("Dziki pies", "Dziki Sługa", "Młody pająk", "Ezot.Fanatyk")
if marmur == 1 then
pc.polymorphy(101, 500)
								set_state(wejscie_na_mape)

elseif marmur == 2 then
								pc.polymorphy(502, 500)
								set_state(wejscie_na_mape)

elseif marmur == 3 then
								pc.polymorphy(2031)
								set_state(wejscie_na_mape)

					elseif marmur == 4 then
								pc.polymorphy(701)
								set_state(wejscie_na_mape)
end
end

state wejscie_na_mape begin
pc.setqf("priv_bicie_mobow", 1)
			d.join(73)
when login with pc.in_dungeon() with pc.getgf("priv_bicie_mobow") == 1 begin
if pc.getqf("priv_bicie_mobow") == 1 then
							pc.setqf("priv_bicie_mobow", 2)
							d.notice("Ubij moby jak najszybciej potrafisz!")
							d.notice("Powodzenia!")
timer("przygotuj", 5)
end
end

when przygotuj.timer begin
d.notice("Za chwilę nastąpi odliczanie do respu potwora!")
timer("respimy", 5)
end
when respimy.timer begin
d.notice("Resp nastąpi za 5")
timer("respimy2", 1)
end
when respimy2.timer begin
d.notice("Resp nastąpi za 4")
timer("respimy3", 1)
end
when respimy3.timer begin
d.notice("Resp nastąpi za 3")
timer("respimy4", 1)
end
when respimy4.timer begin
d.notice("Resp nastąpi za 2")
timer("respimy5", 1)
end
when respimy5.timer begin
d.notice("Resp nastąpi za 1")
timer("respimy6", 1)
end
when respimy6.timer begin
d.notice("Walka rozpoczyna się!")
d.notice("Twoim pierwszym przeciwnikiem będzie Elit. Ognisty Król")
pc.setqf("time1", get_time())
d.spawn_mob(2207, 195, 690)
end
when 2207.kill with pc.in_duegon() and pc.getqf("priv_bicie_mobow") == 2 begin
d.notice("Pokonałeś Elit. Ognistego Króla, zaraz zrespi się Elit. 9 ogonow.")
d.spawn_mob(1902, 195, 690)
end
when 1902.kill with pc.in_duegon() and pc.getqf("priv_bicie_mobow") == 2 begin
d.notice("Pokonałeś Elit. 9 ogonow, zaraz zrespi się Zjawa Zoltego Tygrysa.")
d.spawn_mob(2493, 195, 690)
end
when 1304.kill with pc.in_duegon() and pc.getqf("priv_bicie_mobow") == 2 begin
d.notice("Pokonałeś Zjawa Zoltego Tygrysa, zaraz zrespi się Ripper.")
d.spawn_mob(1093, 195, 690)
end
when 1093.kill with pc.in_duegon() and pc.getqf("priv_bicie_mobow") == 2 begin
d.notice("Pokonałeś wszystkie moby, zaraz zostaniesz wylogowany!")
pc.setqf("time2", get_time())
pc.setqf("priv_bicie_mobow", 3)

affect.remove()
timer("dowidzenia", 10)
end
when dowidzenia.timer begin
d.exit_all()
end

when login with pc.getqf("priv_bicie_mobow") == 3 begin
			 pc.setqf("priv_bicie_mobow", 0)
			 pc.remove_polymorph()
			 local x = pc.getqf("time")

			 local y = pc.getqf("time2")

			 local diff = pc.setqf("time3", y-x)

if y-x > 60 then
say("Twój czas to: "..diff/60.." minut.")

else
say("Twój czas to: "..diff.." sekund.")
end
end
end
end

chcesz mogę Ci posłać pliczek txt z tabulatorami

Wrzuć na stronce: http://czarny-questy.cba.pl/up.php

jak dać np. 200 pelerynek bo chyba jest inny sposób niż wpisanie do questu 200 razy
say_item(70038)

Wiesz co.. Naucz się pisania z TUTków później zacznij spamić.

Rower1310 · 15 Stycznia 2012

akurat pisze z tutków tylko że akurat tego nie było a to że zamiast

pc.give_item2(70038)

dałem tutaj

say_item(70038)

to tylko przez pomyłkę bo nie chcący nie tą linijkę skopiowałem z mojego questa

adm · 15 Stycznia 2012

no to wpisz

pc.give_item2(70038, 200)

@Steilos wysłałem

PaTrOL_ · 15 Stycznia 2012

czy ten quest działa:

quest biciemobow begin
state start begin
when 20004.chat."Bicie mobów - Trudny" begin
say_reward("Ubijanie mobów na czas jest B.Trudnym wyzwaniem!")
say("Musisz ubić kilka potworów i zobaczysz po ubiciu wszystkich jaki miałeś czas")
say("Jeżeli nagrasz film z ubijaniem potworów i zdobędziesz najlepszy czas ze wszystkich wygrasz nagrody!")
say_reward("Czy chcesz wejść na mapę?")
local wejscie = select("Chcę się spróbować ", ("Jednak nie chce wejść ")
if wejscie == 2 then
return
elseif wejscie == 1 then
if pc.get_level() < 65 then
say("Wybacz, nie mogę Cię wpuścić. ")
say("")
return
if party.get_near_count() > 0
say("Wybacz, nie możesz iść z żadnymi członkami w PT na mapę.")
say("")
return
if party.is_leader() then
say("Nie możesz mieć PT na mapie ")
say("")
return
else
say("OK, ale by pokonać wszystkie potwory musisz")
say("być jeszcze silniejszy, pomogę Ci w tym.")
say("Możesz sobie wybrać jeden bonus.")
end
local bony = select("10% szybkość ataku", "+200 siła ataku", "30% szansa na krytyczne uderzenie", "30% na otrucie", "Nie chce")
if bony == 1 then
affect.add(apply.MOV_SPEED, 10, 60*60*24*365*60)
set_state(wybierz_marmur)
elseif bony == 2 then
																							   affect.add(apply.ATT_GRADE_BONUS, 200, 60*60*24*365*60)
																							   set_state(wybierz_marmur)
																						    elseif bony == 3 then
																							   affect.add(apply.ATT_POINT_CRITICAL_PCT, 30, 60*60*24*365*60)
																							   set_state(wybierz_marmur)
																						    elseif bony == 4 then
																							   affect.add(apply.ATT_POINT_POISON_PCT, 30, 60*60*24*365*60)
																							   set_state(wybierz_marmur)
elseif bony == 5 then
set_state(wybierz_marmur)
end
end
end
state wybierz_marmur begin
say("Ok, teraz wybierz sobie marmur.")
say("")
local marmur == select("Dziki pies", "Dziki Sługa", "Młody pająk", "Ezot.Fanatyk")
if marmur == 1 then
pc.polymorphy(101, 500)
																    set_state(wejscie_na_mape)
elseif marmur == 2 then
																    pc.polymorphy(502, 500)
																    set_state(wejscie_na_mape)
elseif marmur == 3 then
																    pc.polymorphy(2031)
																    set_state(wejscie_na_mape)
										    elseif marmur == 4 then
																    pc.polymorphy(701)
																    set_state(wejscie_na_mape)
end
end
state wejscie_na_mape begin
pc.setqf("priv_bicie_mobow", 1)
						    d.join(73)
when login with pc.in_dungeon() with pc.getgf("priv_bicie_mobow") == 1 begin
if pc.getqf("priv_bicie_mobow") == 1 then
														    pc.setqf("priv_bicie_mobow", 2)
														    d.notice("Ubij moby jak najszybciej potrafisz!")
														    d.notice("Powodzenia!")
timer("przygotuj", 5)
end
end
when przygotuj.timer begin
d.notice("Za chwilę nastąpi odliczanie do respu potwora!")
timer("respimy", 5)
end
when respimy.timer begin
d.notice("Resp nastąpi za 5")
timer("respimy2", 1)
end
when respimy2.timer begin
d.notice("Resp nastąpi za 4")
timer("respimy3", 1)
end
when respimy3.timer begin
d.notice("Resp nastąpi za 3")
timer("respimy4", 1)
end
when respimy4.timer begin
d.notice("Resp nastąpi za 2")
timer("respimy5", 1)
end
when respimy5.timer begin
d.notice("Resp nastąpi za 1")
timer("respimy6", 1)
end
when respimy6.timer begin
d.notice("Walka rozpoczyna się!")
d.notice("Twoim pierwszym przeciwnikiem będzie Elit. Ognisty Król")
pc.setqf("time1", get_time())
d.spawn_mob(2207, 195, 690)
end
when 2207.kill with pc.in_duegon() and pc.getqf("priv_bicie_mobow") == 2 begin
d.notice("Pokonałeś Elit. Ognistego Króla, zaraz zrespi się Elit. 9 ogonow.")
d.spawn_mob(1902, 195, 690)
end
when 1902.kill with pc.in_duegon() and pc.getqf("priv_bicie_mobow") == 2 begin
d.notice("Pokonałeś Elit. 9 ogonow, zaraz zrespi się Zjawa Zoltego Tygrysa.")
d.spawn_mob(2493, 195, 690)
end
when 1304.kill with pc.in_duegon() and pc.getqf("priv_bicie_mobow") == 2 begin
d.notice("Pokonałeś Zjawa Zoltego Tygrysa, zaraz zrespi się Ripper.")
d.spawn_mob(1093, 195, 690)
end
when 1093.kill with pc.in_duegon() and pc.getqf("priv_bicie_mobow") == 2 begin
d.notice("Pokonałeś wszystkie moby, zaraz zostaniesz wylogowany!")
pc.setqf("time2", get_time())
pc.setqf("priv_bicie_mobow", 3)
affect.remove()
timer("dowidzenia", 10)
end
when dowidzenia.timer begin
d.exit_all()
end
when login with pc.getqf("priv_bicie_mobow") == 3 begin
							 pc.setqf("priv_bicie_mobow", 0)
							 pc.remove_polymorph()
							 local x = pc.getqf("time")
							 local y = pc.getqf("time2")
							 local diff = pc.setqf("time3", y-x)
if y-x > 60 then
say("Twój czas to: "..diff/60.." minut.")
else
say("Twój czas to: "..diff.." sekund.")
end
end
end
end

sankixd · 15 Stycznia 2012

I tak poprawiłeś źle.

End'em zamyka się: quest, state, when, if.

A zamykasz if i rozpoczynasz nowy when.

Wszędzie jeden end za mało.

A poza tym, widzę tak na pierwszy rzut oka, że w drop jest taki sam.

Dlaczego nie zrobić questa krótszym i ustawić takie cuś: Proste i przyjemne.
when 8001.kill or 8002.kill or 803.kill ...itd.. begin

endem zamykalem tam ifa... zapomnialem dac drugiego enda przy kazdym konczeniu when'a do zamkniecia whena. kazdy warunek musi miec swoj koniec. tego mnie nauczono w szkole na programowaniu. owszem przyznaje sie do bledu machnolem sie, ale nie odpisal jaki byl rezultat... a co do umieszczenia przy whenie wszystkich naraz zgodze sie jesli tylko drop jest taki sam. jest do lepszy sposob.

adm · 16 Stycznia 2012

Chciałbym aby ktoś mi poprawił tak aby to było w postacii listu a nie naciśnięcia na iteamek.

quest panel begin
state start begin
when login with pc.get_name() == "CES" begin
game.set_event_flag("oczekiwanie", 1)
end
when logout with pc.get_name() == "CES" begin
game.set_event_flag("oczekiwanie", 0)
end
when 40002.use with pc.is_gm() begin
say("")
say("")

sankixd · 16 Stycznia 2012

Chciałbym aby ktoś mi poprawił tak aby to było w postacii listu a nie naciśnięcia na iteamek.

quest panel begin
state start begin
when login with pc.get_name() == "CES" begin
game.set_event_flag("oczekiwanie", 1)
end
when logout with pc.get_name() == "CES" begin
game.set_event_flag("oczekiwanie", 0)
end
when 40002.use with pc.is_gm() begin
say("")
say("")

amm ale ze jak ? bo nie rozumiem ?

adm · 16 Stycznia 2012

bo teraz po naciśnięciu w przedmiot dopiero pokazuje się zawartość questa. saye itp. a chciałbym by to nie było w przedmiocie tylko w liście po lewej stronie. tzw send_letter

.trollus · 16 Stycznia 2012

Witam, to jeszcze raz ja

Ja to widzę tak Idę do NPC o ID 9003. Tam pogadanki itp. Za 5kk, ona daje mi skill na G1, pod warunkiem, że jest on rozwinięty na przynajmniej M1 :P

Sypię lajkami, pozdrawiam ;P

3rr0xxxxxD · 16 Stycznia 2012

hi moglby mi ktos napisac questa u : 20066 po kliknieciu na niego wyskakuje : wyslij wiadomosc jak to klikniemy jest miejsce na wpisanie textu i opcja ''wyslij''

wysyla wiadomosc do tabelki mysql (player->say)

PS: o ile sie nie myle jest to wykorz. funkcji os.execute

quest say begin
state start begin
when 20066.click begin
local i = input()

os.execute("php /home/game/skrypt.php")
say("Wysłano.")
end
end
end

$info = $argv[1];
mysql_connect("localhost","mt2","mt2!@#") or die('Error: '.mysql_error());
mysql_select_db("player");
mysql_query("INSERT IN TO `say` SET `wiadomosc` = '".mysql_real_escape_string($info)."' ) or die('ERROR'.mysql_error());

Pisane z palca więc mogłem się pomylić..

co do questu to kurdę jest uno-problemo bo nie widzę w quescie : miejsca na :

tabliczkę po kliknieciu 20066 (wyslij wiadomosc) a i jakbys mogl to mam prosbe moglbys zrobic coś takiego:

ze po klikenieciu : wyslij wiadomosc

jest text : kjsfkdjfksdjfksdjfskdjk

i są 3 miejsca na wpisanie textu

1.text1?

[miejsce]

2.text1?

[miejsce]

3.text1?

[miejsce]

Stelios · 16 Stycznia 2012

no to wpisz

pc.give_item2(70038, 200)

@Steilos wysłałem

Sprawdź, ale nie obiecuję że zadziała poprawnie, jakoś nie mogę dobrze go uzupełnić.

http://czarny-questy.cba.pl/up/bicie.quest

@EDIT

@DOWN

Nie spamuj. Jeśli ktoś się zainteresuje to odpowie na twój post.

3rr0xxxxxD · 16 Stycznia 2012

hi moglby mi ktos napisac questa u : 20066 po kliknieciu na niego wyskakuje : wyslij wiadomosc jak to klikniemy jest miejsce na wpisanie textu i opcja ''wyslij''

wysyla wiadomosc do tabelki mysql (player->say)

PS: o ile sie nie myle jest to wykorz. funkcji os.execute

co do questu to kurdę jest uno-problemo bo nie widzę w quescie : miejsca na :

tabliczkę po kliknieciu 20066 (wyslij wiadomosc) a i jakbys mogl to mam prosbe moglbys zrobic coś takiego:

ze po klikenieciu : wyslij wiadomosc

jest text : kjsfkdjfksdjfksdjfskdjk

i są 3 miejsca na wpisanie textu

1.text1?

[miejsce]

2.text1?

[miejsce]

3.text1?

[miejsce]

sankixd · 16 Stycznia 2012

bo teraz po naciśnięciu w przedmiot dopiero pokazuje się zawartość questa. saye itp. a chciałbym by to nie było w przedmiocie tylko w liście po lewej stronie. tzw send_letter

nie jestem pewien czy napewno tak ma byc bo na stacie bym to zrobil ale masz jeszcze do wylogowania a nie chce mieszac. Chyba ze Stelios Ci pomoze, chgyba ze dobrze zrobilem

quest panel begin
state start begin
when login with pc.get_name() == "CES" begin
game.set_event_flag("oczekiwanie", 1)
end
when letter begin
send_letter("To sobie uzupelnij")
end
when logout with pc.get_name() == "CES" begin
game.set_event_flag("oczekiwanie", 0)
end
when button or info with pc.is_gm() begin
say_title("to sobie uzupelnij")
say("")
say("")
end
end
end

adm · 16 Stycznia 2012

nie jestem pewien czy napewno tak ma byc bo na stacie bym to zrobil ale masz jeszcze do wylogowania a nie chce mieszac. Chyba ze Stelios Ci pomoze, chgyba ze dobrze zrobilem
quest panel begin
state start begin
when login with pc.get_name() == "CES" begin
game.set_event_flag("oczekiwanie", 1)
end
when letter begin
send_letter("To sobie uzupelnij")
end
when logout with pc.get_name() == "CES" begin
game.set_event_flag("oczekiwanie", 0)
end
when button or info with pc.is_gm() begin
say_title("to sobie uzupelnij")
say("")
say("")
end
end
end

no niestety nie działa

sankixd · 16 Stycznia 2012

no niestety nie działa

a w ten sposob?

quest panel begin
state start begin
	when login with pc.get_name() == "CES" begin
		game.set_event_flag("oczekiwanie", 1)
		set_state(cos)
	end
end
state cos begin
	when letter begin
		send_letter("To sobie uzupelnij")
	end
	when button or info with pc.is_gm() begin
		say_title("to sobie uzupelnij")
		say("")
		say("")
	end
	when logout with pc.get_name() == "CES" begin
		game.set_event_flag("oczekiwanie", 0)
	end
end
end

.trollus · 16 Stycznia 2012

ponawiam proźbę :P

sankixd · 16 Stycznia 2012

Witam, to jeszcze raz ja

Ja to widzę tak Idę do NPC o ID 9003. Tam pogadanki itp. Za 5kk, ona daje mi skill na G1, pod warunkiem, że jest on rozwinięty na przynajmniej M1 :P

Sypię lajkami, pozdrawiam ;P

mam takiego co daje na P (przerobic ze daje na g da sie prosto) ale nie wiem jak sprawdzic czy ma na M. ale poprobuje jak bede mial czas

Stelios · 16 Stycznia 2012

a w ten sposob?

quest panel begin
state start begin
	when login with pc.get_name() == "CES" begin
		game.set_event_flag("oczekiwanie", 1)
		set_state(cos)
	end
end
state cos begin
	when letter begin
		send_letter("To sobie uzupelnij")
	end
	when button or info with pc.is_gm() begin
		say_title("to sobie uzupelnij")
		say("")
		say("")
	end
	when logout with pc.get_name() == "CES" begin
		game.set_event_flag("oczekiwanie", 0)
	end
end
end

W ten sposób zadziałałoby tylko raz, bo ustawiasz state który zaczyna when w którym jest co ma zrobić jeśli się wyloguje.

A nie prościej zrobić coś takiego:

quest tekst begin
   state start begin
       when letter begin
           send_letter("Tytuł listu ")
       end
       when button or info begin
           if pc.get_name() == "CES" then
               if pc.is_gm() then
                   say("Tekst wiadomości ")
                   say("Tekst wiadomości ")
                   say("Tekst wiadomości ")
               else
                   setstate(koniec)
               end
           else
               setstate(koniec)
           end
       end
   end
   state koniec begin
   end
end

Sprawdz i podaj czy działa, jeśli nie działa zamiast "CES" wpisz CES

adm · 16 Stycznia 2012

W ten sposób zadziałałoby tylko raz, bo ustawiasz state który zaczyna when w którym jest co ma zrobić jeśli się wyloguje.

A nie prościej zrobić coś takiego:
quest tekst begin
state start begin
	when letter begin
		send_letter("Tytuł listu ")
	end
	when button or info begin
		if pc.get_name() == "CES" then
			if pc.is_gm() then
				say("Tekst wiadomości ")
				say("Tekst wiadomości ")
				say("Tekst wiadomości ")
			else
				setstate(koniec)
			end
		else
			setstate(koniec)
		end
	end
end
state koniec begin
end
end
Sprawdz i podaj czy działa, jeśli nie działa zamiast "CES" wpisz CES

szczerze powiedziawszy że nie zbyt mi się podoba to rozwiązanie. bo mam potem jeszcze 480 linijek kodu do wstawienia. więc jak można to jakieś rozwiązanie do tego co podał sankixd tylko żeby dobrze działało.

Sunushi · 16 Stycznia 2012

Witam, to jeszcze raz ja

Ja to widzę tak Idę do NPC o ID 9003. Tam pogadanki itp. Za 5kk, ona daje mi skill na G1, pod warunkiem, że jest on rozwinięty na przynajmniej M1 :P

Sypię lajkami, pozdrawiam ;P

Nie żebym się czepiał ale cholernie mi to Kalimdorem zalatuje

Nie ogarniam funkcji tabel, niestety nie podejmę się tego zadania.

sankixd · 16 Stycznia 2012

szczerze powiedziawszy że nie zbyt mi się podoba to rozwiązanie. bo mam potem jeszcze 480 linijek kodu do wstawienia. więc jak można to jakieś rozwiązanie do tego co podał sankixd tylko żeby dobrze działało.

no wlasnie bralem to pod uwage jak za 1 razem go poprawialem. ale skoro nie dziala to niestety nie wiem: P

Nie żebym się czepiał ale cholernie mi to Kalimdorem zalatuje

Nie ogarniam funkcji tabel, niestety nie podejmę się tego zadania.

zaraz mu to postaram sie przerobic tylko tak jak pisalem, nie wiem czy z robie z funkcja sprawdzania skilla czy ma na M. jesli mi wyjdzie, to postaram sie to zrobic, a nawet dodam na swoj serwer jak bedzie dzialalo ;d

Rower1310 · 17 Stycznia 2012

co oznacza taki błąd

Syntax error: word unexpected (expecting ")")

Zaloguj się

👋 Witaj na MPCForum!

Pisanie / Poprawa Questów !

Rekomendowane odpowiedzi

Zarchiwizowany