[QUEST]Reset Status: VIT,INT,STR,DEX

02/02/2013 22:22 Erycon#1
Have Fun

Update with full quest:

PHP Code:
    state start begin
        when 71002.
use begin
            say_title
("Status Reset Document:")
            
say("")
            
say("This document make it possible to forget everything.")
            
say("It concerns your whole state. It's not possible")
            
say("to return.")
            
say("")
            
say_reward("Do you want to continue?")
            
local s select("Yes""No")
            if 
== s then
                
return
            
end

            say_title
("Status Reset Document:")
            
say("")
            
say("Your memory will be erased, you will forget")
            
say("everything about your status. You have")
            
say("chance at a new beginning.")
            
say("")
            
say_reward("Do you agree?")
            
local c select("Yes""No")
            if 
== c then
                
return
            
end

            char_log
(0"RESET_ALL""USE_ITEM(71002)")
            
pc.remove_item(71002)

            
char_log(0"RESET_ALL""RESET_STAT_POINTS")
            
pc.reset_point()

            
char_log(0"RESET_ALL""RESET_SKILL_POINTS")
            
pc.clear_skill()
            
pc.set_skill_group(0)
            
char_log(0"RESET_ALL""RESET_END")
        
end

        when 71003.
use begin
            local result 
BuildSkillList(pc.get_job(), pc.get_skill_group())

            
local vnum_list result[1]
            
local name_list result[2]

            if 
table.getn(vnum_list) < 2 then
                say_title
("Skill Reset Document:")
                
say("")
                
say("There are no skills who you can be")
                
say("redistributed.")
                
say("")
                return
            
end

            say_title
("Skill Reset Document:")
            
say("")
            
say("Choose a skill how you want to redistribute.")

            
local i select_table(name_list)

            if 
table.getn(name_list) == i then
                
return
            
end

            local name 
name_list[i]
            
local vnum vnum_list[i]

            
say_title("Skill Reset Document:")
            
say("")
            
say("This document make it possible to redeploy")
            
say("one of your skills, for any skill how you")
            
say("redistributed you can get a maximum of")
            
say("17 skill points.")
            
say(string.format("You choose to redistributed: %s ."name))
            
say("")
            
say_reward("Do you agree?")
            
local s select("Yes""No")
            if 
== s then
                
return
            
end

            char_log
(0"RESET_ONE_SKILL""USE_ITEM(71003)")
            
pc.remove_item(71003)

            
char_log(0"RESET_ONE_SKILL"string.format("RESET_SKILL[%s]"name))
            
pc.clear_one_skill(vnum)

            
char_log(0"RESET_ONE_SKILL""APPLY_17MASTER_BONUS")
            
pc.setqf("force_to_master_skill"1)
        
end

        when 71103.
use or 71104.use or 71105.use or 71106.use begin
            local name 
= {"VIT""INT""STR""DEX"}
            
local idx item.get_vnum() - 71103
            local func 
= { pc.get_htpc.get_iqpc.get_stpc.get_dx }

            if 
func[idx+1]() == 1 then
                say_title
("Redistribution "..name[idx+1]..":")
                
say("")
                
say("The points of "..name[idx+1].." have already been reset to 1.")
                return
            
end

            say_title
("Redistribution "..name[idx+1]..":")
            
say("")
            
say("This scroll make it possible to reset your")
            
say(""..name[idx+1].." points to 1, the points will be refunded")
            
say("to rearrange.")
            
local s select("Yes""No")
            if 
== s then
                
return
            
end

            
if pc.reset_status(idx) == true then
                pc
.remove_item(item.get_vnum())
            else
                return
            
end
        end
    end
end 
Information:
Quote:
The quest is created by me. For all who tall me is from "Ymir" .
02/02/2013 22:28 thespeedyy#2
geht viel kürzer:
PHP Code:
--when xxx.chat."Mein Status" begin    --[bei einem npc die -- entfernen]
--
when xxx.use begin                 --[bei einem item die -- entfernen]
    
say("Du hast deine Statuspunkte folgendermaßen verteilt:")
    
say("Vitalität: " .. pc.get_ht())
    
say("Intelligenz: " .. pc.get_iq())
    
say("Stärke: " .. pc.get_st())
    
