Lua таблицы читать и сопоставлять эффективно

Моя проблема проста, я использовал это для того, чтобы проверить, сталкивается ли какая-либо из моих линий (см. Фото) с какой-либо другой линией (или следом любой другой линии). Но способ, которым я делаю это сейчас, заключается в том, чтобы делать много операторов if, что не очень хорошо. Итак, вот код, который я использовал:

function Bumper:draw()
 for id,posx1 in pairs(tableposx1) do
    posy1 = tableposy1[id]
    posx2 = tableposx2[id]
    posy2 = tableposy2[id]
    posx3 = tableposx3[id]
    posy3 = tableposy3[id]
    posx4 = tableposx4[id]
    posy4 = tableposy4[id]
        if (posx1 ~= nil) and (posy1 ~= nil) and
        ((math.abs(xposplayer1 - posx1) < 5) and (math.abs(yposplayer1 - posy1) < 5))
        and (id < (count - 5) and killp1 == "false") then
            killp1 = "true"
            tint(255, 0, 0, 162)
            sprite("Dropbox:kill",xposplayer1,yposplayer1)
            noTint()
        end
        if (posx2 ~= nil) and (posy2 ~= nil) and
        ((math.abs(xposplayer1 - posx2) < 5) and (math.abs(yposplayer1 - posy2) < 5))
        and killp1 == "false" then
            killp1 = "true"
            tint(255, 0, 0, 162)
            sprite("Dropbox:kill",xposplayer1,yposplayer1)
            noTint()
        end
        if (posx3 ~= nil) and (posy3 ~= nil) and
        ((math.abs(xposplayer1 - posx3) < 5) and (math.abs(yposplayer1 - posy3) < 5))
        and killp1 == "false" then
            killp1 = "true"
            tint(255, 0, 0, 162)
            sprite("Dropbox:kill",xposplayer1,yposplayer1)
            noTint()
        end
        if (posx4 ~= nil) and (posy4 ~= nil) and
        ((math.abs(xposplayer1 - posx4) < 5) and (math.abs(yposplayer1 - posy4) < 5))
        and killp1 == "false" then
            killp1 = "true"
            tint(255, 0, 0, 162)
            sprite("Dropbox:kill",xposplayer1,yposplayer1)
            noTint()
        end
        if (posx1 ~= nil) and (posy1 ~= nil) and
        ((math.abs(xposplayer2 - posx1) < 5) and (math.abs(yposplayer2 - posy1) < 5))
        and killp2 == "false" then
            killp2 = "true"
            tint(0, 29, 255, 162)
            sprite("Dropbox:kill",xposplayer2,yposplayer2)
            noTint()
        end
        if (posx2 ~= nil) and (posy2 ~= nil) and
        ((math.abs(xposplayer2 - posx2) < 5) and (math.abs(yposplayer2 - posy2) < 5))
        and (id < (count - 5) and killp2 == "false")then
            killp2 = "true"
            tint(0, 29, 255, 162)
            sprite("Dropbox:kill",xposplayer2,yposplayer2)
            noTint()
        end
        if (posx3 ~= nil) and (posy3 ~= nil) and
        ((math.abs(xposplayer2 - posx3) < 5) and (math.abs(yposplayer2 - posy3) < 5))
        and killp2 == "false" then
            killp2 = "true"
            tint(0, 29, 255, 162)
            sprite("Dropbox:kill",xposplayer2,yposplayer2)
            noTint()
        end
        if (posx4 ~= nil) and (posy4 ~= nil) and
        ((math.abs(xposplayer2 - posx4) < 5) and (math.abs(yposplayer2 - posy4) < 5))
        and killp2 == "false" then
            killp2 = "true"
            tint(0, 29, 255, 162)
            sprite("Dropbox:kill",xposplayer2,yposplayer2)
            noTint()
        end
        if (posx1 ~= nil) and (posy1 ~= nil) and
        ((math.abs(xposplayer3 - posx1) < 5) and (math.abs(yposplayer3 - posy1) < 5))
        and killp3 == "false" then
            killp3 = "true"
            tint(1, 255, 0, 162)
            sprite("Dropbox:kill",xposplayer3,yposplayer3)
            noTint()
        end
        if (posx2 ~= nil) and (posy2 ~= nil) and
        ((math.abs(xposplayer3 - posx2) < 5) and (math.abs(yposplayer3 - posy2) < 5))
        and killp3 == "false" then
            killp3 = "true"
            tint(1, 255, 0, 162)
            sprite("Dropbox:kill",xposplayer3,yposplayer3)
            noTint()
        end
        if (posx3 ~= nil) and (posy3 ~= nil) and
        ((math.abs(xposplayer3 - posx3) < 5) and (math.abs(yposplayer3 - posy3) < 5))
        and (id < (count - 5) and killp3 == "false") then
            killp3 = "true"
            tint(1, 255, 0, 162)
            sprite("Dropbox:kill",xposplayer3,yposplayer3)
            noTint()
        end
        if (posx4 ~= nil) and (posy4 ~= nil) and
        ((math.abs(xposplayer3 - posx4) < 5) and (math.abs(yposplayer3 - posy4) < 5))
        and killp3 == "false" then
            killp3 = "true"
            tint(1, 255, 0, 162)
            sprite("Dropbox:kill",xposplayer3,yposplayer3)
            noTint()
        end
        if (posx1 ~= nil) and (posy1 ~= nil) and
        ((math.abs(xposplayer4 - posx1) < 5) and (math.abs(yposplayer4 - posy1) < 5))
        and killp4 == "false" then
            killp4 = "true"
            tint(255, 0, 229, 162)
            sprite("Dropbox:kill",xposplayer4,yposplayer4)
            noTint()
        end
        if (posx2 ~= nil) and (posy2 ~= nil) and
        ((math.abs(xposplayer4 - posx2) < 5) and (math.abs(yposplayer4 - posy2) < 5))
        and killp4 == "false" then
            killp4 = "true"
            tint(255, 0, 229, 162)
            sprite("Dropbox:kill",xposplayer4,yposplayer4)
            noTint()
        end
        if (posx3 ~= nil) and (posy3 ~= nil) and
        ((math.abs(xposplayer4 - posx3) < 5) and (math.abs(yposplayer4 - posy3) < 5))
        and killp4 == "false" then
            killp4 = "true"
            tint(255, 0, 229, 162)
            sprite("Dropbox:kill",xposplayer4,yposplayer4)
            noTint()
        end
        if (posx4 ~= nil) and (posy4 ~= nil) and
        ((math.abs(xposplayer4 - posx4) < 5) and (math.abs(yposplayer4 - posy4) < 5))
        and id < (count - 5) and killp4 == "false" then
            killp4 = "true"
            tint(255, 0, 229, 162)
            sprite("Dropbox:kill",xposplayer4,yposplayer4)
            noTint()
        end
