把以0結尾的字符串小寫轉大寫
DATAS SEGMENT
;此處輸入數據段代碼
db "Beginner's All-purpose Symbolic Instruction Code.",0
DATAS ENDS
STACKS SEGMENT
;此處輸入堆棧段代碼
STACKS ENDS
CODES SEGMENT
ASSUME CS:CODES,DS:DATAS,SS:STACKS
START:
MOV AX,DATAS
MOV DS,AX
;此處輸入代碼段代碼
MOV SI,0
MOV CX,0
CALL letterc
MOV AH,4CH
INT 21H
letterc:
push cx
push si
s: mov CL,[SI]
jcxz over
cmp CL,61h
jb s0
cmp CL,7ah
ja s0
and byte ptr [SI],11011111b
inc SI
jmp s
s0:inc si
jmp short s
over:
pop si
pop cx
ret
CODES ENDS
END START