;Z DUMP   adr n --      +++TEMP+++
;   1 UMAX 0 DO .B LOOP DROP ;
    head DUMP,4,DUMP,docolon
        DW LIT,1,UMAX,LIT,0,XDO
DUMP1:  DW DOTB,XLOOP,DUMP1
        DW DROP,EXIT