Vynulování části paměti od adresy LOC v délce CNT slov.

        CLA
        TAD     LOC-1
        DCA     X1      / X1 = LOC-1
        TAD     -CNT
        DCA     TMP     / TMP = -CNR

LOOP,                   / do {
        DCA I   X1      /   M[++X1] = 0
        ISZ     TMP     /   TMP++
        JMP     LOOP    / } while (TMP!=0)

X1 je automaticky inkrementovaný registr (slovo paměti na nulté stránce).

Přesun bloku v paměti z adresy SRC na adresu DST v délce CNT slov.

        CLA
        TAD     SRC-1
        DCA     X1      / X1 = SRC-1
        TAD     DST-1
        DCA     X2      / X2 = DST-1
        TAD     -CNT
        DCA     TMP     / setup TMP = -CNT

LOOP,                   / do {
        TAD I   X1
        DCA I   X2      /   M[++X2] = M[++X1]
        ISZ     TMP     /   TMP++
        JMP     LOOP    / } while (TMP!=0)