Ok, remember to !update and wait 20 seconds before !save then !map mapname

Code:
alias parses { 
  if (!$hget(parses)) { 
    hmake parses 800 
    sockopen parses trick-jumps.lv 80 
  }
  else { hfree parses | hmake parses 800 | sockopen parses trick-jumps.lv 80 }
}
alias parses_r {
  if ($hget(parses)) {
    var %x = 1
    while (%x <= $hget(parses,0).item) {
      .write parses.txt %x $hget(parses,%x).item $crlf
      inc %x
    }
  }
  else { echo -a FAILED ONLINE CONNECTION/OR FILE WASNT UPDATED! }
}

on 1:sockopen:parses:{
  .sockwrite -n parses GET /index.php?site=rekordi HTTP/1.1
  .sockwrite -n parses HOST: trick-jumps.lv
  .sockwrite -n parses $crlf
}

on 1:sockread:parses:{
  if ($sockerr > 0) return 
  var %x | sockread %x
  if ($sockbr == 0)  return 
  if (%x == $null) { return 2 } 
  if (iframe isin %x) || (% isin %x) || (cellpadding isin %x) { return }
  if ($regex(%x,/\b(40|350|100|nogravity.netgames.lv/records)\b/i) == 1) { 
    if (350 isin %x) { var %i $remove(%x,<td,width=350><b>,</b></td>,$chr(32)) | %parses = %i }
    elseif (100 isin %x) { var %k $remove(%x,<td,width=100>,</td>,$chr(32)) | %parses = %parses by %k } 
    elseif (40 isin %x) && (!%ps) { var %l $remove(%x,<td,width=40>,<b>,</b>,</td>,$chr(32)) | %ps = 1 | %parses = %parses FPS %l }
    elseif (40 isin %x) && (%ps) { var %m $remove(%x,<td,width=40>,<b>,</b>,</td>,$chr(32)) | unset %ps | %parses = $instok(%parses,was done in %m,2,32) }
    elseif (records isin %x) { var %n $remove(%x,<td><a href=","><b>Download</b></a></td>) | .hadd parses %parses Link: %n  }
  }
}

on *:TEXT:*:#channel:{ 
  if ($1 == !update) { parses | .remove parses.txt }
  elseif ($1 == !load) {  
    if ($exists(parses.hsh)) { hmake parses 400 | hload parses parses.hsh }
    else { echo -a NOTHING TO LOAD, parses.hsh does not exists }
  }
  elseif ($1 == !map) { 
    var %b2 = $2
    if ($exists(parses.txt)) { 
      var %b = $gettok($read(parses.txt,nw,$+(*,%b2,*)),1,32)
      if (!%b) { /msg #channel Map %b2 has no Record Set }
      else { .timer 1 5 /msg #channel $hget(parses,%b).item $hget(parses,%b).data }
    }
    else { 
      parses_r 
      var %b = $gettok($read(parses.txt,nw,$+(*,%b2,*)),1,32)
      if (!%b) { /msg #channel Map %b2 has no Record Set }
      else { .timer 1 5 /msg #channel $hget(parses,%b).item $hget(parses,%b).data }
    }
  }
  elseif ($1 == !save) { 
    if ($exists(parses.hsh)) { .remove parses.hsh | hsave parses parses.hsh }
    else { hsave parses parses.hsh }
  }
}


I will pm you an address you can come test it on to see it works

Code:
if $reality > $fiction { set %sanity Sane }
Else { echo -a *voices* }