Skip to content

Instantly share code, notes, and snippets.

@samanthadoran
Created March 22, 2016 21:26
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save samanthadoran/f516a3b780fef5b1f7bc to your computer and use it in GitHub Desktop.
Save samanthadoran/f516a3b780fef5b1f7bc to your computer and use it in GitHub Desktop.
* (defvar field (newpack:make-field 10 10))
FIELD
* (newpack:print-field field)
XXXXXXXXXX
XXXXXXXXXX
XXXXXXXXXX
XXXXXXXXXX
XXXXXXXXXX
XXXXXXXXXX
XXXXXXXXXX
XXXXXXXXXX
XXXXXXXXXX
XXXXXXXXXX
NIL
* (newpack:randomize-field field)
NIL
* (newpack:print-field field)
OOOXOXXXOX
XXOOXOXOXO
XXXXOOOXOX
OXXOOXXXXO
OOXOXOXOXO
OXOOOOOXOO
XXOOOOOOXX
XOXXXOXOOO
OXXOOXOXOX
XOOXXOOXOO
NIL
* (newpack:step-field field)
NIL
* (newpack:print-field field)
XXXXXXXXOX
XOXXXXOXOX
OOXXXXOXOX
XXXXXXOXXO
XXXXXXXXOX
XXXXXXXXXX
OXXXXXXXOX
XXOXXXXXXX
OOOOXOXOOX
XXXXXXXXXX
NIL
* (newpack:step-field field)
NIL
* (newpack:print-field field)
OXXXXXXOOX
OXXXOOXOOX
XXXXXXXOOX
XXXXXXXXXX
XXXXXXXXXX
XXXXXXXXXX
XXOXXXOOXX
XXOXXXXXXX
OOOXXXXXXX
XXXXXXXXXX
NIL
* (newpack:step-field field)
NIL
* (newpack:print-field field)
XXXXXXXOOX
XXXXXOXXXX
XXXXXXXOOX
XXXXXXXXXX
XXXXXXXXXX
XXXXXXXXXX
XXOXXXXXXX
XOOXXXXXXX
OOXXXXXXXX
XXXXXXXXXX
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment