The Twiddlebit Zone

TLZ.ASM

        NAME    tz
        PAGE    55,132
        TITLE   TLZ.COM

        .MODEL  TINY

;
; TLZ.COM:      The Twiddlebit Zone
;
; Project Crew, 12.27.2025
;

    .CODE

    ORG     100h

start:
    mov     bp, offset b
    mov     cl, 4
    mov     bx, 4
    mov     dx, 84c9h
setptr:
    mov     di, BUFSIZE                 ; b[] you di
    clc
do:
    mov     ax, word ptr [bp + di]      ; is in b[di]
    add     ax, bx                      ; now fold
    xor     ax, dx
    xchg    ah, al
    rol     al, cl
    not     ax
    rol     ah, cl
    xor     ax, dx
    sub     ax, bx                      ; it figures
    mov     [bp + di], ax
    
    sub     di, 2
    jnc     do                          ; now b hold our
    
bye:
    mov     ax, 4c45h                   ; sweet
    int     21h

b       DB      "Sir Reldnog"           ; what it held
BUFSIZE equ     SIZEOF b - SIZEOF b MOD 2  ; this was no fun

    END     start