Предсказуемость математики и луа

-- сейчас так
gmList[индекс] = "значение" 

function gmTest (gmTestNome)
	for i=1,#gmList do
		if gmTestNome==gmList[i] then
			gmTestRez = "гм"
			break
		else
			gmTestNome = nil
		end
		i=i+1
	end
	return gmTestRez
end

gmList["значение"] = true -- вместо true что угодно кроме nil 

unction gmTest (gmTestNome)
    if gmList[gmTestNome] then -- или gmList[gmTestNome] == нечто как доп условие 
       return "гм" 
    else
       return nil;
    end
end

local dialog["Привет я принёс тебе рыбу"] = 
{ quest_ribov_norm=10;
  uspeh="Класс вот тебе денег";
  proval="Мало рыбов неси есчё";
  reject="Мне больше твоих рыбов не надо, я сыт";
  quest_done=false;
}

if dialog[message] then
  if dialog[message].quest_done then
    print(dialog[message].reject);
    return;
  end

  if dialog[message].quest_ribov_norm >= user.num_ribi then
   print(dialog[message].proval)
      dialog[message].quest_done = false;
  else
   print(dialog[message].uspeh)
   dialog[message].quest_done = true;
  end
end

if WorldMapDetailFrame:IsMouseOver() then

if testQ[myNome]["инст_начат"] == 1 then
	btnMM[99]:Hide()
	testInf=1
	btnMM[1]:Show()
	if testQ[myNome]["инст_время"] == nil then
		testQ[myNome]["инст_время"] = time()
		timeMMtestI = GetInstanceInfo()
		mioLv = UnitLevel("Player")
		if testQ[myNome][testMM] == nil then
			testQ[myNome]["время_кнопки"] = mmList[timeMMtestI]["время_прохождения_1"]
		else
			if testQ[myNome][testMM][mioLv]["время"] == nil then
				testQ[myNome]["время_кнопки"] = mmList[timeMMtestI]["время_прохождения_1"]
			elseif testQ[myNome][testMM][mioLv]["время"] ~= nil then
				testQ[myNome]["время_кнопки"] = testQ[myNome][testMM][mioLv]["время"]
			end
		end
	end
	curTime = time()
	local tempTime = testQ[myNome]["время_кнопки"]
	tempTime = tonumber(tempTime)
	local tempTimeInst = testQ[myNome]["инст_время"]
	tempTimeInst = tonumber(tempTimeInst)
	curTime = curTime - tempTimeInst
	btnTime = tempTime - curTime

	btnMM[1]:SetText(btnTime)
	elseif testQ[myNome]["инст_начат"] == nil then
		testQ[myNome]["инст_время"] = nil
	end

local tempTime = testQ[myNome]["время_кнопки"]
tempTime = tonumber(tempTime)
local tempTimeInst = testQ[myNome]["инст_время"]
tempTimeInst = tonumber(tempTimeInst)

local tempTime = tonumber(testQ[myNome]["время_кнопки"])

testQ[myNome]["время_кнопки"] = tonumber(testQ[myNome]["время_кнопки"])

if testQ[myNome]["квест_лвл2"][msg1] ~= nil then
	mozhnoLiSdatChislo11=testQ[myNome]["квест_лвл2"][msg1]
else
	msg1=tostring(msg1)
	mozhnoLiSdatChislo11=testQ[myNome]["квест_лвл2"][msg1]
end

local struct = {}
struct['hello']="50";

print(struct.hello + 50)
print(struct.hello - 50)

print(50 + struct.hello)
print(50 - struct.hello)

if struct.hello == 50 then
  print('yes is 50')
end

if struct.hello == "50" then
  print('yes is 50')
end

if struct.hello+50 == "100" then
  print('yes is 100')
end

if 50+struct.hello == 100 then
  print('yes is 100')
end

if type(struct.hello) == 'number' then -- не исполнится
  print('no, it is not number')
end

if type(struct.hello) == 'string' then
  print('yess, struct.hello is string')
end

if type(struct.hello) ~= type(50) then
  print('yes it is different types')
end

print(type(struct.hello))
print(type(50))

dron@gnu:~$ lua test.lua
100
0
100
0
yes is 50
yes is 100
yess, struct.hello is string
yes is different types
string
number
dron@gnu:~$ 

print("50"+50)
print("50"..50)

dron@gnu:~$ lua test.lua
100
5050

