Elixir游戏服设计六
接上章,我新建了个app做包含Table模型, TableServer等。Table桌子的代码暂时如下, 有一些状态还没用上
defmodule Table do @state_accept 0 #准备接入玩家
@state_ready 1 #开局准备?
defdelegate [fetch(t, key), get_and_update(t, key, list)], to: Map
defstruct [:config, :seats, :state]
def new(config) do
%Table{
config: config,
seats: %{},
state: @state_accept
}
end def is_full?(table) do
cur_count = Enum.count(table.seats)
cur_count >= table.config.allow_count
end def has_player?(table, player_id) do
table.seats[player_id]
end def check_in(table, player) do
update_in(table.seats, &(Map.put(&1, player.base_info.id, player)))
end def check_out(table, player_id) do
update_in(table.seats, &(Map.delete(&1, player_id)))
end
end
我们需要相关的配置table_config.txt
id, allow_count, base_gold, need_gold, desc
int, int, int, int, string
1, 4, 10, 480, 新手场
2, 4, 100, 4800, 中级场
3, 4, 1000, 48000, 高级场
这个txt可以由excel通过xslx2csv工具生成。然后我们利用table_config.txt 生成代码配置table_config.ex.
我们当然可以在TableConfig里经由excel文件直接生成,那样会更方便。
defmodule TableConfig do
Module.register_attribute __MODULE__, :column_names, []
Module.register_attribute __MODULE__, :column_types, []
Module.register_attribute __MODULE__, :config, []
line_with_index = File.stream!(Path.join([__DIR__, "table_config.txt"]) , [], :line)
|> Stream.with_index
for {line, index} <- line_with_index do
items = line |> String.split(",") |> Stream.map(&String.strip(&1))
case index do
0 ->
@column_names items |> Enum.map(&String.to_atom(&1))
1 ->
@column_types items
|> Stream.with_index
|> Enum.map(fn {v, i} -> {i, String.to_atom(v)} end)
|> IO.inspect
|> Enum.into(%{})
_ ->
new_items = items
|> Stream.with_index
|> Stream.map( &( TypeConverter.convert(&1, @column_types) ) )
zip = Enum.zip(@column_names, new_items)
@config Enum.into(zip, %{})
IO.inspect @config
# 以下函数花了我点时间,最后不得不通过模块属性完成,我不知道有没有其他方法
# 早期的版本是者这样的
# config = Enum.into(zip, %{})
# def get(unquote(config.id)) do
# unquote(config) # 这里会报错,百思不得其解,在ErrorMsg里我是这样用的,没有问题。不知2者区别在哪
# end
def get(unquote(@config.id)) do
@config
end
end
end end
最后上点测试代码table_test.exs
defmodule TabelTest do
use ExUnit.Case
# import PipeHere
setup do
config = TableConfig.get(1)
table = Table.new(config)
{:ok, table: table}
end test "table is full ", %{table: table} do
new_table =
1..table.config.allow_count
|> Stream.map(&Player.new/1)
|> Enum.reduce(table, fn p, acc -> Table.check_in(acc, p) end)
assert new_table |> Table.is_full?
end test "table has player", %{table: table} do
p1 = Player.new(1)
p2 = Player.new(2)
new_table = Table.check_in(table, p1)
assert Table.has_player?(new_table, p1.base_info.id)
refute Table.has_player?(table, p2.base_info.id)
end test "table check_in_and_out", %{table: table} do
p1 = Player.new(1)
new_table = Table.check_in(table, p1)
check_out_table = Table.check_out(new_table, p1.base_info.id)
refute Table.has_player?(check_out_table, p1.base_info.id)
end
end
下一小节会从牌局开始吧,然后TableServer,然后让它跑起来。
Elixir游戏服设计六的更多相关文章
- Elixir游戏服设计五
在<Elixir游戏服设计一>里提到,按照系统功能划分成app要保证原子性很难, 现在想想也没那么难.保证原子性,无非就是需要某个单点去完成操作.那么选择玩家进程去做原子性工作就可以了. ...
- Elixir游戏服设计一
在Erlang游戏服设计总结http://www.cnblogs.com/rubyist/p/5530575.html里, 我提到我想要的游戏服设计方法,希望以应用做为基础构建块.最近我在学习elix ...
- 简单Elixir游戏服设计- 游戏玩法介绍
抄以前的,做了点修改. 到目前为止,我们完成了玩家的数据和进程建模,现在介绍游戏玩法. 为什么我们还不做客户端接入.协议指定呢?为什么还没有网关和数据存储呢.在我接手的游戏, 这些通常已经定下来了,我 ...
- Elixir游戏服设计三
玩家进程用gen_server来建模,我不直接使用 use GenServer, 而是使用exactor,该库可以去掉反锁的接口定义. 我们新建一个 player_server_manager app ...
- 简单Elixir游戏服设计-玩家进程跑起来
有了玩家模型,我们试试让玩家进程跑起来. 需要搞个PlayerSupervisor来负责启动和监控玩家进程. defmodule PlayerSupervisor do use Supervisor ...
- 关于Elixir游戏服设计系列
写着写着就废球了,感觉空对空,实在没什么意思. 另外很快就要搞新项目,决定新项目就直接上elixir了.目前该做的准备工作已经探索了一些了. 以下的东西是写给同事参考的,感兴趣的可以看看,提建议更好. ...
- 简单Elixir游戏服设计-玩家进程注册
上回说用Registry 做本地注册(跨服可以用syn,只是稍微麻烦点,需要模拟global注册机制,写个封装模块). 修改game_server 项目的mix.exs, 增加应用启动 def app ...
- Elixir游戏服设计四
上章说到我们要引入syn https://github.com/ostinelli/syn/ 看过文档,它并没有直接提供{via, Module, Name} 相关的方法.我们需要封装一下. Name ...
- Elixir游戏服设计二
搞一个例子,而没有实际的目标,做起来真是烦人.几次三番都想放弃. 后来想想,即使最后完成不了完整的服务器,把需要的知识点搞搞,摸熟悉也是好的. 这里没有完整的项目目录,主要是对需要的指点进行整理.要完 ...
随机推荐
- sed修炼系列(三):sed高级应用之实现窗口滑动技术
html { font-family: sans-serif } body { margin: 0 } article,aside,details,figcaption,figure,footer,h ...
- win10下移动硬盘位置不可用无法访问
win10下移动硬盘位置不可用无法访问 网上搜索得到的答案是: 请参考以下步骤解决: 1.按Windows+R输入"CHKDSK H: /F /R"(H:是硬盘所在盘符./R 找到 ...
- C++学习日记(二)————初始字符串类型
使用频率高,但操作复杂的数据有哪些? 做下总结: int; double;float;char;bool这些类型用的比较频繁,但并不复杂.但对于字符串来说(char数组)用的频繁但操作又复杂,只能用一 ...
- JS自定义对象以及相关成绩系统完整案例演示
[自定义对象] 1.基本概念 ①对象是拥有一系列无无序属性和方法的集合 ②键值对:对象中的数据,用以键值对的形式存在,对象的每个属性和方法,都对应一个键值,以键取值 ③属性:描述对象特征的一系列变量称 ...
- [转载]Python实现浏览器自动化操作
原文地址:Python实现浏览器自动化操作作者:rayment 最近在研究网站自动登录的问题,涉及到需要实现浏览器自动化操作,网上有不少介绍,例如使用pamie,但是只是支持IE,而且项目也较久没 ...
- MyEclipse安装步骤和破解
Myeclipse的安装步骤 MyEclipse简介: MyEclipse,是在eclipse 基础上加上自己的插件开发而成的功能强大的企业级集成开发环境,主要用于Java.Java EE以及移动应用 ...
- 一些LVS实验配置、工具和方案
最近做了一些LVS配置和方案的验证实验,将过程中用到的一些配置.工具和具体的解决方案记录一下.使用DR模式.验证一种不中断业务的RealServer升级或者重启方案. 网络规划: 节点 IP地址 ce ...
- 201521123053《Java课程设计》第十四周学习总结
1. 本周学习总结 1.1 以你喜欢的方式(思维导图或其他)归纳总结多数据库相关内容. 知识点: 创建表的命令有若干行,如果中间某行输入错误,不能修改:可以使用记事本现将命令输入,然后复制粘贴到mys ...
- spring boot / cloud (十七) 快速搭建注册中心和配置中心
spring boot / cloud (十七) 快速搭建注册中心和配置中心 本文将使用spring cloud的eureka和config server来搭建. 然后搭建的模式,有很多种,本文主要聊 ...
- Shiro第四篇【Shiro与Spring整合、快速入门、Shiro过滤器、登陆认证】
Spring与Shiro整合 导入jar包 shiro-web的jar. shiro-spring的jar shiro-code的jar 快速入门 shiro也通过filter进行拦截.filter拦 ...