在数据段3000H单元开始存放了数字0~9的ASCII码，求对应的十进制数字并存放到3500H开始的单元；再将3500H开始的十进制数字转换为对应的ASCII码，存放到3800H开始单元，汇编程序

为了编写一个简单的汇编程序来完成这个任务，我们可以假设我们正在使用x86架构的机器语言，如MCS-51系列或者更现代的类似系统。以下是一个基本的示例，我们将使用AT&T指令集风格：

; 首先，我们需要设置循环来读取3000H到31FH的ASCII码，并转换为十进制
section .data
ascii_data db '0123456789', 0   ; ASCII码数组
dest_dec db 3500h - 3000h + 1, 0   ; 存放结果的内存长度

section .bss
dec_values resb dest_dec     ; 初始化结果区域

section .text
global _start
_start:
    xor ax, ax          ; 清空AX寄存器作为临时存储十进制值
    mov cx, dest_dec    ; 设置循环计数器

loop_start:
    lodsb               ; 从ASCII码数组中加载下一个字符到AL
    sub al, '0'         ; 将字符转换为数值 (减去ASCII码'0')

    add ax, ax          ; 如果需要，先将AL扩展到AX
    adc dx, 0           ; 如果AL已满，则向DX进位

    stosb               ; 将结果存入dec_values
    loop loop_start      ; 检查是否还有剩余字符

; 现在，我们需要将十进制值转换回ASCII码
convert_to_ascii:
    mov si, dec_values  ; 设置源地址
    mov di, 3800h       ; 设置目标地址

convert_loop:
    lodsw                ; 从dec_values中读取两个字节
    mul byte [ascii_base]   ; 十进制乘以相应的ASCII码偏移量（从'0'开始）

    add al, dl           ; 合并低8位和高8位
    add ah, dh           ; 进行进位操作

    stosw                ; 将结果存回ASCII码位置
    loop convert_loop    ; 继续处理直到结束

    ; 结束标志或其他清理工作...
    ; ...

    ; 假设程序结束时返回0
    mov eax, 1
    xor ebx, ebx
    int 0x80             ; 调用内核服务结束程序

; ASCII基础偏移表，用于计算最终的ASCII码值
ascii_base equ '0' - 1

请注意，这只是一个简化的示例，实际编程时可能需要考虑边界检查、错误处理和其他细节。此外，`int 0x80`是在Linux系统调用约定下的结束进程，如果你在其他环境中，可能需要使用不同的退出机制。