@program recharge-hpmptp.muf
1 1000 d
i
$include $lib/alynna
$include $lib/rp
: main
var target
target ! 
target @ "" stringcmp not if 
 "Format: +recharge <player>" "Recharge" pretty tellme
 then
target @ pmatch target !
target @ ok? not if
 "Please specify a valid player." "Recharge" pretty tellme
 then
target @ "hp" target @ maxhp setstat
target @ "mp" target @ maxmp setstat
target @ "tp" target @ maxtp setstat
str 
 "Your HP, MP and TP have all been set to full by " me @ "." 
cat "WIZCALL" pretty target @ swap ansi_notify

#21 str
 "wc " me @ " restored all HP MP TP to full on " target @ "."
cat force
;
.
c
q