[TuT] Tworzenie regenu poprzez quest

[z4z0l]

http://www.youtube.com/watch?v=txIVNee9JPU&feature=youtu.be

 

 

POLECAM WERSJĘ NA WKLEJ.TO GDZIE WIDAĆ DOKŁADNY KOD (CHODZI MI O \T)

 

 

Yo yo yo yo. Pewnie znów zajebałem to z epvp lub innych for ale co tam Przejdźmy do rzeczy. Tym skryptem aka questem, tworzymy PEŁNY regen. Wpisujemy 8 wartości i mamy gotowy regen zapisany w pliku. Edytujemy wszystko pod swoje warunki pracy, czy coś. Może podam quest bo po chuj macie to czytać ...

 

http://wklej.to/JAQ8N

 

 

 

 

quest regen begin
state start begin
 when 20011.chat."Stwórz regen" begin

  local sciezka = "/usr/home/game/share/locale/germany/quest/"

  say_blekit("Podaj nazwę nowego pliku, pamiętając że nie może")
  say_blekit("przekraczać ona 15 znaków  :")
  say()
  say_red("DODATKOWO MOŻESZ DODAĆ ROZSZERZENIE !")
  say_yellow("Przykład : regen.txt")
  say()
  local nowyplik = input()
if nowyplik == "" then
 say_red("Nazwa nie może zostać pusta.")
 return
end
if io.open(sciezka..nowyplik, "r") != nil then
 say_red("Plik o nazwie "..nowyplik.." już istnieje.")
else
 say_blekit("Świetnie, przejdź dalej.")
  local xx = select("Kontynuuj")
   if xx == 1 then

	say_title("Podaj minimalną wartość x :")
	local x_min = tonumber(input())
	 if x_min == "" then
	  say_red("To pole nie może pozostać puste.")
	  return
	 end

	say_title("Podaj maksymalną wartość x :")
	local x_max = tonumber(input())
	 if x_max == "" then
	  say_red("To pole nie może pozostać puste.")
	  return
	 end

	say_title("Podaj minimalną wartość y :")
	local y_min = tonumber(input())
	 if y_min == "" then
	  say_red("To pole nie może pozostać puste.")
	  return
	 end

	say_title("Podaj maksymalną wartość y :")
	local y_max = tonumber(input())

	 if y_max == "" then
	  say_red("To pole nie może pozostać puste.")
	  return
	 end

	say_title("Podaj id grupy :")
	local id_grupy = tonumber(input())
	 if id_grupy == "" then
	  say_red("To pole nie może pozostać puste.")
	  return
	 else
	  say_title("Ilość grup zesłanych na dane kordy :")
	   local max_ilosc = 150
	   local ilosc = tonumber(input())
		if ilosc <= 0 then
		 say_red("Wartość tego pola musi być większa niż 0.")
		 return
		elseif ilosc >= max_ilosc then
		 say_red("Za duża wartość. Maksymalnie możesz wykonać "..max_ilosc.." obrotów pętli.")
		else
		 say_title("Ilość sekund do następnego respu potworów : ")
		 say()
		 say_red("Podaj samą liczbę, bez \'s\'")
		  local czas = tonumber(input())
		   if czas <= 0 then
			say_red("To pole musi być większe niż 0.")
			return
		   else
			io.output(sciezka..nowyplik)
			for i = 1, ilosc do
			 local liczx = number(x_min, x_max)
			 local liczy = number(y_min, y_max)

			 io.write("r	"..liczx.."	"..liczy.."	5	5	0	0	"..czas.."s	100	1	"..id_grupy)
			 io.write("\\n")
			end

			io.close()
			say_blekit("Plik został zapisany pomyślnie.")
		   end
		end
	 end
   end
end
 end
end
end

 

 

Jak wykorzystujemy ? Według podanych instrukcji

 

 

Pozdrawiam, hejty ON.

 

 

przykładowy plik z regenem wygląda tak :

 

 

