carlsmei/wnsrc
1
0
Fork 0
mirror of https://github.com/lifestorm/wnsrc.git synced 2025-12-17 21:53:46 +03:00
Code Issues Packages Projects Releases Wiki Activity

Upload

Browse Source
This commit is contained in:
lifestorm
2024-08-04 22:55:00 +03:00
parent 8064ba84d8
commit 73479cff9e
7338 changed files with 1718883 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

102
gamemodes/darkrp/plugins/arcademachines/entities/entities/arcade_pacman/cl_init.lua Normal file
View File

@@ -0,0 +1,102 @@
--[[
| This file was obtained through the combined efforts
| of Madbluntz & Plymouth Antiquarian Society.
|
| Credits: lifestorm, Gregory Wayne Rossel JR.,
| Maloy, DrPepper10 @ RIP, Atle!
|
| Visit for more: https://plymouth.thetwilightzone.ru/
--]]
include("shared.lua")
local DrawCircle
DrawCircle = function( x, y, radius, seg )
local cir = {}
table.insert( cir, { x = x, y = y, u = 0.5, v = 0.5 } )
for i = 0, seg do
local a = math.rad( ( i / seg ) * -360 )
table.insert( cir, { x = x + math.sin( a ) * radius, y = y + math.cos( a ) * radius, u = math.sin( a ) / 2 + 0.5, v = math.cos( a ) / 2 + 0.5 } )
end
local a = math.rad( 0 ) -- This is needed for non absolute segment counts
table.insert( cir, { x = x + math.sin( a ) * radius, y = y + math.cos( a ) * radius, u = math.sin( a ) / 2 + 0.5, v = math.cos( a ) / 2 + 0.5 } )
surface.DrawPoly( cir )
end
local mat = {}
mat[0] = Material("displays/pacman_open.png")
mat[1] = Material("displays/pacman_closed.png")
function ENT:Draw()
self:DrawModel()
if LocalPlayer():GetPos():Distance( self:GetPos() ) > 500 then return end
-- Basic setups
local Pos = self:GetPos()
local Ang = self:GetAngles()
Ang:RotateAroundAxis(Ang:Up(), -90)
Ang:RotateAroundAxis(Ang:Forward(), 76)
cam.Start3D2D(Pos + Ang:Up()*10, Ang, 0.05)
-- draw.RoundedBox(0, -120, -250, 170, 110, Color(70, 70, 70))
draw.SimpleText("PACMAN", "arcade_font120", -0, -450, HSVToColor(CurTime()*6*5%360,1,1), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
if ((CurTime()*4)%4) > 2 then
draw.SimpleText("Insérez "..ix.config.Get("arcadePrice").." crédit", "arcade_font60", -0, -360, Color(55,210,55), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
draw.SimpleText("pour jouer !", "arcade_font60", -0, -320, Color(55,210,55), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
end
surface.SetDrawColor( 255, 255, 255, 255 )
draw.NoTexture()
if ((CurTime()*80)%494) < 160 then
DrawCircle(100, -220, 10, 20)
end
if ((CurTime()*80)%494) < 260 then
DrawCircle(0, -220, 10, 20)
end
if ((CurTime()*80)%494) < 360 then
DrawCircle(-100, -220, 10, 20)
end
surface.SetDrawColor( Color(255,255,255) )
surface.SetMaterial( mat[math.Round(CurTime()*4)%2] )
surface.DrawTexturedRectUV( 216-((CurTime()*80)%494), -250, 64, 64, 0, 0, 1, 1 )
-- Off screen Right = 216
-- Off screen Left = -278
-- Speed = 216-((CurTime()*30)%494)
--print(CurTime()%1)
--print(216-(CurTime()%494))
cam.End3D2D()
Ang:RotateAroundAxis(Ang:Forward(), 14)
local tr = LocalPlayer():GetEyeTrace().HitPos
local pos = self:WorldToLocal(tr)
local HeighlightColor = HSVToColor(CurTime()*6*5%360,1,1)
cam.Start3D2D(Pos + Ang:Up()*22.4, Ang, 0.05)
if pos.x < -22.174904 and pos.x > -23.252708 and pos.y < 9.953964 and pos.y > 8.003653 and pos.z < -2.079835 and pos.z > -6.987538 then
draw.RoundedBox(0, -200, 40, 40, 100, HeighlightColor)
else
draw.RoundedBox(0, -200, 40, 40, 100, Color(0, 0, 0, 240))
end
draw.RoundedBox(0, -195, 45, 30, 90, Color(40, 40, 40, 255))
draw.SimpleText("|", "arcade_font60", -180, 85, Color(255,255,255), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
cam.End3D2D()
end
/*
-22.174904 9.953964 -2.079835
-22.252708 8.003653 -6.987538
*/

53
gamemodes/darkrp/plugins/arcademachines/entities/entities/arcade_pacman/init.lua Normal file
View File

@@ -0,0 +1,53 @@
--[[
| This file was obtained through the combined efforts
| of Madbluntz & Plymouth Antiquarian Society.
|
| Credits: lifestorm, Gregory Wayne Rossel JR.,
| Maloy, DrPepper10 @ RIP, Atle!
|
| Visit for more: https://plymouth.thetwilightzone.ru/
--]]
local PLUGIN = PLUGIN
AddCSLuaFile("cl_init.lua")
AddCSLuaFile("shared.lua")
include("shared.lua")
function ENT:Initialize()
self:SetModel("models/freeman/arcade_pacman.mdl")
self:SetUseType(SIMPLE_USE)
self:PhysicsInit(SOLID_VPHYSICS)
self:SetMoveType(MOVETYPE_VPHYSICS)
self:SetSolid(SOLID_VPHYSICS)
local phys = self:GetPhysicsObject()
phys:Wake()
end
function ENT:Use(ply)
local tr = ply:GetEyeTrace().HitPos
local pos = self:WorldToLocal(tr)
if pos.x < -22.174904 and pos.x > -23.252708 and pos.y < 9.953964 and pos.y > 8.003653 and pos.z < -2.079835 and pos.z > -6.987538 then
if ix.config.Get("arcadeDisableTokenSystem") then
net.Start("arcade_open_pacman")
net.Send(ply)
else
net.Start("arcade_request_pacman")
net.Send(ply)
end
end
net.Receive("arcade_accept_pacman", function(_, client)
PLUGIN:PayArcade(client, function()
timer.Simple(1.5, function()
net.Start("arcade_open_pacman")
net.Send(client)
end)
end)
end)
end
function ENT:Think()
end

17
gamemodes/darkrp/plugins/arcademachines/entities/entities/arcade_pacman/shared.lua Normal file
View File

@@ -0,0 +1,17 @@
--[[
| This file was obtained through the combined efforts
| of Madbluntz & Plymouth Antiquarian Society.
|
| Credits: lifestorm, Gregory Wayne Rossel JR.,
| Maloy, DrPepper10 @ RIP, Atle!
|
| Visit for more: https://plymouth.thetwilightzone.ru/
--]]
ENT.Type = "anim"
ENT.Base = "base_gmodentity"
ENT.PrintName = "Pacman"
ENT.Author = "Owain Owjo"
ENT.Category = "Machines d'Arcade"
ENT.Spawnable = true
ENT.AdminSpawnable = true

77
gamemodes/darkrp/plugins/arcademachines/entities/entities/arcade_pong/cl_init.lua Normal file
View File

@@ -0,0 +1,77 @@
--[[
| This file was obtained through the combined efforts
| of Madbluntz & Plymouth Antiquarian Society.
|
| Credits: lifestorm, Gregory Wayne Rossel JR.,
| Maloy, DrPepper10 @ RIP, Atle!
|
| Visit for more: https://plymouth.thetwilightzone.ru/
--]]
include("shared.lua")
local DrawCircle
DrawCircle = function( x, y, radius, seg )
local cir = {}
table.insert( cir, { x = x, y = y, u = 0.5, v = 0.5 } )
for i = 0, seg do
local a = math.rad( ( i / seg ) * -360 )
table.insert( cir, { x = x + math.sin( a ) * radius, y = y + math.cos( a ) * radius, u = math.sin( a ) / 2 + 0.5, v = math.cos( a ) / 2 + 0.5 } )
end
local a = math.rad( 0 ) -- This is needed for non absolute segment counts
table.insert( cir, { x = x + math.sin( a ) * radius, y = y + math.cos( a ) * radius, u = math.sin( a ) / 2 + 0.5, v = math.cos( a ) / 2 + 0.5 } )
surface.DrawPoly( cir )
end
function ENT:Draw()
self:DrawModel()
if LocalPlayer():GetPos():Distance( self:GetPos() ) > 500 then return end
-- Basic setups
local Pos = self:GetPos()
local Ang = self:GetAngles()
Ang:RotateAroundAxis(Ang:Up(), -90)
Ang:RotateAroundAxis(Ang:Forward(), 76)
cam.Start3D2D(Pos + Ang:Up()*10, Ang, 0.05)
-- draw.RoundedBox(0, -120, -250, 170, 110, Color(70, 70, 70))
draw.SimpleText("PONG", "arcade_font80", -0, -450, HSVToColor(CurTime()*6*5%360,1,1), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
if ((CurTime()*4)%4) > 2 then
draw.SimpleText("Insérez "..ix.config.Get("arcadePrice").." crédit", "arcade_font60", -0, -360, Color(55,210,55), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
draw.SimpleText("pour jouer !", "arcade_font60", -0, -320, Color(55,210,55), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
end
surface.SetDrawColor( 255, 255, 255, 255 )
draw.NoTexture()
if ((CurTime()*40)%494) > 247 then
DrawCircle(216-(CurTime()*80)%494, -220, 10, 20)
else
DrawCircle(-216+(CurTime()*80)%494, -220, 10, 20)
end
draw.RoundedBox(0, -215, -260, 10, 70, Color(255,255,255))
draw.RoundedBox(0, 205, -260, 10, 70, Color(255,255,255))
cam.End3D2D()
Ang:RotateAroundAxis(Ang:Forward(), 14)
local tr = LocalPlayer():GetEyeTrace().HitPos
local pos = self:WorldToLocal(tr)
local HeighlightColor = HSVToColor(CurTime()*6*5%360,1,1)
cam.Start3D2D(Pos + Ang:Up()*22.4, Ang, 0.05)
if pos.x < -22.174904 and pos.x > -23.252708 and pos.y < 9.953964 and pos.y > 8.003653 and pos.z < -2.079835 and pos.z > -6.987538 then
draw.RoundedBox(0, -200, 40, 40, 100, HeighlightColor)
else
draw.RoundedBox(0, -200, 40, 40, 100, Color(0, 0, 0, 240))
end
draw.RoundedBox(0, -195, 45, 30, 90, Color(40, 40, 40, 255))
draw.SimpleText("|", "arcade_font60", -180, 85, Color(255,255,255), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
cam.End3D2D()
end

53
gamemodes/darkrp/plugins/arcademachines/entities/entities/arcade_pong/init.lua Normal file
View File

@@ -0,0 +1,53 @@
--[[
| This file was obtained through the combined efforts
| of Madbluntz & Plymouth Antiquarian Society.
|
| Credits: lifestorm, Gregory Wayne Rossel JR.,
| Maloy, DrPepper10 @ RIP, Atle!
|
| Visit for more: https://plymouth.thetwilightzone.ru/
--]]
local PLUGIN = PLUGIN
AddCSLuaFile("cl_init.lua")
AddCSLuaFile("shared.lua")
include("shared.lua")
function ENT:Initialize()
self:SetModel("models/freeman/arcade_pong.mdl")
self:SetUseType(SIMPLE_USE)
self:PhysicsInit(SOLID_VPHYSICS)
self:SetMoveType(MOVETYPE_VPHYSICS)
self:SetSolid(SOLID_VPHYSICS)
local phys = self:GetPhysicsObject()
phys:Wake()
end
function ENT:Use(ply)
local tr = ply:GetEyeTrace().HitPos
local pos = self:WorldToLocal(tr)
if pos.x < -22.174904 and pos.x > -23.252708 and pos.y < 9.953964 and pos.y > 8.003653 and pos.z < -2.079835 and pos.z > -6.987538 then
if ix.config.Get("arcadeDisableTokenSystem") then
net.Start("arcade_open_pong")
net.Send(ply)
else
net.Start("arcade_request_pong")
net.Send(ply)
end
end
net.Receive("arcade_accept_pong", function(_, client)
PLUGIN:PayArcade(client, function()
timer.Simple(1.5, function()
net.Start("arcade_open_pong")
net.Send(client)
end)
end)
end)
end
function ENT:Think()
end

17
gamemodes/darkrp/plugins/arcademachines/entities/entities/arcade_pong/shared.lua Normal file
View File

@@ -0,0 +1,17 @@
--[[
| This file was obtained through the combined efforts
| of Madbluntz & Plymouth Antiquarian Society.
|
| Credits: lifestorm, Gregory Wayne Rossel JR.,
| Maloy, DrPepper10 @ RIP, Atle!
|
| Visit for more: https://plymouth.thetwilightzone.ru/
--]]
ENT.Type = "anim"
ENT.Base = "base_gmodentity"
ENT.PrintName = "Pong"
ENT.Author = "Owain Owjo"
ENT.Category = "Machine d'Arcade"
ENT.Spawnable = true
ENT.AdminSpawnable = true

75
gamemodes/darkrp/plugins/arcademachines/entities/entities/arcade_spaceinvaders/cl_init.lua Normal file
View File

@@ -0,0 +1,75 @@
--[[
| This file was obtained through the combined efforts
| of Madbluntz & Plymouth Antiquarian Society.
|
| Credits: lifestorm, Gregory Wayne Rossel JR.,
| Maloy, DrPepper10 @ RIP, Atle!
|
| Visit for more: https://plymouth.thetwilightzone.ru/
--]]
include("shared.lua")
local DrawShip
DrawShip = function()
draw.RoundedBox(0, 216-((CurTime()*80)%494)+0, -200, 60, 20, Color(55,255,55))
draw.RoundedBox(0, 216-((CurTime()*80)%494)+5, -205, 50, 5, Color(55,255,55))
draw.RoundedBox(0, 216-((CurTime()*80)%494)+20, -215, 20, 10, Color(55,255,55))
end
function ENT:Draw()
self:DrawModel()
if LocalPlayer():GetPos():Distance( self:GetPos() ) > 500 then return end
-- Basic setups
local Pos = self:GetPos()
local Ang = self:GetAngles()
Ang:RotateAroundAxis(Ang:Up(), -90)
Ang:RotateAroundAxis(Ang:Forward(), 76)
cam.Start3D2D(Pos + Ang:Up()*10, Ang, 0.05)
-- draw.RoundedBox(0, -120, -250, 170, 110, Color(70, 70, 70))
draw.SimpleText("Space Invaders", "arcade_font80", -0, -450, HSVToColor(CurTime()*6*5%360,1,1), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
if ((CurTime()*4)%4) > 2 then
draw.SimpleText("Insérez "..ix.config.Get("arcadePrice").." crédit", "arcade_font60", -0, -360, Color(55,210,55), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
draw.SimpleText("pour jouer !", "arcade_font60", -0, -320, Color(55,210,55), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
end
if ((CurTime()*80)%494) > 140 and ((CurTime()*80)%494) < 300 then
draw.RoundedBox(0, 100, -210-((CurTime()*80)%494)/10, 10, 10, Color(55,255,55))
end
if ((CurTime()*80)%494) > 240 and ((CurTime()*80)%494) < 420 then
draw.RoundedBox(0, 0, -200-((CurTime()*80)%494)/10, 10, 10, Color(55,255,55))
end
if ((CurTime()*80)%494) > 340 and ((CurTime()*80)%494) < 580 then
draw.RoundedBox(0, -100, -190-((CurTime()*80)%494)/10, 10, 10, Color(55,255,55))
end
DrawShip()
-- Movement = 216-((CurTime()*60)%494)
-- Off screen Right = 216
-- Off screen Left = -278
cam.End3D2D()
Ang:RotateAroundAxis(Ang:Forward(), 14)
local tr = LocalPlayer():GetEyeTrace().HitPos
local pos = self:WorldToLocal(tr)
local HeighlightColor = HSVToColor(CurTime()*6*5%360,1,1)
cam.Start3D2D(Pos + Ang:Up()*22.4, Ang, 0.05)
if pos.x < -22.174904 and pos.x > -23.252708 and pos.y < 9.953964 and pos.y > 8.003653 and pos.z < -2.079835 and pos.z > -6.987538 then
draw.RoundedBox(0, -200, 40, 40, 100, HeighlightColor)
else
draw.RoundedBox(0, -200, 40, 40, 100, Color(0, 0, 0, 240))
end
draw.RoundedBox(0, -195, 45, 30, 90, Color(40, 40, 40, 255))
draw.SimpleText("|", "arcade_font60", -180, 85, Color(255,255,255), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
cam.End3D2D()
end

53
gamemodes/darkrp/plugins/arcademachines/entities/entities/arcade_spaceinvaders/init.lua Normal file
View File

@@ -0,0 +1,53 @@
--[[
| This file was obtained through the combined efforts
| of Madbluntz & Plymouth Antiquarian Society.
|
| Credits: lifestorm, Gregory Wayne Rossel JR.,
| Maloy, DrPepper10 @ RIP, Atle!
|
| Visit for more: https://plymouth.thetwilightzone.ru/
--]]
local PLUGIN = PLUGIN
AddCSLuaFile("cl_init.lua")
AddCSLuaFile("shared.lua")
include("shared.lua")
function ENT:Initialize()
self:SetModel("models/freeman/arcade_invaders.mdl")
self:SetUseType(SIMPLE_USE)
self:PhysicsInit(SOLID_VPHYSICS)
self:SetMoveType(MOVETYPE_VPHYSICS)
self:SetSolid(SOLID_VPHYSICS)
local phys = self:GetPhysicsObject()
phys:Wake()
end
function ENT:Use(ply)
local tr = ply:GetEyeTrace().HitPos
local pos = self:WorldToLocal(tr)
if pos.x < -22.174904 and pos.x > -23.252708 and pos.y < 9.953964 and pos.y > 8.003653 and pos.z < -2.079835 and pos.z > -6.987538 then
if ix.config.Get("arcadeDisableTokenSystem") then
net.Start("arcade_open_space")
net.Send(ply)
else
net.Start("arcade_request_space")
net.Send(ply)
end
end
net.Receive("arcade_accept_space", function(_, client)
PLUGIN:PayArcade(client, function()
timer.Simple(1.5, function()
net.Start("arcade_open_space")
net.Send(client)
end)
end)
end)
end
function ENT:Think()
end

17
gamemodes/darkrp/plugins/arcademachines/entities/entities/arcade_spaceinvaders/shared.lua Normal file
View File

@@ -0,0 +1,17 @@
--[[
| This file was obtained through the combined efforts
| of Madbluntz & Plymouth Antiquarian Society.
|
| Credits: lifestorm, Gregory Wayne Rossel JR.,
| Maloy, DrPepper10 @ RIP, Atle!
|
| Visit for more: https://plymouth.thetwilightzone.ru/
--]]
ENT.Type = "anim"
ENT.Base = "base_gmodentity"
ENT.PrintName = "Space Invaders"
ENT.Author = "Owain Owjo"
ENT.Category = "Machine d'Arcade"
ENT.Spawnable = true
ENT.AdminSpawnable = true