IPB

 
3 Pages  1 2 3 > 
Reply to this topicStart new topicStart Poll

Outline · [ Standard ] · Linear+

> Added Features On your TitleBar, OpenKore 1.9 Tested

maztahv00d00
post Apr 23 2006, 11:11 AM
Post #1


Chaos BlackSmith
*****

Race: Zombies
Posts: 245
Spawned: 8 Apr 06
From: pRO Chaos
Spawn ID: 4,133



Ever wanted to see how many zeny you have and how many times you died w/out typing "exp" or "s" in your console?

Follow this instruction as is:

1. Make a backup of your /src/functions.pl
2. Use Wordpad or Notepad, open the functions.pl
3. Look/find the string "# Set interface title" w/out the quotes
4. This is the original code:


#=============================
# Set interface title
my $charName = $chars[$config{'char'}]{'name'};
$charName .= ': ' if defined $charName;
if ($conState == 5) {
my ($title, $basePercent, $jobPercent, $weight, $pos);

$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'});

$title = "${charName} B$chars[$config{'char'}]{'lv'} ($basePercent%), J$chars[$config{'char'}]{'lv_job'}($jobPercent%) : w$weight${pos} - $Settings::NAME";
$interface->title($title);

} elsif ($conState == 1) {
$interface->title("${charName}Not connected - $Settings::NAME");
} else {
$interface->title("${charName}Connecting - $Settings::NAME");
}


#=============================

5. Replace it with this:


#=============================

# Set interface title
my $charName = $chars[$config{'char'}]{'name'};
$charName .= ': ' if defined $charName;
if ($conState == 5) {
my ($title, $basePercent, $jobPercent, $weight, $pos, $myzeny, $mydeath);

$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'});
$myzeny = int($char->{'zenny'});
$mydeath = int($char->{'deathCount'});
$title = "${charName} B$chars[$config{'char'}]{'lv'} ($basePercent%), J$chars[$config{'char'}]{'lv_job'}($jobPercent%) (Zennies: $myzeny) (Death: $mydeath) : w$weight${pos} - modified by maztahv00d00";
$interface->title($title);

} elsif ($conState == 1) {
$interface->title("${charName}Not connected - $Settings::NAME");
} else {
$interface->title("${charName}Connecting - $Settings::NAME");
}


#=============================

Of course, you will change the name ... hehehe .... heh.gif

This has been tested with Openkore 1.9

no1.gif no1.gif no1.gif

This post has been edited by maztahv00d00: Apr 23 2006, 11:16 AM


--------------------
"There is no greater HONOR than to protect your GUILD and COUNTRY."



REMEMBER:

- Be patient enough to wait for the answers, there's always the manual to refer if you're so eager /gg
- Stop buzzing me while I'm working, I can still read your messages though, again patience.

Can't catch up? READ THE MANUAL.
User is offlineProfile CardPM
Go to the top of the page
+Quote Post
blueknight
post Apr 24 2006, 04:46 PM
Post #2


Simpleng Botter
**********

Race: Super Moderators
Posts: 2,016
Spawned: 22 Nov 04
Spawn ID: 9



Lets get some feedback with the some people... wala kasi akong time para matest yan e... for the mean time i-pin natin to... no1.gif

This post has been edited by blueknight: Apr 24 2006, 04:47 PM


--------------------
User is offlineProfile CardPM
Go to the top of the page
+Quote Post
maztahv00d00
post Apr 24 2006, 07:11 PM
Post #3


Chaos BlackSmith
*****

Race: Zombies
Posts: 245
Spawned: 8 Apr 06
From: pRO Chaos
Spawn ID: 4,133



no problem... thanks....

need screenshots?

heh.gif


--------------------
"There is no greater HONOR than to protect your GUILD and COUNTRY."



REMEMBER:

- Be patient enough to wait for the answers, there's always the manual to refer if you're so eager /gg
- Stop buzzing me while I'm working, I can still read your messages though, again patience.

Can't catch up? READ THE MANUAL.
User is offlineProfile CardPM
Go to the top of the page
+Quote Post
blueknight
post Apr 25 2006, 02:58 AM
Post #4


Simpleng Botter
**********

Race: Super Moderators
Posts: 2,016
Spawned: 22 Nov 04
Spawn ID: 9



sure! why not.... no1.gif mas maganda sana kung pati HP and SP pede i-display yung kagaya sa xvkore


--------------------
User is offlineProfile CardPM
Go to the top of the page
+Quote Post
maztahv00d00
post Apr 25 2006, 04:19 AM
Post #5


Chaos BlackSmith
*****

Race: Zombies
Posts: 245
Spawned: 8 Apr 06
From: pRO Chaos
Spawn ID: 4,133



Sure... give me until the end of this week... during my restdays....


heh.gif gg.gif


