Перейти к содержимому
Seryoga

[CC] Локатор игроков

Рекомендуемые сообщения

    Данная программа отслеживает игроков, находящихся в поле зрения локатора. Она выводит на монитор полную информацию о игроке: ник, координаты, id, расстояние от локатора до игрока; записывает в файл время прихода и ухода гостей (пока что записывается время mine-мира); когда игрок появляется в области действия локатора, срабатывает сирена.

 

   Настройка сирены. 

   Есть одна проблема: если подключить сирену напрямую к компьютеру, то при выгрузке чанков сирена начинает сходить с ума. Поэтому нужно подключить сирену через следующую схему (придумано Desectus -ом):e499ade4b2ea.png

 

  Настройка интерфейса.

  В этой программе можно настроить информацию для вывода на экран. Просто закомментируйте блок кода с выводом. По дефолту стоит: Ник, координаты, расстояние.

  Можно изменить количество столбцов вывода, расстояние между ними и тп., используя блок переменных, написанных в начале.

 

  Код программы.

  http://pastebin.com/cussCqiu

Изменено пользователем Seryoga

Поделиться сообщением


Ссылка на сообщение
Поделиться на других сайтах

по просьбе автора выкладываю код программы на форум
под спойлером

 

 

local alarm_state = false

local function alarm()
while true do
if alarm_state == true then
rs.setOutput('back', true)
sleep(0)
rs.setOutput('back', false)
alarm_state = false
end
sleep(1)
end
end

local sensor = peripheral.wrap('top')
local monitor = peripheral.wrap('right')

local x_sensor = 1285
local y_sensor = 3416
local z_sensor = 73
local No_string = 1
local No_column = 1
local step_string = 6
local step_column = 20
local q_columns = 2

local guests = {["name"] = {}, ["check"] = {}}

local function printLog(text)
local log = fs.open("log", "a")

log.writeLine(text)
print(text)

log.close()
end

local function clear()
monitor.clear()
monitor.setCursorPos(1, 1)
monitor.setTextScale(0.5)
No_string = 1
No_column = 1
end

local function next_string()
No_string = No_string + 1
monitor.setCursorPos(No_column, No_string)
end

local function next_column()
if No_column ~= ((q_columns - 1) * step_column + 1) then
No_column = No_column + step_column
No_string = No_string - step_string
else
No_column = 1
end

monitor.setCursorPos(No_column, No_string)
end

local function location()
local player_table = sensor.getPlayers()


for k, v in pairs(guests["check"]) do
guests["check"][k] = false
end


for k, v in pairs(player_table) do
local player = v
local player_info = sensor.getPlayerByUUID(player["uuid"])


local search = false
for index, guest in pairs(guests["name"]) do
if guest == player["name"] then
guests["check"][index] = true
search = true
end
end
if search == false then
local q_guests = #guests["name"]
guests["name"][q_guests + 1] = player["name"]
guests["check"][q_guests + 1] = true
alarm_state = true

local log_text = textutils.formatTime(os.time()).." New guest: "..player["name"]
printLog(log_text)
end


local x = math.modf(player_info["position"]["x"]) - 1
local z = math.modf(player_info["position"]["y"]) - 1
local y = math.modf(player_info["position"]["z"]) - 1
local distance = math.sqrt(x*x + y*y + z*z)
distance = math.modf(distance * 100) / 100

monitor.write('Found '..player_info["name"])
next_string()

-- monitor.write("UUID")
-- next_string()
-- monitor.write(player_info["uuid"])
-- next_string()

-- monitor.write("Id")
-- next_string()
-- monitor.write(player_info["id"])
-- next_string()

monitor.write("Position")
next_string()
monitor.write(x + x_sensor..' '..z + z_sensor..' '..y + y_sensor)
next_string()

monitor.write("Distance")
next_string()
monitor.write(distance)
next_string()

monitor.write("---------")
next_string()

next_column()
end


for k, v in pairs(guests["check"]) do
if v == false then
local log_text = textutils.formatTime(os.time()).." "..guests["name"][k].." left."
printLog(log_text)

table.remove(guests["check"], k)
table.remove(guests["name"], k)
end
end
end

local function mine()
while true do
clear()
pcall(location)

sleep(3)
end
end

rs.setOutput('back', false)
parallel.waitForAny(mine, alarm)

 

Поделиться сообщением


Ссылка на сообщение
Поделиться на других сайтах

Не понял как устанавливать. Дайте скриншот как должен выглядеть сам комп.

Поделиться сообщением


Ссылка на сообщение
Поделиться на других сайтах

Присоединяйтесь к обсуждению

Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.

Гость
Ответить в тему...

×   Вы вставили отформатированное содержимое.   Удалить форматирование

  Разрешено использовать не более 75 эмодзи.

×   Ваша ссылка была автоматически встроена.   Отобразить как ссылку

×   Ваш предыдущий контент был восстановлен.   Очистить редактор

×   Вы не можете вставлять изображения напрямую. Загружайте или вставляйте изображения по ссылке.


×
×
  • Создать...