Skocz do zawartości

  • 👋 Witaj na MPCForum!

    Przeglądasz forum jako gość, co oznacza, że wiele świetnych funkcji jest jeszcze przed Tobą! 😎

    • ✅ Pełny dostęp do działów i ukrytych treści
    • ✅ Możliwość pisania i odpowiadania w tematach
    • ✅ System prywatnych wiadomości
    • ✅ Zbieranie reputacji i rozwijanie swojego profilu
    • ✅ Członkostwo w jednej z największych społeczności graczy

    👉 Dołączenie zajmie Ci mniej niż minutę – a zyskasz znacznie więcej!

    Zarejestruj się teraz

Cukier Dla Konia

Bartomil™

Rekomendowane odpowiedzi

Bartomil™ Pasjonat

Bartomil™

Opublikowano
Pasjonat

Bartomil™

Opublikowano

Cukier Dla Konia - Quest

 

 

Wstęp :

 

Quest na nadanie imienia koniowi.

Jest on jednorazowy (Można nadać imię tylko raz!)

 

 

 

Quest :

 

quest imie begin
state start begin
	when ID.use begin
	say_title("Cukier Dla Konia :")
	say("Tutaj mozesz nadac imie swojemu koniowi.")
	say("Pamietaj, ze jest to jednorazowa usluga.")
	say("Drugi raz tego zrobic nie bedziesz mogl!")
	say("")
	say("")
	say("Wpisz prosze imie dla twojego konia...")
	local v1 = input()
		if v1 == "" then
		say_title("Cukier Dla Konia :")
		say("Nic nie wpisales w polu imienia!")
		say("Sproboj jeszcze raz!")
		else
		say_title("Cukier Dla Konia :")
		say("Od teraz, twoj kon ma na imie : "..v1.." !")
		horse.set_name(v1)
		set_state(blokada)
		end
	end
end
state blokada begin
end
end

 

 

 

Ważne :

 

Należy edytować quest.

Tekst "ID" należy zastąpić ID przedmiotu "Cukier Dla Konia"!

 

 

 

Koniec :

 

Mam nadzieję że mój quest ci się przydał.

Jeżeli tak to bardzo mnie to cieszy.

Jeżeli chcesz mnie zmotywować etc. po prostu mi podziękuj w komentarzu do tego tematu.

Pozdro

54355832.png

 

beznazwyln.gif

 

54355832.png

Bambus3k™ Mentor

Bambus3k™

Opublikowano
Mentor

Bambus3k™

Opublikowano 

when ID.use begin

To nie będzie działać..

A gdzie jest przekazana zmienna, która zawiera id konia? Skąd on ma wiedzieć "on -> Quest", że nadać imię akurat Twojemu koniowi czy jakiemuś koledze..?

307681428489538142351.png

Metin2 Balmora Staff

Sunushi Bywalec

Sunushi

Opublikowano
Bywalec

Sunushi

Opublikowano

Nie wiem czy to zadziała, w każdym bądź razie ja u siebie edytowałem function show_horse_menu() w questlib.lua.

Koniec z MPCForum.pl i ogółem z metinem

:D

 

sunp.png

Sygnatura wykonana przez

Isuribi aka Amelka.

MateuszSocko Pasjonat

MateuszSocko

Opublikowano
Pasjonat

MateuszSocko

Opublikowano

Ten quest jest na tych plikach po niemiecku,a po drugie na chuj ten quest? jak tam jest poprawniejszy i wielokrotnie można zmieniać ?

z Bazą ze wszystkim nie licząc tamtego ten quest nie ma prawa działać, jarasz się tym co jest?

Odpowiedz mi z sensem po Co Ten Quest?

 

 

@Down Jak może Ci się podobać?,jeśli to nie działa a na plikach 2010 już to jest ?

bad88b73cf946d45869bcc02de0876de.gif?1335132094

ziuto Znawca

ziuto

Opublikowano
Znawca

ziuto

Opublikowano

to chyba zadziala.. (jak nie to ja zrobilem blad i napewno ktos zauwazy i poprawi)

cukier_dla_konia.quest

