--------------CL_Init------------------
    if LocalPlayer():GetLem() or LocalPlayer():LoadLem() >= 5 then
        achev[1][1].Paint = function(self)
                    draw.RoundedBox(0,0,0, self:GetWide(), self:GetTall(), Color(0,255,0,255))
        end
        ply = LocalPlayer()
        net.Start("lemonachev") ----lua line 574
                net.WriteEntity(ply)
        net.SendToServer()
    end


-------------init----------------------------------
util.AddNetworkString("lemonachev")
net.receive("lemonachev", function()
ply = net.ReadEntity()
ply:DivideLemonTime(2)
timer.Adjust("lemontimer",  ply:GetLemTime(), 0, function()
ply:AddGCash(ply:GetLem() * ply:GetLemonProfitValue())
)