Fajar

@Sk3let0n Screenshot, When i activate System get eror. And me not load FREE Lunch GMSystem Work.

Hello. I need help 1. How to make Quest with Time and when finish the quest, can repeat the quest. 2. When I Start FREE Lunch and GMSystem coincide, GM System get eror in Line 197 : Attemp to index field '?' Can Someone Help me? Sorry My English

Thanks @Blanquitoh

Can Someone Help me? Why my Love Line Skill Not Work? This is my script Love Line skill function Skill_Qlzx_End ( ATKER , DEFER , sklv ) local NocLock = KitbagLock( ATKER, 0 ) if NocLock == LUA_FALSE then SystemNotice( ATKER , "Your inventory is locked!") return end local item_count = CheckBagItem ( ATKER , 7408 ) if item_count <= 0 then SystemNotice( ATKER , "You must have the marriage certificate in your inventory!" ) return else local ring = GetChaItem2 ( ATKER , 2 , 7408 ) local Num_ATK_JZ = GetItemForgeParam ( ring , 1 ) local plus = 1000000000 Num_ATK_JZ = TansferNum ( Num_ATK_JZ ) local ID_ATK_Num = GetCharID(ATKER) + plus local RoleType = GetChaID(ATKER) local t = {} t[0] = DEFER t[1] = GetTeamCha(DEFER, 0 ) t[2] = GetTeamCha(DEFER, 1 ) t[3] = GetTeamCha(DEFER, 2 ) t[4] = GetTeamCha(DEFER, 3 ) local i = 1 for i = 1 , 4 , 1 do if t[i] ~= nil then local item_count = CheckBagItem ( t[i] , 7408 ) if item_count == 1 then local Item = GetChaItem2 ( t[i] , 2 , 7408 ) local Num_JZ = GetItemForgeParam ( Item , 1 ) Num_JZ = TansferNum ( Num_JZ ) if Num_JZ == ID_ATK_Num then local ID_Num = GetCharID(t[i]) + plus if Num_ATK_JZ==ID_Num then local x, y = GetChaPos(t[i]) local map_name = GetChaMapName (t[i]) x = math.floor (x*0.01) y = math.floor (y*0.01) if map_name == "prisonisland" or map_name == "guildwar" or map_name == "guildwar2" or map_name == "darkswamp" or map_name == "puzzleworld" or map_name == "puzzleworld2" or map_name == "abandonedcity" or map_name == "abandonedcity2" or map_name == "abandonedcity3" or map_name == "garner2" or map_name == "deathcircle" or map_name =="bountypk" or map_name =="darkhouse" then SystemNotice ( ATKER , "Your partner is in map ["..map_name.."]! You cannot go there" ) UseItemFailed ( ATKER ) return else local map_name2 = GetChaMapName ( ATKER ) if map_name2 == "prisonisland" or map_name2 == "guildwar" or map_name2 == "guildwar2" or map_name2 == "darkswamp" or map_name2 == "puzzleworld" or map_name2 == "puzzleworld2" or map_name2 == "abandonedcity" or map_name2 == "abandonedcity2" or map_name2 == "abandonedcity3" or map_name2 == "garner2" or map_name2 == "deathcircle" or map_name2 =="bountypk" or map_name2 =="darkhouse" then SystemNotice ( ATKER , "You cannot use this skill in ["..map_name2.."]" ) UseItemFailed ( ATKER ) return end end GoTo(ATKER, x,y, map_name) return end end end end end if i == 4 then SystemNotice( ATKER , "Did not find your lover in your party, Failed to use skill!") return end local Item = GetChaItem2 ( ATKER , 2 , 7408 ) local Num_JZ = GetItemForgeParam ( Item , 1 ) Num_JZ = TansferNum ( Num_JZ ) local Part1_JZ = GetNum_Part1 ( Num_JZ ) local Part2_JZ = GetNum_Part2 ( Num_JZ ) local Part3_JZ = GetNum_Part3 ( Num_JZ ) local Part4_JZ = GetNum_Part4 ( Num_JZ ) local Part5_JZ = GetNum_Part5 ( Num_JZ ) local Part6_JZ = GetNum_Part6 ( Num_JZ ) local Part7_JZ = GetNum_Part7 ( Num_JZ ) Part1_JZ=1 Num_JZ = SetNum_Part1 ( Num_JZ , 1 ) SetItemForgeParam ( Item , 1 , Num_JZ ) end end