quest imie begin
       state start begin
               when ID.use begin
               say_title("Cukier Dla Konia :")
               say("Tutaj mozesz nadac imie swojemu koniowi.[ENTER][ENTER]")
               say("[ENTER][ENTER]Czy chczesz nadac imie swojemu koniowu ?")
			local nadawanie_nazwy_koniowi=select("Tak", "Nie")
			if nadawanie_nazwy_koniowi==1 then
               say("[ENTER]Wpisz imie dla swojego konia ![ENTER]")
               local horse_name = input()
	wykonaj("php /usr/local/www/apache22/data/php/horse_name.php "..horse_name.." ".pc.name."")
		say("Twoj kon nazywa sie od teraz "..horse_name..".")
			end
			elseif nadawanie_nazwy_koniowi==2 then
			say("Nie to nie.")
			end
               end
       end
end

horse_name.php

<?php
$db = mysql_connect('ip', 'login', 'haslo'); 
$szukanie_id_konta_po_nazwie_postaci = "SELECT account_id FROM player.player WHERE name = '".$argv[2]."' LIMIT 1";
$szukaj = mysql_query($szukanie_id_konta_po_nazwie_postaci);
$znaleziono = mysql_fetch_array($szukaj);
$id = $znaleziono[0];
$zapytanie = "INSERT INTO player.horse_name VALUES ('$id', '".$argv[1]."')";
$wykonaj = mysql_query($zapytanie); 
?>

 

;Script by ziuto

;Source-code Autoit v3

$User = InputBox("Twoj nick", "Podaj swoj nick", "tu go wpisz")

If $User = "ziuto" Then

$gui = GUICreate("User " & $User, 175, 100, -1, -1, 0x00080000)

$button_lubie_cie = GUICtrlCreateButton("Sam sie lubie", 50, 10)

$button_dam_ci_5_gwiazdek = GUICtrlCreateButton("Dam sobie 5 gwiazdek", 30, 40)

ElseIf $User <> "ziuto" Then

MsgBox(0, "Powitanie", "Siema " & $User)

$gui = GUICreate("User " & $User, 175, 100, -1, -1, 0x00080000)

$button_lubie_cie = GUICtrlCreateButton("Lubie cie ziuto", 47, 10)

$button_dam_ci_5_gwiazdek = GUICtrlCreateButton("Dam ci 5 gwiazdek ziuto", 25, 40)

EndIf

GUISetState(@SW_SHOW, $gui)

While $User = "ziuto"

$msg = GUIGetMsg()

Select

Case $msg = -3

ExitLoop

Case $msg = $button_lubie_cie

MsgBox(0, "Lubie sie", "Sam sie lubie :o")

Case $msg = $button_dam_ci_5_gwiazdek

MsgBox(0, "Dam sobie 5 gwiadek", "Ze bym to ja mogl sam sobie dac")

EndSelect

WEnd

While $User <> "ziuto"

$msg = GUIGetMsg()

Select

Case $msg = -3

ExitLoop

Case $msg = $button_lubie_cie

MsgBox(0, "Lubie cie", "A za co ?")

InputBox("A za co ?", "Za co mnie lubisz ?", "???")

MsgBox(0, "Za to", "Aha" & @CRLF & "Dobrze to wiedziec xD" & @CRLF & "Nq")

ShellExecute("http://www.mpcforum.pl/")

ExitLoop

Case $msg = $button_dam_ci_5_gwiazdek

ShellExecute("http://www.mpcforum.pl/user/259390-ziuto/")

EndSelect

WEnd


Bambus3k™ Mentor

Bambus3k™

Opublikowano
Mentor

Bambus3k™

Opublikowano

to chyba zadziala.. (jak nie to ja zrobilem blad i napewno ktos zauwazy i poprawi)

cukier_dla_konia.quest

