--[[
> FactoryBot for Diamond Role Play
> Author: headcliff
> Version: 0.1
> Activate: /drp_factory
> URL site: blast.hk/
--]]
script_name("FactoryBot")
require "lib.moonloader"
local sampev = require 'lib.samp.events'
local selectpoint = {
right_point = true,
left_point = true
}
local selecttable_left = {
table1 = true,
table2 = true,
table3 = true,
table4 = true,
table5 = true
}
local selecttable_right = {
table6 = true,
table7 = true,
table8 = true,
table9 = true,
table10 = true
}
local selecttable_left1 = {
table2 = true,
table3 = true,
table4 = true,
table5 = true
}
local selecttable_left2 = {
table1 = true,
table3 = true,
table4 = true,
table5 = true
}
local selecttable_left3 = {
table1 = true,
table2 = true,
table4 = true,
table5 = true
}
local selecttable_left4 = {
table1 = true,
table2 = true,
table3 = true,
table5 = true
}
local selecttable_left5 = {
table1 = true,
table2 = true,
table3 = true,
table4 = true
}
local selecttable_right6 = {
table7 = true,
table8 = true,
table9 = true,
table10 = true
}
local selecttable_right7 = {
table6 = true,
table8 = true,
table9 = true,
table10 = true
}
local selecttable_right8 = {
table6 = true,
table7 = true,
table9 = true,
table10 = true
}
local selecttable_right9 = {
table6 = true,
table7 = true,
table8 = true,
table10 = true
}
local selecttable_right10 = {
table6 = true,
table7 = true,
table8 = true,
table9 = true
}
function main()
if not isSampLoaded() and not isSampfuncsLoaded then return end
while not isSampAvailable() do wait(0) end
print('Скрипт был успешно загружен.')
sampAddChatMessage('{00BFFF}[Factory]{FFFFFF} Скрипт был успешно загружен.', -1)
sampRegisterChatCommand("drp_factory", cmd_1)
sampRegisterChatCommand("obj", cmd_2)
sampRegisterChatCommand("anim", cmd_3)
local saveX = {}
local saveY = {}
local saveZ = {}
while true do
wait(0)
if isPlayerPlaying(playerHandle) then
if enabled then
if selector_point then
selectpoint[math.random(1, #selectpoint)]
selector_point = false
end
if left_point then
left_side = true
point1 = true
left_point = false
end
if point1 then
-- бег к поинт1
point1 = false
end
if point2 then
-- бег к поинт2
left_side = false
left_side2 = true
point2 = false
end
if point3 then
-- бег к поинт3
left_side2 = false
left_side3 = true
point3 = false
end
if point3to2 then
-- бег к поинт2 с поинт3
left_side3 = false
left_side3to2 = true
point3to2 = false
end
if point2to1 then
-- бег к поинт1 с поинт2
left_side3to2 = false
left_side = true
point2to1 = false
end
if right_point then
right_side = true
point4 = true
right_point = false
end
if point4 then
-- бег к поинт4
point4 = false
end
if point5 then
-- бег к поинт5
right_side = false
right_side2 = true
point5 = false
end
if point6 then
-- бег к поинт6
right_side5 = false
right_side6 = true
point3 = false
end
if point6to5 then
-- бег к поинт5 с поинт6
right_side6 = false
right_side6to5 = true
point6to5 = false
end
if point5to4 then
-- бег к поинт4 с поинт5
right_side6to5 = false
right_side = true
point5to4 = false
end
if gototable_left then
selecttable_left[math.random(1, #selecttable_left)]
end
if gototable_right then
selecttable_right[math.random(1, #selecttable_right)]
end
if table1 then
-- бег к столу1
itleftside1 = true
wait(500)
table1 = false
end
if table2 then
-- бег к столу2
itleftside1 = true
wait(500)
table2 = false
end
if table3 then
-- бег к столу3
itleftside1 = true
wait(500)
table3 = false
end
if table4 then
-- бег к столу4
itleftside2 = true
wait(500)
table4 = false
end
if table5 then
-- бег к столу5
itleftside2 = true
wait(500)
table5 = false
end
if table6 then
-- бег к столу6
itrightside1 = true
wait(500)
table6 = false
end
if table7 then
-- бег к столу7
itrightside1 = true
wait(500)
table7 = false
end
if table8 then
-- бег к столу8
itrightside1 = true
wait(500)
table8 = false
end
if table9 then
-- бег к столу9
itrightside2 = true
wait(500)
table8 = false
end
if table10 then
-- бег к столу10
itrightside2 = true
wait(500)
table8 = false
end
end
end
end
end
function sampev.onServerMessage(color, text)
if enabled then
if text:find('На данной точке нет материала') then -- изменить текст на правильный
if left_side then
point2 = true
return
end
if left_side2 then
point3 = true
return
end
if left_side3 then
point3to2 = true
return
end
if left_side3to2 then
point2to1 = true
return
end
if right_side then
point5 = true
return
end
if right_side5 then
point6 = true
return
end
if right_side6 then
point6to5 = true
return
end
if right_side6to5 then
point5to4 = true
return
end
end
if text:find('Стол занят') then -- изменить текст на правильный
if table1 then
-- бег в сторону от стола (чтобы во время бега к другому столу не брал метки других по пути)
selecttable_left1[math.random(1, #selecttable_left1)]
return
end
if table2 then
-- бег в сторону от стола (чтобы во время бега к другому столу не брал метки других по пути)
selecttable_left2[math.random(1, #selecttable_left2)]
return
end
if table3 then
-- бег в сторону от стола (чтобы во время бега к другому столу не брал метки других по пути)
selecttable_left3[math.random(1, #selecttable_left3)]
return
end
if table4 then
-- бег в сторону от стола (чтобы во время бега к другому столу не брал метки других по пути)
selecttable_left4[math.random(1, #selecttable_left4)]
return
end
if table5 then
-- бег в сторону от стола (чтобы во время бега к другому столу не брал метки других по пути)
selecttable_left5[math.random(1, #selecttable_left5)]
return
end
if table6 then
-- бег в сторону от стола (чтобы во время бега к другому столу не брал метки других по пути)
selecttable_right6[math.random(1, #selecttable_left6)]
return
end
if table7 then
-- бег в сторону от стола (чтобы во время бега к другому столу не брал метки других по пути)
selecttable_right7[math.random(1, #selecttable_right7)]
return
end
if table8 then
-- бег в сторону от стола (чтобы во время бега к другому столу не брал метки других по пути)
selecttable_right8[math.random(1, #selecttable_right8)]
return
end
if table9 then
-- бег в сторону от стола (чтобы во время бега к другому столу не брал метки других по пути)
selecttable_right9[math.random(1, #selecttable_right9)]
return
end
if table10 then
-- бег в сторону от стола (чтобы во время бега к другому столу не брал метки других по пути)
selecttable_right10[math.random(1, #selecttable_right10)]
return
end
end
end
end
function sampev.onAttachObjectToPlayer(objectId, playerId, offsets, rotation)
if enabled and objectId = ??? then -- изменить ИД ОБЪЕКТА
if left_side or left_side2 or left_side3 or left_side3to2 then
left_side = false
left_side2 = false
left_side3 = false
left_side3to2 = false
gototable_left = true
end
if right_side or right_side5 or right_side6 or right_side6to5 then
right_side = false
right_side5 = false
right_side6 = false
right_side6to5 = false
gototable_right = true
end
end
if test-cmd then
print(objectId - playerId - offsets - rotation)
wait(500)
sampAddChatMessage('{00BFFF}[testcmd]{FFFFFF} Де-активирован.', -1)
test-cmd = false
end
end
function sampev.onApplyPlayerAnimation(playerId, animLib, animName, loop, lockX, lockY, freeze, time)
if enabled and animName == ??? then -- изменить animName
if itleftside1 then
-- сдача ближние, левые столы
selectorpoint = true
itleftside1 = false
end
if itleftside2 then
-- сдача дальние, левые столы
selectorpoint = true
itleftside2 = false
end
if itrightside1 then
-- сдача ближние, правые столы
selectorpoint = true
itrightside1 = false
end
if itrightside2 then
-- сдача дальние, правые столы
selectorpoint = true
itrightside2 = false
end
end
if test-cmd2 then
print(playerId - animLib - animName - loop - lockX - lockY - freeze - time)
sampAddChatMessage('{00BFFF}[testcmd2]{FFFFFF} Де-активирован.', -1)
test-cmd2 = false
end
end
--------------------------- STANDART FUNCTIONS ---------------------------
function BeginToPoint(x, y, z, radius, move_code, isSprint)
repeat
local posX, posY, posZ = GetCoordinates()
SetAngle(x, y, z)
MovePlayer(move_code, isSprint)
local dist = getDistanceBetweenCoords3d(x, y, z, posX, posY, z)
wait(0)
until not enabled or dist < radius
end
function MovePlayer(move_code, isSprint)
setGameKeyState(1, move_code)
if isSprint then setGameKeyState(16, 255) end
end
function SetAngle(x, y, z)
local posX, posY, posZ = GetCoordinates()
local pX = x - posX
local pY = y - posY
local zAngle = getHeadingFromVector2d(pX, pY)
if isCharInAnyCar(playerPed) then
local car = storeCarCharIsInNoSave(playerPed)
setCarHeading(car, zAngle)
else
setCharHeading(playerPed, zAngle)
end
restoreCameraJumpcut()
end
function GetCoordinates()
if isCharInAnyCar(playerPed) then
local car = storeCarCharIsInNoSave(playerPed)
return getCarCoordinates(car)
else
return getCharCoordinates(playerPed)
end
end
function cmd_1(param)
enabled = not enabled
if enabled then
selector1 = true
sampAddChatMessage('{00BFFF}[FactoryBot]{FFFFFF} Активирован.', -1)
else
sampAddChatMessage('{00BFFF}[FactoryBot]{FFFFFF} Де-активирован.', -1)
end
end
function cmd_2(param)
test-cmd = not test-cmd
if test-cmd then
sampAddChatMessage('{00BFFF}[testcmd]{FFFFFF} Активирован.', -1)
else
sampAddChatMessage('{00BFFF}[testcmd]{FFFFFF} Де-активирован.', -1)
end
end
function cmd_3(param)
test-cmd2 = not test-cmd2
if test-cmd2 then
sampAddChatMessage('{00BFFF}[testcmd2]{FFFFFF} Активирован.', -1)
else
sampAddChatMessage('{00BFFF}[testcmd2]{FFFFFF} Де-активирован.', -1)
end
end