r[TAB]283[TAB]376[TAB]5[TAB]5[TAB]0[TAB]0[TAB]33s[TAB]100[TAB]1[TAB]1001
r[TAB]281[TAB]370[TAB]5[TAB]5[TAB]0[TAB]0[TAB]33s[TAB]100[TAB]1[TAB]1001
r[TAB]247[TAB]350[TAB]5[TAB]5[TAB]0[TAB]0[TAB]33s[TAB]100[TAB]1[TAB]1001
r[TAB]234[TAB]377[TAB]5[TAB]5[TAB]0[TAB]0[TAB]33s[TAB]100[TAB]1[TAB]1001
r[TAB]259[TAB]360[TAB]5[TAB]5[TAB]0[TAB]0[TAB]33s[TAB]100[TAB]1[TAB]1001
r[TAB]224[TAB]362[TAB]5[TAB]5[TAB]0[TAB]0[TAB]33s[TAB]100[TAB]1[TAB]1001
r[TAB]241[TAB]360[TAB]5[TAB]5[TAB]0[TAB]0[TAB]33s[TAB]100[TAB]1[TAB]1001
r[TAB]228[TAB]376[TAB]5[TAB]5[TAB]0[TAB]0[TAB]33s[TAB]100[TAB]1[TAB]1001
r[TAB]274[TAB]369[TAB]5[TAB]5[TAB]0[TAB]0[TAB]33s[TAB]100[TAB]1[TAB]1001
r[TAB]261[TAB]355[TAB]5[TAB]5[TAB]0[TAB]0[TAB]33s[TAB]100[TAB]1[TAB]1001
r[TAB]243[TAB]371[TAB]5[TAB]5[TAB]0[TAB]0[TAB]33s[TAB]100[TAB]1[TAB]1001
r[TAB]240[TAB]385[TAB]5[TAB]5[TAB]0[TAB]0[TAB]33s[TAB]100[TAB]1[TAB]1001
r[TAB]276[TAB]371[TAB]5[TAB]5[TAB]0[TAB]0[TAB]33s[TAB]100[TAB]1[TAB]1001
r[TAB]259[TAB]385[TAB]5[TAB]5[TAB]0[TAB]0[TAB]33s[TAB]100[TAB]1[TAB]1001
r[TAB]238[TAB]354[TAB]5[TAB]5[TAB]0[TAB]0[TAB]33s[TAB]100[TAB]1[TAB]1001
r[TAB]268[TAB]367[TAB]5[TAB]5[TAB]0[TAB]0[TAB]33s[TAB]100[TAB]1[TAB]1001
r[TAB]254[TAB]359[TAB]5[TAB]5[TAB]0[TAB]0[TAB]33s[TAB]100[TAB]1[TAB]1001
r[TAB]239[TAB]361[TAB]5[TAB]5[TAB]0[TAB]0[TAB]33s[TAB]100[TAB]1[TAB]1001
r[TAB]258[TAB]385[TAB]5[TAB]5[TAB]0[TAB]0[TAB]33s[TAB]100[TAB]1[TAB]1001
r[TAB]256[TAB]371[TAB]5[TAB]5[TAB]0[TAB]0[TAB]33s[TAB]100[TAB]1[TAB]1001

[BułkoVski]

i mucio ;]

[JonyNawa1ony]

Super, na pewno się przyda na nowe mapy!

Tylko może pozamieniaj te funkcje ( say_blekit, say_red )

bo zaraz zaczną hejotwać, że quest nie działa itd...

Na przykład na say_title

[Kuń]

metin2 map pointer jest lepszy niz questem.. wystarczy klikac , nie wiem po co quest taki komu. ale coz przyda sie

[Tenma]

Też robię w ten sposób regeny na mapach które nie mają minimapy. Jeżeli mapka ma minimape lepiej do tego nadaje się metin2 map pointer.

[z4z0l]

metin2 map pointer jest lepszy niz questem.. wystarczy klikac , nie wiem po co quest taki komu. ale coz przyda sie

 

Jak już wspomniałem, jest to tylko 8 wartości podanych do questa i mamy GOTOWCA, przy czym możemy wskazać od razu powiedzmy 100 wyników, co daje nam 100 LOSOWYCH kordów, na którym zostanie zrzucona dana grupa ...

 

@Tenma

nigdy się tym nie bawiłem a dziś robiąc regeny do GV2 postanowiłem napisać quest, który bardziej mi się przyda niż jakieś programy. Nigdy nie używałem map pointera i nawet nie wiem jak on działa. Każdy lubi inaczej i każdy robi jak zechce. Udostępniłem - cieszcie się.

[Terenzo.]

Ja tam wole map pointera.. Tylko że nie zawsze wczytuje mapke. ;*

 

Quest na pewno mi się przyda do innych celów. Lajka dam jutro.

[shejn]

a umialbys to tak zmienić ze wystarczy ''kliknąć'' na item ?

[z4z0l]

zamiast

when 20011.chat."Stwórz regen" begin

daj

when 30001.use begin

 

czy coś

[shejn]

fajnie by bylo gdyby kazdy regen zapisywal sie od razu po kliknieciu na item tj polozenie gracza a nie wpisywanie ; d

[z4z0l]

No dobra ale położenie gracza to tylko dwa kordy a tutaj potrzebujemy cztery sztuki. Aż tak zautomatyzować to nie wiem czy się da żeby nie popełnić żadnego błędu.