解:
.MODEL SMALL, C
.DATA
buff DB?"This is a example.", 0
.CODE
Strupr PROC?USES AX BX, String:PTR BYTE, Tail:BYTE
MOV BX, String
.REPEAT
MOV AL, [BX]
.IF AL>='a' && AL<='z'
SUB AL, 20H
MOV [BX], AL
.ENDIF
INC BX
.UNTIL?? AL==Tail
RET
Strupr ENDP
.STARTUP
INVOKE Strupr, ADDR buff, 0
.EXIT 0
END