-|script|raise|32767
{
if (GM < 40 && GM < G_SYSOP) end;
set .@rid, if_then_else(@args$ != "", getcharid(3, @args$), BL_ID);
if (.@rid < 1 || !(isloggedin(.@rid))) end;
addtimer 0, strnpcinfo(0) + "::OnRaise", .@rid;
message strcharinfo(0), "absolve : player absolved.";
end;
OnRaise:
warp getsavepoint(0), getsavepoint(1), getsavepoint(2);
set PC_DIE_COUNTER, 0;
set Hp, MaxHp;
message strcharinfo(0), "Server : you have been revived.";
end;
OnInit:
registercmd "@raise", strnpcinfo(0);
end;
}
-|script|absolve|32767
{
if (GM < 40 && GM < G_SYSOP) end;
set .@rid, if_then_else(@args$ != "", getcharid(3, @args$), BL_ID);
if (.@rid < 1 || !(isloggedin(.@rid))) end;
addtimer 0, strnpcinfo(0) + "::OnRaise", .@rid;
message strcharinfo(0), "absolve : player absolved.";
end;
OnRaise:
set Zeny, 0;
getinventorylist;
set @item_it, 0;
freeloop 1;
goto L_Drop; // drop all items
L_Drop:
delitem @inventorylist_id[@item_it], @inventorylist_amount[@item_it];
set @item_it, @item_it + 1;
if (@item_it >= @inventorylist_count) goto L_Raise;
goto L_Drop;
L_Raise:
warp getsavepoint(0), getsavepoint(1), getsavepoint(2);
set PC_DIE_COUNTER, 0;
set Hp, 1;
message strcharinfo(0), "Server : your sins have been forgiven.";
end;
OnInit:
registercmd "@absolve", strnpcinfo(0);
end;
}