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

Na Start Do 4Fun/Hard

ziuto

Rekomendowane odpowiedzi

ziuto Znawca

ziuto

Opublikowano
Znawca

ziuto

Opublikowano

Postanowilem sie podzielic swoim questem..

Laczymy sie przez WinSCP / FileZille na nasz serw..

Wchodzimy do ../quest/

Otwietamy plik skill_group.quest

Usuwamy caly tekst z niego i wklejamy tresc mojego questa

Tresc mojego questa :
--------------------------------------------------------------------------------------------
-------------------------------------- quest by ziuto --------------------------------------
-------------------------------- quest for user mpcforum.pl --------------------------------
------------------------------------- skill_group quest ------------------------------------
--------------------------------------------------------------------------------------------
quest skill_group begin
       state start begin
               when login begin
                       if pc.getqf("first_login") == 0 then
                               pc.setqf("first_login", 1)
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())

                                      pc . set_skill_level ( 121, 3 )
                                      pc . set_skill_level ( 124, 3 )
                                      pc . set_skill_level ( 129, 3 )
                                      pc . set_skill_level ( 131, 3 )

                                      pc . give_item2 ( 72702 , 1 )
                                      pc . give_item2 ( 80009 , 1 )
                                      pc . give_item2 ( 27801 , 200 )
                                      pc . give_item2 ( 27400 , 1 )
                                      pc . give_item2 ( 29101 , 1 )
                                      pc . give_item2 ( 27002 , 200 )
                                      pc . give_item2 ( 27005 , 100 )
                                      pc . give_item2 ( 27101 , 30 )
                                      pc . give_item2 ( 27104 , 70 )
                                      pc . give_item2 ( 50051 , 1 )
                                      pc . give_item2 ( 50054 , 10 )

                                      pc . change_money(1000000)
                                      pc.change_alignment(2000)
                                      horse.set_level ( 3 )
                                      horse.ride()

                     if pc.job == 0 then
                     pc . give_item2 ( 11207 , 1 )
                     end
                     if pc.job == 1 then
                     pc . give_item2 ( 11407 , 1 )
                     end
                     if pc.job == 2 then
                     pc . give_item2 ( 11607 , 1 )
                     end
                     if pc.job == 3 then
                     pc . give_item2 ( 11807 , 1 )
                     end
	     set_state(skille)
             clear_letter ( )
           end
         end
       end             
state skille begin
	when login or levelup with pc.get_level() > 29 begin
		local v = find_npc_by_vnum(20355)
		if v != 0 then
			target.vid("__TARGET__", v, "Kapitan")
		end
		send_letter("Znajdz Kapitana")
	end

	when button or info begin
		say_title("Znajdz Kapitana")
		say("Musisz znalesc kapitana !")
		say("Znajdz go !")
	end

	when __TARGET__.target.click begin
	target.delete("__TARGET__")
	say("Witaj " .. pc . name .. " !")
	say("Mam dla ciebie ekwipunek !")
	say("Mysle ze sobie juz sam poradzisz.")
	wait()
	if pc.get_job() == 0 then
		pc.give_item2(11245, 1)
		pc.give_item2(13027, 1)
		pc.give_item2(12228, 1)
	elseif pc.get_job() == 1 then
		pc.give_item2(11445, 1)
		pc.give_item2(13027, 1)
		pc.give_item2(12368, 1)
	elseif pc.get_job() == 2 then
		pc.give_item2(11645, 1)
		pc.give_item2(13027, 1)
		pc.give_item2(12508, 1)
	elseif pc.get_job() == 3 then
		pc.give_item2(11845, 1)
		pc.give_item2(13027, 1)
		pc.give_item2(12648, 1)
		end
		say("Teraz idz do Handlarki !")
		say("Ma dla ciebie bizuterie.")
	  set_state(bizu)
       end
     end
