Jump to content

MrLibya

Premium
  • Posts

    378
  • Joined

  • Last visited

  • Days Won

    8
  • Feedback

    0%

Everything posted by MrLibya

  1. Slow Him Down . ! Or Copy Mob Proto For Any Fast Mount And Work 100%
  2. ee /etc/ssh/sshd_config Look For PermitRootLogin no# Change To yes And Delete #
  3. quest : quest test begin state start begin when login or enter or levelup or kill begin item.unequip(2) // armor slot end end end
  4. Hallo So I Want Some Helps Iam 0 in C++ But i See That This Fuction Work Fine And Compile Good , But It's Don't Work . int item_unequip_selected(lua_State* L) { LPCHARACTER ch = CQuestManager::instance().GetCurrentCharacterPtr(); if (!lua_isnumber(L, 1)) { sys_err("Argument error."); lua_pushboolean(L, false); return 1; } int bCell = (int)lua_tonumber(L, 1); if (bCell < 0 || bCell >= WEAR_MAX_NUM) { sys_err("Invalid wear position %d. Index out of range(0..%d)", bCell, WEAR_MAX_NUM); lua_pushboolean(L, false); return 1; } LPITEM item = CQuestManager::instance().GetCurrentItem(); //current item in used LPITEM equipped = ch->GetWear(bCell); //current equipped item on target slot //check the pointers if (!ch || !item) return 0; //remove the equipped item if (equipped->GetVnum() != NULL || item->IsEquipped()) ch->UnequipItem(equipped); lua_pushboolean(L, true); return 1; } quest : item.unequip(1) But Didn't Work InGame ! Any Help ?
  5. Hallo I Get This Error While I Try To Compile The DB linking ... /usr/bin/ld: skipping incompatible ../../libsql/libsql.a when searching for -lsql /usr/bin/ld: cannot find -lsql Makefile:52: recipe for target '../db_r40146' failed gmake: *** [../db_r40146] Error 1 root@freebsd:/usr/src/mainline_released/mainline_sg/Srcs/Server/db/src #
  6. Hallo I Get This Error While I Try To Compile The DB linking ... /usr/bin/ld: skipping incompatible ../../libsql/libsql.a when searching for -lsql /usr/bin/ld: cannot find -lsql Makefile:52: recipe for target '../db_r40146' failed gmake: *** [../db_r40146] Error 1 root@freebsd:/usr/src/mainline_released/mainline_sg/Srcs/Server/db/src #
  7. SYSERR: Nov 25 06:26:22 :: SpawnGroup: NOT_EXIST_GROUP_VNUM(3003) Map(302) that's group dosn't exist , just delete it from regen in the map ( index 302 )
  8. Thx , But Where You Add IT ? In Any File's ?
  9. OMG How Did You Do This ? Bro Add Level TO My Quest And Have Fun + Thanks For The Topice Not Very Bed My system name is done through the kernel, and if you have not noticed, the name of my pet more than 24 characters Ahaa . Good For You Bro
  10. When you are giving a lesson you should do it right. I just gave him a tip. And Think You For THe Tip , But You Was Can Give It In PM , Topice Only For Bug + Thanks For That I Write Note4
  11. OMG How Did You Do This ? Bro Add Level TO My Quest And Have Fun + Thanks For The Topice Not Very Bed
  12. I Didn't Ask For It + He Can PM And Make Good Replay , + If You Didn't Like It Don't Use It
  13. Becous I Write : mysql_direct_query("INSERT INTO `pet_system` (`id`, `pet_name`) VALUES ('"..pc.get_player_id().."', '"..NewPetNm.."');") But Where Is Pet_system ? Here : mysql_direct_query("select * from player.pet_system;") And I Don't Understand New Function Too Much ! 2 Days And I am Working On IT . Every Time Test By New Way , Untill It's Work
  14. M2 Download Center Download Here ( Internal ) Hallo Will I Don't Know What I Have To Say , Just This System Made By Saud bin abdullah & MrLibya Note : You Have To Add mysql_direct_query functon [ Credit to : lollo_9_1 // epvp ] Note2 : First Quest Have Arabic Pet Names , Change It To You Lang Note3: The System Is Read Normal Pet Names From The Quest , But When You Use The Tool You Will Have To Put Your New Pet Name ,And That Is What You Pet Will Be Note4 : Well This Is Import For Who Want Too Look As Gunis If You Shorten The Quest somehow Don't Share It Here Let It To You Salf If You Want To Look like the Best Quest Writer Then Why You did'nt you Make The Quest By You Self Note4 : Sorry For My Bed Eng Quest Was Tested And Work 100% pet_system : -- Pet Name System -- By Saud bin abdullah & MrLibya -- www.Arab-Dev.Org quest pet_system begin state start begin function get_pet_info(itemVnum) pet_info_map = { -- [ITEM VNUM] MOB_VNUM, DEFAULT NAME, buff_idx, spawn_effect_idx [53001] = { 34001, " عنقاء النار ", 0}, [53002] = { 34002, " صغير الرنة ", 0}, [53003] = { 34003, " عنقاء الثلج ", 0}, [53004] = { 34001, " عنقاء النار ", 0}, [53005] = { 34004, " صغير فرعائيل ", 1}, [53006] = { 34009, " صغير فرعائيل ", 0}, -- Baby Azrael (gold) [53007] = { 34010, " بامبي ", 0}, [53008] = { 34011, " كنود ", 0}, -- Knuud [53009] = { 34012, " باو باو ", 0}, -- Bao Bao [53010] = { 34008, " ليوندس ", 0}, [53011] = { 34007, " خان ", 0}, [53012] = { 34005, " بوركي ", 0}, [53013] = { 34006, " ريوفوس ", 0}, [53016] = { 34015, " العظمي ", 0}, [53017] = { 34016, " عنقاء الغابة ", 0}, [71171] = { 34013, " Redthief young", 0}, [71172] = { 34014, " Redthief young", 0}, } itemVnum = tonumber(itemVnum) return pet_info_map[itemVnum] end function get_spawn_effect_file(idx) effect_table = { [0] = nil, [1] = "d:ymir workeffectetcappear_dienpc2_appear.mse", } return effect_table [idx] end when 53001.use or 53002.use or 53003.use or 53004.use or 53005.use or 53006.use or 53007.use or 53008.use or 53009.use or 53010.use or 53011.use or 53012.use or 53013.use or 53016.use or 53017.use or 71171.use or 71172.use begin local pet_info = pet_system.get_pet_info(item.vnum) local name = pc.get_name() if null != pet_info then if game.get_event_flag(""..name.."pet") == 1 then local res1, Pname = mysql_direct_query("select * from player.pet_system where id = "..pc.get_player_id().." limit 1;") local mobVnum = pet_info[1] local petName = Pname[1].pet_name local petNameO = pet_info[2] local spawn_effect_file_name = pet_system.get_spawn_effect_file(pet_info[3]) if true == pet.is_summon(mobVnum) then if spawn_effect_file_name != nil then pet.spawn_effect (mobVnum, spawn_effect_file_name) end pet.unsummon(mobVnum) else if pet.count_summoned() < 1 then pet.summon(mobVnum, "'s - "..petName, false) else syschat("You already summoned a pet.") end if spawn_effect_file_name != nil then pet.spawn_effect(mobVnum, spawn_effect_file_name) end end -- if pet.is_summon else local mobVnum = pet_info[1] local petName = pet_info[2] local spawn_effect_file_name = pet_system.get_spawn_effect_file(pet_info[3]) if true == pet.is_summon(mobVnum) then if spawn_effect_file_name != nil then pet.spawn_effect (mobVnum, spawn_effect_file_name) end pet.unsummon(mobVnum) else if pet.count_summoned() < 1 then pet.summon(mobVnum, petName, false) else syschat("You already summoned a pet.") end if spawn_effect_file_name != nil then pet.spawn_effect(mobVnum, spawn_effect_file_name) end end end -- if pet.is_summon end -- if null != pet_info end -- when end -- state end -- quest Pet Name: -- Pet Name System -- By Saud bin abdullah & MrLibya -- www.Arab-Dev.Org quest pet_system_name begin state start begin when 71055.use begin say_title(" Pet Name ") say(" You Want Change Your Pet Name ? ") local s = select(" Yes "," No ") if s == 2 then return end say_title(" Pet Name ") say(" Write New Name ") local NewPetNm = input() if NewPetNm == "" then say_title(" Pet Name ") say("") say_reward(" Write Some Thing ") say("") return end if string.len(NewPetNm) < 1 or string.len(NewPetNm) > 20 then say_title(" Pet Name ") say("") say_reward(" It's Too Long ") say("") return end say_title(" Pet Name ") say(" Your New Pet Name Set OK ") if pc.getqf ("pet_name_new") == 0 then local name = pc.get_name() mysql_direct_query("select * from player.pet_system;") mysql_direct_query("INSERT INTO `pet_system` (`id`, `pet_name`) VALUES ('"..pc.get_player_id().."', '"..NewPetNm.."');") game.set_event_flag(""..name.."pet", 1) pc.setqf("pet_name_new", 1) syschat(" Your New Pet Name Set OK ") else local name = pc.get_name() local res1, res2 = mysql_direct_query("select * from player.pet_system;") mysql_direct_query("UPDATE `pet_system` SET `pet_name`='"..NewPetNm.."' WHERE id='"..pc.get_player_id().."';") game.set_event_flag(""..name.."pet", 1) syschat("Your Pet Name Has Been Update ") end -- when end end -- state end -- quest Sql : Put It In Player SET FOREIGN_KEY_CHECKS=0; -- ---------------------------- -- Table structure for `pet_system` -- ---------------------------- DROP TABLE IF EXISTS `pet_system`; CREATE TABLE `pet_system` ( `id` int(11) NOT NULL, `pet_name` varchar(12) NOT NULL DEFAULT 'NONAME', PRIMARY KEY (`id`) ) ENGINE=MyISAM DEFAULT CHARSET=latin1;
  15. input_main.cpp: In member function 'int CInputMain::Chat(CHARACTER*, const char*, size_t)': input_main.cpp:756: error: expected primary-expression before 'p' input_main.cpp:758: error: 'p' was not declared in this scope
  16. Every One Make Core And Public It ! Why ? All Thing In Your Core Are Pubilc , So Best To Use Source And Make You Own Core , So You Can Edit Any Thing You Want .
  17. Maxmi , I Think You Use The Stolen 5 Ch From Ellie Without Her permission And Want She To Help You ?
×
×
  • Create New...

Important Information

Terms of Use / Privacy Policy / Guidelines / We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.