将一个指定字符串进行异或加密，每个单字符的密钥（0-255）保存在数组Key中。程序运行过程：显示明文，显示所产生的密文，显示解密后的明文。 例如key = {125，248，16，8，26}用MASM 编写格式为DATAS SEGMENT ;此处输入数据段代码 DATAS ENDS STACKS SEGMENT ;此处输入堆栈段代码 STACKS ENDS CODES SEGMENT ASSUME CS:CODES,DS:DATAS,SS:STACKS START: MOV AX,DATAS MOV DS,AX ;此处输入代码段代码 MOV AH,4CH INT 21H CODES ENDS END START

以下为使用MASM汇编语言编写的指定字符串异或加密程序：

DATAS SEGMENT
    plaintext DB 'Hello World!', '$' ; 明文字符串以$结尾
    ciphertext DB 15 DUP (?) ; 用于存储密文的缓冲区
    key DB 125, 248, 16, 8, 26 ; 密钥数组
DATAS ENDS

STACKS SEGMENT
    DW 100H DUP (?) ; 堆栈段定义
STACKS ENDS

CODES SEGMENT
ASSUME CS:CODES, DS:DATAS, SS:STACKS

START:
    MOV AX, DATAS ; 初始化数据段寄存器
    MOV DS, AX

    ; 加密过程
    LEA SI, plaintext ; 将明文字符串地址存入SI
    LEA DI, ciphertext ; 将密文缓冲区地址存入DI
    MOV CX, 0 ; CX用于计数
    MOV BL, 0 ; BL用于存储密钥
encrypt_loop:
    MOV AL, [SI] ; 从明文字符串中读取一个字符
    CMP AL, '$' ; 判断是否到了字符串结尾
    JE end_encrypt
    XOR AL, key[CL] ; 对字符进行异或加密
    MOV BL, key[CL] ; 保存当前密钥
    MOV [DI], AL ; 将加密后的字符存入密文缓冲区
    INC SI ; 明文字符串指针+1
    INC DI ; 密文缓冲区指针+1
    INC CX ; 计数器+1
    CMP CX, 5 ; 判断是否已经使用过所有密钥
    JE reset_key
    JMP next_char
reset_key:
    MOV CX, 0 ; 重置计数器
next_char:
    INC CL ; 密钥数组指针+1
    CMP CL, 4 ; 判断是否已经使用过所有密钥
    JNE continue_encrypt
    MOV CL, 0 ; 重置密钥数组指针
continue_encrypt:
    JMP encrypt_loop
end_encrypt:

    ; 显示密文
    LEA DX, ciphertext ; 将密文缓冲区地址存入DX
    MOV AH, 9 ; 功能号：显示字符串
    INT 21H

    ; 解密过程
    LEA SI, ciphertext ; 将密文缓冲区地址存入SI
    LEA DI, plaintext ; 将明文字符串地址存入DI
    MOV CX, 0 ; CX用于计数
    MOV BL, 0 ; BL用于存储密钥
decrypt_loop:
    MOV AL, [SI] ; 从密文缓冲区中读取一个字符
    CMP AL, '$' ; 判断是否到了字符串结尾
    JE end_decrypt
    XOR AL, key[CL] ; 对字符进行异或解密
    MOV [DI], AL ; 将解密后的字符存入明文字符串
    MOV BL, key[CL] ; 保存当前密钥
    INC SI ; 密文缓冲区指针+1
    INC DI ; 明文字符串指针+1
    INC CX ; 计数器+1
    CMP CX, 5 ; 判断是否已经使用过所有密钥
    JE reset_key2
    JMP next_char2
reset_key2:
    MOV CX, 0 ; 重置计数器
next_char2:
    INC CL ; 密钥数组指针+1
    CMP CL, 4 ; 判断是否已经使用过所有密钥
    JNE continue_decrypt
    MOV CL, 0 ; 重置密钥数组指针
continue_decrypt:
    JMP decrypt_loop
end_decrypt:

    ; 显示解密后的明文
    LEA DX, plaintext ; 将明文字符串地址存入DX
    MOV AH, 9 ; 功能号：显示字符串
    INT 21H

    MOV AH, 4CH ; 功能号：程序结束
    INT 21H

CODES ENDS
END START