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

Users Panel

Hostel_ViTali

Rekomendowane odpowiedzi

Hostel_ViTali Budowniczy

Hostel_ViTali

Opublikowano
Budowniczy

Hostel_ViTali

Opublikowano 

quest userpannel begin
	state start begin
		when 69010.use begin
				say_koral("Witaj ".. pc.get_name() .."!")
				say("Co chcesz zrobić? ")
				local menu = select("Kup Mikstury ", "Otwórz Depozyt ", "Napisz coś wszystkim ", "Usuń Poliformię ", "Sprawdź Gracza", "Zamknij ")
				if menu == 1 then
				-----------------------------
		    local brak_kasa = "Niestety, ale nie masz wystarczającej ilości Yang. "
		    -----------------------------
		    local red_potki_200 = 32000
            local red_potki_1000 = 160000
            local blue_potki_200 = 96000
            local blue_potki_1000 = 480000
			local wywar_red_200 = 140000
			local wywar_red_1000 = 700000
			local wywar_blue_200 = 240000
			local wywar_blue_1000 = 1200000
            local green_potki_50 = 150000
            local fiol_potki_50 = 150000
		    -----------------------------
			say_title("Kup Mikstury: ")
                local s = select ( "200 Dużych Czerwonych - 32k " , "1000 Dużych Czerwonych - 160k " , "200 Dużych Niebieskich - 96k " , "1000 Dużych Niebieskich - 480k " , "200 Czerwonych Wywarów - 140k ", "1000 Czerwonych Wywarów - 700k", "200 Niebieskich Wywarów - 240k ", "1000 Niebieskich Wywarów - 1.2kk", "50 Dużych Zielonych - 150k", "50 Dużych Fioletowych - 150k ", "Anuluj" )
                    if 1 == s then
                        if pc.get_money() >= red_potki_200 then
                            pc.give_item2(27003, 200)
                            pc.change_money(-32000)
                        else
						    say(brak_kasa)
					    end
                    elseif 2 == s then
                        if pc.get_money() >= red_potki_1000 then
                            pc.give_item2(27003, 200)
                            pc.give_item2(27003, 200)
                            pc.give_item2(27003, 200)
                            pc.give_item2(27003, 200)
                            pc.give_item2(27003, 200)
                            pc.change_money(-160000)
                        else
						    say(brak_kasa)
					    end
                    elseif 3 == s then
                        if pc.get_money() >= blue_potki_200 then
                            pc.give_item2(27006, 200)
                            pc.change_money(-96000)
                        else
						    say(brak_kasa)
					    end
                    elseif 4 == s then
                        if pc.get_money() >= blue_potki_1000 then
                            pc.give_item2(27006, 200)
                            pc.give_item2(27006, 200)
                            pc.give_item2(27006, 200)
                            pc.give_item2(27006, 200)
                            pc.give_item2(27006, 200)
                            pc.change_money(-480000)
                        else
						    say(brak_kasa)
					    end
					elseif 5 == s then
                        if pc.get_money() >= wywar_red_200 then
                            pc.give_item2(27007, 200)
                            pc.change_money(-140000)
                        else
						    say(brak_kasa)
					    end
					elseif 6 == s then
                        if pc.get_money() >= wywar_red_1000 then
                            pc.give_item2(27007, 200)
							pc.give_item2(27007, 200)
							pc.give_item2(27007, 200)
							pc.give_item2(27007, 200)
							pc.give_item2(27007, 200)
                            pc.change_money(-700000)
                        else
						    say(brak_kasa)
					    end
					elseif 7 == s then
                        if pc.get_money() >= wywar_blue_200 then
                            pc.give_item2(27008, 200)
                            pc.change_money(-240000)
                        else
						    say(brak_kasa)
					    end
					elseif 8 == s then
                         if pc.get_money() >= wywar_blue_1000 then
                            pc.give_item2(27008, 200)
							pc.give_item2(27008, 200)
							pc.give_item2(27008, 200)
							pc.give_item2(27008, 200)
							pc.give_item2(27008, 200)
                            pc.change_money(-1200000)
                        else
						    say(brak_kasa)
					    end
                    elseif 9 == s then
                        if pc.get_money() >= green_potki_50 then
                            pc.give_item2(27102, 200)
                            pc.change_money(-150000)
                        else
						    say(brak_kasa)
					    end
                    elseif 10 == s then
                        if pc.get_money() >= fiol_potki_50 then
                            pc.give_item2(27105, 50)
                            pc.change_money(-150000)
                        else
						    say(brak_kasa)
					    end
						end
				elseif menu == 4 then
				if not pc.is_polymorphed() then
				chat("Nie jesteś przemieniony w potwora! ")
				else
				pc.remove_polymorph()
				chat("Poliformia została usunięta pomyślnie. ")
				end
				elseif menu == 5 then
			say_koral("Witaj ".. pc.get_name() .."!")
