Index: /irpg/trunk/ChangeLog =================================================================== --- /irpg/trunk/ChangeLog (revision 1449) +++ /irpg/trunk/ChangeLog (revision 1449) @@ -0,0 +1,108 @@ +This is the ChangeLog for the Idle RPG Website Code. I'm not as religious about +making sure my updates make it here as I am about changes to the IRPG code +making it into that ChangeLog, so there may be changes between versions that you +don't see listed here. + +Also, please note that any use of "incowrect" or other cow-related "typos" are +NOT typos. I like cattle. A lot. Please stop fixing them :^) + +2004-07-17 Jon Honeycutt + * huge modification of the entire source by the original coder, res0 + . res0 has really helped this project through his many + contributions; it wouldn't be where it is today without him. thanks, res0! + * New site layout (valid XHTML 1.1 strict) using CSS + * Cleaned up PHP + * User maps do not display unless visitor clicks 'display' link + * changed fgets() calls to add the optional second parameter (for old PHPs) + * removed incorrect header() in makequestmap() (mikegrb) + * checked to make sure key $_SESSION['time'] was set before attempting to + reference it (HarK0nNeN) + * db.php's table tag now specifies the number of rows and columns to make + drawing faster in browsers that pay attention to it (res0) + * header("Location: ") directives now give full URIs + * made better use of htmlentities() and urlencode()s as relates to display + of usernames and classes + * users on quest and world maps are now clickable, leading to their player + info page (John Nielsen) + +2004-05-31 Jon Honeycutt + * changed players.php to show offline users as gray, this style is in + header.php, patch from Chewie + * changed map-drawing PHP scripts to draw a transparent image which is then + overlayed (using CSS) over the static newmap.png image. changed the map + drawing frequency to 1/user/20s as I think this greatly decreases CPU + usage. changed the maperror.png to something more appropriate. $mapx + and $mapy in config.php describe the dimensions of your map file (Rick) + * fixed quest.php to show proper coordinates; another evil c/p error (Rick) + +2004-05-23 Jon Honeycutt + * changed most everything to make sense with the new database + * edited dump.php to display data in the same format, despite the new + database format. + * added an xml.php page that takes a 'player' argument and displays + information on that user in xml 1.0 format. should allow a better API + as far as compatibility with newer dbs goes + * changed playerview.php to use fgets() to read from modifiers.txt. + hopefully this is much faster + * edited playerview.php to show map and XML data link + * changed the counter in footer.php to strip the leading path information + from $_SERVER['PHP_SELF'] before using it to identify the page + * removed some unused $i variable from players.php + * created quest.php which shows active quest info + * created makequestmap.php which draws a quest map if quest type is 2, + redirects otherwise + * created worldmap.php which shows the active state of the irpg world + * created makeworldmap.php which draws the world map + * created makemap.php which takes a 'player' argument and draws them on the + map + * commonfunctions.php now has functions to sort by isadmin flag and player + alignment + * index.php updated with information on the new game features + * changed titles on several pages to use $irpg_chan instead of hard-coded + #G7 + * updated header.php to link to new pages and idlerpg.net forum + * changed 'time modifiers' to 'character modifiers' as item modifiers are + now stored, also + +2004-05-23 Alexander Hirzel + * submitted a series of patches to correct, among other things, the horrible + use of where was more appropriate + +2004-04-22 Jon Honeycutt + * if $_GET['alltime'] wasn't set, < and > in time modifiers were not + translated to < and > (thanks DinTx) + * attempted to fix playerview.php from showing others' stats, traded + stristr() for strstr() matching either "^name ", " name ", or "^name's " + +2004-04-23 Jonathan Attwell + * created README, detailing how users are to install and what to edit. + * created config.php, which holds all the setup variables. + * cleaned up some of the php coding. + +2004-04-15 Jon Honeycutt + * we now stripslashes() on $_GET['player'] for players.php, + playerview.php, dump.php (thanks Diab) + +2004-04-05 Jon Honeycutt + * removed some of parallax's tabs :^) + * edited players.php to forward requests for specific players to the proper + playerview.php + * changed links in sitesource.php to be fully-qualified + * removed preg_grep in playerview.php, which insecurely used tainted + data. switched to stristr. (thanks mike@ethernal.org) + * stripped < and > from modifiers.txt output (thanks mike@ethernal.org) + * changed link to idlerpg-adv.txt in players.php to be fully-qualified. + (thanks daxxar) + * may've made other changes, not sure. + +2004-02-15 Jon Honeycutt + * edited source.php to provide fully-qualified URLs to source files; + easier for users to follow license. + * playerview.php's 'View all Time Modifiers' link now displays the + number of time modifiers. + * contact.php now sends a From: field in its headers parameter. + +2004-01-31 Titus Barik + * created ChangeLog, following Debian ChangeLog format. + * modified header.php to be location independent via $BASE_URL var. + * players.php and playerview.php are now separate files. Index: /irpg/trunk/README =================================================================== --- /irpg/trunk/README (revision 1449) +++ /irpg/trunk/README (revision 1449) @@ -0,0 +1,42 @@ +------------------------------------------ +IRPG Website Code README v1.1 (2004-06-27) +------------------------------------------ + +----------- + Notes +----------- + +Homepage: http://idlerpg.net +License : Public Domain + +----------- + Versions +----------- + +Site: v0.5 [current/changes courtesy of res0], Released July 17th, 2004. +Bot : v3.1.2 [current], Released June 6th, 2004. + +------------ +Installation +------------ + +1. Make sure you have the bot functional and running. +2. Copy all the files here to your public_html or some folder. +3. Edit config.php with your favorite editor. +4. chmod 644 * && chmod 666 hits.db +5. If you change the default settings in the IRPG bot (for example, if you turn + off the option to write quest info to file, you'll have to manually edit + some scripts to take this into account. If you disable the INFO command, + you might want to remove it from the index.php page. +6. Some code in this package requires that your system have GD 2.0+ (or have it + enabled in your php.ini, on Win32). If you don't want this functionality to + be available, edit the script playerview.php to remove the use of the map + and header.php to remove the links to the world map and the quest info page. + You can also delete the worldmap.php, makeworldmap.php, makemap.php, + quest.php, and makequestmap.php scripts. +7. Edit the website ANY WAY you see fit. You don't have to keep all of the links + to me, I just thought they might be useful or interesting to users :^) +8. The best way to receive support for these scripts is to post to the Help + section of the forum, http://idlerpg.net/forum.php, not via e-mail or IRC. + If you notice a bug, however, you may use any method to contact me. + Thanks :^) Index: /irpg/trunk/admincomms.txt =================================================================== --- /irpg/trunk/admincomms.txt (revision 1449) +++ /irpg/trunk/admincomms.txt (revision 1449) @@ -0,0 +1,65 @@ +This is not the full list of commands for the Idle RPG bot, but only the list +of admin commands. For more information on the Idle RPG bot, visit +http://idlerpg.net/ + +INFO, retrieve some fairly useless stats about the bot. + +DIE, kills the bot. + +HOG, summon the Hand of God spell. See the main help file. + +RESTART, restarts the bot. + +CHPASS , change a character's pass in the IRPG. + +CHCLASS , change a character's class in the IRPG. + +CHUSER , change a character's username in the IRPG. + Please only use in very special circumstances; otherwise, have them form + a new player and DEL the old one. This should not let you overwrite an + existing account, but is untested. + +PUSH , push a player toward his goal by subtracting time + from his next time to level. Please use this only if bot has mistakenly + penalized someone. You could also use this to punish a user by setting + the number of seconds to a negative number. Don't do that. + +DEL , remove a user's account. + +JUMP , move the bot to another server. + +SILENT , switch bot between 4 modes of silence. + - mode 0, bot sends all privmsgs. + - mode 1, only chanmsg() is disabled. + - mode 2, only privmsg()/notice() to non-channels is disabled. + - mode 3, privmsgs/notices to users and channels are disabled. + +BACKUP, tell bot to copy $opts{'dbfile'} to .dbbackup/$opts{'dbfile'}TIMESTAMP + +RELOADDB, force bot to reload player database file, rewriting all memory. + RELOADDB can only be used while in pause mode. + +PAUSE, toggle pause mode. + +PEVAL , execute arbitrary argument as Perl code. Queues output > 3 lines + or >1k of text. Some useful PEVAL commands: + - Delete all accounts not logged in in 4 weeks (See also: DELOLD): + /msg bot PEVAL delete $rps{$_} for grep { time()-$rps{$_}{lastlogin} > 3600*24*7*4 && !$rps{$_}{online} } keys %rps; + - Remove one hour from everyone's clocks: + /msg bot PEVAL $rps{$_}{next} -= 3600 for keys %rps; + - List all online users, separated by commas: + /msg bot PEVAL join(', ',grep { $rps{$_}{online} } keys %rps); + - View contents of a file on remote host: + /msg bot peval `cat file` + - Turn on debug mode: + /msg bot peval $opts{debug}=1; + - Force write-out of database: + /msg bot peval writedb(); + +DELOLD , remove all non-logged-in accounts inactive in the last + days. + +CLEARQ, clear the outgoing message queue. Useful to use if someone floods the + bot with a lot of text that it plans to respond to. + +MKADMIN , set the isadmin flag for a given username. Index: /irpg/trunk/commonfunctions.php =================================================================== --- /irpg/trunk/commonfunctions.php (revision 1449) +++ /irpg/trunk/commonfunctions.php (revision 1449) @@ -0,0 +1,101 @@ + $level2) ? -1 : 1; + } + function cmp_alignment_asc($a,$b) { return cmp_alignment_desc($b,$a); } + function cmp_alignment_desc($a,$b) { + list(,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,$a1)=explode("\t",trim($a)); + list(,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,$a2)=explode("\t",trim($b)); + if ($a1 == "g" || $a2 == "e") return -1; + if ($a1 == "e" || $a2 == "g") return 1; + return 0; + } + function cmp_isadmin_asc($a,$b) { return cmp_isadmin_desc($b,$a); } + function cmp_isadmin_desc($a,$b) { + list(,,$o1)=explode("\t",trim($a)); + list(,,$o2)=explode("\t",trim($b)); + return ($o1 > $o2) ? -1 : 1; + } + function cmp_ttl_asc($a,$b) { return cmp_ttl_desc($b,$a); } + function cmp_ttl_desc($a,$b) { + list(,,,,,$time1)=explode("\t",trim($a)); + list(,,,,,$time2)=explode("\t",trim($b)); + return ($time2 < $time1) ? -1 : 1; + } + function cmp_user_asc($a,$b) { return cmp_user_desc($b,$a); } + function cmp_user_desc($a,$b) { + list($u1)=explode("\t",trim($a)); + list($u2)=explode("\t",trim($b)); + return (strtolower($u1) > strtolower($u2)) ? -1 : 1; + } + function cmp_online_asc($a,$b) { return cmp_online_desc($b,$a); } + function cmp_online_desc($a,$b) { + list(,,,,,,,,$o1)=explode("\t",trim($a)); + list(,,,,,,,,$o2)=explode("\t",trim($b)); + return ($o1 > $o2) ? -1 : 1; + } + function cmp_idled_asc($a,$b) { return cmp_idled_desc($b,$a); } + function cmp_idled_desc($a,$b) { + list(,,,,,,,,,$i1)=explode("\t",trim($a)); + list(,,,,,,,,,$i2)=explode("\t",trim($b)); + return ($i1 > $i2) ? -1 : 1; + } + function cmp_created_asc($a,$b) { return cmp_created_desc($b,$a); } + function cmp_created_desc($a,$b) { + list(,,,,,,,,,,,,,,,,,,,$i1)=explode("\t",trim($a)); + list(,,,,,,,,,,,,,,,,,,,$i2)=explode("\t",trim($b)); + return ($i1 > $i2) ? -1 : 1; + } + function cmp_lastlogin_asc($a,$b) { return cmp_lastlogin_desc($b,$a); } + function cmp_lastlogin_desc($a,$b) { + list(,,,,,,,,,,,,,,,,,,,,$i1)=explode("\t",trim($a)); + list(,,,,,,,,,,,,,,,,,,,,$i2)=explode("\t",trim($b)); + return ($i1 > $i2) ? -1 : 1; + } + function cmp_uhost_asc($a,$b) { return cmp_uhost_desc($b,$a); } + function cmp_uhost_desc($a,$b) { + list(,,,,,,,$u1)=explode("\t",trim($a)); + list(,,,,,,,$u2)=explode("\t",trim($b)); + return (strtolower($u1) > strtolower($u2)) ? -1 : 1; + } + function cmp_pen_asc($a,$b) { return cmp_pen_desc($b,$a); } + function cmp_pen_desc($a,$b) { + list(,,,,,,,,,,,,$p1[0],$p1[1],$p1[2],$p1[3],$p1[4],$p1[5], + $p1[6])=explode("\t",trim($a)); + list(,,,,,,,,,,,,$p2[0],$p2[1],$p2[2],$p2[3],$p2[4],$p2[5], + $p2[6])=explode("\t",trim($b)); + $s1 = $s2 = 0; + foreach ($p1 as $pen) $s1 += $pen; + foreach ($p2 as $pen) $s2 += $pen; + return ($s1 > $s2) ? -1 : 1; + } + function cmp_sum_asc($a,$b) { return cmp_sum_desc($b,$a); } + function cmp_sum_desc($a,$b) { + list(,,,,,,,,,,,,,,,,,,,,,$i1[0],$i1[1],$i1[2],$i1[3],$i1[4],$i1[5], + $i1[6],$i1[7],$i1[8],$i1[9])=explode("\t",trim($a)); + list(,,,,,,,,,,,,,,,,,,,,,$i2[0],$i2[1],$i2[2],$i2[3],$i2[4],$i2[5], + $i2[6],$i2[7],$i2[8],$i2[9])=explode("\t",trim($b)); + $s1 = $s2 = 0; + foreach ($i1 as $item) { $s1 += $item; } + foreach ($i2 as $item) $s2 += $item; + return ($s1 > $s2) ? -1 : 1; + } + +?> Index: /irpg/trunk/config.php =================================================================== --- /irpg/trunk/config.php (revision 1449) +++ /irpg/trunk/config.php (revision 1449) @@ -0,0 +1,53 @@ + Index: /irpg/trunk/contact.php =================================================================== --- /irpg/trunk/contact.php (revision 1449) +++ /irpg/trunk/contact.php (revision 1449) @@ -0,0 +1,47 @@ +Contact"; + if ($_POST['from'] && $_POST['text']) { + mail($admin_email,"IRPG: ".$_POST['from'], + "Name: ".$_POST['name']."\nE-mail: ".$_POST['from']."\n\n". + $_POST['text'],"From: ".$_POST['from']."\r\n"); + echo('
Merci pour le message.
'); + } + else { + echo(' +
+ + + + + + + + + + + + + + + +
: + +
: + +
+
+
+ +
+
+'); + } + include("footer.php"); +?> Index: /irpg/trunk/db.php =================================================================== --- /irpg/trunk/db.php (revision 1449) +++ /irpg/trunk/db.php (revision 1449) @@ -0,0 +1,255 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +",">",$class); + $user = str_replace(">",">",$user); + $sum = 0; + foreach ($item as $k => $v) $sum += $v; + $pentot = 0; + foreach ($pen as $k => $v) $pentot += $v; + echo " \n". + " \n". + " \n". + " \n". + " \n". + " \n". + " \n". + " \n". + " \n". + " \n". + " \n". + " \n". + " \n". + " \n". + " \n". + " \n". + " \n". + " \n". + " \n". + " \n". + " \n". + " \n". + " \n". + " \n". + " \n". + " \n". + " \n". + " \n". + " \n". + " \n". + " \n". + " \n". + " \n". + " \n"; + } + + echo(' +
+ Pseudo + ( + + + / + + + ) + + Niveau + ( + + + / + + + ) + + Admin + ( + + + / + + + ) + Profession + Prochain Niv. + ( + + + / + + + ) + + Nick!User@Host + ( + + + / + + + ) + + En ligne + ( + + + / + + + ) + + Temps d'inactivé total + ( + + + / + + + ) + X PosY PosPén. MesgPén. NickPén. PartPén. KickPén. QuitPén. QuêtePén. Logout + Total Pen. + ( + + + / + + + ) + + Date Création + ( + + + / + + + ) + + Dernière connex. + ( + + + / + + + ) + Arme bourrinArme sniperRune VieRune ForRune PreRune IntVéhiculeBouffeInutileJouet + Total + ( + + + / + + + ) + + Coté + ( + + + / + + + ) +
$user$level".($isadmin?"Oui":"Non")."$class".duration($secs)."$uhost".(($online == 1) ? "Oui" : "Non")."".duration($idled)."$x$y".duration($pen['mesg'])."".duration($pen['nick'])."".duration($pen['part'])."".duration($pen['kick'])."".duration($pen['quit'])."".duration($pen['quest'])."".duration($pen['logout'])."".duration($pentot)."".strftime($dateformat,$created)."".strftime($dateformat,$lastlogin)."".$item['gloves']."".$item['weapon']."".$item['tunic']."".$item['leggings']."".$item['shield']."".$item['helm']."".$item['boots']."".$item['charm']."".$item['ring']."".$item['amulet']."$sum".($alignment=='e'?"Sadique":($alignment=='n'?"Nain-déci":"Brave"))."
+ '); + include("footer.php"); +?> Index: /irpg/trunk/dump.php =================================================================== --- /irpg/trunk/dump.php (revision 1449) +++ /irpg/trunk/dump.php (revision 1449) @@ -0,0 +1,118 @@ + Index: /irpg/trunk/footer.php =================================================================== --- /irpg/trunk/footer.php (revision 1449) +++ /irpg/trunk/footer.php (revision 1449) @@ -0,0 +1,37 @@ + +
+

