MOV BX,4100HMOV AX,0000MOV [BX],AXMOV CX,0010HMOV DI,4000HCLDA62:SCASBJZ A61A63:LOOP A62A61:INC BYTE PTR [BX]JMP A63
MOV CX,000AHA53:MOV BX,4000HPUSH CXA52MOV AX,[BX]CMP AL,AHJC A51A54:INC BXLOOP A52POP CXLOOP A53A51:XCHG AL,AHMOV [BX]AXJMP A54
MOV CX,0100HMOV SI,4100MOV DI,4200CMP SI,DIJA A42ADD SI,CXADD DI ,CXA41: DEC SI DEC DI MOV [DI],AL LOOP A41A42: MOV AL,[SI] MOV [DI],AL INC DI LOOP A42
MOV BX,4000HMOV AX,[BX]AND AL,0FHMOV CL,04SHL AL,CLAND AH 0FHOR AL,AHADD BX,2MOV [BX],AL
MOV AL,[BX] MOV AH,AL MOV CL,4 SHR AH,CL INC BX MOV [BX],AH AND AL,0FH INC BX MOV [BX],AL
MOV BX,4000H MOV AX,0000H MOV CX,007FHL1: MOV [BX],AX INC BX INC BX LOOP L1