flyfacebot

--------------------------------------------------
--Flybot pour iChat AFK creer par Flypip.--
--------------------------------------------------

on cMsg(msg, theBuddy)
    tell application "iChat"
        if status is away then
            send msg to theBuddy
        end if
    end tell
end cMsg

using terms from application "iChat"

    on received text invitation theText from theBuddy for theChat
        accept theChat
        set nom to full name of theBuddy
        cMsg("Flybot: Bonjours " & nom & ", Je suis actuellement \"indisponible\", mais vos messages seront pris en compte.  Flypip ", theBuddy)
    end received text invitation

    on message received theMessage from theBuddy for theChat
        cMsg("Flybot: Indisponible. flypip", theBuddy)
    end message received

end using terms from