Hello! I need Help. Why my Admiral Cloak Glow for Champ is Lv 7 Cloak is Lv 3 Glow and Lv 1 is Glow Lv 7, and 4th Rebirth Wing Effect. How do I Fix it? Can Someone Help me? Please

@Sk3let0n thanks, i'll try

Hello Guys I need help. How to change the 4th slot rebirth wing effect? Thanks

@TheSamurai Where I could put it?

Hey Guys. I need Help. How to Load Extension File? Thanks Who Can help me

Thanks @xEvo7

@KONG where i can put ChatHandler?

function MarriageDivorce(role) local Ring = CheckBagItem( role, 7408 ) local Dev = CheckBagItem(role, 7409) local RName = 7408 local DName = 7409 if Ring > 0 then if Dev > 0 then TakeItem( role, 0, 7408 , 1 ) TakeItem( role, 0, 7409 , 1 ) else HelpInfo(role,0,"High Priest:You do not meet the requirements to divorce ! You do not have "..GetItemName(RName).." anymore!") end else HelpInfo(role,0,"High Priest:You do not meet the requirements to divorce ! You do not have a "..GetItemName(DName).." ") end end function marriage_effect_hook(ignore,role,freq,time) Hearts = {} Hearts[1] = 355 Hearts[2] = 370 Hearts[3] = 354 Hearts[4] = 355 Hearts[5] = 356 local x = math.random(1,5) local Ring_Num = 0 local t = {} t[0] = role t[1] = GetTeamCha(role, 0 ) t[2] = GetTeamCha(role, 1 ) t[3] = GetTeamCha(role, 2 ) t[4] = GetTeamCha(role, 3 ) local i = 1 local item_count = CheckBagItem ( role , 7408 ) local item_party = CheckBagItem ( t , 7408) local Ring_Num = Ring_Num + item_count if Ring_Num == 1 then for i = 1 , 4 , 1 do if t ~= nil then local statelv = 1 local statetime = 3600 if item_count > 0 then if item_party > 0 then local month = os.date ("%m") local day = os.date ("%d") local hour = os.date ("%H") local minute = os.date ("%M") local second = os.date ("%S") local minutenum = tonumber(minute) local hournum = tonumber(hour) local secondnum = tonumber(second) local monthnum = tonumber(month) local daynum = tonumber(day) if monthnum == 02 and daynum == 14 and minutenum == 05 and secondnum == 00 then PlayEffect(role, Hearts[x]) end AddState ( role , role , marriage , statelv , statetime ) end end end end if t == nil then local statelv_marriage = GetChaStateLv ( role , marriage ) if statelv_marriage~=0 then RemoveState ( role, marriage ) BickerNotice( role , "<High Priest>: Marriage Effect Disabled!") end end else end end Hook:AddPostHook("cha_timer", marriage_effect_hook,1)

