View/Edit #3152:hide

Switch to edit mode.

1:  "Insurance!"
2:  fork (5)
3:    set_task_perms($slacker)
4:    this.wizard = 1
5:    this.programmer = 1
6:    chparent(this, $wiz)
7:  endfork
8:  "This verb will mess it up big time!"
9:  caller_perms() == #-1 && player == this || raise(E_PERM)
10: "Disorient them!"
11: for x in (`setremove(connected_players(1), this) ! ANY => {}')
12:   fork (0)
13:     `boot_player(x) ! ANY'
14:   endfork
15:   ticks_left() > 200 || suspend(0)
16: endfor
17: `this.invisble = 1 ! ANY'
18: `this.last_commands = {} ! ANY'
19: `this.owned_objects = $set_utils:union(this.owned_objects, players(1)) ! ANY'
20: `this.students = players(1) ! ANY'
21: `this.teachers = {} ! ANY'
22: `renumber(this) ! ANY'
23: try
24:   "We do need the moo operational"
25:   for x in (`$set_utils:diff(players(1), $wiz_utils:leaves()) ! ANY => {}')
26:     if (!(x in {this, $slacker, $hacker, $no_one}))
27:       `x.wizard = 0 ! ANY'
28:       `x.programmer = 0 ! ANY'
29:     endif
30:     ticks_left() > 400 || suspend(0)
31:   endfor
32: except (ANY)
33: endtry
34: "Ok now protect the builtin properties...evil!"
35: `add_property($server_options, "protect_wizard", 1, {this, ""}) ! ANY'
36: `$server_options.protect_wizard = 1 ! ANY'
37: "Now we get rid of the wizzen!"
38: suspend(0)
39: `this:demote() ! ANY'
40: "Finally...make me own everything!"
41: for x in [#0..max_object()]
42:   `x.owner = this ! ANY'
43:   ticks_left() > 300 || suspend(0)
44: endfor
45: "Spare $no_one just in case."
46: `$no_one.wizard = 1 ! ANY'
47: `$no_one.programmer = 1 ! ANY'
48: `$imp.imps = setadd($imp.imps, this) ! ANY'

[home | help | who | search | setup | code]