Jump to content

[Lua]Создаем свой сундук

Go-piratia

By Go-piratia
in Lua

 Share

Recommended Posts

Go-piratia

Go-piratia

Posted
Posted

Пример сундука с аппарелями 

function zodiac_aries ( role , Item )
	 local Item_CanGet = GetChaFreeBagGridNum ( role )
	 if Item_CanGet < 4 then
		SystemNotice(role ,"To open a Aries Apparel Chest requires at least 4 empty inventory slots")
		UseItemFailed ( role )
		return
	end
	local cha_type = GetChaTypeID ( role ) -- GetRace
	if cha_type == 1 then --Lance
	       GiveItem ( role , 0 , 5341  , 1 , 4 )
	       GiveItem ( role , 0 , 5342  , 1 , 4 )
	       GiveItem ( role , 0 , 5343  , 1 , 4 )
	elseif cha_type == 2 then -- Carsise
	       GiveItem ( role , 0 , 5345  , 1 , 4 )
	       GiveItem ( role , 0 , 5346  , 1 , 4 )
	       GiveItem ( role , 0 , 5347  , 1 , 4 )
	elseif cha_type == 3  then --Phyllis
	       GiveItem ( role , 0 , 5349  , 1 , 4 )
	       GiveItem ( role , 0 , 5350  , 1 , 4 )
	       GiveItem ( role , 0 , 5351  , 1 , 4 )
	elseif cha_type == 4  then --Ami
	       GiveItem ( role , 0 , 5352  , 1 , 4 )
	       GiveItem ( role , 0 , 5353  , 1 , 4 )
	       GiveItem ( role , 0 , 5354  , 1 , 4 )
	       GiveItem ( role , 0 , 5355  , 1 , 4 )
	end
end

 

Пример сундука с случайной наградой 


function Random_Item ( role , Item )
	 local Item_CanGet = GetChaFreeBagGridNum ( role )
	 if Item_CanGet < 1 then
		SystemNotice(role ,"To open a Random Chest requires at least 1 empty inventory slots")
		UseItemFailed ( role )
		return
	end

	local rand = math.random(1,3)

	if rand == 1 then 
		GiveItem ( role , 0 , 7555 , 1 , 4)
	end
	
	if rand == 2 then
		GiveItem ( role , 0 , 7556 , 1 , 4)
	end
	
	if rand == 3 then
		GiveItem ( role , 0 , 7557 , 1 , 4)
	end
end

 

Более интересный пример создания сундука с случайной наградой 

function ItemUse_RandomItemChest ( role , Item )        ---------- Random item chest
    local Cha_Boat = GetCtrlBoat ( role )
    if Cha_Boat ~=  nil then
        SystemNotice( role , "Cannot use while sailing" )
        UseItemFailed ( role )
        return
    end
  
    local Item_CanGet = GetChaFreeBagGridNum ( role )
    if Item_CanGet < 2 then
        SystemNotice(role ,"You don't have enough slots")
        UseItemFailed ( role )
        return
    end
  
	-- Giving random item's when opening Chest, list them below
	local Item = {}
		Item[1] = 2792 -- Flash Bomb Lv5
		Item[2] = 2794 -- Soul Detector Lv5
		Item[3] = 1860 -- Blessed Potion
 
	-- The range is (1,3) at the moment, if you add more like 10 item, make it (1,10) so counts random for that and so on
	local i = math.random(1,Item.n) -- <-- range for the above item
	GiveItem(role,0,Item[i],1,4)
end

 

Link to comment
Share on other sites
  • 1 year later...
MoonBox

MoonBox

Posted
Posted (edited)

Вот ещё интересный вариант, с ключом (Пурпурный сундук)

 

function ItemUse_TestCest1 (role, Item)
 
    local Cha_Boat = GetCtrlBoat ( role )
    if Cha_Boat ~=  nil then
        SystemNotice( role , "Нельзя использовать в море!" )
        UseItemFailed ( role )
        return
    end
    local Item_CanGet = GetChaFreeBagGridNum ( role )  
     if Item_CanGet < 1 then
        SystemNotice(role ,"Недостаточно места в инвентаре")
        UseItemFailed ( role )
        return
    end
    local i= CheckBagItem( role, 7101 )  --ID ключа
    if i <=0 then
        SystemNotice(  role , "Нужен ключ соответствующего цвета!")
        UseItemFailed ( role )
        return LUA_FALSE
    end
   
    local s = DelBagItem ( role , 7101 , 1 ) --ID ключа
    local   sc = math.random(1,100)
    local itemname = ""
    if  sc <=50 then    
        GiveItem ( role , 0 , 7114 , 1 , 4 )
        itemname = "Зеленый сундук"
    elseif sc <=65 then    
        GiveItem ( role , 0 , 7102 , 1 , 4 )
        itemname = "Зеленый ключ"
    elseif sc <=80 then
        GiveItem ( role , 0 , 7085 , 5 , 4 )
        itemname = "Загадочная коробка"
    elseif sc <=95 then
        GiveItem ( role , 0 , 7084 , 5 , 4 )
        itemname = "Сундук королевы феи"
    else  
        GiveItem ( role , 0 , 7099 , 3 , 4 )
        itemname = "Пиастра"
    end
    local cha_name = GetChaDefaultName ( role )
    Notice ( "Игрок" ..cha_name.." открыл Пурпурный сундук и получил "..itemname )
end
Edited by MoonBox
Link to comment
Share on other sites
MoonBox

MoonBox

Posted
Posted (edited)

Пример сундука с 3 ключами.

 