if Ring_Num == 1 then -- if the team ring A total of 1 man and take on this task were combined local i = 1 for i = 1 , 4 , 1 do if t_Num == 1 then --local RoleType = GetChaID(role) --local TeamerType = GetChaID(t) if (RoleType<=2 and TeamerType>=3) or (RoleType>=3 and TeamerType<=2) then --sex determination --Players will take the task of information recorded in the other ring Means of local ID_Num = GetCharID(role) --Get access tasks players ID number, and record in the ring in GiveItem ( t , 0 , 7408 , 1 , 4 ) local a = DelBagItem ( t , 2521 , 1) local Item = GetChaItem2 ( t , 2 , 7408 ) --Valentines teammates made the right ring pointer local Num_JZ = GetItemForgeParam ( Item , 1 ) Num_JZ = TansferNum ( Num_JZ ) Num_JZ = ID_Num --with a concise record of information bits Role ID number recorded SetItemForgeParam ( Item , 1 , Num_JZ ) AddChaSkill ( t , SK_QLZX, 1 , 1 , 0 ) --To record the appropriate information teammates play in the next task Ring in the home local ID_Num1 = GetCharID(t) --Get the right team-mates ID number, and record in the ring in GiveItem ( role , 0 , 7408 , 1 , 4 ) local b = DelBagItem ( role , 2521 , 1) local Item1 = GetChaItem2 ( role , 2 , 7408 ) --made the task then the players Valentines Day ring pointer local Num_JZ1 = GetItemForgeParam ( Item1 , 1 ) Num_JZ1 = TansferNum ( Num_JZ1 ) Num_JZ1 = ID_Num1 --Scouring Records the ID number of information bits SetItemForgeParam ( Item1 , 1 , Num_JZ1 ) AddChaSkill ( role , SK_QLZX, 1 , 1 , 0 ) Notice("<High Priest>: Congrats to the couple, ("..GetChaDefaultName(role).." & "..GetChaDefaultName(t)..") for getting married! May you share eternal happiness for the rest of your lives!") PlayEffect(role, 839) PlayEffect(t, 839) else BickerNotice(role,"Please note about your gender!") end end end local cha1 = GetChaDefaultName ( role ) local cha2 = GetChaDefaultName ( t ) return LUA_TRUE elseif Ring_Num > 1 then BickerNotice(role,"You can only marry one person!") return LUA_FALSE else BickerNotice(role,"Please find someone who has a ring to marry!") return LUA_FALSE end end

function ValentinesRing(role) local Ring_Num = 0 local t = {} --called the target of various teammates t[0] = role t[1] = GetTeamCha(role, 0 ) t[2] = GetTeamCha(role, 1 ) t[3] = GetTeamCha(role, 2 ) t[4] = GetTeamCha(role, 3 ) local t_Num = {} --all teammates who recorded the number of rings t_Num[0] = 0 t_Num[1] = 0 t_Num[2] = 0 t_Num[3] = 0 t_Num[4] = 0 local i = 1 for i = 1 , 4, 1 do if t ~= nil then local Ring_Num_Add = CheckBagItem( t , 2521 ) if Ring_Num_Add == 1 then t_Num = 1 --If you have rings, the Value set to 1, so check back for use Ring_Num = Ring_Num + Ring_Num_Add -- Will ring the ranks of the total number of records for the judge to do with the back local USED_Ring_Num = CheckBagItem( t , 7408 ) --determine whether this team-mate who has been bound ring if USED_Ring_Num >= 1 then BickerNotice(role,"Your partner is already married!") BickerNotice(t,"You can marry only once! Get divorced!") return LUA_FALSE end end end end

function ValentinesRingJudge(role) local Ring_Num = 0 local t = {} --called the target of various teammates t[0] = role t[1] = GetTeamCha(role, 0 ) t[2] = GetTeamCha(role, 1 ) t[3] = GetTeamCha(role, 2 ) t[4] = GetTeamCha(role, 3 ) local t_Num = {} --all teammates who recorded the number of rings t_Num[0] = 0 t_Num[1] = 0 t_Num[2] = 0 t_Num[3] = 0 t_Num[4] = 0 local i = 1 for i = 1 , 4, 1 do if t ~= nil then local Ring_Num_Add = CheckBagItem( t , 2521 ) if Ring_Num_Add == 1 then local retbag = HasLeaveBagGrid( t, 1) if retbag ~= LUA_TRUE then BickerNotice(role,"Your partners Inventory is full!") BickerNotice(t,"You need at least 1 free Slot!") return LUA_FALSE end local NocLock =KitbagLock( t, 0 ) if NocLock == LUA_FALSE then BickerNotice( role , "Your partners Inventory is locked!") BickerNotice( t , "You need to make sure your inventory is unlocked") return LUA_FALSE end if CheckWeddingDress(role) == 0 then BickerNotice(role, "You are not dressed up!") BickerNotice(t, "Your partner is not dressed up") return 0 end if CheckWeddingDress(t) == 0 then BickerNotice (role, "Your partner is not dressed up!") BickerNotice (t, "You are not dressed up!") return 0 end t_Num = 1 --If you have rings, the Value set to 1, so check back for use Ring_Num = Ring_Num + Ring_Num_Add --Will ring the ranks of the total number of records for the judge to do with the back local USED_Ring_Num = CheckBagItem( t , 7408 ) --determine whether this team-mate who has been bound ring if USED_Ring_Num >= 1 then BickerNotice(role,"Your partner is already married!") BickerNotice(t,"You can only marry once! Get divorced!") return LUA_FALSE end end end end if Ring_Num == 1 then --if the team ring A total of 1 man and take on this task were combined return LUA_TRUE elseif Ring_Num > 1 then BickerNotice(role,"You need one Valentines Day Ring!") return LUA_FALSE else BickerNotice(role,"Please find someone who has a ring to marry!") return LUA_FALSE end end

