Skip to content

Instantly share code, notes, and snippets.

@belisarius222

belisarius222/gist:1c0ea33bb02906d2ae3f649bac1f6718

Created June 29, 2023 16:19
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 belisarius222/1c0ea33bb02906d2ae3f649bac1f6718 to your computer and use it in GitHub Desktop.
Save belisarius222/1c0ea33bb02906d2ae3f649bac1f6718 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.txt
|pass &noun
:- %k %lard %base !< shed:khan
%+ slap (slop .^(vase %ca %/lib/strandio/hoon) !>(..zuse))
!, *hoon
=* strandio -
=, strand=strand:rand
^- shed:khan
=/ m (strand ,vase)
|- ^- form:m
;< =bowl:rand bind:m get-bowl:strandio
=/ galaxy=@p (rear (saxo:title our.bowl now.bowl our.bowl))
;< ~ bind:m (poke:strandio [galaxy %ping] %noun !>(~))
;< ~ bind:m (sleep:strandio ~s25)
$
@joemfb
Copy link

joemfb commented Jun 29, 2023 

|pass [%k %lard %base !<(shed:khan (slap (slop .^(vase %ca %/lib/strandio/hoon) !>(..zuse)) !,(*hoon =*(s - =/(m (strand:rand ,vase) |-(`form:m`;<(b=bowl:rand bind:m get-bowl:s ;<(~ bind:m (poke:s [(rear (saxo:title [our now our]:b)) %ping] %noun !>(~)) ;<(~ bind:m (sleep:s ~s25) $)))))))))]

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment