PokeMarquee Done

GUICreate("Marquee test",320,240,-1,-1,0x40000)
_GUICtrlCreateMarquee("You stole ma berry!...5,5,150,24,"999999")
GUICtrlSetResizing(-1,1)
_GUICtrlCreateMarquee("Another<br>marquee",5,35,50,150,-1,-1,-1,"up")
GUICtrlSetResizing(-1,1)
GUISetState()

While GUIGetMsg() <> -3
WEnd

Func _GUICtrlCreateMarquee($_MarText,$_MarX,$_MarY,$_MarWidth,$_MarHeight,$_MarBGColor=-1,$_MarLoop=-1,$_MarBehavior=-1,$_MarDirection=-1,$_MarScrollAmount=-1,$_MarScrollDelay=-1)
    Local $_MarString="<marquee width=100% height=100%"
    If $_MarLoop <> -1 Then $_MarString&=" loop="&$_MarLoop
    If $_MarBehavior <> -1 Then $_MarString&=" behavior="&$_MarBehavior
    If $_MarDirection <> -1 Then $_MarString&=" direction="&$_MarDirection
    If $_MarScrollAmount <> -1 Then $_MarString&=" scrollamount="&$_MarScrollAmount
    If $_MarScrollDelay <> -1 Then $_MarString&=" scrolldelay="&$_MarScrollDelay
    $_MarString &= ">"&$_MarText&"</marquee>"
    Local $_marIE = ObjCreate("Shell.Explorer")
    Local $_marReturn = GUICtrlCreateObj($_marIE,$_MarX,$_MarY,$_MarWidth,$_MarHeight)
    $_marIE.navigate("about:blank")
    $_marIE.document.body.topmargin=0
    $_marIE.document.body.leftmargin=0
    $_marIE.document.body.scroll="no"
    $_marIE.document.body.bgcolor=$_MarBGColor
    $_marIE.document.body.innerHTML = $_MarString
    $_marIE=0
    Return $_marReturn
EndFunc