set ws=WScript.CreateObject("wscript.shell")

wscript.Sleep 3000

do

wscript.Sleep 200

ws.SendKeys "The wonderful game"

wscript.Sleep 200

ws.SendKeys "{enter}"

wscript.Sleep 5000

Loop