+ Des questions ? Commentaires ? Suggestions ? Bugs ? + Contactez ou @IRC. + Pour les photos de filles nues, voyez avec jechtounet. + + +

+
+ + Index: /irpg/trunk/g7.css =================================================================== --- /irpg/trunk/g7.css (revision 1449) +++ /irpg/trunk/g7.css (revision 1449) @@ -0,0 +1,111 @@ +body { + font-family: "Trebuchet MS", Arial, Helvetica, sans-serif; + background-color: #FFFFF0; + color: black; + margin: 10px; + text-align: justify; +} + +h1 { margin-bottom: 0px; margin-top: 0px; } +h2 { margin-bottom: 0px; } + +p.small { margin: 0px; font-size: smaller; } + +a { text-decoration: none; color: #C69500; } +a:hover { text-decoration: underline; color: black; } + +div.head { + border: 1px solid #c0c0c0; + text-align: left; + width: 100%; + margin-bottom: 10px; + background: #FFFFFF; +} + +div.menu { + width: 120px; + position: relative; + float: left; + border: 1px solid #c0c0c0; + background: #FFFFFF; +} +div#menu a.home { color: #000000; background: #c0c0c0; border: 1px solid #000000; } +div#menu a.home:hover { background: #c0c0c0; border: 1px solid #000000; } +div#menu a { + text-align: center; + width: 118px; + margin: 0px; + display: block; + border: 1px solid #FFFFFF +} + +div#menu a:hover { border: 1px solid #000000; background: #c0c0c0; text-decoration: none; } + +div.content { + border: 1px solid #c0c0c0; + margin-left: 130px; + margin-top: 0px; + padding: 10px; + background: #FFFFFF; +} + +div.footer { + border: 1px solid #c0c0c0; + margin-left: 130px; + margin-top: 10px; + padding: 10px; + background: #FFFFFF; +} + + +table.uniques { + border: 1px solid #c0c0c0; + padding: 5px; + text-align: left; +} +table.uniques td { + padding-left: 10px; +} + +table.penalty { + border: 1px solid #c0c0c0; + padding: 5px; + text-align: left; +} +table.penalty th { + text-align: right; +} +table.penalty td { + +} + +/* Styles for the userlist */ +li.online { font-weight: bold; } +li.offline { color: #c0c0c0; } +a.offline { color: #707070; } +#map { + width: 500px; + height: 500px; + background-image: url(newmap.png); +} + + +table.forum { + border: 1px solid #c0c0c0; + table-layout: fixed; + overflow: auto; +} + +table.forum td,tr,caption,thead,tfoot,th { + padding-left: 10px; + padding-right: 10px; +} +.tdblue { background-color: #ffffdf; } +.tdgray { background-color: #eeeee0; } +.tdred { + border: 1px solid red; + background-color: #FFCCCC; +} +.smallest { + font-size: 11px; +} Index: /irpg/trunk/header.php =================================================================== --- /irpg/trunk/header.php (revision 1449) +++ /irpg/trunk/header.php (revision 1449) @@ -0,0 +1,46 @@ + + + + + <?echo $irpg_chan;?> Idle RPG: <?echo $irpg_page_title;?> + + + + + + + +
+'); +?> +
+ + + +
Index: /irpg/trunk/hits.db =================================================================== --- /irpg/trunk/hits.db (revision 1449) +++ /irpg/trunk/hits.db (revision 1449) @@ -0,0 +1,17 @@ +contact.php 4043 Apr 22, 2003 +db.php 6058 Jun 13, 2003 +index.php 67338 Apr 22, 2003 +playerview.php 144703 Apr 5, 2004 +players.php 52171 Apr 5, 2004 +source.php 13036 Apr 5, 2004 +sitesource.php 7956 Apr 5, 2004 +others.php 13649 Apr 5, 2004 +donate.php 1333 Apr 5, 2004 +donated.php 4 Apr 6, 2004 +forum.php 1799 Jul 13, 2004 +quest.php 349 Jul 13, 2004 +worldmap.php 327 Jul 13, 2004 +1 Jul 15, 2004 +g7.css 1 Jul 15, 2004 +idlerpg.png 1 Jul 15, 2004 +1 Jan 10, 2006 Index: /irpg/trunk/idlerpg-adv.txt =================================================================== --- /irpg/trunk/idlerpg-adv.txt (revision 1449) +++ /irpg/trunk/idlerpg-adv.txt (revision 1449) @@ -0,0 +1,142 @@ +#!/usr/bin/perl -w +# idlerpg-adv (11-22-2003) by daxxar (http://mental.mine.nu) +# Usage: ./idlerpg-adv.pl [playernames] +# +# Call this script from the command line, or your login profile. +use strict; +use LWP::Simple; + +# Use cookies: +# %user - username, %class - class, %level - level, +# %next - time to next level, %status - online status, +# %uhost - nick!ident@host, %ca - created at, +# %llo - last logged on, %ti - total idletime, +# %items - list of items, %penalties - list of penalties (special; multiline) +# +# Each comma-separated element is printed with a newline at the end :) + +my @string = ( + '[User] %user', '[Class] %class', '[Level] %level', '[Next level] %next', + '[Status] %status', '[User@host] %uhost', '[Created at] %ca', + '[Last logged on] %llo', '[Total idle] %ti', '[Items] %items', + '[Penalties] %penalties' + ); + +### No need to change below ### +# For printing things in a columnized view +# print_col(\@list_of_entries, \@value_of_entries, $number_per_line) +sub make_col { + my $entryname = shift; + my $entryvalue = shift; + my $count = shift; + my @len; + my $ret; + # Find maximum length for each of the $count columns + for my $x (0 .. $#{$entryvalue}) { + my $col = $x % $count; + if (!defined($len[$col]) || $len[$col] < length($entryvalue->[$x] . $entryname->[$x])) { + $len[$col] = length("$entryvalue->[$x]"."$entryname->[$x]"); + } + } + for my $t (0 .. $#$entryvalue) { + if (!($t % $count)) { $ret .= "\n "; } + $ret .= "$entryname->[$t]\($entryvalue->[$t]\)"; + $ret .= ' ' x ($len[$t % $count] - length($entryname->[$t] . $entryvalue->[$t]) + 1); + } + return $ret; +} +sub time_to { + my @timeunits = ('yr', 'month', 'week', 'day', 'hr', 'min', 'sec'); + my @timecalc = (31104000, 2592000, 604800, 86400, 3600, 60, 1); + my $seconds = shift; my $output; + if ($seconds == 0) { return "0 seconds"; } + for my $x (0 .. $#timecalc) { + my $y = int($seconds / $timecalc[$x]); + if ($y != 0 && $seconds != 0 && $seconds >= $timecalc[$x]) { + $seconds = ($seconds % $timecalc[$x]); + $output .= "$y $timeunits[$x]"; + $output .= 's' unless $y == 1; + if ($seconds == 0) { last; } + $output .= ', ' if $x < $#timecalc - 1 && ($seconds % $timecalc[$x+1]) && $seconds != 0; + $output .= ' and ' if !($seconds % $timecalc[$x+1]); + } + } + return $output; +} +sub time_from { + my $seconds = shift; + my ($sec, $min, $hr, $day, $mo, $yr, $wday) = localtime($seconds); + $mo = ('Jan', 'Feb', 'Mar', 'Apr', 'May', 'Jun', 'Jul', 'Aug', 'Oct', 'Sep', 'Nov', 'Dec')[$mo]; + $wday = ('Sun', 'Mon', 'Tue', 'Wed', 'Thu', 'Fri', 'Sat')[$wday]; + $yr += 1900; + if ($hr < 10) { $hr = "0$hr"; } + if ($min < 10) { $min = "0$min"; } + if ($sec < 10) { $sec = "0$sec"; } + if ($day < 10) { $day .= ' '; } + return "$wday $mo $day $hr:$min:$sec $yr"; +} +die "Usage: $0 \n" . + "Example: $0 daxxar cyb\n" if @ARGV == 0; + +start: +my $username = shift(@ARGV); +my $page = get "http://jotun.ultrazone.org/g7/dump.php?player=$username"; + +# Only line is commented if there is no such user +if ($page =~ /^#[^\n]+$/) { print "$username: no such user\n"; exit 1; } +($page) = ($page =~ /\n([^#].*)/); # Remove the comment + +# @ent = entries on page, \t separated. +my @ent = split(/\t/, $page); + +# Assign each tab-separated entry to its hash-key +my %values = ( + 'user' => $ent[0], 'level' => $ent[1], + 'class' => $ent[2], 'next' => $ent[3], + 'host' => $ent[4], 'status' => $ent[5], + 'totalidle'=> $ent[6], 'created'=> $ent[14], + 'lastlog' => $ent[15], + 'penaltynames' => [ qw(msg nick part kick quit quest logout) ], + 'penaltytimes' => [ @ent[7 .. 13] ], + 'itemnames' => [ qw(amulet charm helm boots gloves ring leggings shield tunic weapon sum) ], + 'itemlvls' => [ @ent[16 .. 25] ] +); +$values{'next'} = time_to ($values{'next'}); +$values{'totalidle'} = time_to ($values{'totalidle'}); +$values{'lastlog'} = time_from($values{'lastlog'}); +$values{'created'} = time_from($values{'created'}); +if ($values{'status'}) {$values{'status'} = 'Online'} +else {$values{'status'} = 'Offline'} + +foreach my $str (@{[ @string ]}) { + $str =~ s/%user/$values{'user'}/g; + $str =~ s/%class/$values{'class'}/g; + $str =~ s/%level/$values{'level'}/g; + $str =~ s/%next/$values{'next'}/g; + $str =~ s/%status/$values{'status'}/g; + $str =~ s/%uhost/$values{'host'}/g; + $str =~ s/%ca/$values{'created'}/g; + $str =~ s/%llo/$values{'lastlog'}/g; + $str =~ s/%ti/$values{'totalidle'}/g; + if ($str =~ /%penalties/) { + my @penaltyname = qw(msg nick part kick quit quest logout); + my @penaltytime = @ent[7 .. 13]; + for my $t (0 .. $#penaltytime) { $penaltytime[$t] = time_to($penaltytime[$t]); } + my $cols = make_col(\@penaltyname, \@penaltytime, 3); + $str =~ s/%penalties/$cols/g; + } + if ($str =~ /%items/) { + my @itemname = qw(amulet charm helm boots gloves ring leggings shield tunic weapon sum); + my @itemlvls = @ent[16 .. 25]; + # Yay, lets get a nice sum(sum) in output! :D + my $sum; map($sum += $_, @itemlvls); + my $cols = make_col(\@itemname, [ @itemlvls, $sum ], 3); + $str =~ s/%items/$cols/g; + } + $str =~ s///g; + $str =~ s///g; + print "$str\n"; +} + +print "\n" if @ARGV != 0; +goto start if @ARGV != 0; Index: /irpg/trunk/index.php =================================================================== --- /irpg/trunk/index.php (revision 1449) +++ /irpg/trunk/index.php (revision 1449) @@ -0,0 +1,552 @@ + +

IRPG

+ +

Le Idle RPG (Jeux de rôle où l'on reste inactif) est un JdR + ou les joueurs ne font RIEN. En plus de gagner des niveaux, ils + peuvent trouver des objets, combattre les uns contres les autres et + tout cela sans rien faire : le bot se charge de tout ! En fait, si vous + tentez de faire quelque chose cela vous pénalisera... on vous a + demandé d'être I-NAC-TIF et d'admirer (ou pas). Il n'y + a pas de professions prédéfinies de personnage. Vous + pouvez appeler votre personnage comme bon vous semble et lui donner la + profession de votre choix.

+ +

Lieu

+ +

Le Idle RPG est jouable sur IRC, sur Le + reseau NetRusk dans le salon #zzz.

+ + +

Enregistrement

+ +

Pour s'enregistrer, c'est simple :

+ + + /msg REGISTER <pseudo> <mot de passe> + <profession> + + +

Où : +

    +
  • 'pseudo' peut atteindre 16 caractères,
    • +
  • 'mot de passe' : 8
    • +
  • et votre 'profession' peut monter jusqu'à 30.
    • +
+

+ + +

Connexion

+ +

Pour se connecter :

+ + + /msg LOGIN <pseudo> <mot de passe> + + +

Il s'agit d'une commande p0 (voir les pénalités).

+ + +

Déconnexion

+ +

Pour se déconnecter :

+ + + /msg LOGOUT + + +

Il s'agit d'une commande p20 (voir les pénalités).

+ + +

Changer de mot de passe

+ +

Pour changer de mot de passe :

+ + + /msg NEWPASS <nouveau mot de passe> + + +

Il s'agit d'une commande p20 (voir les pénalités).

+ +

Si vous avez oublié votre mot de passe, veuillez + utiliser la commande INFO pour trouver un admin + connecté qui pourra vous aider.

+ + +

Supprimer son compte

+ +

Pour supprimer son compte (une fois connecté) :

+ + + /msg REMOVEME + + +

Il s'agit d'une commande p0 (voir les pénalités). :o)

+ + +

Changer de coté

+ +

Pour changer de coté :

+ + + /msg ALIGN <good|neutral|evil> + + +

Il s'agit d'une commande p0 (voir les pénalités).

+ +

'Good' correspond aux braves, 'neutral' aux nain-déci et + 'evil' aux sadiques. Votre coté va affecter certains aspects du + jeu. +

    + +
  • Ainsi les braves ont 10% supplémentaire à leur + équipement lors des combats et 1/12 de chance chaque + jour qu'avec un ami brave ils reçoivent la + lumière de Schlavbeuk sur eux. Ce qui les + accélérera de 5-12% vers le prochain niveau.
    • +
  • Les sadiques ont un malus de 10% sur leur équipement + (jamais oublier dans les grand moment de solitude) mais ont 1/8 + de chance chaque jour de : +
      +
    • essayer de voler une arme à un brave (qu'ils ne peuvent que + haïr),
      • + +
    • être oublier par Schlavbeuk (1 à 5% du temps + avant le prochain niveau). Après tout on sait tous que le crime + ne paye pas !
      • + +
    • +
  • Les nain- décis n'ont rien de changé (mais peuvent se + faire taper) et tous les joueurs commencent nain- déci.
    • +
+ + De plus, les braves ont 1/50 de chance de faire un + coup critique et les sadiques 1/20.

+ + +

Obtenir des informations sur le bot

+ +

Pour obtenir quelques informations basiques :

+ + + /msg INFO + + +

Il s'agit d'une commande p0 (voir les pénalités).

+ +

Cette commande vous informe entre autre sur quel serveur il est + connecté et le nom des admins en ligne.

+ + + +

Les niveaux

+ +

Pour gagner des niveaux, il suffit d'être connecté + et de "glander". le temps entre les niveaux est calculé + à partir du niveau de votre personnage selon la formule suivante + :

+ + 60*(1.16^VOTRE_NIVEAU) + +

Ou ^ représente l'opérateur exponentiel.

+ +

Les très hauts niveaux sont calculés + différemment. Ainsi les personnages de niveau supérieur + à 60 gagnent leur prochain niveau suivant la formule : + + (temps pour arriver à 60) + ((1 jour) * (niveau - 60)) + +

La méthode exponentielle fait que les niveaux prendraient + beaucoup trop de temps à être atteint.

+ + +

Vérifier les quêtes actives

+ +

Pour connaître les quêtes actives, les joueurs et le + temps restant :

+ + + /msg QUEST + + +

Il s'agit d'une commande p0 (voir les pénalités).

+ + +

Vérifier son statut "En ligne"

+ +

Pour vérifier que vous êtes connecté :

+ + + /msg WHOAMI + + +

Il s'agit d'une commande p0 (voir les pénalités).

+ + +

Pénalités

+ + +

Si vous faites quoi que ce soit sur le salon (comme : partir du + salon, quitter IRC, parler, changer de pseudo ou faire des notices sur le + salon) vous serez pénalisé. Il s'agit d'une + duré en seconde qui va s'ajouter au temps qu'il vous fallait + attendre avant le prochain niveau. Il est basé sur votre niveau + et les formules sont les suivantes :

+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
Changer de pseudo30*(1.14^(VOTRE_NIVEAU))
Partir200*(1.14^(VOTRE_NIVEAU))
Quitter IRC20*(1.14^(VOTRE_NIVEAU))
Utiliser la commande LOGOUT20*(1.14^(VOTRE_NIVEAU))
Etre "kické"250*(1.14^(VOTRE_NIVEAU))
Parler[taille du message]*(1.14^(VOTRE_NIVEAU))
Faire un notice[taille du message]*(1.14^(VOTRE_NIVEAU))
+
+ +

Ainsi un personnage de niveau 25 changeant son pseudo se verra + pénalisé de 20*(1.14^25)=793 secondes.

+ +

L'abréviation pour les pénalités et de type + p[num]. Ainsi changer de pseudo est un p30, partir du salon un p200, + etc...

+ + +

Objets

+ +

A chaque fois que vous gagnez un niveau, vous trouvez un objet. La + valeur de celui-ci peut monter jusqu'à 1.5*VOTRE_NIVEAU (à + moins que vous tombiez sur objet unique). Il + y a 10 sortes d'objets : +

    +
  • les armes de bourrin,
    • +
  • les armes de sniper,
    • +
  • les runes de vie,
    • +
  • les runes de force,
    • +
  • les runes de précision,
    • +
  • les runes d'intelligence,
    • +
  • les véhicules,
    • +
  • les bouffes,
    • +
  • les inutiles et
    • +
  • les jouets de Schlavbeuk.
    • +
+ + Vous pouvez porter un objet de chaque type. Si vous trouvez un + objet de niveau supérieur à celui que vous portez, + vous jetez l'ancien et prenez le nouveau, sinon vous + délaissez l'objet. Vous pouvez obtenir la liste des objets + que vous portez (et des autres) ici

+ +

Comme vous pouvez vous en doutez, la probabilité de trouver + un objet de "gros bill" est plus faible qu'un objet de valeur + raisonnable. Voici la "formule" exacte :

+ + + pour chaque 'nombre' de 1 à VOTRE_NIVEAU*1.5
+   vous avez 1 / ((1.4)^nombre) de chance de trouver un objet de ce niveau
+ fin de pour + + +

La probabilité de tomber sur chaque type d'objet est + égale.

+ + + +

Batailles

+ +

Quand vous gagnez un niveau, si celui-ci est inférieur à + 25, vous avez 25% de chance de défier quelqu'un. S'il est + supérieur à 25, vous combattrez à chaque fois. + Votre adversaire sera choisi au hasard parmi les + personnages connectés. Si il n'y a plus personne de + connecté vous ne vous battrez pas (c'est pas Fight Club ici + !). Dans le cas où vous combattez, voici + comment est décidée la victoire :

+ +
    +
  • La somme de tous vos objets est calculée.
    • +
  • La somme de objets de votre adversaire est calculée.
    • +
  • Un nombre choisi au hasard entre 0 et votre somme est + tiré.
    • +
  • Un nombre choisi au hasard entre 0 et sa somme est + tiré.
    • +
  • Celui qui a la plus grosse a gagné ;-)
    • +