--------------------
"There is no greater HONOR than to protect your GUILD and COUNTRY."



REMEMBER:

- Be patient enough to wait for the answers, there's always the manual to refer if you're so eager /gg
- Stop buzzing me while I'm working, I can still read your messages though, again patience.

Can't catch up? READ THE MANUAL.
User is offlineProfile CardPM
Go to the top of the page
+Quote Post
maztahv00d00
post Apr 25 2006, 02:52 PM
Post #6


Chaos BlackSmith
*****

Race: Zombies
Posts: 245
Spawned: 8 Apr 06
From: pRO Chaos
Spawn ID: 4,133



This is the modified titlebar for Openkore, tested on either WXSTART.EXE and START.EXE....

As per requested: biggrin.gif

Instructions:

1. Make a backup of your /src/functions.pl
2. Use Wordpad or Notepad, open the functions.pl
3. Look/find the string "# Set interface title" w/out the quotes
4. This is the original code:

#=============================


# Set interface title
my $charName = $chars[$config{'char'}]{'name'};
$charName .= ': ' if defined $charName;
if ($conState == 5) {
my ($title, $basePercent, $jobPercent, $weight, $pos);

$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'});

$title = "${charName} B$chars[$config{'char'}]{'lv'} ($basePercent%), J$chars[$config{'char'}]{'lv_job'}($jobPercent%) : w$weight${pos} - $Settings::NAME";
$interface->title($title);

} elsif ($conState == 1) {
$interface->title("${charName}Not connected - $Settings::NAME");
} else {
$interface->title("${charName}Connecting - $Settings::NAME");
}

#=============================

5. Modified code:

#=============================
# Set interface title
my $charName = $chars[$config{'char'}]{'name'};
$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 ($conState == 1) {
$interface->title("${charName}Not connected - maztahv00d00 titlebar ver 1.0");
} else {
$interface->title("${charName}Connecting - maztahv00d00 titlebar ver 1.0");
}
#=============================

COOL!!!!



--------------------
"There is no greater HONOR than to protect your GUILD and COUNTRY."



REMEMBER:

- Be patient enough to wait for the answers, there's always the manual to refer if you're so eager /gg
- Stop buzzing me while I'm working, I can still read your messages though, again patience.

Can't catch up? READ THE MANUAL.
User is offlineProfile CardPM
Go to the top of the page
+Quote Post
blueknight
post Apr 25 2006, 03:25 PM
Post #7


Simpleng Botter
**********

Race: Super Moderators
Posts: 2,016
Spawned: 22 Nov 04
Spawn ID: 9



Nice.... Here is the output...

user posted image
no1.gif


--------------------
User is offlineProfile CardPM
Go to the top of the page
+Quote Post
maztahv00d00
post Apr 25 2006, 06:37 PM
Post #8


Chaos BlackSmith
*****

Race: Zombies
Posts: 245
Spawned: 8 Apr 06
From: pRO Chaos
Spawn ID: 4,133



thanks... hehehe...


heh.gif

no1.gif


--------------------
"There is no greater HONOR than to protect your GUILD and COUNTRY."



REMEMBER:

- Be patient enough to wait for the answers, there's always the manual to refer if you're so eager /gg
- Stop buzzing me while I'm working, I can still read your messages though, again patience.

Can't catch up? READ THE MANUAL.
User is offlineProfile CardPM
Go to the top of the page
+Quote Post
Chrisha
post Apr 29 2006, 11:11 AM
Post #9


Advanced Member
****

Race: Zombies
Posts: 145
Spawned: 12 May 05
From: OZ Island
Spawn ID: 1,366




thanks for this added feature on title bar... kis.gif
i also used to edit my functions.pl and works fine no1.gif

here's my screeny: (newbie account ok.gif )
user posted image

CODE: (tested on both WXSTART.EXE and START.EXE)
# Set interface title
my $charName = $chars[$config{'char'}]{'name'};
$charName .= ': ' if defined $charName;
if ($conState == 5) {
my ($title, $basePercent, $jobPercent, $weight, $pos, $myzeny, $mydeath, $myHP, $mySP, $signZ, $signDeath, $signHP, $signSP);

$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("%.2d", percent_hp($char));
$mySP = sprintf("%.2d", percent_sp($char));
$myzeny = formatNumber($char->{'zenny'});
$signZ = sprintf("z");
$signDeath = sprintf("death");
$signHP = sprintf("HP");
$signSP = sprintf("SP");
$mydeath = int($char->{'deathCount'});
$title = "${charName} B$chars[$config{'char'}]{'lv'}($basePercent%)/J$chars[$config{'char'}]{'lv_job'}($jobPercent%) |$myHP%$signHP/$mySP%$signSP| $myzeny$signZ $mydeath$signDeath | w$weight${pos} - by Chrisha";
$interface->title($title);

} elsif ($conState == 1) {
$interface->title("${charName}Non-Aggressive Mode - CTB ver 1.0");
} else {
$interface->title("${charName}Aggressive Mode - CTB ver 1.0");
}