state bizu begin
		when letter begin
			send_letter("Idz do Handlarki")
	end

	when button or info begin
		say_title("Idz do Handlarki")
		say("Musisz Isc do Handlarki.")
		say("Ma dla ciebie bizuterie.")
	end

	when __TARGET__.target.click or
	9003.chat."Bizuteria" begin
	target.delete("__TARGET__")
	say("Witaj " .. pc . name .. " !")
	say("Mam dla ciebie bizuterie !")
	say("Nie musisz dziekowac.")
	wait()
	if pc.get_job() == 0 then
		pc.give_item2(14047, 1)
		pc.give_item2(17029, 1)
		pc.give_item2(16088, 1)
		pc.give_item2(15069, 1)
	elseif pc.get_job() == 1 then
		pc.give_item2(14047, 1)
		pc.give_item2(17009, 1)
		pc.give_item2(16088, 1)
		pc.give_item2(15069, 1)
	elseif pc.get_job() == 2 then
		pc.give_item2(14047, 1)
		pc.give_item2(17049, 1)
		pc.give_item2(16088, 1)
		pc.give_item2(15069, 1)
	elseif pc.get_job() == 3 then
		pc.give_item2(14047, 1)
		pc.give_item2(17069, 1)
		pc.give_item2(16088, 1)
		pc.give_item2(15069, 1)
		end
		say("Teraz idz do instruktora mocy")
		say("i wybierz profesje.")
         set_state(run)
       end
     end
   state run begin
	when login with pc.get_skill_group()!=0 begin
	    restart_quest()
	end

	when letter with pc.get_skill_group()==0 begin
	    send_letter("Trening")

		local job=pc.get_job()

	    if job==0 then
			local v=pc_find_skill_teacher_vid(1)
			if 0!=v then target.vid("teacher1", v, "Body") end
			local v=pc_find_skill_teacher_vid(2)
			if 0!=v then target.vid("teacher2", v, "Mental") end
	    elseif job==1 then
			local v=pc_find_skill_teacher_vid(1)
			if 0!=v then target.vid("teacher3", v, "Zabojca") end
			local v=pc_find_skill_teacher_vid(2)
			if 0!=v then target.vid("teacher4", v, "Lucznik") end
	    elseif job==2 then
			local v=pc_find_skill_teacher_vid(1)
			if 0!=v then target.vid("teacher5", v, "Weapon") end
			local v=pc_find_skill_teacher_vid(2)
			if 0!=v then target.vid("teacher6", v, "BM") end
	    elseif job==3 then
			local v=pc_find_skill_teacher_vid(1)
			if 0!=v then target.vid("teacher7", v, "Smok") end
			local v=pc_find_skill_teacher_vid(2)
			if 0!=v then target.vid("teacher8", v, "Blysk") end
	    end
	end

	when leave begin
	    target.delete("teacher1")
	    target.delete("teacher2")
	    target.delete("teacher3")
	    target.delete("teacher4")
	    target.delete("teacher5")
	    target.delete("teacher6")
	    target.delete("teacher7")
	    target.delete("teacher8")
	end

	when button or info begin
		say(locale.skill_group.lets_join_skill_group[pc.job+1])
		setleftimage("")
		setmapcenterposition(-200, 0)
		select(locale.confirm)
		setskin(NOWINDOW)
	end

function join(job, group, title, text, error_msg)
   	local pc_job=pc.get_job()
   	if pc_job!=job then
		    say(error_msg)
		    if pc_job==0 then
				say_reward("error")
				say_reward("er")
			elseif pc_job==1 then
				say_reward("error1")
				say_reward("er1")
		    elseif pc_job==2 then
				say_reward("error2")
				say_reward("er2")
		    elseif pc_job==3 then
				say_reward("error3")
				say_reward("er3")
	    end
	    say("")
	else
	    say_title(title)
	    say(text)
	    local s=select("Rozpocznij", "Póżniej")
	    if 1==s then
		if pc.get_job()==job and pc.get_skill_group()==0 then
		    set_state("start")
		    pc.set_skill_group(group)

			pc.clear_skill()
			char_log(0, "CLEAR_SKILL", "Clear Skill By Skill Teacher")

		    makequestbutton("Trening Zakończony!")
		    return true
		else
		    test_chat("npc_is_same_job:"..bool_to_str(npc_is_same_job()))
		    test_chat("pc.get_skill_group:"..pc.get_skill_group())
		    test_chat("pc_job:"..pc.get_job())
		end
	    end
	end
	return false
end