say("Beweglichkeit: " .. pc.get_dx())
end 
02/02/2013 22:36 .Risan.#3
Quote:
Originally Posted by thespeedyy View Post
geht viel kürzer:
PHP Code:
--when xxx.chat."Mein Status" begin    --[bei einem npc die -- entfernen]
--
when xxx.use begin                 --[bei einem item die -- entfernen]
    
say("Du hast deine Statuspunkte folgendermaßen verteilt:")
    
say("Vitalität: " .. pc.get_ht())
    
say("Intelligenz: " .. pc.get_iq())
    
say("Stärke: " .. pc.get_st())
    
say("Beweglichkeit: " .. pc.get_dx())
end 
Bist auch nicht ganz hell im kopf?
Seine entfernt die Punke.
02/02/2013 22:59 blackwolf96#4
Corrected quest:
Code:
		when 71103.use or 71104.use or 71105.use or 71106.use begin
			local name = {"VIT", "INT", "STR", "DEX"}
			local idx = item.get_vnum() - 71103
			local func = { pc.get_ht, pc.get_iq, pc.get_st, pc.get_dx }

			if func[idx+1]() == 1 then
				say_title("Redistribution "..name[idx+1]..":")
				say("")
				say("The points of "..name[idx+1].." have already been reset to 1.")
				return
			end

			say_title("Redistribution "..name[idx+1]..":")
			say("")
			say("This scroll make it possible to reset your")
			say("VIT points to 1, the points will be refunded")
			say("to rearrange.")
			local s = select("Yes", "No")
			if 2 == s then
				return
			end

			if pc.reset_status(idx) == true then
				pc.remove_item(item.get_vnum())
			else
				return
			end
		end
	end
end
02/02/2013 23:04 Erycon#5
Quote:
Originally Posted by blackwolf96 View Post
Corrected quest:
Code:
		when 71103.use or 71104.use or 71105.use or 71106.use begin
			local name = {"VIT", "INT", "STR", "DEX"}
			local idx = item.get_vnum() - 71103
			local func = { pc.get_ht, pc.get_iq, pc.get_st, pc.get_dx }

			if func[idx+1]() == 1 then
				say_title("Redistribution "..name[idx+1]..":")
				say("")
				say("The points of "..name[idx+1].." have already been reset to 1.")
				return
			end

			say_title("Redistribution "..name[idx+1]..":")
			say("")
			say("This scroll make it possible to reset your")
			say("VIT points to 1, the points will be refunded")
			say("to rearrange.")
			local s = select("Yes", "No")
			if 2 == s then
				return
			end

			if pc.reset_status(idx) == true then
				pc.remove_item(item.get_vnum())
			else
				return
			end
		end
	end
end

Thanks, i don't have any server on my computer or vps
so i don't tested i will reply.

Quote:
Originally Posted by thespeedyy View Post
geht viel kürzer:
PHP Code:
--when xxx.chat."Mein Status" begin    --[bei einem npc die -- entfernen]
--
when xxx.use begin                 --[bei einem item die -- entfernen]
    
say("Du hast deine Statuspunkte folgendermaßen verteilt:")
    
say("Vitalität: " .. pc.get_ht())
    
say("Intelligenz: " .. pc.get_iq())
    
say("Stärke: " .. pc.get_st())
    
say("Beweglichkeit: " .. pc.get_dx())
end 
Your quest does not compare with that soo :rolleyes:
02/02/2013 23:06 .Risan.#6
Ich muss zugeben hat Ymir gut geschrieben.
Und ja sie wird funktionieren.

@Topic: This quest is from Ymir.
02/02/2013 23:20 vıo#7
Nice simple & effective Quest :D
02/03/2013 00:08 vpser#8
Quote:
Originally Posted by blackwolf96 View Post
Corrected quest:
Code:
		when 71103.use or 71104.use or 71105.use or 71106.use begin
			local name = {"VIT", "INT", "STR", "DEX"}
			local idx = item.get_vnum() - 71103
			local func = { pc.get_ht, pc.get_iq, pc.get_st, pc.get_dx }

			if func[idx+1]() == 1 then
				say_title("Redistribution "..name[idx+1]..":")
				say("")
				say("The points of "..name[idx+1].." have already been reset to 1.")
				return
			end

			say_title("Redistribution "..name[idx+1]..":")
			say("")
			say("This scroll make it possible to reset your")
			say("VIT points to 1, the points will be refunded")
			say("to rearrange.")
			local s = select("Yes", "No")
			if 2 == s then
				return
			end

			if pc.reset_status(idx) == true then
				pc.remove_item(item.get_vnum())
			else
				return
			end
		end
	end
