Website news

[electro12343]

קוד: בחר הכל

alias xSitec {
  var %a.n = 18
  while (%a.n <= 26) {
    openxSitec %a.n
    inc %a.n
  }
  openxSitec 28
  openxSitec 29

}
alias openxSitec {
  var %sockname = xSitec. $+ $calc($ticks + $1)
  sockopen %sockname www.xSitec.co.il 80
  sockmark %sockname $1
}

on *:SOCKOPEN:xSitec.*:{
  if ($sockerr == 0) {
    var %a = sockwrite -tn $sockname
    %a GET /modules.php?name=Forums&file=viewforum&f= $+ $sock($sockname).mark HTTP/1.1
    %a Host: www.xSitec.co.il
    %a Connection: keep-alive
    %a Accept: */*
    %a User-Agent: Mozilla/4.0 (compatible; MSIE 5.00; Windows xP)
    %a
  }
}
on *:SOCKREAD:xSitec.*:{
  if (!$sockerr) {
    var %var
    sockread %var
    if (*<td class="row1" width="100%"><span class="topictitle"><a href=* iswm %var) {
      if ((($sock($sockname).mark >= 18) && ($sock($sockname).mark < 22)) || ($sock($sockname).mark == 29)) %a.Forum = xSite CZ
      else %a.Forum = xSite CS
      var %a.lnk = $remove($gettok($gettok(%var,8,34),1,59),&amp)
      if ($readini(xSitec.ini,News,$sock($sockname).mark) != %a.lnk) {
        msg #asdasdasda New Post: Forum: %a.Forum / $replace($sock($sockname).mark,22,כללי,23,גאטרים,24,תמיכה,25,ליגות וטורנירים,26,Advanced And Professional,18,כללי,19,גאטרים,20,תמיכה,21,ליגות וטורנירים,28,Teams,29,Advanced And Professional) Title: $gettok($gettok($gettok(%var,11,34),1,60),1,62) Link: www.xSitec.co.il/ $+ %a.lnk
        .writeini xSitec.ini News $sock($sockname).mark %a.lnk   
      }
      sockclose $sockname
    }
  }
}



בבקשה תעזרו לי אני לא מבין מה לא עובד פה לא טוב...

[SinteL]

פתח את הנושא בפורום הנכון ותקרא חוקים:
viewforum.php?f=4