如何使用z80汇编语言将存储器位置的内容左移1位到另一个存储器

问题描述

例如，从1900H位置左移1位并存储在1901H位置，空位用零填充

解决方法

家庭作业？

不确定100％是否是您要的，但是无论如何：

...
    XOR A          ; clear Carry
    LD A,(1900H)
    RLA            ; left shift,bit 7 goes to Carry,bit 0 filled with 0
    LD (1900H),A   ; save shifted value
    LD A,(1901H)
    RLA            ; left shift,bit 0 filled with bit 7 of the original (1900h)
    LD (1901H),A   ; save shifted value
    ...

当然，还有其他方法可以达到相同的目的。。

在评论中添加了另一个：

LD HL,(1900H)   ; load 16-bit value: L<-(1900H),H<-(1901H)
ADD HL,HL       ; HL <- HL+HL = HL*2 - equivalent of left shift by 1 bit
LD (1900H),HL   ; save to the same location

以上代码段的大小为7个字节，可能是该任务的最短代码。

,

让我们从最简单的情况开始，即向左移一个字节，然后 移入0位。在Z80上，这完美地描述了 sla套指令：

    sla [reg8]

reg8是寄存器A / B / C / D / E / H / L或（HL）或（IX + d）之一 或（IY + d）。高位移出寄存器（或 （HL）/（IX + d）/（IY + d））的内存位置并放入 携带标志。

Z80有4种特殊情况的众所周知的技巧。 由于左移（移入0时）与 乘以2，您实际上可以使用以下方式模拟sla：

    add a,a     ; replaces `sla a`,save 1 byte,4cc
    add hl,hl   ; replaces `sla l \ rl h`,save 3 bytes,5cc
    add ix,ix   ; (to my knowedge,this is the only "legal" way to shift the IX register pair like this)
    add iy,iy   ; (same with IY)

这些更快，更小，几乎总是最好的 替换。

无论如何，移出的位现在在进位中 标志，因此您可以使用rl将其移至下一个字节 说明类别：

    rl [reg8] ;2 bytes,8 clock cycles
    rla       ;1b,4cc. Basically a fast `rl a` but affects fewer flags.

请注意，Z80特别针对此问题进行了优化 A寄存器。

---

现在继续您的问题：有很多方法可以在 Z80。如果您确切知道字节在内存中的位置，@tum_ 提供了最快和最小的选择：

    ld hl,(1900H) ; Read the two bytes into HL
    add hl,hl     ; Shift left
    ld (1900H),hl ; Store HL back to the bytes.

这利用了先前的sla技巧 只需将HL添加到自身（HL * 2）即可向左移动。但是，如果 字节不在预定位置，但是HL指向 字节，然后：

    sla (hl)  ; `sla` the byte at HL
    inc hl    ; Advance to the next byte
    rl (hl)   ; `rl` the byte at HL

您也可以将其设置为慢一点（不建议这样做，只是显示 出于教育目的）：

    ld a,(hl) ; read the byte at HL into A
    add a,a   ; `sla a`,but faster and smaller
    ld (hl),a ; Store it back to the byte at HL
    inc hl    ; advance to the next byte
    ld a,(hl) ; read the byte at HL into A
    rla       ; `rl a`,a ; Store it back to the byte at HL

---

这是很多信息，但希望能有所帮助！