while (1)
  RegWriteDWord("HKLM", "\System\State\Messages\SMS\Unread\", "Count", 0)
  RegWriteDWord("HKLM", "\System\State\Messages\Unread\", "SMS", 0)
Sleep (10000)
EndWhile