- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
- 21
- 22
- 23
- 24
- 25
- 26
- 27
- 28
- 29
- 30
- 31
- 32
- 33
- 34
- 35
- 36
- 37
- 38
- 39
- 40
- 41
- 42
- 43
- 44
- 45
- 46
- 47
- 48
- 49
- 50
- 51
- 52
- 53
- 54
- 55
- 56
- 57
- 58
- 59
- 60
- 61
- 62
- 63
- 64
- 65
- 66
- 67
- 68
- 69
- 70
- 71
- 72
- 73
- 74
- 75
- 76
- 77
- 78
- 79
- 80
- 81
- 82
- 83
- 84
- 85
- 86
- 87
- 88
- 89
- 90
- 91
- 92
- 93
- 94
- 95
if(SERVER)then
util.AddNetworkString("gay_seks")
util.AddNetworkString("natural_seks")
util.AddNetworkString("daite_exp")
AddCSLuaFile("")
local autismo_rangs = { "Рядовой",
"Ефрейтор",
"Сержант",
"Старшина",
"Прапорщик",
"Лейтенант",
"Капитан",
"Майор",
"Подполковник",
"Полковник",
"Генерал",
"Маршал",
"nope" }
local function ebat( ply )
ply:SetNWString("xp_nado",tostring(ply:GetPData("xp_nado",50)))
ply:SetNWString("xp_xp",tostring(ply:GetPData("xp_xp",0)))
ply:SetNWString("xp_rang",autismo_rangs[tonumber(ply:GetPData("xp_rang",1))])
end
local function lvlup( ply )
if(tonumber(ply:GetPData("xp_xp",0)) > tonumber(ply:GetPData("xp_nado",50)))then
ply:SetPData("xp_nado",ply:GetPData("xp_nado",50)*2)
ply:SetPData("xp_xp",0)
ply:SetPData("xp_rang",ply:GetPData("xp_rang",1)+1)
ebat(ply)
net.Start("natural_seks")
net.Send(ply)
else
ebat(ply)
end
end
net.Receive("daite_exp",function(_,ply)
ply:SetPData("xp_xp",ply:GetPData("xp_xp",0)+5)
net.Start("gay_seks")
net.WriteString("+5")
net.Send(ply)
lvlup( ply )
end)
hook.Add("PlayerDeath","seks_s_nikitoi",function( victim, inflictor, attacker )
if ( victim != attacker ) then
attacker:SetPData("xp_xp",attacker:GetPData("xp_xp",0)+1)
lvlup(attacker)
net.Start("gay_seks")
net.WriteString("+1")
net.Send(attacker)
end
end)
hook.Add( "PlayerInitialSpawn", "sex_s_azisom", ebat )
else
surface.CreateFont( "motd_font", { font = "Arial", extended = true, size = 20, weight = 500, blursize = 0, scanlines = 0, antialias = true, underline = false, italic = false, strikeout = false, symbol = false, rotary = false, shadow = false, additive = false, outline = true, } )
local function Sex(str)
print(str)
if(IsValid(Sexmenu))then
Sexmenu:Remove()
hook.Remove( "HUDPaint", "4CB_2")
end
hook.Add( "HUDPaint", "4CB_2", function()
draw.Text( { text = str, pos = { ScrW()/2-100, 60 }, font = "motd_font" }) end )
Sexmenu = vgui.Create( "DFrame" )
Sexmenu:SetSize( 400, 40 )
Sexmenu:SetPos(ScrW()/2-200,5)
Sexmenu:SetTitle( "" )
Sexmenu:ShowCloseButton(false)
Sexmenu:SetDraggable( false )
Sexmenu.cal = 255
Sexmenu.Paint = function(s,w,h)
draw.RoundedBox( 10, 0, 0, w, h, Color(0,0,0,Sexmenu.cal) )
if(Sexmenu.cal > 150)then
Sexmenu.cal = Sexmenu.cal-1
else
Sexmenu:Remove()
hook.Remove( "HUDPaint", "4CB_2")
end
draw.RoundedBox( 10, 20, 10, w-40, h-20, Color(100,100,100,Sexmenu.cal) )
draw.RoundedBox( 10, 20, 10, tonumber(LocalPlayer():GetNWString("xp_xp",0))*(360/tonumber(LocalPlayer():GetNWString("xp_nado"))), h-20, Color(100,100,255,Sexmenu.cal) )
draw.RoundedBox( 10, 20+(tonumber(LocalPlayer():GetNWString("xp_xp",0))*(360/tonumber(LocalPlayer():GetNWString("xp_nado"))))-10, 10, 10, h-20, Color(150,150,255,Sexmenu.cal) )
end
end
hook.Add( "HUDPaint", "4CB", function()
draw.Text( { text = "Ты : "..LocalPlayer():GetNWString("xp_rang","gay_hacker")..", до следующего ранга: "..tonumber(LocalPlayer():GetNWString("xp_nado",50))-tonumber(LocalPlayer():GetNWString("xp_xp",0)).." XP", pos = { 10, 10 }, font = "motd_font" })
end )
net.Receive("gay_seks",function() Sex(net.ReadString())
end)
net.Receive("natural_seks",function()
RunConsoleCommand("say","Ура! Я теперь - "..LocalPlayer():GetNWString("xp_rang","gay_hacker")) sound.PlayURL ( "http://prayingforpapers.com/download/Kaihgd_F10kUJ8Hy5ip-fu9FajZ271b4nbYu_Mszc6nPJ2a2HmS-vaFnyqjFspFlTy9YCBzh-4TD7k-JKQz9Zb4RZvHJQUI4fPzxcd2aD6c/%D0%9B%D0%B2%D0%BB+%D0%B0%D0%BF+%D0%BE%D1%83%D1%83+%D0%BC%D0%B0%D0%B9+%D0%BB%D0%B0%D1%84+%D0%B7%D0%B2%D1%83%D0%BA(prayingforpapers.com).mp3", "mono", function( sinok ) sinok:Play() end ) end) local function DAIMOEGOMNO() net.Start("daite_exp") net.SendToServer() timer.Simple(900,function()
DAIMOEGOMNO()
end)
end
timer.Simple(900,function() DAIMOEGOMNO() end)
end
Follow us!