end


end

Вот мой инициал:

    -- Main
a = 1
gameover = 0
tx = 0
paused = 1
count = 0
stagecount = 0
player1count = 0
player2count = 0
player3count = 0
player4count = 0
-- Random hole times
thistime1 = 0
thistime2 = 0
thistime3 = 0
thistime4 = 0
-- Dead players
killp1 = "false"
killp2 = "false"
killp3 = "false"
killp4 = "false"
kills = 0
-- Touch control
touches = {}
-- Player direction
pi = math.pi
o5pi = 50 * pi
mo5pi = - (50 * pi)
minpi = - (100*pi)
    -- Random start direction
    r1t = math.random(0,o5pi)
    r2t = math.random(mo5pi,0)
    r3t = math.random(minpi,mo5pi)
    r4t = math.random(o5pi,100*pi)
r1 = r1t / 100
r2 = r2t / 100
r3 = r3t / 100
r4 = r4t / 100
deltar1 = pi / 55
deltar2 = pi / 55
deltar3 = pi / 55
deltar4 = pi / 55
-- Player speed
speed1 = 2.5
speed2 = 2.5
speed3 = 2.5
speed4 = 2.5
-- Player random start position
xposplayer1 = math.random(123,300)
yposplayer1 = math.random(123,300)
xposplayer2 = math.random(123,300)
yposplayer2 = math.random(468,645)
xposplayer3 = math.random(724,901)
yposplayer3 = math.random(468,645)
xposplayer4 = math.random(724,901)
yposplayer4 = math.random(123,300)
-- Player coordinate tables
tableposx1 = {}
tableposy1 = {}
tableposx2 = {}
tableposy2 = {}
tableposx3 = {}
tableposy3 = {}
tableposx4 = {}
tableposy4 = {}

Теперь я попытался сделать следующее, но не смог, потому что я не знаю, как использовать имена переменных переменных:

for id,posx[a] in pairs(tableposx[a]) do
    posy[a] = tableposy[a][id]
        if ((posx[a] ~= nil) and (posy[a] ~= nil))
        and (math.abs(xposplayer[a] - posx[a]) < 5)
        and (math.abs(yposplayer[a] - posy[a]) < 5)
        and (id < (count - 5)) 
        and (killp[a] == "false") 
        then
            killp[a] = "true"
            tintp[a]
            sprite("Dropbox:kill",xposplayer[a],yposplayer[a])
            noTint()
        end
   end
a = a + 1
if a = 4 then
    a = 1
end

- РЕДАКТИРОВАТЬ: я использую 4 раза, для 4 игроков!