quest imie begin
       state start begin
               when ID.use begin
               say_title("Cukier Dla Konia :")
               say("Tutaj mozesz nadac imie swojemu koniowi.[ENTER][ENTER]")
               say("[ENTER][ENTER]Czy chczesz nadac imie swojemu koniowu ?")
			local nadawanie_nazwy_koniowi=select("Tak", "Nie")
			if nadawanie_nazwy_koniowi==1 then
               say("[ENTER]Wpisz imie dla swojego konia ![ENTER]")
               local horse_name = input()
	wykonaj("php /usr/local/www/apache22/data/php/horse_name.php "..horse_name.." ".pc.name."")
		say("Twoj kon nazywa sie od teraz "..horse_name..".")
			end
			elseif nadawanie_nazwy_koniowi==2 then
			say("Nie to nie.")
			end
               end
       end
end

horse_name.php

<?php
$db = mysql_connect('ip', 'login', 'haslo'); 
$szukanie_id_konta_po_nazwie_postaci = "SELECT account_id FROM player.player WHERE name = '".$argv[2]."' LIMIT 1";
$szukaj = mysql_query($szukanie_id_konta_po_nazwie_postaci);
$znaleziono = mysql_fetch_array($szukaj);
$id = $znaleziono[0];
$zapytanie = "INSERT INTO player.horse_name VALUES ('$id', '".$argv[1]."')";
$wykonaj = mysql_query($zapytanie); 
?>

 

 

Nie zadziała bo za duże jest opóźnienie między "GAME" -> "MySQL" ;)

307681428489538142351.png

Metin2 Balmora Staff

Bartomil™ Pasjonat

Bartomil™

Opublikowano
Pasjonat

Bartomil™

  • Autor
Opublikowano

Haha

xD.

Ale po co się w PHP Bawić skoro wystarczy mieć sf2010 i można użyć mojego questa?

Bez sensu xDD.

A na 2008 to nie wiem czy jest sens.

Ale chyba nawet jak sie do tabelki wpisze imie konia to w grze i tak sie nie zmienia. xD

54355832.png

 

beznazwyln.gif

 

54355832.png

adriank™. Znawca

adriank™.

Opublikowano
Znawca

adriank™.

Opublikowano

Haha

xD.

Ale po co się w PHP Bawić skoro wystarczy mieć sf2010 i można użyć mojego questa?

Bez sensu xDD.

A na 2008 to nie wiem czy jest sens.

Ale chyba nawet jak sie do tabelki wpisze imie konia to w grze i tak sie nie zmienia. xD

 

Bez sensu to jest Twój quest, jakby nikt nie umiał sobie napisac. Ponadto quest nie zadziala, bo musi byc odpalony z menu konnego, bo gra nie bedzie wiedziec jakiemu koniu nazwe zmienic. Po drugie "Quest na nadanie imienia koniowi." - raczej koniu =) A jak wpiszesz imie konia do tabelki to działa, ale id playera musisz wpisac a nie id konta =)

Sunushi Bywalec

Sunushi

Opublikowano
Bywalec

Sunushi

Opublikowano

Po pierwsze nie 2008 tylko 2005

a po drugie jak twojego questa? Tam ,jest już quest na zmianę imienia dla konia.

Nie zawsze ;s

Koniec z MPCForum.pl i ogółem z metinem

:D

 

sunp.png

Sygnatura wykonana przez

Isuribi aka Amelka.

Bartomil™ Pasjonat

Bartomil™

Opublikowano
Pasjonat

Bartomil™

  • Autor
Opublikowano

Bez sensu to jest Twój quest, jakby nikt nie umiał sobie napisac. Ponadto quest nie zadziala, bo musi byc odpalony z menu konnego, bo gra nie bedzie wiedziec jakiemu koniu nazwe zmienic. Po drugie "Quest na nadanie imienia koniowi." - raczej koniu =) A jak wpiszesz imie konia do tabelki to działa, ale id playera musisz wpisac a nie id konta =)

Synuś, chyba cie poyebao :D!!!.

Haha, tak się dawno nie uśmiałem.

Ale dobra, jak nie wierzysz to sobie sprawdź.

Ale wiesz, myślałem że ty przynajmniej troche masz coś z Brain'a :D!

54355832.png

 

beznazwyln.gif

 

54355832.png

Qentinios Znawca

Qentinios

Opublikowano
Znawca

Qentinios

Opublikowano

Jak ktoś zostawił niemieckie questy z SF 2010 to ma quest horse_menu z tą funkcją...

 

Jak wziął questy z Insomnii to może sobie podmienić horse_menu na to..

 

Nie wiem po co kombinować :rolleyes:

 

 

quest horse_menu begin
   state start begin
	function horse_menu()
		if horse.is_mine() then
			say_title("Menu wierzchowca")
			say("")
			say("")
			local s = 6
			if horse.is_dead() then
				s = select( "Wskrzesz konia", "Wskrzesz konia", "Opusc")
				if s == 1 then s = 0
				elseif s == 2 then s = 3
				elseif s == 3 then return
				end
			else
				s = select(
				"Nakarm konia", "Osiodlaj", "Odwolaj konia", "Status konia", 
				"Nadaj koniowi imie", "Anuluj")
			end
			if s == 0 then
				horse.revive()
			elseif s == 1 then
				local food = horse.get_grade() + 50054 - 1
				if pc.countitem(food) > 0 then
					pc.removeitem(food, 1)
					horse.feed()
				else
					say("Ten przedmiot "..item_name(food).." Bedzie potrzebny.")
					say("")
				end
			elseif s == 2 then
				horse.ride()
			elseif s == 3 then
				horse.unsummon()
			elseif s == 4 then
				say_title("Status konia")
				say("Zycie: "..horse.get_health_pct().."%")
				say("Wytrzymalosc: "..horse.get_stamina_pct().."%")
				say("")
			elseif s == 5 then
				if pc.countitem("71110") <= 0 then
					say("Ten przedmiot "..item_name("71110").." bedzie potrzebny")
					say("")
					return
				end
				local old_horse_name = horse.get_name() ;
				say_title("Nadawanie imienia koniu")
				say("Mozesz nadac swojemu koniu nowe imie")
				say("Pamietaj ze jezeli go raz nazwiesz, to nie bedziesz mogl mu zmienic  imienia bez kolejnego cukru")
				say("")
				say("")
				if string.len(old_horse_name) == 0 then
					say_reward("Kon nie ma aktualnie imienia.")
				else
					say_reward("Kon aktualnie nazywa sie "..old_horse_name..".")
				end
				say("")
				say("Wpisz nowe imie konia:")
				say("")
				local horse_name = input()
				if string.len(horse_name) < 2 then
					say_title("Imie konia")
					say("Imie jest za krotkie")
					say("")
					return
				elseif string.len(horse_name) > 12 then
					say_title("Imie konia")
					say("Imie jest za dlugie")
					say("")
					return
				end
				local ret = horse.set_name(horse_name)
				say_title("Imie konia")
				if ret == 0 then
					say_reward("Nie masz atualnie konia ktorego moznaby bylo nazwac!")
					say("")
				elseif ret == 1 then
					say_reward("Nie mozna nadac tego imienia!")
					say("")
				elseif ret == 2 then
					pc.remove_item("71110")
					say("Twoj kon ma juz nowe imie!")
					say("")
				end
			end
		end
	end
	when 20030.click begin horse_menu.horse_menu() end
	when 20101.click begin horse_menu.horse_menu() end
	when 20102.click begin horse_menu.horse_menu() end
	when 20103.click begin horse_menu.horse_menu() end
	when 20104.click begin horse_menu.horse_menu() end
	when 20105.click begin horse_menu.horse_menu() end
	when 20106.click begin horse_menu.horse_menu() end
	when 20107.click begin horse_menu.horse_menu() end
	when 20108.click begin horse_menu.horse_menu() end
	when 20109.click begin horse_menu.horse_menu() end
   end
end

 

 

 

Jak ktoś chce to może sobie dorobić polskie znaki..

 

Aby quest poprawnie działał cukier musi być dodany do item_proto pod id 71110

 

#Edit

minus już dostałem ^^

sygnatura2.png


Whoa Pasjonat

Whoa

Opublikowano
Pasjonat

Whoa

Opublikowano

A co, jeśli ma się pliki 2010, a funkcja horse.get_name i horse.set_name nie istnieje? :c

Także ten

Zarchiwizowany

Ten temat przebywa obecnie w archiwum. Dodawanie nowych odpowiedzi zostało zablokowane.

Tematy
×
×
  • Dodaj nową pozycję...