Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked
 
PerlMonks  

Re: framechat (XP progress bar)

by OeufMayo (Curate)
on Mar 13, 2001 at 00:27 UTC ( #63941=note: print w/ replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    my$nxtlvl = ($xpinfo->{'level'}+1); # line 290
    my@levelXP    = qw(0 0 20 50 100 200 500 1000 1600 2300 3000);
    my $percentXP = int(( ($xpinfo->{'xp'} - $levelXP[$xpinfo->{'level'}])
    + / ($xpinfo->{'xp'}-$levelXP[$xpinfo->{'level'}]+$xpinfo->{'xp2nextle
    +vel'})) * 100) ;
    my @XPcolors = qw(4A2625 71131C 9A0213 BD0606 FF0000 9E3B00 1D8700 41A
    +F00 12E800 00FF00);
    my $rest = abs(100-$percentXP);
    
  2. or download this
    <table border="0" height="100%" width="100%" cellpadding="0" cellspaci
    +ng="0" align="center"> # Line 297
    <tr><td><table border="0" cellpadding="0" cellspacing="0" width="100%"
    +><tr><td bgcolor="#$XPcolors[int($percentXP/10)-1]" width="$percentXP
    +%">&nbsp;</td><td width="$rest%"bgcolor="#CCCCCC">&nbsp;</td></tr></t
    +able></td></tr>
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://63941]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (8)
As of 2014-12-26 20:55 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (176 votes), past polls