Advertisement
Guest User

Untitled

a guest
Jul 17th, 2018
95
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.67 KB | None | 0 0
  1.  
  2. -----------------------------------------------------
  3.  
  4. -----------------------------------------------------
  5. if SERVER then
  6.  
  7. AddCSLuaFile()
  8.  
  9. end
  10.  
  11.  
  12.  
  13. if CLIENT then
  14.  
  15. SWEP.PrintName = "Телефон"
  16.  
  17. SWEP.Slot = 1
  18.  
  19. SWEP.SlotPos = 2
  20.  
  21. SWEP.DrawAmmo = false
  22.  
  23. SWEP.DrawCrosshair = false
  24.  
  25. end
  26.  
  27.  
  28.  
  29. SWEP.Author = ""
  30.  
  31. SWEP.Instructions = "Press "
  32.  
  33. SWEP.Contact = ""
  34.  
  35. SWEP.Purpose = ""
  36.  
  37.  
  38.  
  39. SWEP.ViewModel = "models/weapons/v_buddyfinder.mdl"
  40. SWEP.WorldModel = "models/weapons/c_buddyfinder.mdl"
  41.  
  42.  
  43.  
  44. SWEP.ViewModelFOV = 72
  45.  
  46. SWEP.ViewModelFlip = false
  47.  
  48. SWEP.AnimPrefix = "rpg"
  49.  
  50.  
  51.  
  52. SWEP.Spawnable = true
  53.  
  54. SWEP.AdminSpawnable = true
  55.  
  56. SWEP.Category = "Other"
  57.  
  58. SWEP.Primary.ClipSize = -1
  59.  
  60. SWEP.Primary.DefaultClip = 0
  61.  
  62. SWEP.Primary.Automatic = false
  63.  
  64. SWEP.Primary.Ammo = ""
  65.  
  66.  
  67.  
  68. SWEP.Secondary.ClipSize = -1
  69.  
  70. SWEP.Secondary.DefaultClip = 0
  71.  
  72. SWEP.Secondary.Automatic = false
  73.  
  74. SWEP.Secondary.Ammo = ""
  75.  
  76. SWEP.UseHands = true
  77.  
  78.  
  79. function SWEP:Initialize()
  80.  
  81. self:SetWeaponHoldType("slam")
  82.  
  83. end
  84.  
  85.  
  86.  
  87. function SWEP:Deploy()
  88.  
  89. if SERVER then
  90.  
  91. self.Owner:DrawWorldModel(true)
  92.  
  93. end
  94.  
  95. end
  96.  
  97. function SWEP:Menu()
  98.  
  99. local m,t = DermaMenu(), player.GetAll()
  100.  
  101. table.RemoveByValue( t, LocalPlayer() )
  102.  
  103. local lel = m:AddSubMenu( 'Позвонить' )
  104.  
  105. table.sort( t, function( f,l )
  106.  
  107. return f:Team() > l:Team()
  108.  
  109. end )
  110.  
  111. for k,v in pairs( t ) do
  112.  
  113. local ы = lel:AddOption( v:GetName(), function()
  114.  
  115.  
  116. end)
  117.  
  118. ы:SetColor( Color(0,0,0,255) )
  119.  
  120. end
  121.  
  122. m:Open()
  123.  
  124. m:SetPos( ScrW()/2 - m:GetWide()/2, ScrH()/2 )
  125.  
  126. end
  127.  
  128. function SWEP:PrimaryAttack()
  129. if CLIENT then
  130. self:Menu()
  131. end
  132. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement