Bold, Underline dan meng-Italic-kan font

Caranya anda buat dahulu sebuah kolom teks yang bisa di edit dan anda masukan behavior ini kedalam teks..:

----------------------------------------------------
property spriteNum, sNum, sMem, k

on new me, s
if ilk(s) = #integer then me.spriteNum = s
me.sNum = sprite(me.spriteNum)
me.sMem = me.sNum.member
return me
end

on enterFrame me
if the controlDown and the clickOn = me.spriteNum and me.sMem.editable = 1 then
s = member(me.sMem).selectedText
t = member(me.sMem).text
if keyPressed("b") and me.k = 0 then
me.k = 1
member(me.sMem).selectedText.fontStyle = me.setStyle(s, "bold")
else if keyPressed("i") and me.k = 0 then
me.k = 1
member(me.sMem).selectedText.fontStyle = me.setStyle(s, "italic")
else if keyPressed("u") and me.k = 0 then
me.k = 1
member(me.sMem).selectedText.fontStyle = me.setStyle(s, "underline")
end if
if the keyPressed = "" then
me.k = 0
end if
else
me.k = 0
end if
end

on setStyle me, sel, sty
if ilk(sty) <> #symbol then sty = symbol(sty)
s = sel.fontStyle
if s.getOne(#plain) <> 0 then s = []
if s.getOne(sty) <> 0 then
s.deleteOne(sty)
else
s.add(sty)
end if
return s
end
----------------------------------------------------

(sumber: www.Augesweb.com)