Bits - библиотека для преобразования чисел,слов в бинарный вид,и наоборот.

[NEO 541]

Bits - библиотека для преобразования чисел,слов в бинарный вид,и наоборот.

Функции:

getBits(number,length) return table, возвращает число в двоичном виде, length - разрядность.

getNumber(bits:table) - превращает двоичное число в десятичное.

CharToBit(char,length) - превращает символ в двоичный вид,length - разрядность.

WordToBit(word,length) - превращает строку в двоичный вид,length - разрядность.

BitToWord(bits,length) - превращает двоичные код разрядностью length в строку. 

 

http://pastebin.com/4wu0P98s

[Zer0Galaxy 2 187]

А где же методы NOT, OR, AND, XOR?

[Krutoy 1 169]

Нео, хотя разметка кода и концепция хороша, наделал и глупостей.

- Глобальные переменные в локальном окружении. Причем с одинаковыми названиями

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

- Нет полной поддержки юникода, некоторые функции используют string

- Последняя функция ничего не возвращает

[NEO Автор темы 541]

Нео, хотя разметка кода и концепция хороша, наделал и глупостей.

- Глобальные переменные в локальном окружении. Причем с одинаковыми названиями

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

- Нет полной поддержки юникода, некоторые функции используют string

- Последняя функция ничего не возвращает

Я так пишу :P , да забыл return word сделать.

Поправил окружение.

А где же методы NOT, OR, AND, XOR?

Не успел сделать.

Изменено 8 июля, 2015 пользователем NEO

[swg2you 403]

это чой-то дюже специфическая библиотека получилась. 

• неясно зачем "бинарный вид" хранить в таблице. это же сколько килобайт на бит будет?
• неясно зачем вообще писать для него функцию, если луа и так умеет работать с битами.
• неясно зачем переводить делением/возведением в степень о_О, если есть сдвиг и маска
• неясно зачем CharToBit и WordToBit вместо одной str2bin

--==--

если нужно в двоичный и назад то проще как-то так:

function bin(n, l)
  local b=''
  for i=0,l or 31 do
    b=bit32.extract(n, i)..b
  end
  return b
end

function dec(b)
  local n=0
  for i=1, #b do
    n=bit32.replace(n, string.sub(b,i,i), #b-i)
  end
  return n
end

print(bin(196))
print(dec('11000100'))

[NEO Автор темы 541]

Кто может подсказать, хочу сделать поддержку unicode, но проблема в том что unicode.byte нет, а каким образом код получить я пока не знаю.

 

это чой-то дюже специфическая библиотека получилась. 

• неясно зачем "бинарный вид" хранить в таблице. это же сколько килобайт на бит будет?
• неясно зачем вообще писать для него функцию, если луа и так умеет работать с битами.
• неясно зачем переводить делением/возведением в степень о_О, если есть сдвиг и маска
• неясно зачем CharToBit и WordToBit вместо одной str2bin

--==--

если нужно в двоичный и назад то проще как-то так:

function bin(n, l)
  local b=''
  for i=0,l or 31 do
    b=bit32.extract(n, i)..b
  end
  return b
end

function dec(b)
  local n=0
  for i=1, #b do
    n=bit32.replace(n, string.sub(b,i,i), #b-i)
  end
  return n
end

print(bin(196))
print(dec('11000100'))

  Тебе не ясно, твои проблемы, я люблю изучать, вот и пишу.

[swg2you 403]

Кто может подсказать, хочу сделать поддержку unicode, но проблема в том что unicode.byte нет, а каким образом код получить я пока не знаю.

  Тебе не ясно, твои проблемы, я люблю изучать, вот и пишу.

 

 

unicode.byte - существовать не может в принципе, в utf-8 один символ может кодироваться последовательностью от 1 до 6 байт.

но unicode.byte и не нужен, в принципе.

local s='уникодэ'
local h=''

for i=1,#s do
  h=h..' '..string.format('%X', string.byte(s,i))
end

print(s, #s) --строка и её длина в байтах
print(h) -- побайтовое представление в нёх