+ +

Si vous gagnez, votre temps avant le prochain niveau est + diminué suivant le niveau de votre adversaire selon la formule + :

+ + + ((le plus grand entre (NIVEAU_ADVERSAIRE/4) et 7) / 100) * + TEMPS_AVANT_PROCHAIN_NIVEAU + + +

Cela signifie que vous ne pouvez pas gagner plus de 7% de votre temps + avant le prochain niveau. Quand vous gagnez, votre adversaire n'est + pas pénalisé, à moins que vous ayez fait un + coup critique.

+ +

Si vous perdez, vous êtes pénalisé. La + pénalité est calculée suivant la formule :

+ + + ((le plus grand entre (NIVEAU_ADVErSAIRE/4) et 7) / 100) * + TEMPS_AVANT_PROCHAIN_NIVEAU + + +

Cela signifie que vous ne pouvez pas avoir une pénalité + de plus de 7% de votre temps avant le prochain niveau. Quand vous + perdez votre adversaire n'est jamais récompensé.

+ +

Se battre contre Schlavbeuk est un cas particulier. Dans ce + cas, la somme de objets de dieu est 1+[la plus grande somme de tous les + joueurs]. Le gain en cas de victoire est 20% du temps et de 10% + en cas de défaite.

+ +

Si plus de 15% des joueurs sont de niveau 45 ou plus un joueur parmi + ceux ci va combattre un autre joueur au hasard toute les heures. Ceci afin + d'accélérer les passages des hauts niveaux.

