Список говнокодов пользователя Sfabrikan

Всего: 19

Lua / Говнокод #20012

+24

1
2
3
4

govno = {10}
a = {5}
setmetatable(a, {__add = function(x,y) return x[1] * y[1] end})
print(a+govno) -- 50

плохо что работает только с таблицами

Sfabrikan, 15 Мая 2016

Комментарии (36)

Lua / Говнокод #20005

+28

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35

do
	local gull, coc --гуля? сосок?
	local tbl = {}
	math.randomseed(os.time()*os.clock()/math.floor(os.clock()))
	print("Введите число кокосов")
	local val = io.read("*number")
	local sum_wei = 0
	local sg = 0
		for i=1, val do
			coc = math.random(1500,2500)
			print("Кокос № "..i.."весит: "..coc.." гр.")
			sum_wei = sum_wei + coc
		end
		while true do
			gull = math.random(17,19)
			--print("ласточка №"..i.."весит: "..gull)
			table.insert(tbl,0)
			sg = sg + gull/2
			if sg > sum_wei then break end
		end
	local val_s = #tbl
	local t = "кокос"
	if val < 5 and  val > 1 then
		t = t.."а"
	elseif val > 4 then
		t = t.."ов"
	end
	local c = "ласточ"
	if val_s < 5 and  val_s > 1 then
		c = c.."и"
	elseif val_s > 4 then
		c = c.."ек"
	end
	print("Вам "..val_s.." "..c.." принесли "..val.." "..t.."\n Общая масса ласточек: "..sg.."\n Общая масса кокосов: "..sum_wei)
end

Подсчет сколько нужно ласточек для n число кокосов
Привет из "Монти Пайтон и Священый Грааль"
Хотите подсчитать в онлайн интерпретаторах? на 6 строчке замените io.read("*number") на нужное вам число кокосов. например так
local val = 10
Нет это не лаба, хотя и выглядит так.

Sfabrikan, 14 Мая 2016

Комментарии (12)

Lua / Говнокод #19976

+13

1
2
3

a = nil
--или так
a = {nil}

Встречал несколько раз, не понимаю зачем эдакое делать

Sfabrikan, 10 Мая 2016

Комментарии (75)

Lua / Говнокод #19957

+10

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37

do
	local name = {"Маша ","Алиса ","Анджела ","Настя ","Петровна ","Василиса ","Олег "}
	local beauty = {"Супер ","Так себе ","Очень даже ничего ","Ужас! "}
	local len_n, len_b = #name, #beauty
	math.randomseed(os.time())

	local kurwa = {}

	function kurwa:cr()
		local t = {}
		t.money = math.random(1000,100000)
		t.name = name[math.random(1,len_n)]
		t.b = beauty[math.random(1,len_b)]
		return setmetatable(t, {__index = self})
	end
	
	function kurwa:say()
		local x
		if self.name ~= name[7] then
			x = " она "
		else
			x = " он "
		end
		print("Имя: "..self.name.."Оплата труда: "..self.money..x..self.b)
	end
	
	for i=1, 5 do --заказываем 5 курв
		table.insert(kurwa, kurwa:cr())
	end
	
	for cv,kw in ipairs(kurwa) do
		print("№"..cv)
		if type(kw) == "table" then
			kw:say()
		end
	end
end

Симулятор Случайных шлюх

Sfabrikan, 07 Мая 2016

Комментарии (65)

Lua / Говнокод #19934

+17

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18

строка = {гони_длину = string.len, подстановка = string.gsub, маленькие_буквы = string.lower, большие_буквы = string.upper, гони_кусок = string.sub}
ос = {время = os.time, таймер = os.clock}
таблица = {внедрить = table.insert, удалить = table.remove, сортировка = table.sort, перебери = table.foreach}
матан = {модуль = math.abs, огругление_верх = math.ceil, огругление_низ = math.floor, случайно = math.random, ключ_случайности = math.randomseed}
ввод_вывод = {читать = io.read, записать = io.write, открыть = io.open}
тип = type
вернуть_пару = ipairs
незнаю_как_точно_это_описать = pairs
печатать = print

времечко = ос.таймер()
матан.ключ_случайности(ос.время())
тбл = {}
таблица.внедрить(тбл,{"petux","kurica","arbalet","turnik","ne sluzhil - ne muzhik"})
таблица.перебери(тбл[1], function(k,v) if v == "arbalet" then печатать(строка.гони_длину(v)); таблица.удалить(тбл[1], k) end end)
печатать("---------------------------------------------")
таблица.перебери(тбл[1], print)
печатать("operacia viponena za "..времечко.."sek\n"..строка.большие_буквы("cho tak medleno suka").."\nSluchaynoe chislo ot 1 do 1000: "..матан.случайно(1,1000))

кажись в онлайн интерпретатор и выше версии lua 5.1 это не работает!
но на двиге love2d работает

Sfabrikan, 05 Мая 2016

Комментарии (19)

Lua / Говнокод #19875

+14

1
2
3
4
5
6
7
8
9

a = {}
a[{}] = 100500
local store
	for i, k in pairs(a) do
		print(i,k) --table, 100500
		store = i
	end
print(a[{}]) --nil
print(a[store]) --100500

Sfabrikan, 25 Апреля 2016

Комментарии (14)

Lua / Говнокод #19872

+30

1

math.randomseed(math.random(1,100))

Sfabrikan, 24 Апреля 2016

Комментарии (12)

Lua / Говнокод #19860

+18

1
2
3
4
5

a = {}
table.insert(a,a)
a[1][1][1][1][1][1][1][1][1][1][1][1][1][1][1][1][1][1][1][1][1][1][21312] = 5
a[1][1][1][1][1][1][1][1][1][1] = 1
print(a[1], a[21312]) -- Вывод: 1, 5

Sfabrikan, 22 Апреля 2016

Комментарии (24)

Lua / Говнокод #19857

+32

1
2

a = {try = function() if a then print("\"a\" BE!") else print("\"a\" not BE!") end end}
a.try()

Проверка самого себя на существование, а вдруг он чья та иллюзия?!

Sfabrikan, 22 Апреля 2016

Комментарии (3)

Говнокод: по колено в коде.