["квест_лвл2"] = {
	[1257] = 5,
	["2557"] = 4,
	[1206] = 11,
	[6579] = 3,
	[1956] = 3,
	[150] = 2,
	[2556] = 13,
	[6808] = 4,
	[6584] = 6,
	[1225] = 4,
},

local backMSG = "П0:ПЖ1:М5160" --исходная строка
local revMSG = string.reverse(backMSG) --разворачиваем
for i=1,#backMSG do -от конца строки до начала
  local testB = string.utf8sub(revMSG,i,i) --перебираем символы
  if testB == "М" then --..пока не найдем букву "М"
    break --если нашли - стоп
  end
end
i=i-1 --число равно номер буквы "М" минус один
mnMsg = string.sub(revMSG,1,i) --получаем все от конца строки до буквы "М"
mnMsgOst = string.utf8sub(revMSG,i,#revMSG) --получаем все остальное
mnMsg = string.reverse(mnMsg) --разворачиваем полученное число

dron@gnu:~$ lua
Lua 5.2.4  Copyright (C) 1994-2015 Lua.org, PUC-Rio
> print(string.reverse('П0:ПЖ1:М5160'))
0615��:1��:0��
> print(string.reverse('hello my friend'))
dneirf ym olleh

function utf8.reverse(str)
    local out = "";
    for id,code in utf8.codes(str) do
        out = utf8.char(code)..out;
    end
    return out;
end

print(utf8.reverse('П0:ПЖ1:М5160'));

dron@gnu:~$ lua5.4  ttt.lua 
0615М:1ЖП:0П
dron@gnu:~$ 

        hours = 1
        minutes = 2

print("В большую сторону от меньшего")
for i=1,10,1 do -- начало,конец,шаг (шаг по умолчанию равен 1 обычно его вообще не пишут)
    print('A-'..i)
end

print("В меньшую сторону от большего")
for i=10,1,-1 do
    print('B-'..i)
end

print("Через два")

for i=1,10,2 do
    print('C-'..i)
end

-- Домашнее задание:
-- Напишите цикл который будет выводить числа от 10 до 1
-- так что вывод должен быть таким:
-- 10
-- 7
-- 4
-- 1

dron@gnu:~$ lua ttt.lua 
В большую сторону от меньшего
A-1
A-2
A-3
A-4
A-5
A-6
A-7
A-8
A-9
A-10
В меньшую сторону от большего
B-10
B-9
B-8
B-7
B-6
B-5
B-4
B-3
B-2
B-1
Через два
C-1
C-3
C-5
C-7
C-9
dron@gnu:~$ 

if string.find (message, "Кусяо исключает из гильдии") then
    for Zc=1,GetNumGuildMembers(true) do
            local name, rankName, rankIndex, level, classDisplayName, zone, publicNote, officerNote, isOnline, status, class, achievementPoints, achievementRank, isMobile, canSoR, repStanding, guid = GetGuildRosterInfo(Zc)
            local msgZ3n = tonumber (msgZ3)
            if name == "Кусяо" then
                local backMSG = officerNote
                revMSG = string.utf8reverse(backMSG)
                for iKus=1,#backMSG do
                    local testB = string.utf8sub(revMSG,iKus,iKus)
                    if testB == "М" then
                        iKus1 = iKus
                        break
                    end
                    iKus = iKus + 1
                end
                iKus1=iKus1-1
                mnMsg = string.sub(revMSG,1,iKus1)
                mnMsgOst = string.utf8sub(revMSG,iKus1+1,#revMSG)
                mnMsg = string.reverse(mnMsg)
                mnMsg =tonumber(mnMsg)
                mnMsg = mnMsg + 3
                mnMsgOst= string.utf8reverse(mnMsgOst)
                local rezultat = mnMsgOst .. mnMsg
                GuildRosterSetOfficerNote(Zc, rezultat)


            else--конец проверки ника
            end--конец проверки ника

        end
end

i = "global" -- глобальная ай
----------------------------
do --создаём локальную область видимости
  local i = "local" -- создадим в локальной области локальную переменную
end
print(i) -- вывод будет 'global'
-----------------------------
do 
    local i = i;
    print(i) -- в локальную переменну. локальной области видимости 
             -- копируем значение глобальной пеменной.
    i = "6451654861561"
end
print(i) -- вывод будет 'global'
------------------------------
i=nil -- уничтожаем глобальную переменную, как будто бы её и небыло

-- тож самое происходит тут
for i=1,10 do
    
end
print(i) -- цикл прошёл, i более не существует
------------------------------


-- А мы её сделаем и даже глобальную!
i = 1;
x = 42
for i=1,10 do -- но что толку ведь в for своя область видимости
    print(i)
    x=i;
end

print(i); -- как был 1 так и остался
print(x); -- а вот тут мы сохранили то что хотели.

-- По мимо переменных есть их области видимости, переменные инициалзации
-- циклов заперты в цикле, создаются при его начале и уничтожаются после
-- даже если имеют одно и тоже имя с иной локальной или глобальной пеменной

-- циклу пофиг он будет крутится
for i=1,10 do 
    print(i)
    local i = "hello";--просто после такого
    print(i)
    i = "lololo";--или такого ты потеряешь значение счётчика в текущей итерации
    print(i)
    -- Но лучше так не делать, ибо UB!!!!!!!!!!!!!! )))))))))))
