--  ヽ(´□｀。)ﾉ  －【　”Ｗｈａｔ’ｓ　ｔｈｅ　ｐｏｉｎｔ．．！！”　】　#

http.Get("http://www.japaneseemoticons.net/all-japanese-emoticons/", "",
    function(content)
        local emotes = {}

        for emote in content:gmatch("<td>(.-)</td>.-\n") do
            if #emote > 2 then
                table.insert(emotes, emote)
            end
        end

        hook.Add("OnPlayerChat", "jemotes",
            function(ply, str)
                local tbl = chat.AddTimeStamp({})
                table.insert(tbl, ply)
                table.insert(tbl, color_white)
                table.insert(tbl, ": ")

                str = str:gsub("^.", function(c) return c:upper() end)
                str = str:gsub("%l", function(c) return string.char(239, 189, 130 + (c:byte() - 98)) end)
                str = str:gsub("%u", function(c) return string.char(239, 188, 161 + (c:byte() - 65)) end)

                if math.random() > 0.5 then
                    str = str .. "．．"

                    if math.random() > 0.5 then
                        str = str .. "！！"
                        str = str:upper()
                    end
                end

                if math.random() > 0.5 then
                    str = str .. "～"
                end

                str = "【 ” " .. str .. " ” 】"

                if math.random() > 0.5 then
                    table.insert(tbl, table.Random(emotes))
                    table.insert(tbl, " - ")
                    table.insert(tbl, str)
                else
                    table.insert(tbl, str)
                    table.insert(tbl, " - ")
                    table.insert(tbl, table.Random(emotes))
                end

                chat.AddText(unpack(tbl))

                return false
            end
        )
    end
)