游戏掉落算法

最新推荐文章于 2023-05-12 18:19:10 发布

原创最新推荐文章于 2023-05-12 18:19:10 发布 · 2.7k 阅读

2 ·

CC 4.0 BY-SA版权

erlang 专栏收录该内容

12 篇文章

订阅专栏

不知道这个算不算是算法把，本人对算法不是很精通的（程序员中的屌丝，妈蛋的）

目标：自己用erlang写一个游戏服务器的框架，有没有感兴趣的同学，欢迎私信的。

实现语言： erlang

掉落规则配表

drop(DropId)->
	Proto = sys_drop_ets:get_proto(DropId),
	%% ItemsPro = [{100001,10}, {100002,10}, {100001,20}]
	ItemsPro = sys_drop_ets:get_items_pro(Proto),
	TotalPro = 
		lists:foldl(fun(ItemPro, Acc)->
				{_, Pro} = ItemPro,
				Pro + Acc
			end, 0, ItemsPro),
	random:seed(now()),
	Random = random:uniform(TotalPro),
	{Items, TPro} = 
		lists:foldl(fun({Item, Pro}, {TItem, TPro})->
			if
				TPro >= Random->
					{TItem, TPro};
				Pro + TPro >= Random->
					{Item, Pro + TPro};
				true->
					{[], Pro + TPro}
			end
		end, {[], 0}, ItemsPro),
	Items.

从一个列表里面，随即的得到指定数量的列表

random_player_id_list1(PlayerIdList)->
   Len = length(PlayerIdList),
   random:seed(now()),
   Random = random:uniform(Len),
   {L1, L2} = lists:split(Random, PlayerIdList),
   Len2 = length(L2),
   if
       L2 > ?ONE_PAGE_PLAYER_NUM->
           lists:sublist(L2, ?ONE_PAGE_PLAYER_NUM);
       Len2 =:= ?ONE_PAGE_PLAYER_NUM->
           L2;
       true->
           Len2 ++ lists:sublist(L1, ?ONE_PAGE_PLAYER_NUM - L2)
   end.