בבקשה תעזרו לי אני לא מבין מה לא עובד פה לא טוב...
קוד: בחר הכל
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),&)
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
}
}
}