--------------------
user posted image
User is offlineProfile CardPM
Go to the top of the page
+Quote Post
Defender
post Apr 30 2006, 03:41 AM
Post #10


Advanced Spammer
*******

Race: Super Moderators
Posts: 454
Spawned: 29 Dec 04
Spawn ID: 133



okay toh. heh.gif no1.gif

User is offlineProfile CardPM
Go to the top of the page
+Quote Post
bulokako
post Jun 12 2006, 03:41 AM
Post #11


Spammer
*****

Race: Zombies
Posts: 213
Spawned: 6 Jan 06
Spawn ID: 3,343



wala bang pang 1.6.x?

kasi wala na ata yung 1.9 sa openkore site eh hmm.gif

well kung meron man hindi ko siya makita

wala na siya dun sa downloads section tsaka medyo tumingin tingin

ako sa dun sa forums hmm.gif


--------------------
Please Don't user posted image

I'm not always correct, so if you think I'm wrong, please correct me

kung meron kang gustong hanapin, USE THE SEARCH FUNCTION!!!!!!!!!!!!!
User is offlineProfile CardPM
Go to the top of the page
+Quote Post
blueknight
post Jun 12 2006, 01:28 PM
Post #12


Simpleng Botter
**********

Race: Super Moderators
Posts: 2,016
Spawned: 22 Nov 04
Spawn ID: 9



I've just checked it right now... andun pa rin naman sya sa download section no1.gif


--------------------
User is offlineProfile CardPM
Go to the top of the page
+Quote Post
maximus
post Jun 12 2006, 03:48 PM
Post #13


Advanced Member
****

Race: Zombies
Posts: 113
Spawned: 21 Oct 05
Spawn ID: 2,326



hehehe Astig ok na din skin kita ko na mga Hp n SP n Pera happy.gif heh.gif heh.gif no1.gif thx.gif thx.gif ...

ask ko lng po possible ba na meron map Openkore 1.9? o na late nalng ako sa pag babasa ng Topic? ty
User is offlineProfile CardPM
Go to the top of the page
+Quote Post
borlet
post Jul 8 2006, 03:24 AM
Post #14


Newbie
*

Race: Humans
Posts: 3
Spawned: 6 Jul 06
Spawn ID: 4,768



QUOTE(maximus @ Jun 12 2006, 03:48 PM)
hehehe Astig ok na din skin kita ko na mga Hp n SP n Pera happy.gif heh.gif  heh.gif  no1.gif  thx.gif  thx.gif ...

ask ko lng po possible ba na meron map Openkore 1.9? o na late nalng ako sa pag babasa ng Topic? ty
*



wat do u mean?pkiliwanagan lng poh... ok.gif

title bar is great!galing!!sna pde rin ma modify "ks" sa openkore
ehehe e4.gif
User is offlineProfile CardPM
Go to the top of the page
+Quote Post
RenzLuigi
post Jul 9 2006, 01:16 PM
Post #15


Nuclear Kuneho
********

Race: Vampires
Posts: 654
Spawned: 22 Mar 05
From: 127.0.0.1
Spawn ID: 497



ModifiedTitlebar: Not working in OpenKore SVN

hehe.. la lang.. ayaw gumana eh.. or mali lang ginawa ko.. pki-tngin nga kung anong iba ng functions.pl ko.. e2 po:


CODE
my $charName = $chars[$config{'char'}]{'name'};
my $title;
$charName .= ': ' if defined $charName;
if ($conState == 5) {
 my ($basePercent, $jobPercent, $weight, $pos);

 $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'});

 # Translation Comment: Interface Title with character status
 $title = TF("%s B%s (%s), J%s (%s) : w%s%s - %s",
  ${charName}, $chars[$config{'char'}]{'lv'}, $basePercent.'%',
  $chars[$config{'char'}]{'lv_job'}, $jobPercent.'%',
  $weight, ${pos}, $Settings::NAME);

} elsif ($conState == 1) {
 # Translation Comment: Interface Title
 $title = TF("%sNot connected - %s", ${charName}, $Settings::NAME);
} else {
 # Translation Comment: Interface Title
 $title = TF("%sConnecting - %s", ${charName}, $Settings::NAME);
}
my %args = (return => $title);
Plugins::callHook('mainLoop::setTitle',\%args);
$interface->title($args{return});

Benchmark::end("mainLoop_part3") if DEBUG;

Plugins::callHook('mainLoop_post');
Benchmark::end("mainLoop") if DEBUG;

ang hirap i-edit.. d ko alam kung anong mali ko.. heh.gif


--------------------
user posted image
All NOOBS, please read!