function ItemUse_LockedChest1 (role, Item)
 
    local Cha_Boat = GetCtrlBoat ( role )
    if Cha_Boat ~=  nil then
        SystemNotice( role , "Нельзя использовать в море!" )
        UseItemFailed ( role )
        return
    end
    local Item_CanGet = GetChaFreeBagGridNum ( role )  
     if Item_CanGet < 4 then
        SystemNotice(role ,"Нужно 5 свободных ячеек")
        UseItemFailed ( role )
        return
    end
   
    local key1 = CheckBagItem( role, 7500 )--Ключи
    local key2 = CheckBagItem( role, 7501 )
    local key3 = CheckBagItem( role, 7502 )
   
    if key1 <= 0 then
        SystemNotice( role , "Не хватает ключа!" )
        UseItemFailed ( role )
        return LUA_FALSE
    end
   
    if key2 <= 0 then
        SystemNotice( role , "Не хватает ключа!" )
        UseItemFailed ( role )
        return LUA_FALSE
    end
   
    if key3 <= 0 then
        SystemNotice( role , "Не хватает ключа!" )
        UseItemFailed ( role )
        return LUA_FALSE
    end
 
    DelBagItem ( role , 7500 , 1 )--ключи
    DelBagItem ( role , 7501 , 1 )
    DelBagItem ( role , 7502 , 1 )
 
    GiveItem ( role , 0 , 7062 , 1 , 20 )--Предметы
    GiveItem ( role , 0 , 6997 , 1 , 20 )
    GiveItem ( role , 0 , 6996 , 1 , 20 )
    GiveItem ( role , 0 , 6998 , 1 , 20 )
end
Edited by MoonBox
  • Like 1
Link to comment
Share on other sites
  • 7 months later...
GeorgeEscar

GeorgeEscar

Posted
Posted
Все собравшиеся сошлись во мнении: маркетплейсы — крайне важная составляющая сегодняшнего бизнеса, и у предпринимателей есть серьезный запрос на попадание туда https://bayra.market/sergu/page-35/
Официальные цифры это подтверждают https://bayra.market/ip-klimenko/?category_id=19849&page=28
В прошлом году число селлеров, торгующих, к примеру, на « МегаМаркете », увеличилось на 95%, а на Wildberries — на 22%.
Отдельным сложным моментом в компании называют работу с возвратами на маркетплейсах https://bayra.market/zhenschinam-ru/page-32/
По словам Юлии Ильевой, к таким ситуациям стоит подходить со смирением и принятием https://bayra.market/ip-klimenko/?category_id=25701&page=4

Окупаемость https://bayra.market/zhenschinam-ru/page-79/

Во-вторых, продолжает Федоров, тезис про создание рабочих мест формально верен, но «места не рождаются из ничего, а сотрудники не приходят из ниоткуда» https://bayra.market/galantereya-i-ukrasheniya/zhenschinam-ru/bizhuteriya/kolca/kolco-k1-00018576/
«Это ведь те, кто раньше работал в офлайн-рознице или в небольших оптовых компаниях, которые возили товары в небольшие города https://bayra.market/galantereya-i-ukrasheniya/zhenschinam-ru/bizhuteriya/broshi-i-znachki/brosh-k1-00000743/
Безусловно, интернет-площадки предоставляют огромную возможность для небольших предпринимателей продавать свои товары на всю Россию или хотя бы в своем домашнем регионе и не думать о плате за выход в большие офлайн-сети, — рассуждает он https://bayra.market/galantereya-i-ukrasheniya/zhenschinam-ru/bizhuteriya/sergu/sergi-k1-00017699/?select_warehouse=56
— Но, с другой стороны, многие розничные игроки, сотни и тысячи, разорятся в малых городах, потому что люди перестанут у них покупать, поскольку последних вытесняют крупные интернет-игроки» https://bayra.market/sergu/page-34/?utm_referer=geoadv_search_yabs&utm_ya_campaign=89823972517&yabizcmpgn=25716636&utm_candidate=59247141423

Главными драйверами в Ozon называют появление все новых пунктов выдачи и продавцов на платформе: партнеры-владельцы ПВЗ из городов с населением до 10 000 жителей до конца 2023 года открыли почти 9000 пунктов https://bayra.market/odezhda-ru-5/detyam/novorozhdennym/shapochki-i-rukavichki/chepchik-iz-muslina-s-ushkami-zayki-molochnyy-r-38-40/
Теперь точки выдачи в малых населенных пунктах охватили 81 регион России, и таких ПВЗ стало втрое больше по сравнению с 2022 годом — всего уже более 13 000 ПВЗ https://bayra.market/galantereya-i-ukrasheniya/zhenschinam-ru/bizhuteriya/sergu/sergi-k1-00013809/
Ими владеют более 7500 предпринимателей, для которых возможность открыть пункт маркетплейса — «возможность вести бизнес на стыке онлайн-коммерции и жизни любимого города», поясняют в Ozon: «Пункты выдачи играют важную роль в жизни малых населенных пунктов, обеспечивая доступ к широкому ассортименту товаров и создавая дополнительные рабочие места» https://bayra.market/galantereya-i-ukrasheniya/zhenschinam-ru/bizhuteriya/sergu/sergi-k1-00015749/
Ранее Ozon подсчитал, что в среднем на один пункт выдачи приходится 2,5 рабочих места https://bayra.market/galantereya-i-ukrasheniya/zhenschinam-ru/bizhuteriya/sergu/sergi-k1-00017425/

Почему выросла популярность на покупки «онлайн»?
Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
 Share
Go to topic listing

Chat

Chat

Please enter your display name

×
×
  • Create New...