end

#! /bin/env lua
os.execute("sh servMesg.sh");
while(true) do
local two_null = io.popen("netstat |grep 7776 | awk '{print $3}'", 'r');
 
    for line in two_null:lines() do
        if line ~= nil then
            line = tonumber (line);
            if line > 1000 then
                os.execute("sh alarm.sh");
                print ("количество пакетов превышено");
                print (os.date());
                print (line)
            else
            end
        else
            os.execute("sh alarm.sh");
        end
    end;
    two_null:close();
 
    local two_null1 = io.popen("netstat |grep 7776 | awk '{print $2}'", 'r');
 
    for line in two_null1:lines() do
        if line ~= nil then
            line = tonumber (line);
            if line > 50000 then
                os.execute("sh alarm.sh");
                print ("количество пакетов превышено");
                print (os.date());
                print (line)
            else
            end
        else
            os.execute("sh alarm.sh");
        end
    end;
    two_null1:close();
 
 
    local two_str = io.popen('netstat |grep "7776" | wc -l', 'r');
    local data_two_str = two_str:read('*a');
    local number_data_two_stat = tonumber(data_two_str);
    if number_data_two_stat ~= nil then
        if number_data_two_stat < 2 then
            os.execute("sh alarm1.sh");
            print ("строк меньше двух");
            print (os.date());
            print (number_data_two_stat)
        else
        end
    else
    end
    two_str:close();
    os.execute("sleep 30");
end;
 

lua: ./offn.lua:9: attempt to compare number with nil
stack traceback:
        ./offn.lua:9: in main chunk
        [C]: ?

diver@calculate ~ $ netstat |grep 7776
tcp        0      0 192.168.0.92:55784      sir8.antoshin.exam:7776 ESTABLISHED
tcp        0      0 192.168.0.92:39794      sir8.antoshin.exam:7776 ESTABLISHED

local port = 7776;
local stat = io.popen('netstat | grep '..port);
local line = stat:read('*l');
stat:close();
local sock,resv_q, send_q = line:match("(%w+)%s+(%d+)%s+(%d+)%s+");
if sock == 'tcp' then
    print('req='..resv_q,'seq='..send_q);
else
    print("PORT IS DEEEEADDDD");
end

 for line in two_null:lines() do
        if line then
            line = tonumber (line);
            if line > 1000 then
                os.execute("sh alarm.sh");
                print ("количество пакетов превышено");
                print (os.date());
                print (line)
            else
            end
        else
            os.execute("sh alarm.sh");
        end
    end;
    two_null:close();

0
0

while(true) do
    local strs = io.popen('netstat | grep 7776');
    local line = strs:read('*l');

    local sock,resv_q, send_q = line:match("(%w+)%s+(%d+)%s+(%d+)%s+");
    if sock == 'tcp' then
       if tonumber(send_q) > 1000 then
           os.execute("sh alarm.sh");
           print ("количество пакетов превышено",send_q, os.date());
       end
       if tonumber(resv_q) > 5000 then
           os.execute("sh alarm.sh");
           print ("количество пакетов превышено",resv_q,os.date());
       end
    else
        print("PORT IS DEEEEADDDD");
        os.execute("sh alarm.sh");
    end
    -- читаем вторую строку если есть, если нет, алярм
    if not strs:read('*l') then
       os.execute("sh alarm.sh");
       print ("соединений меньше двух",os.date());
    end

    strs:close();
    os.execute('sleep 30');
end