Wire Money Detector for RP

[Divran]

Actually, I was talking about this:

Download it, open the file called "init.lua" found in ShipmentDetector/lua/entities/gmod_wire_shipmentdetector/init.lua, and replace the code with this:

-- RP Shipment Detector by Briam (98% philxyz Money Detector)

AddCSLuaFile( "cl_init.lua" )
AddCSLuaFile( "shared.lua" )

include('shared.lua')

ENT.WireDebugName = "Shipment Detector"
ENT.OverlayDelay = 0

/*---------------------------------------------------------
   Name: Initialize
   Desc: First function called. Use to set up your entity
---------------------------------------------------------*/
function ENT:Initialize()
	self.Entity:PhysicsInit( SOLID_VPHYSICS )
	self.Entity:SetMoveType( MOVETYPE_VPHYSICS )
	self.Entity:SetSolid( SOLID_VPHYSICS )
	
	local phys = self.Entity:GetPhysicsObject()
	if phys:IsValid() then phys:Wake() end

	-- Default range
	self.range = 50
	
	self.Inputs = Wire_CreateInputs(self.Entity, {"Range"})
	self.Outputs = WireLib.CreateSpecialOutputs(self.Entity,{"Count", "Contents"},{"NORMAL", "STRING"})

	
end

/*---------------------------------------------------------
   Name: TriggerInput
   Desc: the inputs
---------------------------------------------------------*/
function ENT:TriggerInput(iname, value)
	if iname == "Range" then
		self.range = math.Clamp(value,0,500)
	end
end

/*---------------------------------------------------------
   Name: Think
   Desc: Thinks :P
---------------------------------------------------------*/
function ENT:Think()
	self.BaseClass.Think(self)
	local distance = self.range
	local count,contents = 0,""
	local pos = self:GetPos()
	for _,ent in ipairs(ents.GetAll()) do
		  if ent:GetClass() == "spawned_shipment"  then  
			local dist = ent:GetPos():Distance( pos  )
			if dist <= distance then
				count = ent.dt.count
				contents = ent.dt.contents
				distance = dist
			end
		end
	end
		
	Wire_TriggerOutput(self.Entity, "Count", count)
	Wire_TriggerOutput(self.Entity, "Contents", contents)

	self.Entity:NextThink(CurTime() + 2)
	return true
end

NOTE
This is untested. I just edited 2 lines of code so that they are the same as what Donkie did with my E2 function.

Line 55 and 56. I changed them FROM:

				count = ent:GetNWInt("count")
				contents = ent:GetNWString("contents")

TO:

				count = ent.dt.count
				contents = ent.dt.contents

But hopefully it works.

[TomyLobo]

Dude, is it OK with you if I try and get this uploaded to garrysmod.org? You really can't expect RP players to actually come to the wiremod site for something wire related.

what exactly do E2 extensions have to do with darkrp players?

[Donkie]

He maybe ment RP Admins or something. Dont be so word cop :P

[mattwd0526]

Uploaded the money detector entity, leaving it up to admins to find the extensions here

[Daedalus969]

Download it, open the file called "init.lua" found in ShipmentDetector/lua/entities/gmod_wire_shipmentdetector/init.lua, and replace the code with this:

-- RP Shipment Detector by Briam (98% philxyz Money Detector)

AddCSLuaFile( "cl_init.lua" )
AddCSLuaFile( "shared.lua" )

include('shared.lua')

ENT.WireDebugName = "Shipment Detector"
ENT.OverlayDelay = 0

/*---------------------------------------------------------
   Name: Initialize
   Desc: First function called. Use to set up your entity
---------------------------------------------------------*/
function ENT:Initialize()
	self.Entity:PhysicsInit( SOLID_VPHYSICS )
	self.Entity:SetMoveType( MOVETYPE_VPHYSICS )
	self.Entity:SetSolid( SOLID_VPHYSICS )
	
	local phys = self.Entity:GetPhysicsObject()
	if phys:IsValid() then phys:Wake() end

	-- Default range
	self.range = 50
	
	self.Inputs = Wire_CreateInputs(self.Entity, {"Range"})
	self.Outputs = WireLib.CreateSpecialOutputs(self.Entity,{"Count", "Contents"},{"NORMAL", "STRING"})

	
end

/*---------------------------------------------------------
   Name: TriggerInput
   Desc: the inputs
---------------------------------------------------------*/
function ENT:TriggerInput(iname, value)
	if iname == "Range" then
		self.range = math.Clamp(value,0,500)
	end
end

/*---------------------------------------------------------
   Name: Think
   Desc: Thinks :P
---------------------------------------------------------*/
function ENT:Think()
	self.BaseClass.Think(self)
	local distance = self.range
	local count,contents = 0,""
	local pos = self:GetPos()
	for _,ent in ipairs(ents.GetAll()) do
		  if ent:GetClass() == "spawned_shipment"  then  
			local dist = ent:GetPos():Distance( pos  )
			if dist <= distance then
				count = ent.dt.count
				contents = ent.dt.contents
				distance = dist
			end
		end
	end
		
	Wire_TriggerOutput(self.Entity, "Count", count)
	Wire_TriggerOutput(self.Entity, "Contents", contents)

	self.Entity:NextThink(CurTime() + 2)
	return true
end

NOTE
This is untested. I just edited 2 lines of code so that they are the same as what Donkie did with my E2 function.

Line 55 and 56. I changed them FROM:

				count = ent:GetNWInt("count")
				contents = ent:GetNWString("contents")

TO:

				count = ent.dt.count
				contents = ent.dt.contents

But hopefully it works.

Just tested this, it didn't work. The money detector works fine, but when I spawned the shipment detector, I got flooded with this:


entities/gmod_wire_shipmentdetector/init.lua:55: attempt to index field 'dt' (a nil value)

Anyone know a possible fix?

[Divran]

Just tested this, it didn't work. The money detector works fine, but when I spawned the shipment detector, I got flooded with this:


entities/gmod_wire_shipmentdetector/init.lua:55: attempt to index field 'dt' (a nil value)

Anyone know a possible fix?

I don't know. I only did the same as Donkie did, which supposedly fixes it after the latest DarkRP SVN update.

[Donkie]

Tbh, i dident check if the shipment reader worked. I shall fix it in any minute.

[Donkie]

Cant fix the E2 extensions now. Divran, you should be able to fix it pretty easy by looking at my code. Also, daedalus his code worked perfectly for me. You must have done something wrong when inserting the file.

[Daedalus969]

Cant fix the E2 extensions now. Divran, you should be able to fix it pretty easy by looking at my code. Also, daedalus his code worked perfectly for me. You must have done something wrong when inserting the file.

I'm at revision 505, he changed

if v.name == contents then

to

if k == contents then

[philxyz]

Thanks to Donkie for updating the money detector for DarkRP r499, I have removed the update rate input though as it can be used to lag the server by increasing the calculation frequency above once per 2 seconds (the safe default I stuck in there)

This release also includes support for older DarkRP scripts and DarkerRP by default.