Someone

        $hget($sockname,disp) $c2($hget($sockname,skill)) $c1(stats for:) $c2($replace($hget($sockname,name),+,$chr(32)))
        $hget($sockname,disp) $c2(Rank:) $c1($2) $c2(Level:) $c1($3) $c2(Exp:) $c1($4) $c2(Exp for) $c1($+($calc($3 + 1),:) $bytes($hget($sockname,exp),b))
        if ($hget($sockname,skill) == Attack) { $hget($sockname,disp) $c1(Ogres:) $c2($calc($hget($sockname,exp) / 319)) $c1(Blue Dragon:) $c2($calc($hget($sockname,exp) / 579)) }}
          if ($hget($sockname,skill) == Defence) { $hget($sockname,disp) $c1(Ogres:) $c2($calc($hget($sockname,exp) / 240)) $c1(Blue Dragon:) $c2($calc($hget($sockname,exp) / 580)) }
          if ($hget($sockname,skill) == Hitpoints) { $hget($sockname,disp) $c1(Ogres:) $c2($calc($hget($sockname,exp) / 79)) $c1(Blue Dragon:) $c2($calc($hget($sockname,exp) / 144)) }
        }
        unset $+(%,$sockname,.,*)
        hfree $sockname
        sockclose $sockname
      }
    }