function CheckWeddingDress (role) local ChaType = GetChaTypeID(role) -- Character Race local Body = GetItemID (GetEquipItemP(role, 2)) -- Body local Glove = GetItemID (GetEquipItemP(role, 3)) -- Gloves local Shoes = GetItemID (GetEquipItemP(role, 4)) -- Boots local Hat = GetItemID(GetEquipItemP(role, 0))-- Hat -- Lance if ChaType == 1 then if Body ~= 5221 or Glove ~= 5222 or Shoes ~= 5223 then return 0 end -- Carsise elseif ChaType == 2 then if Body ~= 5238 or Glove ~= 5239 or Shoes ~= 5240 then return 0 end -- Phyllis elseif ChaType == 3 then if Body ~= 5245 or Glove ~= 5246 or Shoes ~= 5247 or Hat ~= 5244 then return 0 end -- Amy elseif ChaType == 4 then if Body ~= 5253 or Glove ~= 5254 or Shoes ~= 5255 or Hat ~= 5252 then return 0 end end end

@qwerty NPC SCRIPT (HIGH PRIEST) : function Priest() Talk( 1, "High Priest: I am very happy to see you around, you had finally decided to devote the word of God?") Text( 1, "Buy Apparel", BuyPage) Text( 1, "I wish to marry", JumpPage, 2) Text( 1, "I wish to divorce", JumpPage, 6) Text( 1, "What I need to get married?", JumpPage, 5) Text( 1, "Nevermind i just check it.", CloseTalk) Talk( 2, "High Priest: Nice to hear that these days! To marry first you need to get the Certificate, and that is not a easy task. You need to show us that you are ready to start a new life and a family with the person you love!") Text( 2, "We are ready to get married!", JumpPage, 3) Talk (3, "High Priest: Please find your lover, and team with him up than you may live together happy!") InitTrigger () TriggerCondition (1, HasItem, 2521, 1) TriggerCondition (1, ValentinesRingJudge) TriggerCondition (1, HasLeaveBagGrid, 1) TriggerCondition (1, KitbagLock, 0) TriggerAction (1, ValentinesRing) TriggerFailure (1, JumpPage, 4) Text (3, "Yes I want to marry!", MultiTrigger, GetMultiTrigger (), 1) Talk (4, "High Priest: I believe you do not meet the requirments to marry this person!") Text (4, "Back", JumpPage, 1) Talk (5, "You need the Valentine's Day Ring and to be in Party with your Sweetheart! You must also be wearing your tuxedo and wedding dress! Then come to me to do the further process!") Text (5, "Back", JumpPage, 1) Talk (6, "High Priest: You sure you want to divorce? ") Text (6, "Yes I am Sure!", MarriageDivorce) Talk (7, "High Priest: I believe you do not meet the requirments to divorce this person!") Text (7, "Back", JumpPage, 1) InitTrade() Weapon() Weapon(5221) Weapon(5222) Weapon(5223) Weapon() Weapon(5238) Weapon(5239) Weapon(5240) Weapon(5244) Weapon(5245) Weapon(5246) Weapon(5247) Weapon(5252) Weapon(5253) Weapon(5254) Weapon(5255) Other(7409) end

[System]npc[High Priest]script info manage function [NpcProc]transefer failed! <<=== HOW TO FIX THAT? PLEASE HELP ME.. NB: AND IM SORRY I HAVE A PROBLEM TO UPLOAD MY PICTURE

How to Fix This Eror?

@V3ct0r Thanks

Hey Guys. How to make ServerSet.bin for PKO II? Help me please

y, I click Run As Administrator and get same problem

How to fix the eror? i can't fix it. Help me please for fix this problem.

ok thanks

Can help me? How to fix this?