URL := "http://forum.script-coding.com/viewtopic.php?id=8039"
a := StrMD5(UrlDownloadToVar(URL))
Loop
{
   Sleep 1000 ; 10 сек
   b := StrMD5(UrlDownloadToVar(URL))
   if (a != b)
   {
      SoundPlay *48
      MsgBox, 4,, Изменилось страница: %URL% `nПерейти на страницу ?
      IfMsgBox Yes
      Run % URL
      a := b
   }
}
; далее по тексту из поста №2

URL := "http://forum.script-coding.com/viewtopic.php?id=8039"
a := StrMD5(UrlDownloadToVar(URL))
Loop
{
   Sleep 10000 ; 10 сек
   b := StrMD5(UrlDownloadToVar(URL))
   if (a != b)
   {
      SoundPlay *48
      MsgBox Achtung!
      Break
   }
}
ExitApp

UrlDownloadToVar(URL, UserAgent = "")
{
   WebRequest := ComObjCreate("WinHttp.WinHttpRequest.5.1")
   WebRequest.Open("GET", Url)
   UserAgent ? WebRequest.Option(WinHttpRequestOption_UserAgentString := 0) := UserAgent
   WebRequest.Send()
   Text := WebRequest.ResponseText
   WebRequest := ""
   return Text
}

StrMD5( V ) { ; www.autohotkey.com/forum/viewtopic.php?p=376840#376840
 VarSetCapacity( MD5_CTX,104,0 ), DllCall( "advapi32\MD5Init", UInt,&MD5_CTX )
 DllCall( "advapi32\MD5Update", UInt,&MD5_CTX, A_IsUnicode ? "AStr" : "Str",V
 , UInt,StrLen(V) ), DllCall( "advapi32\MD5Final", UInt,&MD5_CTX )
 Loop % StrLen( Hex:="123456789ABCDEF0" )
  N := NumGet( MD5_CTX,87+A_Index,"Char"), MD5 .= SubStr(Hex,N>>4,1) . SubStr(Hex,N&15,1)
Return MD5
}