#1542! and(hastype(*%0,player),[or(orlflags(%#,wizard royalty),strmatch([xget(#1542,dat-cansee)],*%#*))]) :
#1542!  hastype(*%0,player) :
#1542!   *%0 => *Rey=1
#1542!  hastype(*%0,player) => #-1 NO SUCH OBJECT VISIBLE
#1542!  [or(orlflags(%#,wizard royalty),strmatch([xget(#1542,dat-cansee)],*%#*))] :
#1542!   or(orlflags(%#,wizard royalty),strmatch([xget(#1542,dat-cansee)],*%#*)) :
#1542!    orlflags(%#,wizard royalty) :
#1542!     %# => #1494
#1542!    orlflags(%#,wizard royalty) => 1
#1542!    strmatch([xget(#1542,dat-cansee)],*%#*) :
#1542!     [xget(#1542,dat-cansee)] :
#1542!      xget(#1542,dat-cansee) =>
#1542!     [xget(#1542,dat-cansee)] =>
#1542!     *%#* => *#1494*
#1542!    strmatch([xget(#1542,dat-cansee)],*%#*) => 0
#1542!   or(orlflags(%#,wizard royalty),strmatch([xget(#1542,dat-cansee)],*%#*)) => 1
#1542!  [or(orlflags(%#,wizard royalty),strmatch([xget(#1542,dat-cansee)],*%#*))] => 1
#1542! and(hastype(*%0,player),[or(orlflags(%#,wizard royalty),strmatch([xget(#1542,dat-cansee)],*%#*))]) => 0
#1542! and(hastype(*%0,player),lte([words([lattr(*%0/bg*)])],%1),[or(orlfalgs(%#,wizard royalty),strmatch([xget(#1542,dat-cansee)],*%#*))]) :
#1542!  hastype(*%0,player) :
#1542!   *%0 => *Rey
#1542!  hastype(*%0,player) => 1
#1542!  lte([words([lattr(*%0/bg*)])],%1) :
#1542!   [words([lattr(*%0/bg*)])] :
#1542!    words([lattr(*%0/bg*)]) :
#1542!     [lattr(*%0/bg*)] :
#1542!      lattr(*%0/bg*) :
#1542!       *%0/bg* => *Rey/bg*
#1542!      lattr(*%0/bg*) => BG1 BG2 BG3 BG4
#1542!     [lattr(*%0/bg*)] => BG1 BG2 BG3 BG4
#1542!    words([lattr(*%0/bg*)]) => 4
#1542!   [words([lattr(*%0/bg*)])] => 4
#1542!   %1 => 1
#1542!  lte([words([lattr(*%0/bg*)])],%1) => 0
#1542!  [or(orlfalgs(%#,wizard royalty),strmatch([xget(#1542,dat-cansee)],*%#*))] :
#1542!   or(orlfalgs(%#,wizard royalty),strmatch([xget(#1542,dat-cansee)],*%#*)) :
#1542!    orlfalgs(%#,wizard royalty) :
#1542!     %#,wizard royalty => #1494,wizard royalty
#1542!    orlfalgs(%#,wizard royalty) => orlfalgs(#1494,wizard royalty)
#1542!    strmatch([xget(#1542,dat-cansee)],*%#*) :
#1542!     [xget(#1542,dat-cansee)] :
#1542!      xget(#1542,dat-cansee) =>
#1542!     [xget(#1542,dat-cansee)] =>
#1542!     *%#* => *#1494*
#1542!    strmatch([xget(#1542,dat-cansee)],*%#*) => 0
#1542!   or(orlfalgs(%#,wizard royalty),strmatch([xget(#1542,dat-cansee)],*%#*)) => 1
#1542!  [or(orlfalgs(%#,wizard royalty),strmatch([xget(#1542,dat-cansee)],*%#*))] => 1
#1542! and(hastype(*%0,player),lte([words([lattr(*%0/bg*)])],%1),[or(orlfalgs(%#,wizard royalty),strmatch([xget(#1542,dat-cansee)],*%#*))]) => 0