##tickloc:
runsub checkhost;
##checkhost:
if $actor's host > 0 then check2 else end;
##check2:
$hoster = $actor's host;
if $hoster's material like living then continue else end;
##continue:
include 58416;
multivar $skiller=$hoster,$skillname='aim',$modname='happyb-day',$modval='5',$modobj='$actor',$moddur='',$modtick='',$modend='';
runsub addmod;
multivar $skiller=$hoster,$skillname='dodge',$modname='happyb-day',$modval='5',$modobj=$actor,$moddur='',$modtick='',$modend='';
runsub addmod;
$skiller=$hoster,$skillname='magic',$modname='happyb-day',$modval='10',$modobj=$actor,$moddur='',$modtick='',$modend='';
runsub addmod;