+ +

De plus, il y a un système de carte. Il s'agit d'une carte de + taille 500 x 500 sur laquelle de déplacent les joueurs. + Si vous rencontrez un autre joueur sur la carte vous avez une + probabilité de 1/(NOMBRE_DE_JOUEURS_CONNECTÉS) de le + combattre. Plus d'information sur la carte sont + disponible ici.

+ +

Et encore : un combat remporté peut entraîner le + vol d'un objet.

+ + +

Objets uniques

+ +

Après le niveau 25, vous tomberez parfois sur un objet de + valeur bien supérieur à ce que vous pourriez trouver pour + votre niveau. Il s'agit d'objets uniques qui ont les + caractéristiques suivantes :

+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
NomPlage de valeursNiveau requisProbabilité
Mattt's Omniscience Grand Crown50-7425 ou +1 / 40
Juliet's Glorious Ring of Sparkliness50-7425 ou +1 / 40
Res0's Protectorate Plate Mail75-9930 ou +1 / 40
Dwyn's Storm Magic Amulet100-12435 ou +1 / 40
Jotun's Fury Colossal Sword150-17440 ou +1 / 40
Drdink's Cane of Blind Rage175-20045 ou +1 / 40
Mrquick's Magical Boots of Swiftness250-30048 ou +1 / 40
Jeff's Cluehammer of Doom300-35052 ou +1 / 40
+ +