say_cialo("Mam dobrą pamięć, pamiętam wielu graczy. ")
say_cialo("Wpisz nazwę gracza, którego chcesz sprawdzić. ")
say("")
say_akwa("W oknie poniżej wpisz nick osoby. ")
local p_kujacy = input()
if p_kujacy =="" then
say_koral("".. pc.get_name() .."...")
say_cialo("Musisz podać nazwę gracza! ")
else
local find = find_pc_by_name(p_kujacy)
if find == 0 then
say_koral("".. pc.get_name() .."...")
say_cialo("Gracz nie jest zalogowany! ")
else
local wyjscie = pc.select(find)
local name = pc.get_name()
local lvl = pc.get_level()
local imp = pc.get_empire()
local dos = pc.get_exp()
local ranga = pc.get_real_alignment() 
local kon = pc.get_horse_level()
pc.select(wyjscie)
say_koral("Informacja o graczu: ")
say("")
say_cialo("Nazwa : "..name)
say_cialo("Lv. : "..lvl)
say_cialo("Królestwo : "..imp)
say_cialo("Punkty Doswiadczenia : "..dos)
say_cialo("Punkty Rangi : "..ranga)
say_cialo("Poziom Konia : "..kon)
say("")
say_akwa("Dostępne Królestwa")
say_cialo("1 - Schinsoo")
say_cialo("2 - Chunjo")
say_cialo("3 - Jinno")
say("")
say_biskup("Jeśli będziesz chciał kogoś sprawdzić to zapraszam.")
end
end
				elseif menu == 2 then
				game.open_safebox()
				elseif menu == 3 then
				say_koral("Witaj ".. pc.get_name() .."!")
				say_cialo("Możesz wysłać wiadomość do trzech Królestw. ")
				say_cialo("Wysłanie kosztuje 5.000.000 Yang.")
				say("")
				say_akwa("Czy chcesz coś przekazać?")
				local b=select("Tak", "Nie")
				if 1==b then
				if pc.money < 5000000 then
				say_koral("Informacja: ")
				say_cialo("Masz za mało Yang!")
				elseif pc.money >= 5000000 then
				say_koral("Wpisz tekst:")
				local c=input()
					if string.len(c) < 1 then
						say_koral("Informacja: ")
						say_cialo("Wiadomość jest zbyt krótka. ")
						return
					elseif string.len(c) > 50 then
						say_koral("Informacja: ")
						say_cialo("Wiadomość jest zbyt długa. ")
						return
					end
        local nation = { "Shinsoo","Chunjo","Jinno" }
        notice_all(" Nick: "..pc.get_name()..", Królestwo: "..nation[pc.getempire()]..", Wiadomość: "..c)
        pc.change_gold(-5000000)
			elseif 2==b then
			else
				say("UNKNOWN BUTTON ["..b.."]")
			end
			
			elseif menu == 6 then
					return
				end
		end
		end
	end
end

 

 

nie wiem czy już był jak był podobny to przykro mi :) podziękuj jak się przydało !

 

tak wygląda w grze

 

 

1373742159-U891712.png

Revius Rekrut

Revius

Opublikowano
Rekrut

Revius

Opublikowano

Użyłbym go chyba tylko gdybym nie miał nic innego. Strasznie zawiłe i nieciekawie napisane.

szq9.png


SYGNATURA BY REEV


Jeżeli potrzebujesz questa, zakodowania strony WWW, podpięcie skryptów pod stronę czy jakiejś nowości do clienta, napisz - pomogę w miarę możliwości.


watus Mentor

watus

Opublikowano
Mentor

watus

