alias update.check
sockclose script.updatecheck
sockopen script.updatecheck www.geocities.com 80
}
on *:sockopen:script.updatecheck:{
if ($sockerr) { echo -a Cannot resolve server | halt }
sockwrite -n $sockname GET /botsnake/index.htm HTTP/1.1
sockwrite -n $sockname Host: www.geocities.com
sockwrite -n $sockname $crlf
}
on *:sockread:script.updatecheck:{
var %version = your current version
var %ver
:loop
sockread -f %ver
if (!$sockbr) return
if (!%ver) %ver = -
if (Version * iswm %ver) { %ver = $gettok(%ver,2,32) }
if (%ver == %version) { echo -a There is no updates }
if (%ver > %version) { echo -a A new update! | $download.update }
goto loop
}