La Main de Schlavbeuk

+ +

Chaque personnage connecté a (approximativement) 1/20 de chance + par jour d'être affecté par la "Main de Schlavbeuk". Une + MdS peut aider ou freiner votre progression en modifiant de 5 + à 75% votre temps restant. Schlavbeuk étant par + nature bon envers ses sujets, il vous aidera dans 80% des cas + et vous pénalisera dans les 20% restant.

+ +

De plus, les admins peuvent provoquer des MdS selon leur + bon vouloir.

+ + +

Coups critiques

+ +

Si une personne gagne un tournoi, il a 1/35 de chance de faire un coup + critique. Dans ce cas, son adversaire sera pénalisé + suivant la formule :

+ + ((nombre entre 5 et 25) / 100) * TEMPS_AVANT_PROCHAIN_NIVEAU_ADVERSAIRE + +

Ce qui signifie qu'il ne peut pas perdre moins de 5% de son temps et + pas plus de 25%.

+ + +

Combat en équipe

+ +

Chaque heure, il y a 1/4 de chance qu'un combat en équipe + aie lieu. Dans ce cas, 3 joueurs formant une équipe vont combattre + un autre groupe de 3 joueurs. La somme des objets de tous les + membres d'une équipe est calculée et on combat + suivant les règles habituelles. Si le premier groupe gagne, + 20% du temps le plus court parmi ses joueurs est enlevé à + chaque personne de l'équipe. Si le premier groupe perd, 20% du + temps le plus court parmi ses joueurs est ajouté à + l'équipe.

