macro CloneByte 1
  ;\1 must be a data register.
  ;copies the lowest byte to all 4 bytes.
    move.b \1,-(SP)
    LSL.L #8,\1
    move.b (SP)+,\1
    pushWord \1
    SWAP \1
    popWord \1
  endm