sourcelibs/Clocked/demos/counter.xtl
1⍝!/usr/bin/env xetal
2⍝ An 8-bit counter with an enable, clocked ten times from 120: it
3⍝ counts only when enabled, and wraps past 127. The trace is what its
4⍝ register holds after reset and after each clock. Run with "just demo-lib Clocked counter".
5ᶜᵏ⁼u̲se< "Clocked"
6120 'ᶜᵏt̲ick ᶜᵏt̲race 1 1 0 1 1 1 1 1 1 1