aawdf

net.Receive("tickbooksendfine", function(len, pl)

	local FineTable = {}
	FineTable.Officer = pl
	FineTable.Target = net.ReadString()
	FineTable.Reasons = net.ReadTable()
	FineTable.Price = net.ReadDouble()

	if FineTable.Price <= 0 then
		net.Start("tickbookmsg")
			net.WriteString("Você não deu o custo do bilhete!")
		net.Send(pl)
		return
	elseif FineTable.Price > TicketBook.Config.Fine.Max then
		net.Start("tickbookmsg")
			net.WriteString("O mandato não pode custar mais do que R$"..TicketBook.Config.Fine.Max.."!")
		net.Send(pl)
		return
	elseif #FineTable.Reasons == 0 then
		net.Start("tickbookmsg")
			net.WriteString("Você não deu uma razão para a Multa!")
		net.Send(pl)
		return
	end

	for k, v in pairs(player.GetAll()) do
		if v:SteamID() == FineTable.Target then

			if v.TBS_Fineable == false then
				net.Start("tickbookmsg")
					net.WriteString(v:Nick().." nie moze dostac mandatu!")
				net.Send(pl)
				return
			elseif v:GetPos():Distance( FineTable.Officer:GetPos() ) > TicketBook.Config.TB.MaxDistance then
				print(FineTable.Officer:GetPos():Distance( v:GetPos() ))
				net.Start("tickbookmsg")
					net.WriteString("Você está longe demais!")
				net.Send(pl)
				return
			end

			v.TBS_FineAmount = FineTable.Price
			v.TBS_Fineable = false
			FineTable.Officer:GetViewModel():SendViewModelMatchingSequence(FineTable.Officer:GetViewModel():LookupSequence("write"))

			net.Start("tickbookreceivefine")
				net.WriteString(FineTable.Officer:SteamID())
				net.WriteString(FineTable.Officer:Nick())
				net.WriteTable(FineTable.Reasons)
				net.WriteDouble(FineTable.Price)
			net.Send(v)

			net.Start("tickbookmsg")
				net.WriteString("Multa de R$"..FineTable.Price.." aplicada em "..v:Nick())
			net.Send(pl)
			if bLogs then
				bLogs.Log({
				module = "MultaAplicada",
				log = "" .. bLogs.GetName(pl) .. " aplicou uma multa em " .. bLogs.GetName(v) .. ", valor " .. FineTable.Price .. ", motivo  " .. FineTable.Reasons .. "",
				involved = {v,pl},
				})
			end
			break
		end
	end
end)