|
12345678910111213141516171819202122232425262728293031323334353637383940 |
- :: Hoon 101 - Week 4
- :: ~bannum-magtus || s@p7.co.nz
- ::
- |= n=@
- ^- @
- =< (wrrrm n)
- |%
- ::
- :: the atom made a 'clink' as it fell into the hole
- ++ clink
- |= [a=@ b=@]
- ^- ?
- =(0 (mod a b))
- ::
- :: there was a 'clunk' as the atom fell multiple times
- ++ clunk
- |= a=@
- ^- ?
- ?|
- (clink a 3)
- (clink a 5)
- ==
- ::
- :: a 'bzzrp' was heard as certain atoms were vapourised
- ++ bzzrp
- |= a=@
- ?: (clunk a)
- a
- 0
- ::
- :: 'wrrrm' was all you could hear as the machine started up
- ++ wrrrm
- |= x=@
- ^- @
- %- roll
- :_ add
- %- turn
- :_ bzzrp
- (gulf 1 x)
- --
|