1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
alias newss { set %x 1 | sockopen advGames advgames.co.il 80 | .timer 1 9 shownews | .timer 1 10 unset %x | .timer 1 30 remove advGames.txt | .timer 1 30 sockclose * | timer 1 15 amode -m }
on *:SOCKOPEN:advGames:{
if ($sockerr > 0) { echo -a Bad Connecting }
else {
sockwrite -tn advGames GET / HTTP/1.1
sockwrite -tn advGames Host: advgames.co.il
sockwrite -tn advGames Accept: */*
sockwrite -tn advGames Referer: http://advgames.co.il/
sockwrite -tn advGames
}
}
on *:sockread:advGames:{
sockread %advGames
if (*A href=* iswm %advGames) && (*SmallFeature* iswm %advGames) {
write advGames.txt %advGames
}
}
alias shownews {
var %x 1
amode +m
while ($read(advGames.txt,%x)) {
if (%y > 5) { Halt }
{ timer 1 %x amsg »5 55 $gettok($gettok($read(advGames.txt,%x),3,62),1,60) 5Link: 12http://www.advgames.co.il/ $+ $gettok($read(advGames.txt,%x),6,34) 1 | timer 1 6 timers off | set -u120 %flood 1 }
inc %x
}
timer 1 15 amode -m
}
|