function Player:draw1()
    fill(255, 0, 11, 255)
    xposplayer1 = xposplayer1 + speed1 * math.cos(r1)
    yposplayer1 = yposplayer1 + speed1 * math.sin(r1)
    if player1count == 0 then 
        thistime1 = math.random(200,500)
    end
    player1count = player1count + 1
if player1count < thistime1 then
    table.insert(tableposx1,count,xposplayer1)
    table.insert(tableposy1,count,yposplayer1)
    tint(255, 0, 0, 162)
    ellipse(xposplayer1,yposplayer1,10,10)
    noTint()
elseif player1count > thistime1 then
    tint(255, 0, 0, 162)
    ellipse(xposplayer1,yposplayer1,5,5)
    noTint()
    if player1count > thistime1 + 20 then
        player1count = 0
    end
end

конец

-- РЕДАКТИРОВАТЬ

Как я должен сделать это правильно? Заранее спасибо!

Образ:

3 ответа

Решение

Вы, вероятно, на самом деле не хотите имен переменных переменных, как вы сказали, но вы можете сделать это...

Все глобалы доступны по таблице с именем _Gи вы можете получить доступ к своим глобальным переменным, выполнив это:

_G['killp1']
_G['killp2']
-- etc

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

local i = 1
_G['killp' .. tostring(i)] -- same as _G['killp1']
i = i + 1
_G['killp' .. tostring(i)] -- same as _G['killp2']

Но это будет очень грязно, быстро. Что вы, вероятно, хотите сделать вместо этого, это начать использовать объекты. Ваш объект может выглядеть примерно так:

Linething = { x = 0, y = 0, dead = false, speed = 2.5 }

function Linething:new(o)
  o = o or {}
  setmetatable(o, self)
  self.__index = self
  return o
end

function Linething:checkCollision(other)
  if self.x - other.x < 5 and self.y - other.y < 5 then
    self.dead = true
    -- other stuff
  end
end

function Linething:update(delta_t)
   -- update the game logic
   self.x = self.x + self.speed * cos(self.angle) * delta_t
   self.y = self.y + self.speed * sin(self.angle) * delta_t
end

function Linething:draw()
  -- do line drawing here
  tint(255, 0, 0, 162)
  ellipse(self.x, self.y, 10, 10)
  noTint()
  -- etc
end

-- in main:
linething1 = Linething:new()
linething2 = Linething:new()
linething1.checkCollision(linething2)

РЕДАКТИРОВАТЬ: Как правило, вы хотите отделить игровую логику от рендеринга. Большинство игр имеют цикл, который выглядит следующим образом:

function main_loop()
  while true do
    delta_t = get_change_in_time()
    update_all(delta_t)
    draw_all()
  end
end

-- where update_all is something like this:
function update_all(delta_t)
  player1:update(delta_t)
  player2:update(delta_t)
  -- things in a table:
  for _, x in pairs(table_of_x) do
    x:update(delta_t)
  end
end

-- and draw all is basically the same
function draw_all()
  player1:draw()
  player2:draw()
  -- things in a table:
  for _, x in pairs(table_of_x) do
    x:draw()
  end
end

Похоже, ваш Player объект имеет-а Linething объект. Так что вы можете добавить Linething возражать против Player возразить и изменить Player:draw() звонить players_linething:draw(), Тогда вы можете иметь 4 Player объекты, каждый из которых имеет Linething объект. Имеет ли это смысл?

Проблема в том, что вы используете переменные с индексами (player1, player2 и т. Д.), А не с массивами (player[1], player[2] и т. Д.), Что делает невозможным их повторение в цикле.

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

player1count = 0
speed1 = 2.5

Эти вещи должны быть организованы в таблицу:

player1.count = 0
speed1.speed = 2.5

И, как упоминалось ранее, всякий раз, когда у вас есть набор переменных, которые различаются в зависимости от индекса, вы должны использовать массив (или, в более общем случае, какой-то тип итеративного списка, который в Lua оказывается таблицей / массивом):

players = {}

-- initialize players
for i=1,NUM_PLAYERS do
    players[i] = {
        count = 0,
        speed = 2.5
    }
end

Если вы примените это в целом к ​​вашей программе, ваш огромный if оператор естественным образом исчезнет, ​​его заменит относительно небольшой, вложенный цикл.

Я не прочитал все, но в вашем последнем фрагменте:

  • Вы не можете сделать for id,posx[a]потому что переменные, назначенные for петли являются локальными. Чтобы исправить это заменить экземпляры posx[a] по имени локальной переменной, такой как posx_a,

  • Здесь есть опечатка: if a = 4 then (ты имеешь в виду ==).

  • Эта строка ничего не значит: tintp[a],

Другие вопросы по тегам