function onLook(cid, thing, position, lookDistance)

            local str = ""

            if not isCreature(thing.uid) then

                    local iname = getItemInfo(thing.itemid)

                    if isPokeball(thing.itemid) then

                            local owner = getItemAttribute(thing.uid, "firstpoke")

                            local pokename = getItemAttribute(thing.uid, "poke")
                            local item = getItemInfo(thing.itemid)
                            str = "You see "..item.article.." "..item.name..".\n"
                            str = str.."It contains "..getArticle(pokename).." "..pokename.." [level "..getItemAttribute(thing.uid, "level").."].\n"

                            if owner and owner ~= getCreatureName(cid) then
                                    str = str.."It belongs to "..owner..".\nIt is a unique item."
                                    doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, str)
                            return false
                            end

                            local boost = getItemAttribute(thing.uid, "boost") or 0
                            local boostshow = ""

                            if boost > 0 then
                                    str = str.."Boost level: +"..boost..".\n"
                            end

                            if getItemAttribute(thing.uid, "nick") then
                                    str = str.."It's nickname is: "..getItemAttribute(thing.uid, "nick")..".\n"
                            end

                            if getItemAttribute(thing.uid, "gender") == SEX_MALE then
                                    str = str.."It is male."
                            elseif getItemAttribute(thing.uid, "gender") == SEX_FEMALE then
                                    str = str.."It is female."
                            else
                                    str = str.."It is genderless."
                            end

                            str = str.."\n--- Status ---"
                            str = str.."\nOffense: "..math.floor(getItemAttribute(thing.uid, "offense")).." Defense: "..math.floor(getItemAttribute(thing.uid, "defense")).."\n"
                            str = str.."Agility: "..math.floor(getItemAttribute(thing.uid, "speed")).." Sp. Attack: "..math.floor(getItemAttribute(thing.uid, "specialattack")).."\n"
                            str = str.."Vitality: "..math.floor(getItemAttribute(thing.uid, "vitality"))..""

                    doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, str)

                    return false

                    elseif string.find(iname.name, "fainted") or string.find(iname.name, "defeated") then

                            str = "You see a "..string.lower(iname.name).." ["..getItemAttribute(thing.uid, "level").."].\n"

                            if getItemAttribute(thing.uid, "gender") == SEX_MALE then
                                    str = str.."It is male."
                            elseif getItemAttribute(thing.uid, "gender") == SEX_FEMALE then
                                    str = str.."It is female."
                            else
                                    str = str.."It is genderless."
                            end
                            doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, str)

                    return false

                    else

                    return true

                    end
            end

            local npcname = getCreatureName(thing.uid)
            local l = string.len(npcname)
                    if not isPlayer(thing.uid) and not isMonster(thing.uid) then
                            --string.sub(npcname, l - 1, l) == "  " then
                            local article = getPlayerStorageValue(thing.uid, 9891) == 1 and "He is" or "She is"
                            local nname = string.sub(npcname, 1, l - 2)
                            --local plvl = getCreatureLevel(thing.uid, 88995)
                            if nname == getCreatureName(cid) then
                                    nname = "yourself"
                                    article = "You are"


                            end
                            str = "You see "..nname..". "..article.." a pokemon trainer"
                            doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, str)
                    return false
            elseif isPlayer(thing.uid) and cid == thing.uid then
            local city = getPlayerTown(cid)
            local cityname = getTownName(city)
            str = "You see Yourself. You are a "..getVocationInfo(getPlayerVocation(cid)).name.." from "..cityname..", Level: ("..getPlayerLevel(cid)..")."
            doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, str)
            return false
            elseif isPlayer(thing.uid) and cid ~= thing.uid then
            str = "You see "..getCreatureName(thing.uid)..","
            if getPlayerSex(thing.uid) == 0 then
            str = str.." She is a"
            else
            str = str.." He is a"
            end
            if getPlayerVocation(thing.uid) > 3 then
            str = str.." "..getVocationInfo(getPlayerVocation(thing.uid)).name..""
            else
            str = str.." Pokemon Trainer"
            end
            local city = getPlayerTown(cid)
            local cityname = getTownName(city)
            str = str.." from "..cityname..", Level: ("..getPlayerLevel(thing.uid)..")."
            doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, str)
            return false
        end

            if not isMonster(thing.uid) then
            return true
            end

            if getCreatureName(thing.uid) == "Evolution" then return false end

            if not isSummon(thing.uid) then
                    local str = "You see a wild "..string.lower(getCreatureName(thing.uid)).." [level "..getPokemonLevel(thing.uid).."].\n"
                    if getPokemonGender(thing.uid)  == SEX_MALE then
                            str = str.."It is male."
                    elseif getPokemonGender(thing.uid)  == SEX_FEMALE then
                            str = str.."It is female."
                    else
                            str = str.."It is genderless."
                    end
                    doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, str)
            return false
            elseif isSummon(thing.uid) and not isPlayer(thing.uid) then

                    local boostlevel = getItemAttribute(getPlayerSlotItem(getCreatureMaster(thing.uid), 8).uid, "boost") or 0
                    local boostshow = " + "..boostlevel.."]"

                    if showBoostSeparated then
                            boostshow = "] [+"..boostlevel.."]"
                    end

                    local levelinfo = "["..getPokemonLevel(thing.uid)..""..boostshow..""

                    if getCreatureMaster(thing.uid) == cid then
                            local myball = getPlayerSlotItem(cid, 8).uid
                            local nexp = getItemAttribute(myball, "nextlevelexp")

                            local string = "You see your "..string.lower(getCreatureName(thing.uid)).." "..levelinfo.."."
                            string = string.."\nHit points: "..getCreatureHealth(thing.uid).."/"..getCreatureMaxHealth(thing.uid).."."
                            string = string.."\n"..getPokemonHappinessDescription(thing.uid)
                                    if getItemAttribute(myball, "level") <= 99 then
                                            string = string.."\nExperience needed to level up: "..nexp.."."
                                    end
                            doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, string)
                    else
                            doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You see a "..string.lower(getCreatureName(thing.uid)).." "..levelinfo..".\nIt belongs to "..getCreatureName(getCreatureMaster(thing.uid))..".")
                    end


            return false
            end

    return true
    end