-- ???
when teacher1.target.click or 
	skill_group1_1.chat."Trening" or
	skill_group2_1.chat."Trening" or
	skill_group3_1.chat."Trening" 
	begin 
	target.delete("teacher1")
	if skill_group.join(0, 1, "Trener Mocy Ciała :",
		"Nauka walki w ręcz skupia się na szybkich[ENTER]pojedynkach, uczy metod walk indywidualnych[ENTER]z naciskiem na ulepszenie i wzmocnienie ataków.[ENTER]Nagroda : Miecz pelni ksiezyca +6") then

		say_title("Wybrałeś Trening Mocy Ciała.")
		say("Witaj![ENTER]W związku z twoją decyzją o rozpoczęciu nauki,[ENTER]otrzymasz Miecz pelni ksiezyca +6 i 29 Punktow Umiejętności.[ENTER]Możesz przeznazyćje na dowolne Umiejętności.")


		if not pc.is_clear_skill_group() then
			local point = pc.level -1
			say_title("Informacja :")
			say_reward("Otrzymano skile na 3.")
			say_reward("Otrzymano Miecz pelni ksiezyca +6.")

                           pc . give_item2 ( 296 , 1 )
                           pc . set_skill_level (1, 3)
                           pc . set_skill_level (2, 3)
                           pc . set_skill_level (3, 3)
                           pc . set_skill_level (4, 3)
                           pc . set_skill_level (5, 3)
		else
			say("errortitlearahan")
			say("errortitlearahan2")
			say("")
		end
		clear_letter()
	end
end

when teacher2.target.click or 
	skill_group1_2.chat."Trening" or
	skill_group2_2.chat."Trening" or
	skill_group3_2.chat."Trening" 
	begin 
    target.delete("teacher2")
	if skill_group.join(0, 2, "Trener Mocy Duchowej :",
		"Trening Mocy Duchowej pokazuje jak przekształcić[ENTER]siłę wroga na kontakt przy pomocy Chi oraz[ENTER]obronę przed atakami.[ENTER]Nagroda : Ostrze z czerwonej stali +6") then

		say_title("Wybrałeś Trening Mocy Duchowej.")
		say("Witaj![ENTER]W związku z twoją decyzją o rozpoczęciu nauki,[ENTER]otrzymasz Ostrze z czerwonej stali +6 i 29 Punktow Umiejętności.[ENTER]Możesz przeznazyćje na dowolne Umiejętności.")

		if not pc.is_clear_skill_group() then
			local point = pc.level -1
			say_title("Informacja:")
			say_reward("Otrzymano skile na 3.")
			say_reward("Otrzymano Ostrze z czerwonej stali +6.")

                           pc . give_item2 ( 3216 , 1 )
                           pc . set_skill_level (16, 3)
                           pc . set_skill_level (17, 3)
                           pc . set_skill_level (18, 3)
                           pc . set_skill_level (19, 3)
                           pc . set_skill_level (20, 3)
		else
			say("errortitlemen")
			say("errortitlemen2")
			say("")
		end

		clear_letter()
	end
end

-- ???
when teacher3.target.click or 
	skill_group1_3.chat."Trening" or
	skill_group2_3.chat."Trening" or
	skill_group3_3.chat."Trening" 
	begin 
    target.delete("teacher3")
	if skill_group.join(1, 1, "Trener Mocy Ostrza :",
		"Trening Mocy Ostrza uczy jak pokonać przeciwnika[ENTER]w szybki i zabójczy sposób. Trening opiera się[ENTER]na poznaniu najsłabszych punktów wroga.[ENTER]Nagroda : Kozik z czarnego lisca +6") then	
		say_title("Wybrałeś Trening Mocy Ostrza.")
		say("Witaj![ENTER]W związku z twoją decyzją o rozpoczęciu nauki,[ENTER]otrzymasz Kozik z czarnego lisca +6 i 29 Punktow Umiejętności.[ENTER]Możesz przyznać je na dowolne Umiejętności.")

		if not pc.is_clear_skill_group() then
			local point = pc.level -1
			say_title("Informacja :")
			say_reward("Otrzymano skile na 3.")
			say_reward("Otrzymano Kozik z czarnego lisca +6.")

                           pc . give_item2 ( 1176 , 1 )
                           pc . set_skill_level (31, 3)
                           pc . set_skill_level (32, 3)
                           pc . set_skill_level (33, 3)
                           pc . set_skill_level (34, 3)
                           pc . set_skill_level (35, 3)
		else
			say("errortitleszty")
			say("errortitleszty2")
			say("")
		end

		clear_letter()
	end
