Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
Всего: 19
−993
lit = {"aeoiyu","qwrtpsdfghjklzxcvbnm"}
function strgen()
local stor = ""
while true do
local r = {math.random(1,#lit[1]),math.random(1,#lit[2])}
local s = {lit[1]:sub(r[1],r[1]),lit[2]:sub(r[2],r[2])}
r2 = math.random(1,4)
if r2 == 1 then
stor = stor..s[1]..s[2]
else
stor = stor..s[2]..s[1]
end
if math.random(1, 10-#stor) == 1 then
break
end
end
return stor
endНазову я его генератор для названий заклинаний
Sfabrikan,
31 Августа 2016
−23
Ребята, вы меня не знаете.
Я единственный тут заполнял раздел луа говнокодом, но какой-то мудак выпилил все луашки.
Я растроился, но читал тут смешные комментарий. Сейчас даже смешные комментарии не прочитаешь.
Багроебы и прочая нечисть отбивает желание тут находится и я решил уйти.
Так к чему это я? К тому что золотым хуем был я.
Sfabrikan,
17 Августа 2016
−975
people = {}
function people:cr(age,id,fami)
local t = {}
t.age = age or {0,0,0} --лет, месяцев, дней
t.id = id
t.mid = id
t.gen = math.random(1,2)
sch[1][t.gen] = sch[1][t.gen]+1
t.name = name[t.gen][math.random(1,#name[t.gen])]
t.fam = name[1][math.random(1,#name[t.gen])]..fam[t.gen]
if fami then
t.fam = fami..fam[t.gen]
end
t.b = false; t.zh = false; t.sv = {"",""}
t.tirod = 0; t.srname = ""
return setmetatable(t,{__index = self})
end
function people:life()
self.age[3] = self.age[3] + 1
if self.age[3] == 30 then
self.age[2] = self.age[2] + 1
self.age[3] = 0
end
if self.age[2] == 12 then
self.age[2] = 0
self.age[1] = self.age[1] + 1
end
if self.age[1] >= 16 then
if self.gen == 2 then
if self.zh then
if self.tirod == 0 then
local r = math.random(1,20)
if r == 1 then
self.tirod = 1
end
end
else
if not self.zhid then
self.zhid = #sch[2]+1
--print(self.zhid)
sch[2][#sch[2]+1] = self.id
end
end
if self.tirod > 0 then
local r = math.random(266,294)
local ploho = math.random(1,10000)
self.tirod = self.tirod + 1
if ploho == 1 then
self.tirod = 0
end
if self.tirod >= r then
local _ = #pl+1
local name = self.sv[1]
if self.srname then
name = self.srname
self.srname = nil
end
pl[_] = people:cr(nil,_,name)
self.tirod = 0
end
end
else
if not self.zh then
local r = math.random(1,200)
if r == 1 then
local l = math.random(1,#sch[2])
self.mid = sch[2][l]
print(self.mid,l)
local n,f = pl[self.mid]:svadba(self.name,self.fam,self.id)
self:svadba(n,f,id)
table.remove(sch[2],l)
end
end
end
end
self.rkill = math.random(1, 10000)
if self.rkill == 1 then
sch[1][self.gen] = sch[1][self.gen]-1
if self.gen = 2 and not self.zh then
pl[self.id] = nil
end
end
end
function people:svadba(n,f,id)
self.sv = {n,f}
self.mid = id
self.zh = true
return self.name, self.fam
end
local tex = {" Женат на "," Замужем за "}
function people:dr(x,y)
gr.print(self.name.." "..self.fam.." "..self.age[1].." "..self.age[2].." "..self.age[3].." беременность: "..self.tirod..tex[self.gen]..self.sv[1].." "..self.sv[2],x,y)
endБагованая жизнь
Sfabrikan,
09 Августа 2016
−976
Где мой lua?
Sfabrikan,
25 Июля 2016
+11
math.randomseed(os.time())
local a = {}
a[#a+1] = function() --create
local t = {}
t[#a+1] = math.random(1,100)
t[#a+2] = 'хуй'
return setmetatable(t,{__index = a})
end
a[#a+1] = function() --empty function
end
local t = a[1]()
for k,v in ipairs(t) do
print(k,v) --показывает все элементы таблицы как положено
end
print(#t) --0
print(t[4]) --хуй
Загадка: почему длина таблицы t = 0?
ps. # - это оператор возращает длину
Sfabrikan,
23 Июля 2016
+21
lua socetдопустил такую ошибку когда искал либу socket'а
Sfabrikan,
11 Июля 2016
+17
print(nil or true and nil or false or x and true and false or y)
Sfabrikan,
16 Июня 2016
+7
govno = "100"
kod = "500"
_G["govno".."kod"] = "говно"
print(govnokod) --вывод говно
Sfabrikan,
24 Мая 2016
+8
local p = 14 --puxel
local font = love.graphics.newFont("LiberationMono-Regular.ttf",p)
love.graphics.setFont(font)
local text = "ASSHOLEGHOSTWISHMASTER"
love.filesystem.setIdentity(text)
local img = love.image.newImageData("jpg/Gutalax - Asshole Ghost Wishmaster (official)(1) 0001.jpg")
local w, h = img:getDimensions( )
text = text:rep(math.ceil(w/text:len()))
local t = love.filesystem.getDirectoryItems(text)
t = #t
--print(t)
cdr = 1200 --frame
t = cdr-1 --one frame
--love.graphics.setBackgroundColor(0,0,0)
for i=t+1, cdr do
local n = string.format("%04d",i)
img = love.image.newImageData("jpg/Gutalax - Asshole Ghost Wishmaster (official)(1) "..n..".jpg")
local c = love.graphics.newCanvas(w*(p-1),h*(p-1))
love.graphics.setCanvas(c)
love.graphics.setColor(0,0,0)
love.graphics.rectangle("fill", 0, 0, w*(p-1), h*(p-1) )
for x=0, w-1 do
for y=0, h-1 do
local r,g,b = img:getPixel(x,y)
love.graphics.setColor(r,g,b)
love.graphics.print(text:sub(x,x),(x-1)*(p-1),(y-1)*(p-1))
end
end
print("procesing "..i)
local screen = c:newImageData()
screen:encode('png',i..'.png')
collectgarbage()
end
love.graphics.setCanvas()
На скриптах такое лучше не реализовывать, очень медлено...
Выхлоп: https://yadi.sk/i/tI8Wi2ukrpY8i
Sfabrikan,
19 Мая 2016
+10
xyu = function() return pairs({0}) end
for no_money, CBucTHu in xyu() do endmy english very ploh
Sfabrikan,
17 Мая 2016
Follow us!