+ + +

Malédictions

+ +

Chaque joueur a (approximativement) 1/8 de chance par jour + d'être touché par une malédiction. Il s'agit d'une + grande malchance qui peut : + +

    +
  • vous ralentir de 5 à 12% de votre temps
    • +
  • diminuer un de vos objets de 10%
    • +
+

+ + +

Bénédiction

+ +

Chaque joueur a (approximativement) 1/8 de chance par jour + d'être touché par une bénédiction. Il s'agit + d'un grand instant de bonheur qui peut : + +

    +
  • vous accélérer de 5 à 12% de votre temps
    • +
  • augmenter un de vos objets de 10%
    • +
+

+ + +

Quêtes

+ +

Lors d'une quête, 4 joueurs connectés depuis plus de 10 + heures parmi ceux de niveau 40 et plus sont choisis pour + représenter et assister le royaume. Si tous les quatre arrivent + à la fin de la quête, chacun gagne 25% de son temps (le + temps à la fin de la quête). Pour terminer une quête, + personne ne devra prendre de pénalité. Il y a deux types de + quêtes : + +

    +
  • Les quêtes basées sur la carte
    • +
  • Les quêtes basées sur le temps
    • +
+ + Les quêtes de temps durent entre 12 et 24 heures.
+ + Les quêtes de carte se rapportent à la carte et n'ont pas de limite de temps pour être + terminée. Les personnages impliqués dans la quête + doivent passer par certains endroits pour la terminer.
+ + Si une quête est interrompue, TOUS les joueurs en + ligne ont une pénalité p15 comme punition.

