Rebirth lv2 and lv3 Fixe

Results 1 to 6 of 6
  1. #1
    Enthusiast 159620a is offline
    MemberRank
    May 2009 Join Date
    27Posts

    Rebirth lv2 and lv3 Fixe

    I need script rebirth LV2 and lv3 full of bonus states that, someone can help me and pass me plz

    thanks


    Last edited by 159620a; 20-06-09 at 03:45 AM.


  2. #2
    Member vinte is offline
    MemberRank
    Mar 2009 Join Date
    MaldivesLocation
    74Posts

    Re: Rebirth lv2 and lv3 Fixe

    add this to your server files resources/jjialebi/ialebinpc.txt :
    Code:
    31	2nd Rebirth Angel	1	774	0	159920,90975	159920,90975	269	Heaven	103	0	dina_talk11	0
    32	3rd Rebirth	1	1	7	162600,89000	162600,89000	269	Heaven	103	0	dina_talk12	0
    Change the Serials to match the npc's (numbers in Red). i mean if the last npc Serial is 35, change these 2 npc serials to 36 and 37. If the last npc,Serial is 30, then leave it the way it is. if another number, change the serial number to next number orderly. The serials are highlighted on Red color.

    put this script in your server files resource\script\MisSdk: NpcSdk.lua :
    Code:
    elseif item.func == GetChaName1_born2 then
    			return GetChaName1_born2(character,npc )
    		elseif item.func == GetChaName2_born2 then
    			return GetChaName2_born2(character,npc )
    		elseif item.func == GetChaName3_born2 then
    			return GetChaName3_born2(character,npc )
    		elseif item.func == GetChaName4_born2 then
    			return GetChaName4_born2(character,npc )
    		elseif item.func == GetChaName5_born2 then
    			return GetChaName5_born2(character,npc )
    		elseif item.func == GetChaName6_born2 then
    			return GetChaName6_born2(character,npc )
    		elseif item.func == GetChaName1_born3 then
    			return GetChaName1_born3(character,npc )
    		elseif item.func == GetChaName2_born3 then
    			return GetChaName2_born3(character,npc )
    		elseif item.func == GetChaName3_born3 then
    			return GetChaName3_born3(character,npc )
    		elseif item.func == GetChaName4_born3 then
    			return GetChaName4_born3(character,npc )
    		elseif item.func == GetChaName5_born3 then
    			return GetChaName5_born3(character,npc )
    		elseif item.func == GetChaName6_born3 then
    			return GetChaName6_born3(character,npc )
    make this Npc script to your Server files\resource\script\MisScript: NpcScript06.lua :

    Code:
    --------------------------------------------------rebirth lvl2
    function dina_talk11()
    
    	Talk( 1, "2nd Rebirth Angel: I see you've gone through the 2nd Rebirth quests, This is where your prize is given to you for establishing peace through out the world and finding it's most preacius treasures." )
    	Text( 1, "I wish to Reincarnate", JumpPage, 2)
    	Text( 1, "I wish to know more", JumpPage, 3)
    	Text( 1, "I am having problems on 2nd Rebirth", JumpPage, 5 )
    	Text( 1, "I have not done this task.", CloseTalk)
    	
    	Talk( 2, "2nd Rebirth Angel: So you have done the task? Select the best option for you." )
    	Text( 2, "Become a Crusader to uphold justice and peace",  GetChaName1_born2, 1)
    	Text( 2, "Become a Champion to protect companion",  GetChaName2_born2, 1)
    	Text( 2, "Become a voyager to sail the seas",  GetChaName3_born2, 1)
    	Text( 2, "Become a Sharpshooter to vanquish your enemies",  GetChaName4_born2, 1)
    	Text( 2, "Become a Cleric to heal the sick", GetChaName5_born2, 1)
    	Text( 2, "Become a Seal Master to do anything", GetChaName6_born2, 1)
    	Text( 2, "I do not wish to do 2nd Rebirth right now", CloseTalk)
    	
    	Talk( 3, "What do you wish to know more about?" )
    	Text( 3, "Classes after 2nd Rebirth", JumpPage, 4 )
    	
    	Talk( 5, "Whats wrong?" )
    	Text( 5, "I have the 2nd Rebirth stone, but it wont let me!", JumpPage, 6)
    	Text( 5, "I don't know where to do the quests!", JumpPage, 7)
    	Text( 5, "The High Priest will not hand me any quests!", JumpPage, 8)
    	
    	Talk( 6, "Take off all your equips, including rings and necklesses. Make sure you are choosing your new class according to race.") 
    	Text( 6, "Let me try once again!", JumpPage, 1)
    	
    	Talk( 7, "We have not done/translated all the quests. Please wait untill we can get all the according files and have these quests translated")
        	Text( 7, "I understand", CloseTalk )
    	
    	Talk( 8, "Have you done Rebirth task? It is required to stand the 2nd Rebirth quests." )
    	Text( 8, "YES! I have done it", JumpPage, 9 )
    	Text( 8, "I have not", JumpPage, 10 )
    	
    	Talk( 9, "If you have done it, nothing is wrong, try checking if you have already done the quest and/or a GM set you a quest record")
    	Text( 9, "I will check", CloseTalk )
    	
    	Talk( 10, "Then why are you here? You cannot start 2nd Rebirth until you have completed your 1st Rebirth.")
    	Text( 10, "Sorry for my lack of inteligence", CloseTalk )
    
    end
    
    ---------------------3rd Rebith-------------------------------------
    
    function dina_talk12()
    
    	Talk( 1, "3nd Rebirth Angel: I see you've gone through the 2nd Rebirth quests, This is where your prize is given to you for establishing peace through out the world and finding it's most preacius treasures." )
    	Text( 1, "I wish to Reincarnate", JumpPage, 2)
    	Text( 1, "I wish to know more", JumpPage, 3)
    	Text( 1, "I am having problems on 3nd Rebirth", JumpPage, 5 )
    	Text( 1, "I have not done this task.", CloseTalk)
    	
    	Talk( 2, "3nd Rebirth Angel: So you have done the task? Select the best option for you." )
    	Text( 2, "Become a Crusader to uphold justice and peace",  GetChaName1_born3, 1)
    	Text( 2, "Become a Champion to protect companion",  GetChaName2_born3, 1)
    	Text( 2, "Become a voyager to sail the seas",  GetChaName3_born3, 1)
    	Text( 2, "Become a Sharpshooter to vanquish your enemies",  GetChaName4_born3, 1)
    	Text( 2, "Become a Cleric to heal the sick", GetChaName5_born3, 1)
    	Text( 2, "Become a Seal Master to do anything", GetChaName6_born3, 1)
    	Text( 2, "I do not wish to do 3nd Rebirth right now", CloseTalk)
    	
    	Talk( 3, "What do you wish to know more about?" )
    	Text( 3, "Classes after 3nd Rebirth", JumpPage, 4 )
    	
    	Talk( 5, "Whats wrong?" )
    	Text( 5, "I have the 3nd Rebirth stone, but it wont let me!", JumpPage, 6)
    	Text( 5, "I don't know where to do the quests!", JumpPage, 7)
    	Text( 5, "The High Priest will not hand me any quests!", JumpPage, 8)
    	
    	Talk( 6, "Take off all your equips, including rings and necklesses. Make sure you are choosing your new class according to race.") 
    	Text( 6, "Let me try once again!", JumpPage, 1)
    	
    	Talk( 7, "We have not done/translated all the quests. Please wait untill we can get all the according files and have these quests translated")
        	Text( 7, "I understand", CloseTalk )
    	
    	Talk( 8, "Have you done Rebirth task? It is required to stand the 3nd Rebirth quests." )
    	Text( 8, "YES! I have done it", JumpPage, 9 )
    	Text( 8, "I have not", JumpPage, 10 )
    	
    	Talk( 9, "If you have done it, nothing is wrong, try checking if you have already done the quest and/or a GM set you a quest record")
    	Text( 9, "I will check", CloseTalk )
    	
    	Talk( 10, "Then why are you here? You cannot start 3nd Rebirth until you have completed your 1st&2nd Rebirth.")
    	Text( 10, "Sorry for my lack of inteligence", CloseTalk )
    
    end
    and then put this in Your server files\resource\script\calculate function.lua file to run reincarnate rebirth to your NpcSdk.lua :
    Code:
    ------------------------------Dina Rebirth
    ------------------------------
    function GetChaName1_born2 ( role,npc )
    	-----------------Crusader Born
            local cha_type = GetChaTypeID ( role )
    	if cha_type~=1 and cha_type~=2 and cha_type~=3 then
    		SystemNotice( role ,"Only Lance,Phyllis,Carsise Can Become Crusader")
    		return
    	end
    	local check=GetChaName_born2 ( role )
    	if check==0 then
    		SystemNotice( role ,"Requirements Do Not Meet")
    		return
    	end
    	-----------------Skill Add
    	local cha_job = GetChaAttr( role , ATTR_JOB )
    	SetChaAttr(role, ATTR_JOB ,9 ) 	
    	GiveItem_chibang2 ( role  )				--Wings Add
    	local sk_add = SK_WYZ
    	AddChaSkill ( role , sk_add , 2 , 2 , 0 )
    	SetChaAttrI(role, ATTR_CSAILEXP , 10000)
    	RefreshCha ( role )
    end
    -------------------------------Champ
    function GetChaName2_born2 ( role,npc )
    	-----------------Champ Born
            local cha_type = GetChaTypeID ( role )
    	if cha_type~=2 then
    		SystemNotice( role ,"Only Carsise Can become Champion")
    		return
    	end
    	local check=GetChaName_born2 ( role )
    	if check==0 then
    		SystemNotice( role ,"Requirements Do Not Meet")
    		return
    	end
    	-----------------Skill Add
    	local cha_job = GetChaAttr( role , ATTR_JOB )
    	SetChaAttr(role, ATTR_JOB ,8 )
    	GiveItem_chibang2 ( role  )				--Wings Add
    	local sk_add = SK_BSJ
    	AddChaSkill ( role , sk_add , 2 , 2 , 0 )
    	SetChaAttrI(role, ATTR_CSAILEXP , 10000)
    	RefreshCha ( role )
    end
    -------------------------------Voyager
    function GetChaName3_born2 ( role,npc )
    	-----------------?Voyager Born
            local cha_type = GetChaTypeID ( role )
    	if cha_type~=1 and Cha_type~=2 and cha_type~=3 and cha_type~=4 then
    		SystemNotice( role ,"Only Lance,Carsise,Phyllis,Ami Can Become Voyager")
    		return
    	end
    	local check=GetChaName_born2 ( role )
    	if check==0 then
    		SystemNotice( role ,"Requirements Do Not Meet")
    		return
    	end
    	-----------------GiveSkill
    	local cha_job = GetChaAttr( role , ATTR_JOB )
    	SetChaAttr(role, ATTR_JOB ,16 ) 	
    	GiveItem_chibang2 ( role  )				--Wings Add
    	local sk_add = SK_CYN
    	AddChaSkill ( role , sk_add , 2 , 2 , 0 )
    	SetChaAttrI(role, ATTR_CSAILEXP , 10000)
    	RefreshCha ( role )
    end
    -------------------------------SharpShooter
    function GetChaName4_born2 ( role,npc )
    	-----------------?Sharpshooter Born
            local cha_type = GetChaTypeID ( role )
    	if cha_type~=1 and cha_type~=3 then
    		SystemNotice( role ,"Only Lance,Phyllis Can Become Sharpshooter")
    		return
    	end
    	local check=GetChaName_born2 ( role )
    	if check==0 then
    		SystemNotice( role ,"Requirements Do Not Meet")
    		return
    	end
    	-----------------Skill Add
    	local cha_job = GetChaAttr( role , ATTR_JOB )
    	SetChaAttr(role, ATTR_JOB ,12 ) 	
    	GiveItem_chibang2 ( role  )				--Wings Add
    	local sk_add = SK_HLP
    	AddChaSkill ( role , sk_add , 2 , 2 , 0 )
    	SetChaAttrI(role, ATTR_CSAILEXP , 10000)
    	RefreshCha ( role )
    end
    -------------------------------Cleric
    function GetChaName5_born2 ( role,npc )
    	-----------------Cleric Born
            local cha_type = GetChaTypeID ( role )
    	if cha_type~=1 and cha_type~=2 and cha_type~=3 and cha_type~=4 then
    		SystemNotice( role ,"Only Lance,Carsise,Phyllis,Ami Can Become Cleric")
    		return
    	end
    	local check=GetChaName_born2 ( role )
    	if check==0 then
    		SystemNotice( role ,"Requirements Do Not Meet")
    		return
    	end
    	-----------------Skill Add
    	local cha_job = GetChaAttr( role , ATTR_JOB )
    	SetChaAttr(role, ATTR_JOB ,13 ) 	
    	GiveItem_chibang2 ( role  )				--Rebirth Wings Add
    	local sk_add = SK_SSSP
    	AddChaSkill ( role , sk_add , 2 , 2 , 0 )
    	SetChaAttrI(role, ATTR_CSAILEXP , 10000)
    	RefreshCha ( role )
    end
    -------------------------------Seal Master
    function GetChaName6_born2 ( role,npc )
    	-----------------?Seal Master Born
            local cha_type = GetChaTypeID ( role )
    	if cha_type~=1 and cha_type~=2 and cha_type~=3 and cha_type~=4 then
    		SystemNotice( role ,"Only Lance,Carsise,Phyllis,Ami Can Become Seal Master")
    		return
    	end
    	local check=GetChaName_born2 ( role )
    	if check==0 then
    		SystemNotice( role ,"Requirements Do Not Meet")
    		return
    	end
    	-----------------SkillAdd
    	local cha_job = GetChaAttr( role , ATTR_JOB )
    	SetChaAttr(role, ATTR_JOB ,14 ) 	
    	GiveItem_chibang2 ( role  )				--Rebirth Wings Add
    	local sk_add = SK_SSSP
    	AddChaSkill ( role , sk_add , 2 , 2 , 0 )
    	SetChaAttrI(role, ATTR_CSAILEXP , 10000)
    	RefreshCha ( role )
    end
    
    function GiveItem_chibang2 ( role  )
            local cha_type = GetChaTypeID ( role )	
    	if cha_type==1 then
    		GiveItem( role , 0 , 136  , 1 , 4 )
    	elseif cha_type==2 then
    		GiveItem( role , 0 , 139  , 1 , 4 )
    	elseif cha_type==3 then
    		GiveItem( role , 0 , 129  , 1 , 4 )
    	elseif cha_type==4 then
    		GiveItem( role , 0 , 132  , 1 , 4 )
    	end
    end
    
    -------------------------------Check Lv2 RB
    function GetChaName_born2 ( role )
    	-----------------??????
    	local cha_name = GetChaDefaultName ( role )
    	-----------------??????
    	local cha_lv = GetChaAttr(role, ATTR_LV)
    	-----------------??????
    	local cha_job = GetChaAttr(role, ATTR_JOB)
    	-----------------???????????????
    	local i = CheckBagItem( role, 5858 )    
    	if i < 1 then
    		SystemNotice( role ,"Please Give Me Ur Lv1 Rebirth Stone")
    		return 0
    	end
    
    	local op1 = CheckBagItem( role, 134 )
    	local op2 = CheckBagItem( role, 138 )
    	local op3 = CheckBagItem( role, 128 )
    	local op4 = CheckBagItem( role, 131 )
    	if op1 < 1 and op2 < 1 and op3 < 1 and op4 < 1 then
    		SystemNotice( role ,"You are not rebirth one yet")
    		return 0
    	end
    	-----------------????????????
    	local item_empty=IsEquip(role)
    	if item_empty==LUA_TRUE then
    		SystemNotice(role,"Please place the item from character's equipment slot into the inventory")
    		return 0	
    	end
    	-----------------????????????
    	local Item_CanGet = GetChaFreeBagGridNum ( role )	
    	if Item_CanGet < 1 then
    		SystemNotice(role ,"Inventory Needs Atleast 1 Free Slot")
    		UseItemFailed ( role )
    		return 0
    	end
    	local zs1 =TakeItem( role, 0,5858, 1 )
    	if zs1==0 then
    		SystemNotice ( role ,"Gather Lv2 Rebirth Stone Failed")
    		return 0
    	end
    	------------------???????????
    	local Zs_Exp = GetChaAttr ( role , ATTR_CSAILEXP )
    	if Zs_Exp >=10000 then
    		SystemNotice(role ,"U have Already Done Lv2 Rebirth")
    		return 0
    	end
    	local cha_skill_num=GetChaAttr(role, ATTR_TP  )
    
    	local clear_skill_num=ClearFightSkill(role)
    
    	cha_skill_num=cha_skill_num+clear_skill_num
    	SetChaAttr(role, ATTR_TP ,cha_skill_num ) 
    
    	local ap = GetChaAttr( role , ATTR_AP )
    
    	local cha_str = GetChaAttr(role, ATTR_BSTR  ) 
    	local cha_dex = GetChaAttr(role, ATTR_BDEX  ) 
    	local cha_agi = GetChaAttr(role, ATTR_BAGI  ) 
    	local cha_con = GetChaAttr(role, ATTR_BCON ) 
    	local cha_sta = GetChaAttr(role, ATTR_BSTA )
    	ap=ap+cha_str+cha_dex+cha_agi+cha_con+cha_sta-25
    	SetChaAttr(role, ATTR_BSTR ,5 ) 
    	SyncChar(role,4)
    	SetChaAttr(role, ATTR_BDEX ,5 ) 
    	SyncChar(role,4)
    	SetChaAttr(role, ATTR_BAGI ,5 ) 
    	SyncChar(role,4)
    	SetChaAttr(role, ATTR_BCON,5 ) 
    	SyncChar(role,4)
    	SetChaAttr(role, ATTR_BSTA,5 ) 
    	SyncChar(role,4)
    	SetChaAttr(role , ATTR_AP,ap  )
    	SyncChar(role,4)
    	AddSailExp(role, npc , 1 , 1 )
    	local sk_add = SK_ZSSL
    	--AddChaSkill ( role , sk_add , 2 , 2 , 0 )
    	AddChaSkill ( role , sk_add , 2 , 1 , 0 )
    
    	PlayEffect( npc, 361 )
    	Notice("Extreme celebration "..cha_name.." Rebirth 2nd successful. Blessing from the whole server "..cha_name.." Hope you have a safe journey and everything goes your way!")
    	return 1
    
    end
    
    ------------------------------Dina Lv3 Rebirth
    function GetChaName1_born3 ( role,npc )
    	-----------------Crusader Born
            local cha_type = GetChaTypeID ( role )
    	if cha_type~=1 and cha_type~=2 and cha_type~=3 then
    		SystemNotice( role ,"Only Lance,Phyllis,Carsise Can Become Crusader")
    		return
    	end
    	local check=GetChaName_born3 ( role )
    	if check==0 then
    		SystemNotice( role ,"Requirements Do Not Meet")
    		return
    	end
    	-----------------Skill Add
    	local cha_job = GetChaAttr( role , ATTR_JOB )
    	SetChaAttr(role, ATTR_JOB ,9 ) 	
    	GiveItem_chibang3 ( role  )				--Wings Add
    	local sk_add = SK_WYZ
    	AddChaSkill ( role , sk_add , 3 , 3 , 0 )
    	SetChaAttrI(role, ATTR_CSAILEXP , 10000)
    	RefreshCha ( role )
    end
    -------------------------------Champ
    function GetChaName2_born3 ( role,npc )
    	-----------------Champ Born
            local cha_type = GetChaTypeID ( role )
    	if cha_type~=2 then
    		SystemNotice( role ,"Only Carsise Can become Champion")
    		return
    	end
    	local check=GetChaName_born3 ( role )
    	if check==0 then
    		SystemNotice( role ,"Requirements Do Not Meet")
    		return
    	end
    	-----------------Skill Add
    	local cha_job = GetChaAttr( role , ATTR_JOB )
    	SetChaAttr(role, ATTR_JOB ,8 )
    	GiveItem_chibang3 ( role  )				--Wings Add
    	local sk_add = SK_BSJ
    	AddChaSkill ( role , sk_add , 3 , 3 , 0 )
    	SetChaAttrI(role, ATTR_CSAILEXP , 10000)
    	RefreshCha ( role )
    end
    -------------------------------Voyager
    function GetChaName3_born3 ( role,npc )
    	-----------------?Voyager Born
            local cha_type = GetChaTypeID ( role )
    	if cha_type~=1 and Cha_type~=2 and cha_type~=3 and cha_type~=4 then
    		SystemNotice( role ,"Only Lance,Carsise,Phyllis,Ami Can Become Voyager")
    		return
    	end
    	local check=GetChaName_born3 ( role )
    	if check==0 then
    		SystemNotice( role ,"Requirements Do Not Meet")
    		return
    	end
    	-----------------GiveSkill
    	local cha_job = GetChaAttr( role , ATTR_JOB )
    	SetChaAttr(role, ATTR_JOB ,16 ) 	
    	GiveItem_chibang3 ( role  )				--Wings Add
    	local sk_add = SK_CYN
    	AddChaSkill ( role , sk_add , 3 , 3 , 0 )
    	SetChaAttrI(role, ATTR_CSAILEXP , 10000)
    	RefreshCha ( role )
    end
    -------------------------------SharpShooter
    function GetChaName4_born3 ( role,npc )
    	-----------------?Sharpshooter Born
            local cha_type = GetChaTypeID ( role )
    	if cha_type~=1 and cha_type~=3 then
    		SystemNotice( role ,"Only Lance,Phyllis Can Become Sharpshooter")
    		return
    	end
    	local check=GetChaName_born3 ( role )
    	if check==0 then
    		SystemNotice( role ,"Requirements Do Not Meet")
    		return
    	end
    	-----------------Skill Add
    	local cha_job = GetChaAttr( role , ATTR_JOB )
    	SetChaAttr(role, ATTR_JOB ,12 ) 	
    	GiveItem_chibang3 ( role  )				--Wings Add
    	local sk_add = SK_HLP
    	AddChaSkill ( role , sk_add , 3 , 3 , 0 )
    	SetChaAttrI(role, ATTR_CSAILEXP , 10000)
    	RefreshCha ( role )
    end
    -------------------------------Cleric
    function GetChaName5_born3 ( role,npc )
    	-----------------Cleric Born
            local cha_type = GetChaTypeID ( role )
    	if cha_type~=1 and cha_type~=2 and cha_type~=3 and cha_type~=4 then
    		SystemNotice( role ,"Only Lance,Carsise,Phyllis,Ami Can Become Cleric")
    		return
    	end
    	local check=GetChaName_born3 ( role )
    	if check==0 then
    		SystemNotice( role ,"Requirements Do Not Meet")
    		return
    	end
    	-----------------Skill Add
    	local cha_job = GetChaAttr( role , ATTR_JOB )
    	SetChaAttr(role, ATTR_JOB ,13 ) 	
    	GiveItem_chibang3 ( role  )				--Rebirth Wings Add
    	local sk_add = SK_SSSP
    	AddChaSkill ( role , sk_add , 3 , 3 , 0 )
    	SetChaAttrI(role, ATTR_CSAILEXP , 10000)
    	RefreshCha ( role )
    end
    -------------------------------Seal Master
    function GetChaName6_born3 ( role,npc )
    	-----------------?Seal Master Born
            local cha_type = GetChaTypeID ( role )
    	if cha_type~=1 and cha_type~=2 and cha_type~=3 and cha_type~=4 then
    		SystemNotice( role ,"Only Lance,Carsise,Phyllis,Ami Can Become Seal Master")
    		return
    	end
    	local check=GetChaName_born3 ( role )
    	if check==0 then
    		SystemNotice( role ,"Requirements Do Not Meet")
    		return
    	end
    	-----------------SkillAdd
    	local cha_job = GetChaAttr( role , ATTR_JOB )
    	SetChaAttr(role, ATTR_JOB ,14 ) 	
    	GiveItem_chibang3 ( role  )				--Rebirth Wings Add
    	local sk_add = SK_SSSP
    	AddChaSkill ( role , sk_add , 3 , 3 , 0 )
    	SetChaAttrI(role, ATTR_CSAILEXP , 10000)
    	RefreshCha ( role )
    end
    
    function GiveItem_chibang3 ( role  )
            local cha_type = GetChaTypeID ( role )	
    	if cha_type==1 then
    		GiveItem( role , 0 , 137  , 1 , 4 )
    	elseif cha_type==2 then
    		GiveItem( role , 0 , 140  , 1 , 4 )
    	elseif cha_type==3 then
    		GiveItem( role , 0 , 130  , 1 , 4 )
    	elseif cha_type==4 then
    		GiveItem( role , 0 , 133  , 1 , 4 )
    	end
    end
    
    -------------------------------Check Lv3 RB
    function GetChaName_born3 ( role )
    	-----------------??????
    	local cha_name = GetChaDefaultName ( role )
    	-----------------??????
    	local cha_lv = GetChaAttr(role, ATTR_LV)
    	-----------------??????
    	local cha_job = GetChaAttr(role, ATTR_JOB)
    	-----------------???????????????
    	local i = CheckBagItem( role, 5859 )    
    	if i < 1 then
    		SystemNotice( role ,"Please Give Me Ur Lv3 Rebirth Stone")
    		return 0
    	end
    	local op1 = CheckBagItem( role, 136 )
    	local op2 = CheckBagItem( role, 139 )
    	local op3 = CheckBagItem( role, 129 )
    	local op4 = CheckBagItem( role, 132 )
    	if op1 < 1 and op2 < 1 and op3 < 1 and op4 < 1 then
    		SystemNotice( role ,"You are not rebirth two yet")
    		return 0
    	end
    	-----------------????????????
    	local item_empty=IsEquip(role)
    	if item_empty==LUA_TRUE then
    		SystemNotice(role,"Please place the item from character's equipment slot into the inventory")
    		return 0	
    	end
    	-----------------????????????
    	local Item_CanGet = GetChaFreeBagGridNum ( role )	
    	if Item_CanGet < 1 then
    		SystemNotice(role ,"Inventory Needs Atleast 1 Free Slot")
    		UseItemFailed ( role )
    		return 0
    	end
    	local zs1 =TakeItem( role, 0,5859, 1 )
    	if zs1==0 then
    		SystemNotice ( role ,"Gather Lv3 Rebirth Stone Failed")
    		return 0
    	end
    	------------------???????????
    	local Zs_Exp = GetChaAttr ( role , ATTR_CSAILEXP )
    	if Zs_Exp >10000 then
    		SystemNotice(role ,"U have Already Done Lv3 Rebirth")
    		return 0
    	end
    	local cha_skill_num=GetChaAttr(role, ATTR_TP  )
    
    	local clear_skill_num=ClearFightSkill(role)
    
    	cha_skill_num=cha_skill_num+clear_skill_num
    	SetChaAttr(role, ATTR_TP ,cha_skill_num ) 
    
    	local ap = GetChaAttr( role , ATTR_AP )
    
    	local cha_str = GetChaAttr(role, ATTR_BSTR  ) 
    	local cha_dex = GetChaAttr(role, ATTR_BDEX  ) 
    	local cha_agi = GetChaAttr(role, ATTR_BAGI  ) 
    	local cha_con = GetChaAttr(role, ATTR_BCON ) 
    	local cha_sta = GetChaAttr(role, ATTR_BSTA )
    	ap=ap+cha_str+cha_dex+cha_agi+cha_con+cha_sta-25
    	SetChaAttr(role, ATTR_BSTR ,5 ) 
    	SyncChar(role,4)
    	SetChaAttr(role, ATTR_BDEX ,5 ) 
    	SyncChar(role,4)
    	SetChaAttr(role, ATTR_BAGI ,5 ) 
    	SyncChar(role,4)
    	SetChaAttr(role, ATTR_BCON,5 ) 
    	SyncChar(role,4)
    	SetChaAttr(role, ATTR_BSTA,5 ) 
    	SyncChar(role,4)
    	SetChaAttr(role , ATTR_AP,ap  )
    	SyncChar(role,4)
    	AddSailExp(role, npc , 1 , 1 )
    	local sk_add = SK_ZSSL
    	AddChaSkill ( role , sk_add , 3 , 2 , 0 )
    		
    		
    	PlayEffect( npc, 361 )
    	Notice("Extreme celebration "..cha_name.." Rebirth 3rd successful. Blessing from the whole server "..cha_name.." Hope you have a safe journey and everything goes your way!")
    	return 1
    
    end
    that's it, you are done....

    Note:
    1. you need to change the rebirth stone id to your id.... (in Green) 5858 is for lvl2 rb stone, 5859 for lvl3 rb stone in my server. change it to yor server rb stone codes.
    2. rebirth function is support for phyllis crusaders, lance cleric, lance sealmaster, carsise crusaders, carsise voyager, carsise cleric and carsise sealmaster.
    3. bug skip rebirth level fix by detecting the rebirth wing.

    This should work, if don't, comment in here. so that i can deal with it again.

  3. #3
    Enthusiast 159620a is offline
    MemberRank
    May 2009 Join Date
    27Posts

    Re: Rebirth lv2 and lv3 Fixe

    thank you man and very good people




  4. #4
    Member vinte is offline
    MemberRank
    Mar 2009 Join Date
    MaldivesLocation
    74Posts

    Re: Rebirth lv2 and lv3 Fixe

    no problem

  5. #5
    Apprentice thunder3100 is offline
    MemberRank
    Jan 2009 Join Date
    18Posts

    Re: Rebirth lv2 and lv3 Fixe

    I have a problem.. I see the correct bonus when I perform the rebirth but when I teleport or relog the effect of rb2 and rb 3 disappears. What is wrong ?

  6. #6
    Apprentice drakusorul is offline
    MemberRank
    Oct 2009 Join Date
    6Posts

    Re: Rebirth lv2 and lv3 Fixe

    can u give me your iteminfo.bin and iteminfo.txt plzz



Advertisement