end

-- ???
when teacher4.target.click or 
	skill_group1_4.chat."Trening" or
	skill_group2_4.chat."Trening" or
	skill_group3_4.chat."Trening" 
	begin 
    target.delete("teacher4")
	if skill_group.join(1, 2, "Trener Mocy Łuku :",
		"Trening Mocy Łuku uczy posługiwania się bronią[ENTER]dystansową albo móc walczyć z odpowiednią[ENTER]precyzją nawet z dużej odległości.[ENTER]Nagroda : Luk z rogu jelenia +6") then

		say_title("Wybrałeś Trening Mocy Łuku")
		say("Witaj![ENTER]W związku z twoją decyzją o rozpoczęciu nauki,[ENTER]otrzymasz Luk z rogu jelenia +6 i 29 Punktow Umiejętności.[ENTER]Możesz przyznać je na dowolne Umiejętności.")

		if not pc.is_clear_skill_group() then
			local point = pc.level -1
			say_title("Informacja:")
			say_reward("Otrzymano skile na 3.")
			say_reward("Otrzymano Luk z rogu jelenia +6.")

                           pc . give_item2 ( 2156 , 1 )
                           pc . set_skill_level (46, 3)
                           pc . set_skill_level (47, 3)
                           pc . set_skill_level (48, 3)
                           pc . set_skill_level (49, 3)
                           pc . set_skill_level (50, 3)
		else
			say("errortitleluk")
			say("errortitleluk2")
			say("")
		end

		clear_letter()
	end
end

-- ??? 
when teacher5.target.click or 
	skill_group1_5.chat."Trening" or
	skill_group2_5.chat."Trening" or
	skill_group3_5.chat."Trening"
	begin 
    target.delete("teacher5")
	if skill_group.join(2, 1, 
		"Trener Broni :",
		"Podążając drogą Treningu Broni nauczysz się[ENTER]potężnych ataków przeciwko osłabionym[ENTER]przeciwnikom. Ponadto,będziesz mógł[ENTER]kontrolować Zaczarowane Ostrze.[ENTER]Nagroda : Miecz pelni ksiezyca +6") then

		say_title("Wybrałeś trening Broni.")
		say("Witaj![ENTER]W związku z twoją decyzją o rozpoczęciu nauki,[ENTER]otrzymujesz Miecz pelni ksiezyca +6 i 29 Punktow Umiejętności.[ENTER]Możesz przeznaczyć je na dowolne Umiejętności.")

		if not pc.is_clear_skill_group() then
			local point = pc.level -1
			say_title("Informacja:")
			say_reward("Otrzymano skile na 3.")
			say_reward("Otrzymano Miecz pelni ksiezyca +6.")

                           pc . give_item2 ( 296 , 1 )
                           pc . set_skill_level (61, 3)
                           pc . set_skill_level (62, 3)
                           pc . set_skill_level (63, 3)
                           pc . set_skill_level (64, 3)
                           pc . set_skill_level (65, 3)
                           pc . set_skill_level (66, 3)
		else

			say("errortitlewp")
			say("errortitlewp2")
			say("")
		end

		clear_letter()
	end
end

-- ???
when teacher6.target.click or 
	skill_group1_6.chat."Trening" or
	skill_group2_6.chat."Trening" or
	skill_group3_6.chat."Trening" 
	begin 
    target.delete("teacher6")
	if skill_group.join(2, 2, 
		"Trener Czarnej Magii :",
		"Trenując Czarną Magię nauczysz się osłabiać[ENTER]przeciwników za pomocą Czarnej Magii i walczyć[ENTER]z dystansu.[ENTER]Nagroda : Miecz pelni ksiezyca +6") then

		say_title("Wybrałeś trening Czarnej Magii.")
		say("Witaj![ENTER]W związku z twoją decyzją o rozpoczęciu nauki,[ENTER]otrzymujesz Miecz pelni ksiezyca +6 i 29 Punktow Umiejętności.[ENTER]Możesz przeznaczyć je na dowolne Umiejętności.")

		if not pc.is_clear_skill_group() then
			local point = pc.level -1
			say_title("Informacja:")
			say_reward("Otrzymano skile na 3.")
			say_reward("Otrzymano Miecz pelni ksiezyca +6.")

                           pc . give_item2 ( 296 , 1 )
                           pc . set_skill_level (76, 3)
                           pc . set_skill_level (77, 3)
                           pc . set_skill_level (78, 3)
                           pc . set_skill_level (79, 3)
                           pc . set_skill_level (80, 3)
                           pc . set_skill_level (81, 3)
		else
			say("errortitlebm")
			say("errortitlebm2")
			say("")
		end

		clear_letter()
	end