+ + +

La carte

+ +

La carte est une grille de 500 x 500 points sur laquelle + évoluent les joueurs. Chaque secondes, chaque personnage + à une probabilité équivalente de se déplacer + verticalement et horizontalement (ou pas). Si vous arriver sur la case + d'un autre joueur il y a 1/(NOMBRE_JOUEURS_CONNECTÉS) chance qu'un + combat s'en suive. Les règles habituelles s'appliquent alors.

+ +

Certaine quête demande que les joueurs atteignent un point + précis sur la carte. Dans la lignée de ce JdR, le voyage + est fait pour vous. Votre personnage va se déplacer + automatiquement dans la bonne direction, mais plus lentement qu'en + temps normal (afin d'éviter les accidents bien sur. Vous + ne voudriez pas tomber et donner une pénalité p15 + à l'ensemble du royaume !).

+ + +

Vol d'objets

+ +

A la fin de chaque bataille, si l'attaquant gagne, il y a un peu + moins de 2% de chance de voler un objet à son adversaire. + Seul les objets de valeur supérieure peuvent être + volé et l'ancien objet de l'attanquant est donnée + à la victime par pitié.

+ + + +

Crédits

+ +

Des grands mercis au créateur de la carte de la version 3.0, + res0 and Jeb! Le jeu ne serait vraiment pas la même chose sans + vous.

+ +

Le jeu IRPG ne serait pas possible dans l'aide de nombreuses + personnes. Merci beaucoup à jwbozzy, yawnwraith, Tosirap, + res0, dwyn, Parallax, protomek, Bert, clavicle, drdink, jeff, rasher, + Sticks, Nerje, Asterax, emad, inkblot(!), schmolli, mikegrb, mumkin, + sean, Minhiriath, and Dan. Malheureusement la liste est devenue trop + pour être maintenue. On trouvera plus de contributions dans le ChangeLog.

+ + + + Index: /irpg/trunk/lang =================================================================== --- /irpg/trunk/lang (revision 1449) +++ /irpg/trunk/lang (revision 1449) @@ -0,0 +1,1 @@ +link ../bot/lang/ Index: /irpg/trunk/makemap.php =================================================================== --- /irpg/trunk/makemap.php (revision 1449) +++ /irpg/trunk/makemap.php (revision 1449) @@ -0,0 +1,60 @@ + 500) { + $stringx = $x - ((strlen($user)+1)*$width)-12; + } + if ($y+$height > 500) { + $stringy = $y - ($height/2)-2; + } + $magenta = imageColorAllocate($map,255,0,255); + imageColorTransparent($map,$magenta); + $brown = imagecolorallocate($map, 102, 51, 0); + $parchment = imagecolorallocate($map, 255, 255, 204); + + // Avoid drawing a brown dot on a brown area + $rgb = imageColorAt($map, $x, $y); + if ($rgb > 0) { // $rgb is 0 on our parchment-colored areas + $temp = $brown; + $brown = $parchment; + $parchment = $temp; + } + // YOU ARE HERE + imageFilledEllipse($map, $x, $y, 6, 6, $brown); + // background for text + imageFilledRectangle($map,$stringx+6,$stringy-($height/2),$stringx+6+$width*(strlen($user)+1),$stringy+($height/2),$brown); + // text itself + imageString($map,5,$stringx+7+($width/2),$stringy-($height/2)-1,$user,$parchment); + } + header("Content-type: image/png"); + imagePNG($map); + imageDestroy($map); +?> Index: /irpg/trunk/makequestmap.php =================================================================== --- /irpg/trunk/makequestmap.php (revision 1449) +++ /irpg/trunk/makequestmap.php (revision 1449) @@ -0,0 +1,79 @@ + Index: /irpg/trunk/makeworldmap.php =================================================================== --- /irpg/trunk/makeworldmap.php (revision 1449) +++ /irpg/trunk/makeworldmap.php (revision 1449) @@ -0,0 +1,39 @@ + Index: /irpg/trunk/players.php =================================================================== --- /irpg/trunk/players.php (revision 1449) +++ /irpg/trunk/players.php (revision 1449) @@ -0,0 +1,34 @@ + + +

Les joueurs

+

Cliquez sur un joueur pour voir son profil complet

+

[gris=déconnecté]

+
    +".htmlentities($user). + ", le $class de niveau $level. Prochain niveau dans $next_level.\n"; + + } +?> +
+ +

La liste des joueurs dans un tableau.

+ + Index: /irpg/trunk/playerview.php =================================================================== --- /irpg/trunk/playerview.php (revision 1449) +++ /irpg/trunk/playerview.php (revision 1449) @@ -0,0 +1,157 @@ +Fiche de personnage"; + $file = fopen($irpg_db,"r"); + fgets($file,1024); // skip top comment + $found=0; + while ($line=fgets($file,1024)) { + if (substr($line,0,strlen($_GET['player'])+1) == $_GET['player']."\t") { + list($user,,$isadmin,$level,$class,$secs,,$uhost,$online,$idled, + $x,$y, + $pen['mesg'], + $pen['nick'], + $pen['part'], + $pen['kick'], + $pen['quit'], + $pen['quest'], + $pen['logout'], + $created, + $lastlogin, + $item['amulet'], + $item['charm'], + $item['helm'], + $item['boots'], + $item['gloves'], + $item['ring'], + $item['leggings'], + $item['shield'], + $item['tunic'], + $item['weapon'], + $alignment, + ) = explode("\t",trim($line)); + $found=1; + break; + } + } + if (!$found) echo "

Erreur

Utilisateur inconnu.

\n"; + else { + $class=htmlentities($class); + /* if we htmlentities($user), then we cannot use links with it. */ + echo "

Pseudo : ".htmlentities($user)."
\n". + " Profession : $class
\n". + " Admin ? : ".($isadmin?"Oui":"Non")."
\n". + " Niveau : $level
\n". + " Prochain niveau : ".duration($secs)."
\n". + " Statut : ".($online?"C":"Déc")."onnecté
\n". + " Host : ".($uhost?$uhost:"Unknown")."
\n". + " Date de création : ".strftime($dateformat,$created)."
\n". + " Derniè connexion : ".strftime($dateformat,$lastlogin)."
\n". + " Temps d'inactivé total: ".duration($idled)."
\n". + " Position : [$x,$y]
\n". + " Coté : ".($alignment=='e'?"Sadique":($alignment=='n'?"Nain-déci":"Brave"))."
\n". + " XML: [link]

\n". + "

Carte

