Write an HLA Assembly language program that implements the following function:  

procedure strlen( baseStringAddress: dword ); @nodisplay; @noframe; 

This function should return in AL the number of characters in the string parameter, passed by its base address. 

Here is a sample program dialogue:  

Feed Me: asdfasdf   The String You Entered: asdfasdf Has Length = 8  Feed Me: asdf   The String You Entered: asdf Has Length = 4