Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- AddCSLuaFile("cl_init.lua")
- AddCSLuaFile("shared.lua")
- include("shared.lua")
- local PrintMore
- function ENT:Initialize()
- self:SetModel("models/props_c17/consolebox01a.mdl")
- self:PhysicsInit(SOLID_VPHYSICS)
- self:SetMoveType(MOVETYPE_VPHYSICS)
- self:SetSolid(SOLID_VPHYSICS)
- self:SetColor(255,215,0,255)
- local phys = self:GetPhysicsObject()
- if phys:IsValid() then phys:Wake() end
- self.sparking = false
- self.damage = 100
- self.IsMoneyPrinter = true
- timer.Simple(0.5, PrintMore, self)
- self:SetNWInt("PrintA",0)
- end
- function ENT:OnTakeDamage(dmg)
- if self.burningup then return end
- self.damage = (self.damage or 100) - dmg:GetDamage()
- if self.damage <= 0 then
- local rnd = math.random(1, 100)
- if rnd < 25 then
- self:BurstIntoFlames()
- else
- self:Destruct()
- self:Remove()
- end
- end
- end
- function ENT:Destruct()
- local vPoint = self:GetPos()
- local effectdata = EffectData()
- effectdata:SetStart(vPoint)
- effectdata:SetOrigin(vPoint)
- effectdata:SetScale(1)
- util.Effect("Explosion", effectdata)
- Notify(self.dt.owning_ent, 1, 4, "Your money printer has exploded!")
- end
- function ENT:BurstIntoFlames()
- Notify(self.dt.owning_ent, 1, 4, "Your money printer is overheating!")
- self.burningup = true
- local burntime = math.random(8, 18)
- self:Ignite(burntime, 0)
- timer.Simple(burntime, self.Fireball, self)
- end
- function ENT:Fireball()
- if not self:IsOnFire() then return end
- local dist = math.random(20, 280) -- Explosion radius
- self:Destruct()
- for k, v in pairs(ents.FindInSphere(self:GetPos(), dist)) do
- if not v:IsPlayer() and not v.IsMoneyPrinter then v:Ignite(math.random(5, 22), 0) end
- end
- self:Remove()
- end
- PrintMore = function(ent)
- if ValidEntity(ent) then
- ent.sparking = true
- timer.Simple(0.5, ent.CreateMoneybag, ent)
- end
- end
- function ENT:Use(activator)
- if(activator:IsPlayer()) then
- activator:AddMoney(self:GetNWInt("PrintA"));
- self:SetNWInt("PrintA",0)
- end
- end
- function ENT:CreateMoneybag()
- if not ValidEntity(self) then return end
- if self:IsOnFire() then return end
- local MoneyPos = self:GetPos()
- local X = 22
- local Y = 7
- if math.random(1, 2000) == 3 then self:BurstIntoFlames() end
- local amount = self:GetNWInt("PrintA") + Y
- self:SetNWInt("PrintA",amount)
- self.sparking = false
- timer.Simple(0.5, PrintMore, self)
- end
Add Comment
Please, Sign In to add comment