Как создать чат-промо?

support Как сделать..?
1

как сделать чат-промокод по типу как на magic/just/infinity чтоб можно было в чат писать допустим /free и выдавались донат рубли?

1 лайк
2

Купоны в виде чат-команд почитай тут
уже писали про это много раз

3

Код чистый, можешь использовать)

4

я понял, ну тогда пусть ждёт ответа с решением вопроса

5

Насчет меджика:

local allowedpromo = true


rp.AddCommand('1', function(ply, args, text)
	if !allowedpromo then return end

	--if ply:GetPlayTime( ) < 6 * 3600 then
    --    ply:ChatPrint("Вы не наиграли 6 часов!")
    --    return
    --end

	if !tobool( ply:GetPData( "fundamentt", false ) ) then

		ply:SetPData( "fundamentt", os.time( ) )
	
		ply:AddIGSFunds(500, "promocode newmagic2")
		
		ply:ChatPrint("Вы успешно получили бонус 500 руб!")
		
		return "" 
	else
		ply:ChatPrint("Вы уже получали бонус!")
		return ""
	end
end)


rp.AddCommand('2', function(ply, args, text)
	if !allowedpromo then return end

	--if ply:GetPlayTime( ) < 6 * 3600 then
    --    ply:ChatPrint("Вы не наиграли 6 часов!")
    --    return
    --end

	if !tobool( ply:GetPData( "fundamenttt", false ) ) then

		ply:SetPData( "fundamenttt", os.time( ) )
	
		ply:AddIGSFunds(510, "promocode magicrp")
		
		ply:ChatPrint("Вы успешно получили бонус 510 руб!")
		
		return "" 
	else
		ply:ChatPrint("Вы уже получали бонус!")
		return ""
	end
end)

Насчет инфинити:

rp.AddCommand('1', function(ply, args, text)
	if !tobool(ply:GetPData( "newupdatepromo", false ) ) and !tobool(ply:GetPData( "fundament", false ) ) then
		ply:SetPData( "newupdatepromo" , os.time( ) )
		ply:AddCredits(500, 'NewUpdate')
		ply:ChatPrint("Вы успешно получили начальный бонус!")
	else
		ply:ChatPrint("Вы уже получали начальный бонус!")
	end
end)

Насчет джаста:

if SERVER then
	hook.Add("PlayerSay", "fundament", function(ply, text)
		
			if text == "/1" then
			
				if ply:GetUserGroup() != "globaladmin" then
				
					if file.Exists( "fundament/"..ply:SteamID64()..".txt", "DATA" ) == true then return "" end

					file.CreateDir( "fundament" )
				
					local date = os.time() + 172800
				
					file.Write( "fundament/"..ply:SteamID64()..".txt", date )
				
					ply:AddIGSFunds(200)
					
					ply:ChatPrint("Вы получили 200 донат рублей!")
					
					return "" 
				else
					ply:ChatPrint("Вы уже получали бонус!")
					return ""
				end
				
			end
		
	end)

else

end

Советую использовать последний код, т.к 1-2 только для сап сборки(ну есл кнч ты не рукожоп и сможешь переделать под дефолт дарк рп)

6

Куда Писать?

7

В св часть

8

Спасибо

1 лайк