weeee...

nkuha ko na po yung ask ko
e2 yung gnawa ko sa functions.pl
=====================================================
# Set interface title
my $charName = $chars[$config{'char'}]{'name'};
my $title;
$charName .= ': ' if defined $charName;
if ($conState == 5) {
my ($title, $basePercent, $jobPercent, $weight, $pos, $myzeny, $mydeath, $myHP, $mySP);
$basePercent = sprintf("%.2f", $chars[$config{'char'}]{'exp'} / $chars[$config{'char'}]{'exp_max'} * 100) if $chars[$config{'char'}]{'exp_max'};
$jobPercent = sprintf("%.2f", $chars[$config{'char'}]{'exp_job'} /$ chars[$config{'char'}]{'exp_job_max'} * 100) if $chars[$config{'char'}]{'exp_job_max'};
$weight = int($chars[$config{'char'}]{'weight'} / $chars[$config{'char'}]{'weight_max'} * 100) . "%" if $chars[$config{'char'}]{'weight_max'};
$pos = " : $char->{pos_to}{x},$char->{pos_to}{y} $field{'name'}" if ($char->{pos_to} && $field{'name'});
$myHP = sprintf("%.2f", percent_hp($char));
$mySP = sprintf("%.2f", percent_sp($char));
$myzeny = formatNumber($char->{'zenny'});
$mydeath = int($char->{'deathCount'});
$title = "${charName} B$chars[$config{'char'}]{'lv'} ($basePercent%), J$chars[$config{'char'}]{'lv_job'}($jobPercent%)(HP: $myHP)(SP: $mySP)(Zenny: $myzeny)(Death: $mydeath) : w$weight${pos} - maztahv00d00 titlebar ver 1.0";
$interface->title($title);
} elsif ($net->getState() == Network::NOT_CONNECTED) {
# Translation Comment: Interface Title
$title = TF("%sNot connected - modified by maztahv00d00", $charName);
} else {
# Translation Comment: Interface Title
$title = TF("%sConnecting - modified by maztahv00d00", $charName);
}
=====================================================
yan meron death count... sana may mka pansin sa gnawa ko

sna nmn may mag TY

sna nka 2long aq