end

-- ???
when teacher7.target.click or 
	skill_group1_7.chat."Trening" or
	skill_group2_7.chat."Trening" or
	skill_group3_7.chat."Trening" 
	begin 
    target.delete("teacher7")
	if skill_group.join(3, 1, 
		"Trener Smoka :",
		"Trening Boga Smoka pozwala na wykorzystywanie[ENTER]potężnych ataków ognistych wspieranych przez[ENTER]Smoczego Boga,pozwala również na wzmocnienie[ENTER]magiczne swojej drużyny specjalnymi zaklęciami.[ENTER]Nagroda : Antyczny Dzwon +6") then

		say_title("Wybrałeś trening Smoka.")
		say("Witaj![ENTER]W zwiazku z twoją decyzją o rozpoczęciu nauki,[ENTER]otrzymasz Antyczny Dzwon +6 i 29 Punktow Umiejętności.[ENTER]Możesz przeznaczyć je na dowolne Umiejętności.")

		if not pc.is_clear_skill_group() then
			local point = pc.level -1
			say_title("Informacja:")
			say_reward("Otrzymano skile na 3.")
			say_reward("Otrzymano Antyczny Dzwon +6.")

                           pc . give_item2 ( 716 , 1 )
                           pc . set_skill_level (91, 3)
                           pc . set_skill_level (92, 3)
                           pc . set_skill_level (93, 3)
                           pc . set_skill_level (94, 3)
                           pc . set_skill_level (95, 3)
                           pc . set_skill_level (96, 3)
		else
			say("errortitlesmok")
			say("errortitlesmok2")
			say("")
		end

		clear_letter()
	end
end

-- ???
when teacher8.target.click or 
	skill_group1_8.chat."Trening" or
	skill_group2_8.chat."Trening" or
	skill_group3_8.chat."Trening" 
	begin 
    target.delete("teacher8")
	if skill_group.join(3, 2, 
		"Trener Leczenia :",
		"Dzięki treningowi Leczenia nauczysz sie jak[ENTER]ogłuszyć przeciwników mocą błyskawicy. Uczysz[ENTER]się również jak leczyć członków grupy i dodawać[ENTER]im dodatkową siłę.[ENTER]Nagroda : Wachlarz Jesiennego Wiatru +6") then

		say_title("Wybrałeś Trening Leczenia.")
		say("Witaj![ENTER]W zwiazku z twoją decyzją o rozpoczęciu nauki,[ENTER]otrzymasz Wachlarz Jesiennego Wiatru +6 i 29 Punktow Umiejętności.[ENTER]Możesz przeznaczyć je na dowolne Umiejętności.")

		if not pc.is_clear_skill_group() then
			local point = pc.level -1
			say_title("Informacja:")
			say_reward("Otrzymano skile na 3.")
			say_reward("Otrzymano Wachlarz Jesiennego Wiatru +6.")

                           pc . give_item2 ( 5116 , 1 )
                           pc . set_skill_level (106, 3)
                           pc . set_skill_level (107, 3)
                           pc . set_skill_level (108, 3)
                           pc . set_skill_level (109, 3)
                           pc . set_skill_level (110, 3)
                           pc . set_skill_level (111, 3)
			say("")
		else
			say("errormessagelecz")
			say("errormessagelecz2")
			say("")
		end

		clear_letter()
	end
end
   end
end

Zapisujemy i zamykamy

WinSCP / FileZille

Teraz wgrywamy na nowo quest skill_group.quest i resetujemy serwa..

Quest naprawede warty sprawdzenia..

 

;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


ziuto Znawca

ziuto

Opublikowano
Znawca

ziuto

  • Autor
Opublikowano

on jest troche skomplikowany..

no to tak po zalogowaniu dostajemy :

30lv , 1kk yang , range przyjazny , podstawowa zbroje +5 , wedke , kilof , potki , pierscien tp , konia na 3 , rozne umiejetnosci na 3 .

