View/Edit #1961:_constructor

Name(s): _constructor

1:  "If they are in the Builder's Adventure, the text below would probably confuse them - Hatter"
2:  "Begin generic security check (_constructor)"
3:  if (verb == "_constructor" && caller_perms() != #-1)
4:    raise(E_PERM)
5:    return E_PERM
6:  endif
7:  "End generic security check (_constructor)"
8:  fork (2)
9:    player:tell("Thank-you for creating a child of ", this.name, "!")
10:   suspend(1)
11:   player:tell("I have made a help file for ", this.name, " so you can type help $wearable to see the help file.")
12:   suspend(1)
13:   player:tell("Please register your $wearable (as where you put it on, according to $wearable.wearable_place), by typing: register wearable as [any], it would be very appreciated.")
14:   suspend(2)
15:   player:tell("Have fun!")
16: endfork
17: this.hmany = this.hmany + 1
18: this.hmanyc = this.hmanyc + 1
19: args[1].on = 0
20: "Last modified by Lao-Tzu (#8084) on Mon Dec 17 14:29:16 2001 MST."

Verb arguments: this none this
Verb perms: Readable eXecutable NOT-Debug
Verb owned by: cheese-whiz (#8596)

You are not logged in.