windows环境下32位汇编语言程序设计- 第85节

　　　　　　　　　　　　　　　　　　　　　　　　　　　　mov　　　　　word　ptr　＇ecx＇；ax

　　　　　　　　　　　　　　　　　　　　　　　　　　　　invoke　　_WalkTree；_hFile；ebx；addr　@szWord

　　　　　　　　　　　　　　　　　　　　。endif

　　　　　　　　　　　　　　　　　　　　inc　　　　　@dwTemp

　　　　　　　　　　　　　　　　　　　　。endw

；********************************************************************

；　释放结点

；********************************************************************

　　　　　　　　　　　　　　　　　　　　。if　　　　　＇esi＇。dwDepth

　　　　　　　　　　　　　　　　　　　　　　　　　　　　invoke　　GlobalFree；esi

　　　　　　　　　　　　　　　　　　　　。endif

　　　　　　　　　　　　　　　　　　　　popad

　　　　　　　　　　　　　　　　　　　　assume　　esi：ptr　WORD_COUNT

　　　　　　　　　　　　　　　　　　　　ret

　

_WalkTree　　　　　　　endp

；》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》

；　如果输入的是字母则建立或移动到下一结点，输入0则增加结点计数

；》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》》

_CountLetter　　　　proc　　　　　　　　_dwLetter

　　　　　　　　　　　　　　　　　　　　local　　　@dwIndex

　

　　　　　　　　　　　　　　　　　　　　assume　　edi：ptr　WORD_COUNT

　　　　　　　　　　　　　　　　　　　　or　　　　　　al；20h　　　　　　　　　　　　　　　　　　　　　　；转换成小写字母

　　　　　　　　　　　　　　　　　　　　。if　　　　　（al　》=　'a'）　&&　（al