mIRC Nba Maç skorları

  <strong>; NBA Scoreboard</strong><strong>; orkz @ irc.lv</strong><strong>; pumpuri@gmail.com</strong><strong>alias nba {</strong><strong>  .remove nbalive.txt</strong><strong>  if ($sock(nbalive)) { sockclose nbalive }</strong><strong>  sockopen nbalive www.nba.com 80</strong><strong>}</strong><strong>on *:sockopen:nbalive:{</strong><strong>  sockwrite -n nbalive GET /scores/simpleScoreboard.jsp HTTP/1.1</strong><strong>  sockwrite -n nbalive Host: www.nba.com</strong><strong>  sockwrite -n nbalive Connection: close</strong><strong>  sockwrite -n nbalive $crlf</strong><strong>}</strong><strong>on *:sockread:nbalive:{</strong><strong>  sockread -fn &amp;nbainfo</strong><strong>  breplace &amp;nbainfo 0 10</strong><strong>  breplace &amp;nbainfo 62 10</strong><strong>  bwrite nbalive.txt -1 -1 &amp;nbainfo</strong><strong>}</strong><strong>ON *:sockclose:nbalive: {</strong><strong>  shownbalive</strong><strong>}</strong><strong>alias shownbalive {</strong><strong>  var %lines $lines(nbalive.txt), %i 1, %nbagame 1</strong><strong>  while (%i &lt;= %lines) {</strong><strong>    var %temp = $read(nbalive.txt,%i)</strong><strong>    if (&lt;game isin $read(nbalive.txt,%i)) {</strong><strong>      if (: isin $gettok(%temp,8,34)) {</strong><strong>        var %game_info = ( $+ Starts $gettok(%temp,8,34) $+ )</strong><strong>      }</strong><strong>      elseif (Start of isin $gettok(%temp,8,34)) {</strong><strong>        var %game_info = ( $+ $gettok(%temp,8,34) $+ )</strong><strong>      }</strong><strong>      else {</strong><strong>        if ($gettok(%temp,2,34) == $chr(32)) {</strong><strong>          var %game_info = ( $+ $gettok(%temp,8,34) $+ )</strong><strong>        } </strong><strong>        else {</strong><strong>          var %game_info = ( $+ $gettok(%temp,2,34) left in $gettok(%temp,8,34) $+ )  </strong><strong>        }</strong><strong>      }</strong><strong>    }</strong><strong>    if (&lt;htm isin $read(nbalive.txt,%i)) var %team_= $gettok($gettok(%temp,$numtok(%temp,34),34),4,124) $iif($gettok($gettok(%temp,10,34),9,124) &gt;= 0,$+(04,$v1,))</strong><strong>    if (&lt;vtm isin $read(nbalive.txt,%i)) var %team_= $gettok($gettok(%temp,$numtok(%temp,34),34),4,124) $iif($gettok($gettok(%temp,10,34),9,124) &gt;= 0,$+(04,$v1,))</strong><strong>    if (%game_info) &amp;&amp; (%team_1) &amp;&amp; (%team_2) {</strong><strong>      echo -a %nbagame $+ ) %team_$chr(124) %team_%game_info</strong><strong>      inc %nbagame</strong><strong>      unset %game_info %team_%team_2</strong><strong>    }</strong><strong>    inc %i</strong><strong>  }</strong><strong>  .remove nbalive.txt</strong><strong>}  </strong> /Nba yazdığınızda çalışacaktır. ALINTIDIR.

» Devamını Oku