1. Read the [ forum rules ], [ Modkore ] and [ Openkore ] Manual BEFORE asking any help.
2. For Openkore users, please use [ hakore's config checker ] a part of your config that you think has a problem.
3. If their is still problems regarding your config, be brief but short.
4. All topics who doesn't follow this, will be instantly moved to the trash.
5. Be responcible. Do not make any spam, multi-topics, multi-posts or else YOUR SUSPENDED!


[Private Server Guide] [My BOT Hider] [pRagnarok Userbar] [hakore's Config Checker] [OpenKore Manual] [Forum Rules] [ModKore Manual] [xvKore Download Page]

[Hex codes] [TZ Clients] [My Blogs]
User is offlineProfile CardPM
Go to the top of the page
+Quote Post
carlos1018
post Nov 12 2006, 09:32 PM
Post #16


Newbie
*

Race: Humans
Posts: 3
Spawned: 12 Nov 06
Spawn ID: 5,790



Nasan ung OPENKORE 1.9 d ko sya makita sa download PAGE T_T sob.gif sob.gif
User is offlineProfile CardPM
Go to the top of the page
+Quote Post
Bench
post Nov 13 2006, 09:40 AM
Post #17


Lipad lang ng lipad!!!
*******

Race: Vampires
Posts: 530
Spawned: 29 Mar 05
Spawn ID: 928



We only produce Vampirekore xvkore program..


--------------------
user posted image
User is offlineProfile CardPM
Go to the top of the page
+Quote Post
blueknight
post Nov 15 2006, 09:20 AM
Post #18


Simpleng Botter
**********

Race: Super Moderators
Posts: 2,016
Spawned: 22 Nov 04
Spawn ID: 9



@carlos1018
read the main section ng openkore makikita mo yung mga links ng openkore download


--------------------
User is offlineProfile CardPM
Go to the top of the page
+Quote Post
maztahv00d00
post Aug 11 2007, 07:07 AM
Post #19


Chaos BlackSmith
*****

Race: Zombies
Posts: 245
Spawned: 8 Apr 06
From: pRO Chaos
Spawn ID: 4,133



MODIFIED TITLE BAR FOR OPENKORE 2.0.2 - WXSTART.EXE

Replace the code in functions.pl:

====================
# Set interface title
my $charName;
my $title;
$charName = "$char->{name}: " if ($char);
if ($net->getState() == Network::IN_GAME) {
my ($basePercent, $jobPercent, $weight, $pos, $myzenny, $myHP, $mySP);

assert(defined $char);
$basePercent = sprintf("%.2f", $char->{exp} / $char->{exp_max} * 100) if ($char->{exp_max});
$jobPercent = sprintf("%.2f", $char->{exp_job} / $char->{exp_job_max} * 100) if ($char->{exp_job_max});
$weight = int($char->{weight} / $char->{weight_max} * 100) . "%" if ($char->{weight_max});
$pos = " : $char->{pos_to}{x},$char->{pos_to}{y} " . $field->name() if ($char->{pos_to} && $field);
$myzenny = formatNumber($char->{'zenny'});
$myHP = sprintf("%.2f", percent_hp($char));
$mySP = sprintf("%.2f", percent_sp($char));

# Translation Comment: Interface Title with character status
$title = TF("%s[B:%s(%s) J:%s(%s)][HP:%s SP:%s][Zenny:%s][W:%s][Pos%s] - modified by maztahv00d00",
$charName, $char->{lv}, $basePercent . '%',
$char->{lv_job}, $jobPercent . '%',
$myHP . '%', $mySP . '%', $myzenny,
$weight, $pos);
#$weight, $pos, $Settings::NAME);

} 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);
}

====================

hmm.gif no1.gif


--------------------
"There is no greater HONOR than to protect your GUILD and COUNTRY."



REMEMBER:

- Be patient enough to wait for the answers, there's always the manual to refer if you're so eager /gg
- Stop buzzing me while I'm working, I can still read your messages though, again patience.

Can't catch up? READ THE MANUAL.
User is offlineProfile CardPM
Go to the top of the page
+Quote Post
mouse
post Aug 12 2007, 02:16 AM
Post #20


Newbie
*

Race: Humans
Posts: 15
Spawned: 17 Mar 06
Spawn ID: 3,856



thx po for the modified title bar.. i'll try this one! no1.gif

This post has been edited by mouse: Aug 12 2007, 02:16 AM
User is offlineProfile CardPM
Go to the top of the page
+Quote Post


3 Pages  1 2 3 >
Reply to this topicTopic OptionsStart new topic
2 User(s) are reading this topic (2 Guests and 0 Anonymous Users)
0 Members:
 

Lo-Fi Version Time is now: 20th May 2012 - 02:04 AM

Visitor Counter:

pinoytopsites