Your nesting error is at the end of your code. You have "select home" and then a bunch of code after that. You forgot to close of your last "case" statement with an endcase command and then the endselect command at the end of your select block. Right before your "quit" subroutine, you need to put in an "endcase" and an "endselect" command.
I also noticed some other problems with your code. You have "select home" This needs to be "select
home$" since you are asking the user for a string instead of a number. Then you need to change where you have case Kitchen, Living room, etc. to have quotes, "" around each string. Example:
select home$
case "Kitchen"
print "blah, blah blah"
endcase
endselect
Hope you understand this.