汇编语言统计输入中各字符出现的次数

1. DATASEGMENT
2. BUFFERDB100
3. DB?
4. DB100DUP(?)
5. CHARSDB'INPUT:$'
6. DATAENDS
7. CODESEGMENT
8. ASSUMECS:CODE,DS:DATA
9. MAINPROCFAR
10. PUSHDS
11. SUBAX,AX
12. PUSHAX
13. MOVAX,DATA
14. MOVDS,AX
15. START:MOVDX,OFFSETCHARS
16. MOVAH,9
17. INT21H
18. MOVDX,OFFSETBUFFER
19. MOVAH,0AH
20. INT21H
21. MOVDL,0AH
22. MOVAH,2
23. INT21H
24. MOVDL,0DH
25. MOVAH,2
26. INT21H
27. MOVSI,OFFSETBUFFER
28. INCSI
29. MOVAL,[SI]
30. INCSI
31. MOVDL,[SI]
32. MOVDH,[SI]
33. MOVDI,SI
34. MOVCL,AL
35. MOVCH,0
36. MOVBL,1
37. MOVBH,0
38. DECCL
39. GO1:INCSI
40. CMPDL,[SI]
41. JNETO1
42. INCBL
43. TO1:LOOPGO1
44. CALLOUTPUT
45. MOVBL,1
46. TO5:INCDI
47. DECAL
48. CMPAL,1
49. JETO3
50. CMPDH,[DI]
51. JETO5
52. MOVDL,[DI]
53. MOVSI,DI
54. MOVCL,AL
55. MOVCH,0
56. DECCL
57. GO2:INCSI
58. CMP[SI],DL
59. JNETO2
60. INCBL
61. MOV[SI],DH
62. TO2:LOOPGO2
63. CALLOUTPUT
64. MOVBL,1
65. JMPTO5
67. TO3:CMPDH,[DI]
68. JETO4
69. MOVDL,[DI]
70. MOVBL,1
71. CALLOUTPUT
72. TO4:RET
73. MAINENDP
75. ;?-------------------------
76. OUTPUTPROC
77. PUSHAX
79. PUSHCX
80. PUSHF
81. MOVAH,2
82. INT21H
83. MOVDL,20H
84. MOVAH,2
85. INT21H
86. MOVAL,BL
87. MOVAH,0
88. MOVCL,10
89. DIVCL
90. ADDAH,30H
91. ADDAL,30H
92. MOVCH,AH
93. MOVDL,AL
94. MOVAH,2
95. INT21H
96. MOVDL,CH
97. MOVAH,2
98. INT21H
99. MOVDL,0AH
100. MOVAH,2
101. INT21H
102. MOVDL,0DH
103. MOVAH,2
104. INT21H
105. POPF
106. POPCX
107. POPAX
108. RET
109. OUTPUTENDP
110. CODEENDS
111. ENDMAIN
113. ;?-----------------

本文出自 “阿凡达” 博客，请务必保留此出处http://shamrock.blog.51cto.com/2079212/709525