Listing 8

;   string = -4
;   wordarray = -10
;   count = -6
mov bx,WORD PTR [bp-6]  ;count
les si,DWORD PTR [bp-4] ;string
mov al,es:[bx][si]          ; get string
cbw                         ; convert byte to word (sign
                            extended)
mov bx,ax                   ; index into wordarray
shl bx,1                    ; multiply by 2 (size of int)
les si,DWORD PTR [bp-10]    ; wordarray base address in si
mov ax,es:[bx][si]          ; [bx][si] added together
                           ; yields base + index for wordarray
inc WORD PTR es:[bx][si]
; End of File