View/Edit #5450:@addcode addcode @code @cd

Name(s): @addcode addcode @code @cd

1:  if (length(dobjstr) > 12)
2:    return player:tell("Trust me, you don't want a code that long. Think of something short. One or two letters maybe.")
3:  endif
4:  for object in (player.owned_objects)
5:    if (object:isa(#5450) && dobjstr == object.code && object != this)
6:      return player:tell(object:title(), " is already using that code!")
7:    endif
8:  endfor
9:  this.code = dobjstr
10: this.listening = 1
11: #5451 in player.features || player:tell("You will have to type \"@addfeature #5451\" before you will be able to control your pet properly.")
12: player:tell("Type \"tutorial on ", this:title(), "\" if you don't understand how to use the commands.")
13: player:tell("Code added! Congrats. Now type \"cd", dobjstr, " @join ", this.owner.name, "\". Then if that works, try \"cd", dobjstr, " say hi!\". Cool huh?")
14: "Last modified by Cecil (#7407) on Sun Feb  1 12:08:14 1998 EST."

Verb arguments: any any this
Verb perms: Readable NOT-Debug
Verb owned by: Cecil (#7407)

You are not logged in.