function DataArrival(user, data)
i,j,share = strfind(user.sMyInfoString, "$(%d+)%$")
if share == nil then
user:SendPM("share", "No share?? How spooky")
elseif tonumber(share) == 0 then
user:SendPM("share", "How about you share something")
else
user:SendPM("share", "Good boy/girl, your sharing stuff")
end
end