汇编统计字符个数.txt

汇编统计字符个数.txt

《汇编统计字符个数.txt》由会员分享，可在线阅读，更多相关《汇编统计字符个数.txt（6页珍藏版）》请在冰点文库上搜索。

datasegment

str1DB254,255dup（?

） ;�����ַ�������

enter1DB0AH,0DH,'$' ;����س�����

prompt0DB'Enterthestring:

',0AH,0DH,'$' ;��������ʾ�ַ�

prompt1DB'Nums:

','$'

prompt2DB'Caps:

','$'

prompt3DB'Lows:

','$'

prompt4DB0AH,0DH,'Convert:

',0AH,0DH,'$'

NumsDB0 ;���������ַ�������

CapsDB0 ;�����д��ĸ�ַ�������

LowsDB0 ;����Сд��ĸ�ַ�������

dataends

codesegment

assumecs:

code,ds:

data

mainprocfar

start:

;����ʼ

pushds

subax,ax

pushax

;���ϴ������ڳ������н����󷵻أ������ret��Ӧ

movax,data

movds,ax

;���ܰѶ�dataֱ�Ӹ�ds�����Ա���ax��ת

;ds:

dataΪ�˰�ds��data�ڴ�������������ds��

leadx,prompt0

movah,09H

int21H

;�����ʾ�ַ���Enterthestring:

��

leadx,str1

movah,0AH

int21H

;�����ַ�����str1

leadx,enter1

movah,09H

int21H

;����س�����

leadx,prompt4

movah,09H

int21H

;�����ʾ�ַ�"Convert:

"

leabx,str1

incbx ;��ָ���ƶ�����һ����ĸ

movch,0

movcl,[bx] ;��ʼ��������cx

Scre:

incbx

Test_C:

cmpbyteptr[bx],30H ;ptr[bx]<'0'���¶��ǽ���ĸ����ĸ�Ƚ�

jbOther_C

cmpbyteptr[bx],39H ;ptr[bx]<='9'

jbeNum_C

cmpbyteptr[bx],41H ;ptr[bx]<'A'

jbOther_C

cmpbyteptr[bx],5AH ;ptr[bx]<='Z'

jbeCap_C

cmpbyteptr[bx],61H ;ptr[bx]<'a'

jbOther_C

cmpbyteptr[bx],7AH ;ptr[bx]<='z'

jbeLow_C

Break_C:

loopScre

jmpDisplay

Other_C:

movdl,[bx]

movah,02H

int21H

;ֱ�������������ĸ֮����ַ�

jmpBreak_C

Num_C:

incNums ;�����ַ�����������1

movdl,[bx]

movah,02H

int21H

;ԭ����������ַ�

jmpBreak_C

Cap_C:

incCaps ;��д��ĸ����������1

movdx,[bx]

adddl,20H

movah,02H

int21H

;��д��ĸת��ΪСд�����

jmpBreak_C

Low_C:

incLows ;Сд��ĸ����������1

movdx,[bx]

subdl,20H

movah,02H

int21H

;Сд��ĸת��Ϊ��д�����

jmpBreak_C

Display:

leadx,enter1

movah,09H

int21H

;����س�����

leadx,enter1

movah,09H

int21H

;����س�����

DisplayN:

leadx,prompt1

movah,09H

int21H

;�����ʾ�ַ�"Nums:

"

movdx,0

movcx,100

movax,0

moval,Nums

divcx

movNums,dl

movdl,al

movah,02H

adddl,30H

int21H

;��Nums�������İ�λ�������

movax,0

movcx,10

movdx,0

moval,Nums

divcx

movNums,dl

movdl,al

movah,02H

adddl,30H

int21H

;��Nums��������ʮλ�������

movdx,0

movdl,Nums

movah,02H

adddl,30H

int21H

;��Nums�������ĸ�λ�������

DisplayC:

leadx,prompt2

movah,09H

int21H

;�����ʾ�ַ���Caps:

��

movdx,0

movcx,100

movax,0

moval,Caps

divcx

movCaps,dl

movdl,al

movah,02H

adddl,30H

int21H

;���Caps�������İ�λ���֣�����ͬ�Ϸֱ�ʮλ��λ

movax,0

movcx,10

movdx,0

moval,Caps

divcx

movCaps,dl

movdl,al

movah,02H

adddl,30H

int21H

movdx,0

movdl,Caps

movah,02H

adddl,30H

int21H

DisplayL:

leadx,prompt3

movah,09H

int21H

;��ʾ�ַ�

movdx,0

movcx,100

movax,0

moval,Lows

divcx

movLows,dl

movdl,al

movah,02H

adddl,30H

int21H

;Low��������λʮλ��λ���

movax,0

movcx,10

movdx,0

moval,Lows

divcx

movLows,dl

movdl,al

movah,02H

adddl,30H

int21H

movdx,0

movdl,Lows

movah,02H

adddl,30H

int21H

ret ;�������

mainendp

codeends

endstart