end
Code:
		when 71103.use or 71104.use or 71105.use or 71106.use begin
			local name = {"VIT", "INT", "STR", "DEX"}
			local idx = item.get_vnum() - 71103
			local func = { pc.get_ht, pc.get_iq, pc.get_st, pc.get_dx }

			if func[idx+1]() == 1 then
				say_title("Redistribution "..name[idx+1]..":")
				say("")
				say("The points of "..name[idx+1].." have already been reset to 1.")
				return
			end

			say_title("Redistribution "..name[idx+1]..":")
			say("")
			say("This scroll make it possible to reset your")
			say(""..name[idx+1].." points to 1, the points will be refunded")
			say("to rearrange.")
			local s = select("Yes", "No")
			if 2 == s then
				return
			end

			if pc.reset_status(idx) == true then
				pc.remove_item(item.get_vnum())
			else
				return
			end
		end
	end
end
02/03/2013 00:22 xXDemonenXx#9
Joa Risan

so kann man das auch machen
oder mit einem Tool :) xDDDD

Mfg xXDemonenXx
02/03/2013 00:31 hr4rjuku#10
Sehr gutes release! Weiter so und ich freu mich (nicht) auf weitere releases.


Kann ich sehr gut gebrauchen


Mfg haufen
02/03/2013 03:09 .Onlyx3#11
Das gibts doch schon Arsch lange ! :O

Habe die Teile seit mehr als nem Jahr bei mir in der Gemi.
02/03/2013 09:17 Erycon#12
First quest it's corrected, all use it. The quest isn't from ymir is created by me. . . if someone has just 50 message that does not mean you can not create something good. You work public, i work private.

Nobody can give me thanks or ecc because i don't public all my creation.
02/03/2013 11:04 .Risan.#13
Quote:
Originally Posted by Erycon View Post
First quest it's corrected, all use it. The quest isn't from ymir is created by me. . . if someone has just 50 message that does not mean you can not create something good. You work public, i work private.

Nobody can give me thanks or ecc because i don't public all my creation.
Red nicht so ein müll, die Quest ist von Ymir.
In den uralten Files und in den SG files ist diese auch drinne..
Sogar der aufbau ist exakt der selbe.
02/03/2013 11:06 Erycon#14
Quote:
Originally Posted by .Risan. View Post
Red nicht so ein müll, die Quest ist von Ymir.
In den uralten Files und in den SG files ist diese auch drinne..
Sogar der aufbau ist exakt der selbe.
Ok, ok you're right, me don't get to your level.
you can not understand?
Ok, ok du hast recht, ich mich nicht zu Ihrem Level zu gelangen.

Nobody have filles from Ymir. You really think someone have files from Ymir? Nobody !,
What do you think they have sombody how public the filles?
Go to court for it ! LOL

Quote:
Originally Posted by xXDemonenXx View Post
Joa Risan

so kann man das auch machen
oder mit einem Tool :) xDDDD

Mfg xXDemonenXx
You're really smart :D if these are functions not want me to get to change
the binary for you?

All quest have standard function lol .
02/03/2013 11:26 .Risan.#15
..
Okay Korea old files have not..

SG:

PHP Code:
quest reset_status begin
    state start begin
        when 71103.
use or 71104.use or 71105.use or 71106.use begin
            local name 
= { "Health""Inteligence""Strength""Dexterity" }
            
local idx item.get_vnum() - 71103
            local func 
= { pc.get_htpc.get_iqpc.get_stpc.get_dx }

            if 
func[idx+1]() == 1 then
                say
(name[idx+1].."is1 now.")
                
say(name[idx+1].."can not be reset.")
                
say("")
                return
            
end

            say
(name[idx+1].."is set to 1.")
            
say("Rest of the points can be returned ")
            
say("to traning points.")
            
say("")
            
say("Do you want to proceed?")
            
say("")

            
local s select("Reset""Cancel")

            if 
== 1 then
                
if pc.reset_statusidx ) == true then
                    say
("Reset completed.")
                    
say("")

                    
pc.remove_item(item.get_vnum())
                else
                    
say("Failed to reset.")
                    
say("")
                
end
            end
        end
    end
end