Good file.

This commit is contained in:
C. Guy Yarvin 2015-06-03 14:19:53 -07:00
parent 496264b2e9
commit b3b3827f28

20
base/sur/oct4/core.hook Normal file
View File

@ -0,0 +1,20 @@
:: :: ::
:::: /hook/core/oct4/sur :::::: dependencies
:: :: ::
/? 310 ::
:: :: ::
:::: :::::: semantics
:: :: ::
|% ::
++ board ,@ :: one-player bitfield
++ point ,[x=@ y=@] :: coordinate
++ stage (pair (unit ship) (unit ship)) :: players
++ play (each game tape) :: update
++ game :: game state
$: who=? :: whose turn
sag=stage :: who's playing
aud=(map ship ,@ud) :: who's watching
box=board :: X board
boo=board :: O board
== ::
--