( TMRC 0D40

( CTRL 
( BASE + 6
(       001 ( COUNT RISING EDGES OF PRIMARY SOURCE
(          1000 ( PRIMARY COUNT SOURCE IP/1
(              00 ( SECONDARY COUNT Counter # 0 input
(                0 ( COUNT ONCE - 0 REPEATEDLY
(                 0 ( COUNT LENGTH ROLL OVER
(                  0 ( DIR COUNT UP
(                   0 ( COINIT NO FORCE BY OTHER CHANNELS
(                    000 ( Active while counter is active, OUPUT MODE

( CTRL 
( BASE + 6
(       111 ( CASCASE COUNTER MODE UP/DOWN 
(          0111 ( Counter #3 output
(              00 ( SECONDARY COUNT Counter # 0 input
(                0 ( COUNT ONCE - 0 REPEATEDLY
(                 0 ( COUNT LENGTH ROLL OVER
(                  0 ( DIR COUNT UP
(                   0 ( COINIT NO FORCE BY OTHER CHANNELS
(                    000 ( Active while counter is active, OUPUT MODE




HEX

EE00 D56 ! ( COUNT IP
3000 D5E ! ( CASCADE

2VARIABLE TB
2VARIABLE TE
2VARIABLE TX

: <B 0D5D @ D54 @ TB 2! ;
: E> 0D5D @ D54 @ TB 2@ D- 2E1. D- TE 2! ;
: TMAX TE 2@ TX 2@ DMAX TX 2! ;

( USEAGE
( : X
( <B
(  DUP DUP + DROP
( E> TMAX
( ;
( TE 2@ D. ( for last cycle or
( TX 2@ D. ( for maximum of several cycles