Opublikowano 
quest potki begin
	state start begin
		when login or levelup with pc.get_level() >= 1 begin
			set_state( gotoinfomation )
		end
	end
	state gotoinfomation begin
		when letter begin
			send_letter("Kup potki")
		end
		when button or info begin
			-----------------------------
            local brak_kasa = "Niestety, ale nie masz Wystarczającej ilości Yang. "
            -----------------------------
            local red_potki_200 = 32000
			local red_potki_1000 = 160000
			local blue_potki_200 = 64000
			local blue_potki_1000 = 320000
			local green_potki_200 = 100000
			local green_potki_1000 = 500000
            -----------------------------
			say_title("Kup potki")
				local s = select ( "200 Duze Czerwone 32k" , "1000 Duze Czerwone 160k" , "200 Duze Niebieskie 64k" , "1000 Duze Niebieskie 320k" , "200 Duze Zielone 100k" , "1000 Duze Zielone 500k" , "Anuluj" )
					if 1 == s then
						if pc.get_money() >= red_potki_200 then
							pc.give_item2(27003, 200)
							pc.change_money(-32000)
						else
                            say(brak_kasa)
                        end
					elseif 2 == s then
						if pc.get_money() >= red_potki_1000 then
							pc.give_item2(27003, 200)
							pc.give_item2(27003, 200)
							pc.give_item2(27003, 200)
							pc.give_item2(27003, 200)
							pc.give_item2(27003, 200)
							pc.change_money(-160000)
						else
                            say(brak_kasa)
                        end
					elseif 3 == s then
						if pc.get_money() >= blue_potki_200 then
							pc.give_item2(27006, 200)
							pc.change_money(-64000)
						else
                            say(brak_kasa)
                        end
					elseif 4 == s then
						if pc.get_money() >= blue_potki_1000 then
							pc.give_item2(27006, 200)
							pc.give_item2(27006, 200)
							pc.give_item2(27006, 200)
							pc.give_item2(27006, 200)
							pc.give_item2(27006, 200)
							pc.change_money(-320000)
						else
                            say(brak_kasa)
                        end
					elseif 5 == s then
						if pc.get_money() >= green_potki_200 then
							pc.give_item2(27102, 200)
							pc.change_money(-100000)
						else
                            say(brak_kasa)
                        end
					elseif 6 == s then
						if pc.get_money() >= green_potki_1000 then
							pc.give_item2(27102, 200)
							pc.give_item2(27102, 200)
							pc.give_item2(27102, 200)
							pc.give_item2(27102, 200)
							pc.give_item2(27102, 200)
							pc.change_money(-500000)
						else
                            say(brak_kasa)
                        end
					end
				end
		end
end

up nie spianaj sie tak :D , napisalem tylko ze widze, nie napisalem ze to zle xD

Revius Rekrut

Revius

Opublikowano
Rekrut

Revius

Opublikowano

Można by to przepisać na tablice. Wyszłoby dużo krócej, przejrzyściej i łatwiej, a co najważniejsze szybciej byłoby można skonfigurować to pod własne wymagania.

Skoro tak...

quest potki begin
	state start begin
		function main()
			local p = {
			[1] = {id potkow, ilosc, cena},
			-- dopusujcie sobie
			}
			local v = {}
			for i = 1, table.getn(p) do
				table.insert(v, item_name(p[i][1]))
			end
			table.insert(v, "Zamknij")
			local s = select_table(v)
			if s == table.getn(p)+1 then return end
			say_title("Kup Potku")
			say_item_vnum(p[s][1])
			say_reward("Ilość: "..p[s][2])
			say_reward("Cena: "..p[s][3])
			if pc.money < p[s][3] then
				say_reward("Nie stać Cię na potki!")
				if select("Wróć ","Zamknij") == 1 then
					potki.main()
				else
					return
				end
			else
				local s2 = select("Kup","Wróć ","Zamknij")
				if s2 == 1 then
					if p[s][2] > 200 then
						local m = math.floor(p[s][2]/200)
						for i = 1, m do
							pc.give_item2(p[s][1], 200)
						end
					else
						pc.give_item2(p[s][1], p[s][2])
					end
					say_title("Kup Potki")
					say_item_vnum(p[s][1])
					say_reward("Pomyślnie zakupiono przedmiot!")
					pc.change_money(-p[s][3])
				elseif s2 == 2 then
					potki.main()
				end
			end
		end
		when login or letter begin
			send_letter("Kup Potki")
		end
		when button or info begin
			potki.main()
		end
	end
end

szq9.png


SYGNATURA BY REEV


Jeżeli potrzebujesz questa, zakodowania strony WWW, podpięcie skryptów pod stronę czy jakiejś nowości do clienta, napisz - pomogę w miarę możliwości.


WinTeR32 Znawca

WinTeR32

Opublikowano
Znawca

WinTeR32

Opublikowano

Pytania :

 

1. Sprawdz Gracza jest Dla GM? (tyylko)

2. Sprawdz Gracza, co sprawdza ? jaki ma lv tylko ?

3. Wszystko będzie w Pierscieniu Teleportacji ?

pre_1392135549__sygnatura_winter32.png

pajsor33 Pomocnik

pajsor33

Opublikowano
Pomocnik

pajsor33

Opublikowano

1.Dla gracza mozna edytowac ze tylko dla gm'a .

2.Sprawdz to:

say_cialo("Nazwa : "..name)
say_cialo("Lv. : "..lvl)
say_cialo("Królestwo : "..imp)
say_cialo("Punkty Doswiadczenia : "..dos)
say_cialo("Punkty Rangi : "..ranga)
say_cialo("Poziom Konia : "..kon)

 

 

3.Bedzie gdzie ustalisz.

tutaj jest to na to :when 69010.use begin

Hostel_ViTali Budowniczy

Hostel_ViTali

Opublikowano
Budowniczy

Hostel_ViTali

  • Autor
Opublikowano

Po co wrzucać coś, co może mieć każdy? Ten Quest jest z plików etha** :)

jak byś miał coś w głowie to byś wiedział że może plików ethany nie ma każdy

Zarchiwizowany

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

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