308
@verb #7113:"Tag" any none none rdo #7113
@program #7113:"Tag" any none none
for x in [1..length(this.players)]
  if (this.players[x][1] == player)
    ploc = x
  endif
endfor
for x in [1..length(this.players)]
  if (this.players[x][2] == args[1])
    tloc = x
  endif
endfor
if (this.players[ploc][3] == 0)
  return player:Tell("You aren't It.")
endif
if (this.players[tloc][4] == 0)
  return player:Tell(this.players[tloc][2], " isn't connected.")
endif
if (this.players[ploc][5] != this.players[tloc][5])
  return player:tell(this.players[tloc][2], " isn't in the same room as you!")
endif
this.players[ploc][3] = 0
this.players[tloc][3] = 1
for b in (this.contents)
  b:tell(this.players[ploc][2], " tags ", this.players[tloc][2], "!")
endfor
.

0