\n". + " ".($showmap?"
\n\n":"

Voir la carte

\n\n")."". + "

Equipement

\n

"; + ksort($item); + $sum = 0; + foreach ($item_order as $key) { + $val = $item[$key]; + $uniquecolor="#be9256"; + if ($key == "helm" && substr($val,-1,1) == "a") { + $val = intval($val)." [Mattt's Omniscience Grand Crown]"; + } + if ($key == "tunic" && substr($val,-1,1) == "b") { + $val = intval($val)." [Res0's Protectorate Plate Mail]"; + } + if ($key == "amulet" && substr($val,-1,1) == "c") { + $val = intval($val)." [Dwyn's Storm Magic Amulet]"; + } + if ($key == "weapon" && substr($val,-1,1) == "d") { + $val = intval($val)." [Jotun's Fury Colossal Sword]"; + } + if ($key == "weapon" && substr($val,-1,1) == "e") { + $val = intval($val)." [Drdink's Cane of Blind Rage]"; + } + if ($key == "boots" && substr($val,-1,1) == "f") { + $val = intval($val)." [Mrquick's Magical Boots of Swiftness]"; + } + if ($key == "weapon" && substr($val,-1,1) == "g") { + $val = intval($val)." [Jeff's Cluehammer of Doom]"; + } + if ($key == "ring" && substr($val,-1,1) == "h") { + $val = intval($val)." [Juliet's Glorious Ring of Sparkliness]"; + } + echo " ".htmlentities(ucfirst(gettext($key)))." : $val
\n"; + $sum += $val; + } + echo "
\n somme: $sum
\n". + "

". + "

Pénalités

\n". + "

\n"; + + ksort($pen); + $sum = 0; + foreach ($pen as $key => $val) { + echo " $key: ".duration($val)."
\n"; + $sum += $val; + } + echo "
\n total: ".duration($sum)."

\n"; + + $file = fopen($irpg_mod,"r"); + $temp = array(); + while ($line=fgets($file,1024)) { + if (strstr($line," ".$_GET['player']." ") || + strstr($line," ".$_GET['player'].", ") || + substr($line,0,strlen($_GET['player'])+1) == + $_GET['player']." " || + substr($line,0,strlen($_GET['player'])+3) == + $_GET['player']."'s ") { + array_push($temp,$line); + } + } + fclose($file); + if (!is_null($temp) && count($temp)) { + echo('

'); + echo $_GET['allmods']!=1?"Dernières ":""; + echo('Modifications d\'Horlorge

'); + if ($_GET['allmods'] == 1 || count($temp) < 6) { + foreach ($temp as $line) { + $line=htmlentities(trim($line)); + echo " $line
\n"; + } + echo "
\n"; + } + else { + end($temp); + for ($i=0;$i<4;++$i) prev($temp); + for ($line=trim(current($temp));$line;$line=trim(next($temp))) { + $line=htmlentities(trim($line)); + echo " $line
\n"; + } + } + } + if ($_GET['allmods'] != 1 && count($temp) > 5) { +?> +
+ [Voir toutes les modifications ()] +

+ + Index: /irpg/trunk/quest.php =================================================================== --- /irpg/trunk/quest.php (revision 1449) +++ /irpg/trunk/quest.php (revision 1449) @@ -0,0 +1,99 @@ +Quête en cours\n"; + include("commonfunctions.php"); + $file = fopen($irpg_qfile,"r"); + $type=0; + while ($line=fgets($file,1024)) { + $arg = explode(" ",trim($line)); + if ($arg[0] == "T") { + unset($arg[0]); + $text = implode(" ",$arg); + } + elseif ($arg[0] == "Y") { + $type = $arg[1]; + } + elseif ($arg[0] == "P") { + $p1[0] = $arg[1]; + $p1[1] = $arg[2]; + $p2[0] = $arg[3]; + $p2[1] = $arg[4]; + } + elseif ($arg[0] == "S") { + if ($type == 1) $time = $arg[1]; + elseif ($type == 2) $stage = $arg[1]; + } + elseif ($arg[0] == "P1") { + $player[1]['name'] = $arg[1]; + if ($type == 2) { + $player[1]['x'] = $arg[2]; + $player[1]['y'] = $arg[3]; + } + } + elseif ($arg[0] == "P2") { + $player[2]['name'] = $arg[1]; + if ($type == 2) { + $player[2]['x'] = $arg[2]; + $player[2]['y'] = $arg[3]; + } + } + elseif ($arg[0] == "P3") { + $player[3]['name'] = $arg[1]; + if ($type == 2) { + $player[3]['x'] = $arg[2]; + $player[3]['y'] = $arg[3]; + } + } + elseif ($arg[0] == "P4") { + $player[4]['name'] = $arg[1]; + if ($type == 2) { + $player[4]['x'] = $arg[2]; + $player[4]['y'] = $arg[3]; + } + } + } + if (!$type) { + echo "

Désolé, il n'y a aucune quête actuellement.

\n"; + } + else { + echo "

Quête : A $text.

\n"; + if ($type == 1) { + echo "

Temps restant : ".duration($time-time()). + "

\n"; + } + elseif ($type == 2) { + if ($stage == 1) { + echo "

Destination actuelle : [$p1[0],$p1[1]]

\n"; + } + else { + echo "

Destination actuelle : [$p2[0],$p2[1]]

>\n"; + } + } + for ($i=1;$i<=4;$i++) { + echo "

Participant $i : ".htmlentities($player[$i]['name']). + "
\n"; + if ($type == 2) { + echo " Position : [".$player[$i]['x'].",".$player[$i]['y']."]

\n"; + } + else echo "
\n"; + } + if ($type == 2) { + echo "

Carte :

\n". + "

[Les participant sont en bleu et leur destination en rouge]

\n". + "
\"Carte
\n". + " \n"; + + for ($i=1;$i<=4;$i++) { + echo " \"".htmlentities($player[$i]['name']).\n"; + } + echo " \n"; + } + else echo "
\n"; + } + echo "
\n"; + include("footer.php"); +?> Index: /irpg/trunk/worldmap.php =================================================================== --- /irpg/trunk/worldmap.php (revision 1449) +++ /irpg/trunk/worldmap.php (revision 1449) @@ -0,0 +1,34 @@ + + +

Carte du monde

+

[Les joueurs offline sont en rouge, les online en bleu, les objets normaux en orange et les objets uniques en jaune]

+ + +
+ Carte du monde de IdleRPG + +\n"; + } + while ($line=fgets($itemfile,1024)) { + list($x,$y,$type,$level) = explode("\t",trim($line)); + print " \"".htmlentities($type."\n"; + } + fclose($file); +?> + +
+ + Index: /irpg/trunk/xml.php =================================================================== --- /irpg/trunk/xml.php (revision 1449) +++ /irpg/trunk/xml.php (revision 1449) @@ -0,0 +1,82 @@ +"; +?> + + + + + + + + + + + + + + + $val) { + echo " <$key>$val\n"; + $sum += $val; + } + echo " $sum\n"; +?> + + + $val) { + echo " <$key>$val\n"; + $sum += $val; + } + echo " $sum\n"; +?> + +