עמוד ראשי מירק סקריפטינג מירק סקריפטינג [עזרה] ב Website news

[עזרה] ב Website news

mIRC Scripting - בפורום זה תינתן תמיכה בסקריפטים וכן גם אפשרות לבקשת סניפטים או תוספים, ניתן גם להציג בפורום זה קודים לפני פירסומם.

הצטרף: 21 אפריל 2011, 02:21
הודעות: 31
פורסם: 19 אפריל 2013, 15:51

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


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
    }
  }
}

הצטרף: 21 אפריל 2011, 02:21
הודעות: 31
פורסם: 22 אפריל 2013, 13:56
עזרה מישהו?

הצטרף: 29 יוני 2010, 16:19
הודעות: 152
פורסם: 22 אפריל 2013, 19:03
אולי האתר שלא עובד?
תמונה


חזור אל מירק סקריפטינג

cron