blob: fcda52efa5a7f3d8eaada41aa45a2d2ad425c0c5 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
|
-|script|@destroynpc|32767
{
callfunc "argv_splitter";
if (GM < get(.destroynpc, "GM") && GM < G_SYSOP)
goto L_GM;
set .@id, getnpcid(@argv$[0]);
if (@argv$[0] == "" || .@id < 1)
goto L_Failed;
if (gettimetick(2) - @destroynpc[0] > 300 || @destroynpc[1] != .@id)
goto L_Confirm;
gmlog "@destroynpc " + @args$;
message strcharinfo(0), "destroynpc : The operation succeeded.";
debugmes "!!! => npc destroyed: `"+@argv$[0]+"` ("+.@id+")";
if (1==1) destroy .@id; // FIXME: allow destroy to work as a non-terminator when arg0 is given
end;
L_Confirm:
message strcharinfo(0), "destroynpc : ##BDANGER ZONE!##b This command permanently destroys a npc and its puppets (if any). Use the command again to confirm.";
setarray @destroynpc[0], gettimetick(2), .@id;
end;
L_Failed:
message strcharinfo(0), "destroynpc : Impossible to find the target npc. Did you try putting the name in \"quotation marks\"? Some npcs also have an invisible postfix in their name, ie `#_M`.";
end;
L_GM:
message strcharinfo(0), "destroynpc : GM command is level "+ get(destroynpc, "GM") +", but you are level " + GM;
end;
OnInit:
registercmd chr(ATCMD_SYMBOL) + "destroynpc", strnpcinfo(0);
end;
}
|
