- 12
- 1
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Короче нада установить Задержку-Скорость чтобы не так быстро тпался нада чтобы хотяб 2 секунды тпался 1 раз либо 4 секунды 1 раз. Сразу скажу спасибо ) скиньте так как я скинул только измените Скорость-Задержку ) Фулл скрипт ниже
Lua:
require "lib.moonloader"
local events = require"lib.samp.events"
local whielka = 0
local active = false
local sampEvents = require('lib.samp.events')
local password = ""
local dialogId = 2
function main()
while not isSampAvailable() do wait(0) end
sampAddChatMessage("{A9A9A9}[TPOC]: {ffffff}Загружен by {1E90FF}S7XA",0xC0C0C0)
sampAddChatMessage("{A9A9A9}[TPOC]: {ffffff}Активация / Деактивация - {A9A9A9}/tpoc ", 0xA9A9A9)
sampRegisterChatCommand("setpass", function(arg)
password = arg
sampAddChatMessage("Вы установили пароль: "..arg, -1)
end)
sampRegisterChatCommand("tpoc", function()
active = not active
if active then
whielka = 1
sampAddChatMessage("{A9A9A9}[TPOC]: {008000}Активирован", 0xA9A9A9)
else
whielka = 0
sampAddChatMessage("{A9A9A9}[TPOC]: {FF0000}Деактивирован", 0xA9A9A9)
end
end)
while true do wait(0)
if whielka == 1 then
if not sampIsChatInputActive() then
setCharCoordinates(PLAYER_PED,1251.6359,-1266.2883,13.3872)
wait(0)
setGameKeyState(21,255)
wait(0)
setCharCoordinates(PLAYER_PED,1262.7614,-1234.2751,18.3773)
wait(0)
setGameKeyState(21,255)
wait(0)
setCharCoordinates(PLAYER_PED,1259.1787,-1236.9907,18.3773)
wait(0)
setGameKeyState(21,255)
end
end
end
end
hi = 0
function events.onServerMessage(color, text)
if text:find("Вам был добавлен предмет .Отмычка от тюремной двери.") then
hi = hi + 1
printStringNow("+"..hi,301)
if hi == 8 then
hi = 0
lua_thread.create(function()
wait(100)
sampProcessChatInput("/disconnect")
sampProcessChatInput("/recon 19") -- Задержка 15 секунд = 19 / Задержка 25 секунд = 29 и тд. +4 добавляем к задержке сервера при реконнекте.
end)
sampAddChatMessage("+", -1)
end
end
end
function onReceiveRpc(id, bs)
if id == 61 then
dlgId = raknetBitStreamReadInt16(bs)
style = raknetBitStreamReadInt8(bs)
length = raknetBitStreamReadInt8(bs)
title = raknetBitStreamReadString(bs, length)
if dlgId == dialogId and password ~= "" then
sampSendDialogResponse(2, 1, 0, password)
end
end
end
Последнее редактирование модератором: