Jump to content

fotostocker

Advanced members
  • Content Count

    45
  • Joined

  • Last visited

  • Days Won

    4

Everything posted by fotostocker

  1. кинь подсказочку что и где искать и может есть зарисовка какая ни то может чтоб изменить вид данного свечения. было бы интересно этим заняться!!!!!!!!!
  2. Как говорить на других надейся а сам не плошай)))) наверно это урок для всех нас. в следущий раз будем осторожней. данный урок показал что наверно нужно более осторожно подходить к людям и доверять им что то из своего личного!!!!!!!!!!!
  3. Друзья вот дизайн инвентаря с временным мешком. Хочу вам сказать что данный дизайн хочу полностью внести в игру пиратия очень понравилось данное оформление. Хочу скачать
  4. да я сделал уже . сегодня уже выложу данный инвентарь на скачку!!!!
  5. Да я проверяю. без этого ни как. И да я видел тоже как то давно такие детали , админы можно сказать сворачивают объем клиента чтоб вес клиента небыл большим... Я учтут твою просьбу. Будет время порисую на минимальную систему что не нагружать клиент
  6. Друзья подскажите пожалуйста фантазия пока пропала на временный мешок что можно сделать.
  7. Спасибо за подсказку работаю уже над этим. тоже подумал очевидно плохо видно буду пробовать менять вид что был приятно для глаз. как будет готов обязательно поделюсь данным стилем. Добро на Добро!!!!
  8. Друзья всем добрый день давно уже занимаюсь фотошопом и тут решил создать другой инвентарь да и вообще новый стиль для пиратии. Но вот у меня появился такой вопрос подскажите что не хватает или что изменить в инвентаре!!!!!!!! Может кому то нужен будет в дальнейшем данный стиль пишите в вк https://vk.com/paulovserega52 и время от времени буду выкладывать новые виды!!!!!
  9. Помогите с установкой .obj -> .lgo просит логи и пароль уже все файлы испробовал прошу вас помогите
  10. дай плиззз свзь с тобой нужна помощь
  11. ветер в лс нужна твоя помощ по поводу сервера
  12. Администратор данного форума V3ct0r хотел бы полноценно связаться с вами для взятия хостинга на сервер пиратии. Если есть возможность свяжитесь со мной в вк https://vk.com/paulovserega52 или пришлите пожалуйста лично в сообщение ваши персональные данные куда я вам могу написать для обсуждения. Спасибо данному форуму за помощь в создании серверов.
  13. Граф в лс пожалуйста нужна твоя помощь
  14. Kara Onlineспасибо еще раз благодарю тебя за данные статьи это пригодиться всем Всем спасибо кто помог и спасибо Форуму
  15. Всем хай выкладываю сборку фан сами знаете было тяжелое время ковид и все такое. ну вот пока сидел дома решил создать может кому то будет интересно. Описание: Мах лвл -250 Фей -150 ( умная) -------------- Корона покойника Шлем волнолона Шлем богоубицы ---------- шмот 100 150 250 ---------------- оружие 100 150 250-(не создал) ----------- Кольцо Пустыни вип 1 Кольцо Спокойствия вип 2 Кольцо Пустыни вип 3 Кольцо силы Бога ------------------ VIP-1 Ожерелье VIP-2 Ожерелье VIP-3 Ожерелье Ожерелье героя бога Статы 500 --Максимальное количество силы 515 --Максимальное количество точности 505 --Максимальное количество ловкости 510 --Максимальное количество телосложения 520 --Максимальное количество духа 510 --Максимальное количество удачи -------------------- 9999999 --Максимальная минимальная атака 9999999 --Максимальная максимальная атака 2000000000000 --Максимальное количество здоровья ----------------- гемы +10 +20 +30 +25 +40 +60 качер- голдер Рб 1 +15 статы Рб 2 +25 статы (ссылка удалена, см. комментарий ниже) (V3ct0r)
  16. Kara Online спасибо за данный ответ. Но пока искал куда вставить нашел еще один интересный факт. ковыряясь в файле variable.lua наткнулся на несколько строк где и была проблема и там ее решил. Я надеюсь это кому то тоже поможет пригодиться . --тип предмета для вставке гемов Item_CanJinglian_Num = 13 Item_CanJinglian_ID = { } Item_CanJinglian_ID [0] = 1 --Меч Item_CanJinglian_ID [1] = 2 --Двуручный меч Item_CanJinglian_ID [2] = 3 --Лук Item_CanJinglian_ID [3] = 4 --Мушкет Item_CanJinglian_ID [4] = 7 -- клинок мор Item_CanJinglian_ID [5] = 11 -- Щит Item_CanJinglian_ID [6] = 20 -- Шапка Item_CanJinglian_ID [7] = 22 -- Доспех Item_CanJinglian_ID [8] = 23 -- Перчатки Item_CanJinglian_ID [9] = 24 -- Ботинки Item_CanJinglian_ID [10] = 27 -- тату Item_CanJinglian_ID [11] = 9 -- Посох Item_CanJinglian_ID [12] = 25 -- Ожерелье ( посмотрел по другим сборкам и увидел что данных строк не хватал в них тоесть 12 и 13 строчка как раз -- Item_CanJinglian_ID [13] = 26 -- кольцо ( решили данную проблему по вставке самоцвета в кольца и бижу) Всем спасибо кто помог и спасибо Форуму
  17. Друзья всем добрый день. Хотел спросить может кто ни то знает как сделать форж колец и бижи уже перекопал много сборок и форумов. Но так и не решил данную проблему. Variable.lua 1.StoneAttrType 3.StoneTpye_ID 4.StoneEffType 5.StoneItemType Перекопал данные файлы но так ни чего не получилось . а именно такие самоцветы хотел вставить. Сломанный Самоцвет Треснутый Самоцвет Неограненный Самоцвет Помогите советом что сделать или как добраться до истины?!!!!
  18. Всем привет. Хочу поделиться функцией 100% поднятие уровня феи. Как я заметил что ковыряясь по разным сборкам пиратии я видел только поднятие уровня феи с каким ни то шансом. Да и много лишних надписей там имеется. Видел здесь было какое то описание про уровень но он у меня не сработал. Так вот я хочу вам помочь может кому ни то пригодиться ---Фрукт +1 к стату function Elf_LvUp ( role , Item_Num , Item_Traget , attr_type ) local str = GetItemAttr( Item_Traget ,ITEMATTR_VAL_STR ) local con = GetItemAttr( Item_Traget ,ITEMATTR_VAL_CON ) local agi = GetItemAttr( Item_Traget ,ITEMATTR_VAL_AGI ) local dex = GetItemAttr( Item_Traget ,ITEMATTR_VAL_DEX ) local sta = GetItemAttr( Item_Traget ,ITEMATTR_VAL_STA ) local Elf_MaxEXP = GetItemAttr(Item_Traget,ITEMATTR_MAXENERGY) local Elf_MaxURE = GetItemAttr(Item_Traget,ITEMATTR_MAXURE) local Lv = str + agi + dex + con + sta if Lv == 50 then --->Максимальный лвл одиночным фруктом(Можно поставить свое значение) SystemNotice (role , "Фея достигла максимального уровня развития.") return end local attr_type_num = GetItemAttr( Item_Traget ,attr_type ) local item_energe = GetItemAttr( Item_Traget ,ITEMATTR_ENERGY ) AddItemEffect(role , Item_Traget , 0 ) item_energe = 0 SystemNotice (role , "\212\229\255 \243\241\239\229\248\237\238 \226\251\240\238\241\235\224 \226 \243\240\238\226\237\229!") --SystemNotice (role , "Фея успешно выросла в уровне!") attr_type_num = attr_type_num + 1 ---> + сколько дает бига(можно поставить любое значение) SetItemAttr ( Item_Traget , attr_type , attr_type_num ) local Item_MAXENERGY = 240 * ( Lv + 1 ) ---> + сколько дает фрукт(ставить тоже значение что и в attr_type_num = attr_type_num + 1 ) if Item_MAXENERGY > 6480 then Item_MAXENERGY = 6480 end local Item_MAXURE_NUM = Elf_MaxURE + 1000 if Item_MAXURE_NUM > 32000 then Item_MAXURE_NUM = 32000 end SetItemAttr ( Item_Traget , ITEMATTR_MAXENERGY , Item_MAXENERGY ) SetItemAttr ( Item_Traget , ITEMATTR_MAXURE , Item_MAXURE_NUM ) ResetItemFinalAttr(Item_Traget) AddItemEffect(role , Item_Traget , 1 ) SetItemAttr ( Item_Traget , ITEMATTR_ENERGY , item_energe ) end --Фрукт +2 к стату! function Elf_LvUp_1 ( role , Item_Num , Item_Traget , attr_type ) local str = GetItemAttr( Item_Traget ,ITEMATTR_VAL_STR ) local con = GetItemAttr( Item_Traget ,ITEMATTR_VAL_CON ) local agi = GetItemAttr( Item_Traget ,ITEMATTR_VAL_AGI ) local dex = GetItemAttr( Item_Traget ,ITEMATTR_VAL_DEX ) local sta = GetItemAttr( Item_Traget ,ITEMATTR_VAL_STA ) local Elf_MaxEXP = GetItemAttr(Item_Traget,ITEMATTR_MAXENERGY) local Elf_MaxURE = GetItemAttr(Item_Traget,ITEMATTR_MAXURE) local Lv = str + agi + dex + con + sta if Lv == 150 then -----> Максимальный лвл фруктом +2(Можно поставить свое значение) SystemNotice (role , "Фея достигла максимального уровня развития.") return end local attr_type_num = GetItemAttr( Item_Traget ,attr_type ) local item_energe = GetItemAttr( Item_Traget ,ITEMATTR_ENERGY ) AddItemEffect(role , Item_Traget , 0 ) item_energe = 0 SystemNotice (role , "\212\229\255 \243\241\239\229\248\237\238 \226\251\240\238\241\235\224 \226 \243\240\238\226\237\229!") --SystemNotice (role , "Фея успешно выросла в уровне!") attr_type_num = attr_type_num + 2 ---> + сколько дает фрукт(можно поставить любое значение) SetItemAttr ( Item_Traget , attr_type , attr_type_num ) local Item_MAXENERGY = 240 * ( Lv + 2 ) ---> + сколько дает фрукт(ставить тоже значение что и в attr_type_num = attr_type_num + 2 ) if Item_MAXENERGY > 6480 then Item_MAXENERGY = 6480 end local Item_MAXURE_NUM = Elf_MaxURE + 1000 if Item_MAXURE_NUM > 32000 then Item_MAXURE_NUM = 32000 end SetItemAttr ( Item_Traget , ITEMATTR_MAXENERGY , Item_MAXENERGY ) SetItemAttr ( Item_Traget , ITEMATTR_MAXURE , Item_MAXURE_NUM ) ResetItemFinalAttr(Item_Traget) AddItemEffect(role , Item_Traget , 1 ) SetItemAttr ( Item_Traget , ITEMATTR_ENERGY , item_energe ) end Надеюсь данная тема поможет. Спасибо этому форуму
  19. Друзья хочу с вами поделить данной информацией про заточку в нашей любимой игре Пиратия. Данный гайд меня попросили выложить наша Уважаемая Администрация этого чудесного форума. И так приступим разбирать данную проблему многих создателей серверов. Открываем файл файл forge.lua ( Он находиться \resource\script\calculate ) И ищем первую данную функцию --- function can_beuplv_item_main ( щас ее разберем ) function can_beuplv_item_main ( Table ) local role = 0 local ItemBag = {} local ItemCount = {} local ItemBagCount = {} local Get_Count = 4 local ItemReadCount = 0 local ItemReadNow = 1 local ItemReadNext = 0 local ItemBag_Now = 0 local ItemCount_Now = 0 local ItemBagCount_Num = 0 role , ItemBag , ItemCount , ItemBagCount , ItemBag_Now , ItemCount_Now , ItemBagCount_Num = Read_Table ( Table ) local ItemBagCount_beuplv = ItemBagCount [1] local ItemBag_beuplv = ItemBag [1] local ItemNum_beuplv = ItemCount [1] local Item_beuplv = GetChaItem ( role , 2 , ItemBag_beuplv ) local Item_beuplv_Type = GetItemType ( Item_beuplv ) local Item_beuplv_ID = GetItemID ( Item_beuplv ) local Item_ScItem = GetChaItem ( role , 2 , ItemBag [0] ) local Item_YxItem = GetChaItem ( role , 2 , ItemBag [2] ) local Item_ScItem_ID = GetItemID ( Item_ScItem ) local Item_YxItem_ID = GetItemID ( Item_YxItem ) local Item_ScItem_Type = GetItemType ( Item_ScItem ) local Item_YxItem_Type = GetItemType ( Item_YxItem ) local Item_beuplv_Lv = Get_Itembeuplv_Lv ( Item_beuplv ) local ItemAttr_Val_Fusionid = GetItemAttr ( Item_beuplv , ITEMATTR_VAL_FUSIONID ) if Item_beuplv_ID < 5001 or Item_beuplv_ID > 6000 then SystemNotice( role ,"Этот предмет нельзя плавить ") return 0 end if ItemAttr_Val_Fusionid == 0 then SystemNotice( role , "Предмет невозможно улучшить ") return 0 end if Item_beuplv_Lv >= 50 then -- Максимальный уровень улучшения --( расчет идет +4 то есть 50*4=200 заточка получается 200%) SystemNotice( role ,"Вы достигли максимального уровня заточки ") return 0 end if ItemBagCount_beuplv ~= 1 then SystemNotice( role , "Недопустимый уровень улучшения ") return 0 end if Item_ScItem_Type ~= 62 then SystemNotice( role , "У вас нет Улучшающего свитка ") return 0 end if Item_YxItem_Type ~= 63 then SystemNotice( role , "У вас нет Усиливающего кристалла ") return 0 end if ItemNum_beuplv ~= 1 then SystemNotice( role , "Неверный номер улучшения ") return 0 end if ItemCount [0] ~= 1 or ItemCount [2] ~= 1 or ItemBagCount [0] ~= 1 or ItemBagCount [2] ~= 1 then SystemNotice ( role ,"Ошибка предмета из ИМ или игрового материала ") return 0 end local Money_Need = getupgrade_money_main ( Table ) local Money_Have = GetChaAttr ( role , ATTR_GD ) if Money_Need > Money_Have then SystemNotice( role ,"У вас не хватает золота. Невозможно провести улучшение ") return 0 end return 1 end Далее находим вот эту функцию --- function begin_upgrade_item (...) function begin_upgrade_item (...) local Check_Canbeuplv = 0 Check_Canbeuplv = can_beuplv_item_main ( arg ) if Check_Canbeuplv == 0 then return 0 end local role = 0 local ItemBag = {} local ItemCount = {} local ItemBagCount = {} local Get_Count = 4 local ItemReadCount = 0 local ItemReadNow = 1 local ItemReadNext = 0 local ItemBag_Num = 0 local ItemCount_Num = 0 local ItemBagCount_Num = 0 role , ItemBag , ItemCount , ItemBagCount , ItemBag_Num , ItemCount_Num , ItemBagCount_Num = Read_Table ( arg ) local ItemBag_beuplv = ItemBag [1] local Item_beuplv = GetChaItem ( role , 2 , ItemBag_beuplv ) local Item_ScItem = GetChaItem ( role , 2 , ItemBag [0] ) local Item_YxItem = GetChaItem ( role , 2 , ItemBag [2] ) local Item_ScItem_ID = GetItemID ( Item_ScItem ) local Item_YxItem_ID = GetItemID ( Item_YxItem ) local Item_beuplv_Lv = Get_Itembeuplv_Lv ( Item_beuplv ) local R1 = 0 local R2 = 0 R1 = RemoveChaItem ( role , Item_ScItem_ID , 1 , 2 , ItemBag [0] , 2 , 1 , 0 ) R2 = RemoveChaItem ( role , Item_YxItem_ID , 1 , 2 , ItemBag [2] , 2 , 1 , 0 ) if R1 == 0 or R2 == 0 then LG( "beuplv" , "Удалить предмет не удалось " ) end local Money_Need = getupgrade_money_main ( arg ) local Money_Have = GetChaAttr ( role , ATTR_GD ) Money_Have = Money_Have - Money_Need SetCharaAttr ( Money_Have , role , ATTR_GD ) ALLExAttrSet( role ) local a = Check_CG_beuplv ( Item_beuplv_Lv ) if a == 0 then R1 = RemoveChaItem ( role , Item_ScItem_ID , 1 , 2 , ItemBag [0] , 2 , 1 , 0 ) R2 = RemoveChaItem ( role , Item_YxItem_ID , 1 , 2 , ItemBag [2] , 2 , 1 , 0 ) if R1 == 0 or R2 == 0 then LG( "beuplv" , "Удалить предмет не удалось " ) end local cha_name = GetChaDefaultName ( role ) LG( "JingLian_ShiBai" , "Игрок "..cha_name.." не смог улучшить предмет " ) SystemNotice( role , "Извините, заточить аппарель не удалась ") return end Item_beuplv_Lv = Item_beuplv_Lv + 50 --(это сколько уровней сразу поднимется то есть 1 уровень это 2% а 50 уровней это 100% сразу ) SetChaKitbagChange( role , 1 ) Set_Itembeuplv_Lv ( Item_beuplv , Item_beuplv_Lv ) SynChaKitbag( role, 4 ) local LvD = GetItemAttr( Item_beuplv , ITEMATTR_VAL_LEVEL ) SynChaKitbag(role,13) SystemNotice( role , "Вы заточили шмотку ") local cha_name = GetChaDefaultName ( role ) LG( "JingLian_ShiBai" , "Игрок "..cha_name.." успешно провел усиление " ) return 1 end function Get_Itembeuplv_Lv ( Item ) local Lv = GetItemAttr ( Item , ITEMATTR_VAL_LEVEL ) return Lv end function Set_Itembeuplv_Lv ( Item , Item_Lv ) local i = 0 i = SetItemAttr ( Item , ITEMATTR_VAL_LEVEL , Item_Lv ) if i == 0 then LG( "Hecheng_BS","Failed to set gem level" ) end end А теперь разберем шанс заточки находим функцию function Check_CG_beuplv ( Item_Lv ) function Check_CG_beuplv ( Item_Lv ) local ran = math.random ( 1, 100 ) if Item_Lv <= 10 then return 1 -- 100% до первых 10 уровней end if Item_Lv>10 and Item_Lv <= 15 then if ran <= 50 then -- 50% после 10 уровня 5 уровней дают 50 процентов шанс return 1 else return 0 end end if Item_Lv>15 and Item_Lv <= 20 then --- также меняется на ваше количество уровней if ran <= 10 then --10% ну тут уже ясно что это уже ясно после 15 еще 5 лвл будут с процентом 10 return 1 else return 0 end end end Но чтоб сделать все качественно с шансом заточки и не сталкиваться с какой ни то проблемой в этих функциях делайте все внимательно и не торопитесь. Желаю всем удачи и спасибо этому форуму .
×
×
  • Create New...