<jamshred> ( -- jamshred )


Vocabulary
jamshred.game

Inputs
None

Outputs
jamshredan object


Definition
USING: arrays jamshred.player jamshred.sound jamshred.tunnel
kernel ;

IN: jamshred.game

: <jamshred> ( -- jamshred )
<sounds> <random-tunnel> "Player 1" pick <player>
2dup swap play-in-tunnel 1array f f jamshred boa ;