Write a subroutine that can find whether a given word is contained in a string. The pointer to the word to be found and the pointer to the string to be searched are passed in X and Y, respectively. This subroutine would return a 1 in B if the word is found in the string. Otherwise, a 0 is returned in B.