Фрукты 100% Ковки и Комбайна

[kiberhack 5]

Доброе время суток, можете подсказать как сделать 100% комбайна и ковки, или из какой сборки вытащить, заранее спасибо.

[WVWMK 121]

forge.lua

--Функция рандома для комбинирования
function Check_CG_HechengBS ( Item_Lv , Item_Type , Sklv )
	local a = 0
	local b = 0
	Item_Lv = Item_Lv - 1
	if Item_Type == 49 then
		a = math.max ( 0 , math.min ( 1 , ( 1 - Item_Lv * 0.10 + Sklv * 0.10 ) ) )
		b = Percentage_Random ( a )
		if Item_Lv <=9 then
			b = 1
		end
		return b
	else
		LG( "Hecheng_BS","probability check determine item type is not a gem" )
		return 0
	end
end

-Функция рандома для вставки самоцветов
function Check_CG_Jinglian ( Jinglian_Lv , Stone_Lv , Sklv )
	local b = 1
	return b
end

вроде так

[Kolumb 5]

-- Функция рандома для вставки самоцветов
function Check_CG_Jinglian ( Jinglian_Lv , Stone_Lv , Sklv )
	return 1
end

 

[kiberhack 5]

5 часов назад, NMS3RR сказал:

forge.lua

--Функция рандома для комбинирования
function Check_CG_HechengBS ( Item_Lv , Item_Type , Sklv )
	local a = 0
	local b = 0
	Item_Lv = Item_Lv - 1
	if Item_Type == 49 then
		a = math.max ( 0 , math.min ( 1 , ( 1 - Item_Lv * 0.10 + Sklv * 0.10 ) ) )
		b = Percentage_Random ( a )
		if Item_Lv <=9 then
			b = 1
		end
		return b
	else
		LG( "Hecheng_BS","probability check determine item type is not a gem" )
		return 0
	end
end

-Функция рандома для вставки самоцветов
function Check_CG_Jinglian ( Jinglian_Lv , Stone_Lv , Sklv )
	local b = 1
	return b
end

вроде так

 1 функция я знаю что отвечает именно за форж там с какого лвл гемы летают итд, но с 2 чет я не понимаю что надо делать всего лишь 2 строки чтоль?

[WVWMK 121]

1 час назад, kiberhack сказал:

 1 функция я знаю что отвечает именно за форж там с какого лвл гемы летают итд, но с 2 чет я не понимаю что надо делать всего лишь 2 строки чтоль?

Как и в первой функции  нужно только 1 получить 

if Item_Lv <=9 then
			b = 1
		end

local b = 1
	return b

остальной код я вырезал, ибо он не нужен. 

Объясню : 
Мы вызываем функцию и хотим чтоб она вернула нам значение.
на примере комбайна:

--Комбинирование
function begin_unite_item (...)
....
--вызываем нашу измененную функцию которая вернет нам 1
local b = Check_CG_HechengBS ( Item2_Lv , ItemType2 , Sklv ) -- тут 1 записываем в б

if b == 0 then -- если 0 то удаляем самоцветы
		i = RemoveChaItem ( role , ItemID2 , 1 , 2 , BagItem2 , 2 , 1 , 0)
		if i == 0 then
			...
		end
		local cha_name = GetChaDefaultName ( role )
		
		SystemNotice( role , "К сожалению, комбинирование не удалось. Самоцвет пропал")
		return 2
	end -- если не 0 то все норм 
	-- продолжаем 
...
return 1
end

как бы с ковкой та же фигня что и с комбайном.

[kiberhack 5]

45 минут назад, NMS3RR сказал:

Как и в первой функции  нужно только 1 получить 

if Item_Lv <=9 then
			b = 1
		end

local b = 1
	return b

остальной код я вырезал, ибо он не нужен. 

Объясню : 
Мы вызываем функцию и хотим чтоб она вернула нам значение.
на примере комбайна:

--Комбинирование
function begin_unite_item (...)
....
--вызываем нашу измененную функцию которая вернет нам 1
local b = Check_CG_HechengBS ( Item2_Lv , ItemType2 , Sklv ) -- тут 1 записываем в б

if b == 0 then -- если 0 то удаляем самоцветы
		i = RemoveChaItem ( role , ItemID2 , 1 , 2 , BagItem2 , 2 , 1 , 0)
		if i == 0 then
			...
		end
		local cha_name = GetChaDefaultName ( role )
		
		SystemNotice( role , "К сожалению, комбинирование не удалось. Самоцвет пропал")
		return 2
	end -- если не 0 то все норм 
	-- продолжаем 
...
return 1
end

как бы с ковкой та же фигня что и с комбайном.

что то я не понимаю, зачем тут 0 и комбинирование не удалось если у нас идет речь о 100% фрукте.

 

[anderun21bn 0]

Кто может помочь и кто шарит в создании сервера, Помогите пожалуйста в лс!

[anderun21bn 0]

2 легких вопроса.

[kiberhack 5]

Тему можно закрывать, решение ниже, будет время создам гайд.

 

--Очищающий самоцвет (ID 3074)
function ItemUse_vctav ( role , Item )
	local statelv = 10 - это значение меняйте у вас 2 или 4
	local statetime = 60
	local Cha_Boat = 0
	Cha_Boat = GetCtrlBoat ( role )
--	SystemNotice( role , Cha_Boat )
	if Cha_Boat ==  nil then
		AddState( role , role , STATE_JLGLJB , statelv , statetime )
	else
		SystemNotice( role , "\205\229 \236\238\230\229\242 \225\251\242\252 \232\241\239\238\235\252\231\238\226\224\237\238, \234\238\227\228\224 \194\251 \226 \236\238\240\229" )
		--SystemNotice( role , "Не может быть использовано, когда Вы в море" )
		--SystemNotice( role , "Cannot use while sailing" )
		UseItemFailed ( role )
		return
	end
end

--Композиционный катализатор (ID 3075)
function ItemUse_komb ( role , Item )
	local statelv = 10 - это значение меняйте у вас 2 или 4
	local statetime = 60
	local Cha_Boat = 0
	Cha_Boat = GetCtrlBoat ( role )
--	SystemNotice( role , Cha_Boat )
	if Cha_Boat ==  nil then
		AddState( role , role , STATE_HCGLJB , statelv , statetime )
	else
		SystemNotice( role , "\205\229 \236\238\230\229\242 \225\251\242\252 \232\241\239\238\235\252\231\238\226\224\237\238, \234\238\227\228\224 \194\251 \226 \236\238\240\229" )
		--SystemNotice( role , "Не может быть использовано, когда Вы в море" )
		--SystemNotice( role , "Cannot use while sailing" )
		UseItemFailed ( role )
		return
	end
end

 

[V3ct0r 2,117]

15 часов назад, anderun21bn сказал:

Кто может помочь и кто шарит в создании сервера, Помогите пожалуйста в лс!

Тут много кто шарит, почему мы должны писать Вам в ЛС? Создавайте тему в разделе помощи, с радостью поможем чем сможем