potem mamy isc do kapitana po reszte eq czyli zbroje , helm i tarcze

gdy wezniemy mamy isc do handlarki po bizuterie czyli kolczyki , naszyjnik i branzolete

no i na koniec mamy isc po skile i dostejemy skile na 3 i bron +6 np woj body dostanie fms+6

to chyba wszytko jak czegos nie prze oczylem

 

@EDIT : @DOWN : @Loozakku. :

w pisaniu questow jestem beznadziejny wiec sie az tak nie znam

a i nie 30 tylko 29 bo juz 1lv mamy

 

@EDIT2 : @DOWN : @Loozakku. :

no wlanie sie dopiero nie dawno kaplem ze pc . level sluzy do wyswietlania lv wiec musi sie zatrzymac gdy juz ma sie 30lv

 

;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


Loozakku. Pasjonat

Loozakku.

Opublikowano
Pasjonat

Loozakku.

Opublikowano

Po co tyle:

 

pc.give_exp2(pc.get_next_exp())

Można to dać w pętle.

 

repeat
pc.give_exp2(pc.get_next_exp())
until pc.level == 30

 

@UP

 

Mylisz się to nie jest pętla FOR.

Wychodzi z pętli kiedy nasz level jest równy 30.

ziuto Znawca

ziuto

Opublikowano
Znawca

ziuto

  • Autor
Opublikowano

nie lepiej bo tam jest z edytowane skill_group.quest

i jak bys zauwazyl tam tez jest first_login..

zrobilem tak bo tak jest lepiej niz w 4 questach..

 

;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


ziuto Znawca

ziuto

Opublikowano
Znawca

ziuto

  • Autor
Opublikowano

@Refresh

 

;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


  • 2 tygodnie później...
ziuto Znawca

ziuto

Opublikowano
Znawca

ziuto

  • Autor
Opublikowano

@Refresh

 

;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


  • 2 miesiące temu...
LamS Specjalista

LamS

Opublikowano
Specjalista

LamS

Opublikowano

Mega + Nie no moge i tyle a pyt.. jak zmienić lv który dostaje się na początku ?

@edit

                when login or levelup with pc.get_level() > 29 begin

to odpowiada czy co ?

1312138057-U250359.jpg

By GutenMorgen

Smok

 

w1d6h0.gif

 

Team

 

logocfq.png

 

Filmy

 

Cat_catches_treat.gifPowerwheels_wheelie.gif

Kangaroo_playswith_junk.gifMascot_troll_flashing.gif

 

ziuto Znawca

ziuto

Opublikowano
Znawca

ziuto

  • Autor
Opublikowano

nie za level dopowiada to

                                       pc.give_exp2(pc.get_next_exp())

to daje o jeden level wyzej jak cos

 

;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


LamS Specjalista

LamS

Opublikowano
Specjalista

LamS

Opublikowano

nie za level dopowiada to

                                       pc.give_exp2(pc.get_next_exp())

to daje o jeden level wyzej jak cos

a więc chce 7 lv to tylko 7 zostawiam ??

1312138057-U250359.jpg

By GutenMorgen

Smok

 

w1d6h0.gif

 

Team

 

logocfq.png

 

Filmy

 

Cat_catches_treat.gifPowerwheels_wheelie.gif

Kangaroo_playswith_junk.gifMascot_troll_flashing.gif

 

ziuto Znawca

ziuto

Opublikowano
Znawca

ziuto

  • Autor
Opublikowano

jak chczesz tam 7 level na start to musisz dac to 6 razy bo 1lv mamy i +6 = 7lv

                                       pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())

to daje 7lv na start

 

;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


LamS Specjalista

LamS

Opublikowano
Specjalista

LamS

Opublikowano

jak chczesz tam 7 level na start to musisz dac to 6 razy bo 1lv mamy i +6 = 7lv

                                       pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())
                                      pc.give_exp2(pc.get_next_exp())

to daje 7lv na start

rozumiem thx + następny :P

1312138057-U250359.jpg

By GutenMorgen

Smok

 

w1d6h0.gif

 

Team

 

logocfq.png

 

Filmy

 

Cat_catches_treat.gifPowerwheels_wheelie.gif

Kangaroo_playswith_junk.gifMascot_troll_flashing.gif

 

Zarchiwizowany

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

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