7楼:
移动格子游戏，现在的贴吧不容易发链接。按照顶楼描述去项目主页，我 README 写的第一个链接就是原版游戏。
这个是我用 OCaml 实现的 clone
表面的不同点是原版是网页，我的是本地程序，原版有算分数，而我没实现（因为只是消去的数值总和，我觉得无甚意义）
内裏的不同点主要是我的版本实现玩的操作使用了 monad，因此一些 bind 的操作用起来很方便
例如，生成一个新的游戏，先放两个格子，然后向上移动，然后看看游戏是否完结，可以写成这样
playing board >>= spawn >>= spawn >>= move_up >>= check
README 裏的链接有我写的粗略讲了一下这个
我怀疑另外有两个 haskell 的实现（没有去看）应该也使用了类似概念，或者直接使用 lense 等

https://github.com/pyx/2048.ml
新增加了分数和步计算
分数和步统计用了手动写的半个 writer monad
忘记了移动还可以用 maybe monad（ocaml 裏是 option），有时间改

http://xrefactor.com/blog/2048-in-ocaml

btw 改名字了
为了不需要修改就符合 gentoo package 的命名规则
2048.ml 改成 2048-ml
bitbucket
https://bitbucket.org/pyx/2048-ml/
github
https://github.com/pyx/2048-ml/
写了三个 gentoo ebuild，也加到个人 overlay 裏，README 裏有地址