Метатабличный / Говнокод #25829 Ссылка на оригинал

0

  1. 1
  2. 2
  3. 3
  4. 4
  5. 5
  6. 6
  7. 7
  8. 8
  9. 9
  10. 10
  11. 11
  12. 12
  13. 13
  14. 14
  15. 15
  16. 16
  17. 17
  18. 18
  19. 19
  20. 20
  21. 21
  22. 22
  23. 23
  24. 24
  25. 25
  26. 26
if self.Weapon:GetNextPrimaryFire() < CurTime() then
	if GetConVarNumber( "ma2_togglechargeui" ) == 1 then
		if (self.Charge-self.DmgMin)/self.DmgMax*100<=10 then
			ply:SetNWString("chargebar","██")
		elseif (self.Charge-self.DmgMin)/(self.DmgMax-self.DmgMin)*100<=20 then
			ply:SetNWString("chargebar","████")
		elseif (self.Charge-self.DmgMin)/(self.DmgMax-self.DmgMin)*100<=30 then
			ply:SetNWString("chargebar","██████")
		elseif (self.Charge-self.DmgMin)/(self.DmgMax-self.DmgMin)*100<=40 then
			ply:SetNWString("chargebar","████████")
		elseif (self.Charge-self.DmgMin)/(self.DmgMax-self.DmgMin)*100<=50 then
			ply:SetNWString("chargebar","██████████")
		elseif (self.Charge-self.DmgMin)/(self.DmgMax-self.DmgMin)*100<=60 then
			ply:SetNWString("chargebar","████████████")
		elseif (self.Charge-self.DmgMin)/(self.DmgMax-self.DmgMin)*100<=70 then
			ply:SetNWString("chargebar","██████████████")
		elseif (self.Charge-self.DmgMin)/(self.DmgMax-self.DmgMin)*100<=80 then
			ply:SetNWString("chargebar","████████████████")
		elseif (self.Charge-self.DmgMin)/(self.DmgMax-self.DmgMin)*100<=90 then
			ply:SetNWString("chargebar","██████████████████")
		elseif (self.Charge-self.DmgMin)/(self.DmgMax-self.DmgMin)*100>90 then
			ply:SetNWString("chargebar","████████████████████")
			ply:SetNWBool("chargemaxxxed",true)
		end
	end
end

https://steamcommunity.com/sharedfiles/filedetails/?id=1825542758

amd amd, (Updated )

Комментарии (13, +13)

Метатабличный / Говнокод #25804 Ссылка на оригинал

0

  1. 1
  2. 2
  3. 3
  4. 4
  5. 5
  6. 6
  7. 7
  8. 8
  9. 9
  10. 10
⌠✔⌡ СМС бомбер на любой номер с любым текстом и поддельным отправителем всего за 0,99р -> https://bit.ly/2XSMAfW
⌠✔⌡ СМС бомбер на любой номер с любым текстом и поддельным отправителем всего за 0,99р -> https://bit.ly/2XSMAfW
⌠✔⌡ СМС бомбер на любой номер с любым текстом и поддельным отправителем всего за 0,99р -> https://bit.ly/2XSMAfW
⌠✔⌡ СМС бомбер на любой номер с любым текстом и поддельным отправителем всего за 0,99р -> https://bit.ly/2XSMAfW
⌠✔⌡ СМС бомбер на любой номер с любым текстом и поддельным отправителем всего за 0,99р -> https://bit.ly/2XSMAfW
⌠✔⌡ СМС бомбер на любой номер с любым текстом и поддельным отправителем всего за 0,99р -> https://bit.ly/2XSMAfW
⌠✔⌡ СМС бомбер на любой номер с любым текстом и поддельным отправителем всего за 0,99р -> https://bit.ly/2XSMAfW
⌠✔⌡ СМС бомбер на любой номер с любым текстом и поддельным отправителем всего за 0,99р -> https://bit.ly/2XSMAfW
⌠✔⌡ СМС бомбер на любой номер с любым текстом и поддельным отправителем всего за 0,99р -> https://bit.ly/2XSMAfW
⌠✔⌡ СМС бомбер на любой номер с любым текстом и поддельным отправителем всего за 0,99р -> https://bit.ly/2XSMAfW

⌠✔⌡ СМС бомбер на любой номер с любым текстом и поддельным отправителем всего за 0,99р -> https://bit.ly/2XSMAfW
⌠✔⌡ СМС бомбер на любой номер с любым текстом и поддельным отправителем всего за 0,99р -> https://bit.ly/2XSMAfW
⌠✔⌡ СМС бомбер на любой номер с любым текстом и поддельным отправителем всего за 0,99р -> https://bit.ly/2XSMAfW
⌠✔⌡ СМС бомбер на любой номер с любым текстом и поддельным отправителем всего за 0,99р -> https://bit.ly/2XSMAfW
⌠✔⌡ СМС бомбер на любой номер с любым текстом и поддельным отправителем всего за 0,99р -> https://bit.ly/2XSMAfW
⌠✔⌡ СМС бомбер на любой номер с любым текстом и поддельным отправителем всего за 0,99р -> https://bit.ly/2XSMAfW
⌠✔⌡ СМС бомбер на любой номер с любым текстом и поддельным отправителем всего за 0,99р -> https://bit.ly/2XSMAfW
⌠✔⌡ СМС бомбер на любой номер с любым текстом и поддельным отправителем всего за 0,99р -> https://bit.ly/2XSMAfW
⌠✔⌡ СМС бомбер на любой номер с любым текстом и поддельным отправителем всего за 0,99р -> https://bit.ly/2XSMAfW
⌠✔⌡ СМС бомбер на любой номер с любым текстом и поддельным отправителем всего за 0,99р -> https://bit.ly/2XSMAfW

smspam smspam, (Updated )

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

Метатабличный / Говнокод #25726 Ссылка на оригинал

0

  1. 1
  2. 2
  3. 3
  4. 4
  5. 5
  6. 6
  7. 7
Есть случаи когда нужно 2 вызывать сборку помойки...

A = {x = "this is A"}
B = {f = A}
setmetatable(B, {__gc = function (o) print(o.f.x) end})
A, B = nil
collectgarbage() -- this is A

Роберту это называет Воскресение (Воскрешение)
https://stackoverflow.com/questions/28320213/why-do-we-need-to-call-luas-collectgarbage-twice

_____ _____, (Updated )

Комментарии (48, +48)

Метатабличный / Говнокод #25667 Ссылка на оригинал

0

  1. 1
  2. 2
  3. 3
  4. 4
  5. 5
  6. 6
  7. 7
  8. 8
  9. 9
  10. 10
  11. 11
  12. 12
  13. 13
  14. 14
  15. 15
  16. 16
  17. 17
  18. 18
  19. 19
  20. 20
  21. 21
  22. 22
  23. 23
  24. 24
  25. 25
  26. 26
  27. 27
  28. 28
  29. 29
  30. 30
  31. 31
  32. 32
  33. 33
  34. 34
  35. 35
  36. 36
  37. 37
  38. 38
gr = love.graphics
win = love.window
lk = love.keyboard
require("button")
require("t")

function love.load()
local loading = {}
loading = serialize.load("records.lua")
font = gr.newFont("NotoSans.ttf",14)
mini = gr.newFont("NotoSans.ttf",10)
big = gr.newFont("NotoSans.ttf",30)
flag = nil --Flag = nil -menu, Flag = 1 -records, Flag = 2 -type game, Flag = 3 -type game standart, Flag = 4 -type game impulse, Flag = 5 -type game Invers, Flag = 6 -type game Unreal
kube = {x = 96, y = 196, colx = 8, coly = 8}
speed = 1
timer = 0
umber = {}
records = {{"Standart", 0},{"Impulse", 0},{"Invers", 0},{"Unreal", 0},{"XY diagonal", 0},{"Perpendiculars", 0}}
if loading and #loading > 0 then
	for i = 1, #loading do
		records[i][2] = loading[i]
	end
end
score = 0
	mb = {utton:create(200-font:getWidth(">Play<")/2,125,">Play<"),utton:create(200-font:getWidth(">Records<")/2,160,">Records<"),utton:create(200-font:getWidth(">Exit<")/2,195,">Exit<")}
	tgb = {utton:create(200-font:getWidth(">Standart<")/2,60,">Standart<"),utton:create(200-font:getWidth(">Impulse<")/2,90,">Impulse<"),utton:create(200-font:getWidth(">Invers<")/2,120,">Invers<"),utton:create(200-font:getWidth(">Unreal<")/2,150,">Unreal<"),utton:create(200-font:getWidth(">XY diagonal<")/2,180,">XY diagonal<"),utton:create(200-font:getWidth(">Perpendiculars<")/2,210,">Perpendiculars<")}
	back = utton:create(200-font:getWidth(" >Back< ")/2,300," >Back< ")
	r = utton:create(200-font:getWidth(" >Restart< ")/2,250," >Restart< ")
end

local function restart()
	kube = {x = 96, y = 196, colx = 8, coly = 8, speed = 350}
	speed = 1
	timer = 0
	umber = {}	
	score = 0
	toch = nil
end

My первый игра сделаная на love2d. Аж всплакнул.

3oJIoTou_xyu 3oJIoTou_xyu, (Updated )

Комментарии (27, +27)

Метатабличный / Говнокод #25633 Ссылка на оригинал

0

  1. 1
  2. 2
  3. 3
  4. 4
  5. 5
  6. 6
  7. 7
  8. 8
  9. 9
  10. 10
  11. 11
  12. 12
  13. 13
  14. 14
  15. 15
  16. 16
  17. 17
  18. 18
  19. 19
  20. 20
  21. 21
  22. 22
  23. 23
  24. 24
  25. 25
  26. 26
  27. 27
  28. 28
  29. 29
  30. 30
  31. 31
  32. 32
  33. 33
  34. 34
  35. 35
  36. 36
  37. 37
  38. 38
  39. 39
  40. 40
  41. 41
  42. 42
  43. 43
  44. 44
  45. 45
  46. 46
  47. 47
  48. 48
  49. 49
  50. 50
  51. 51
  52. 52
  53. 53
  54. 54
  55. 55
  56. 56
  57. 57
  58. 58
  59. 59
  60. 60
  61. 61
  62. 62
  63. 63
utf8 = {}
function utf8.charbytes(s, i)
   -- argument defaults
   i = i or 1
   local c = string.byte(s, i)
   
   -- determine bytes needed for character, based on RFC 3629
   if c > 0 and c <= 127 then
      -- UTF8-1
      return 1
   elseif c >= 194 and c <= 223 then
      -- UTF8-2
      local c2 = string.byte(s, i + 1)
      return 2
   elseif c >= 224 and c <= 239 then
      -- UTF8-3
      local c2 = s:byte(i + 1)
      local c3 = s:byte(i + 2)
      return 3
   elseif c >= 240 and c <= 244 then
      -- UTF8-4
      local c2 = s:byte(i + 1)
      local c3 = s:byte(i + 2)
      local c4 = s:byte(i + 3)
      return 4
   end
end

function utf8.len(s)
   local pos = 1
   local bytes = string.len(s)
   local len = 0
   
   while pos <= bytes and len ~= chars do
      local c = string.byte(s,pos)
      len = len + 1
      
      pos = pos + utf8.charbytes(s, pos)
   end
   
   if chars ~= nil then
      return pos - 1
   end
   
   return len
end

print(utf8.len("Аутизм")) --6

local mt = {__len = function(self) 
      local k=0
      for _,v in pairs(self) do 
        k = k+1;
        if k > 1 then  print(1) return #self end
      end
      if k==1 and type(self[1])=="string" then
        print(utf8.len(self[k]))
      end
    end};
setmetatable(_G,{
    __index = function(self, key) return setmetatable({key},mt) end} 
  )
t=(#Аутизм) --12

Чот пытался - но словил хуйца.

3oJIoTou_xyu 3oJIoTou_xyu, (Updated )

Комментарии (7, +7)

Метатабличный / Говнокод #25272 Ссылка на оригинал

0

  1. 1
  2. 2
  3. 3
  4. 4
  5. 5
  6. 6
  7. 7
  8. 8
  9. 9
  10. 10
  11. 11
-- Pipe Elbow ****************************************************************************
pipe_elbow = util.table.deepcopy(data.raw["storage-tank"]["storage-tank"])
pipe_elbow.name = "pipe-elbow"
pipe_elbow.icon = "__Flow Control__/graphics/icon/pipe-elbow.png"
pipe_elbow.minable = data.raw["pipe"]["pipe"]["pipe"]["pipe"]["pipe"]["pipe"]["pipe"]["pipe"].minable
pipe_elbow.corpse = "small-remnants"
pipe_elbow.max_health = data.raw["pipe"]["pipe"]["pipe"]["pipe"]["pipe"]["pipe"]["pipe"]["pipe"].max_health
pipe_elbow.resistances = data.raw["pipe"]["pipe"]["pipe"]["pipe"]["pipe"]["pipe"]["pipe"]["pipe"].resistances
pipe_elbow.fast_replaceable_group = data.raw["pipe"]["pipe"]["pipe"]["pipe"]["pipe"]["pipe"]["pipe"]["pipe"].fast_replaceable_group
pipe_elbow.collision_box = data.raw["pipe"]["pipe"]["pipe"]["pipe"]["pipe"]["pipe"]["pipe"]["pipe"].collision_box
pipe_elbow.selection_box = data.raw["pipe"]["pipe"]["pipe"]["pipe"]["pipe"]["pipe"]["pipe"]["pipe"].selection_box

Пип Еблов.
Factorio mod Flow Control_3.0.3
--Завышеное ЧСВ или самолюбование?

TOPT TOPT, (Updated )

Комментарии (26, +26)

Метатабличный / Говнокод #25016 Ссылка на оригинал

0

  1. 1
  2. 2
  3. 3
  4. 4
  5. 5
  6. 6
  7. 7
  8. 8
  9. 9
  10. 10
  11. 11
  12. 12
  13. 13
  14. 14
  15. 15
  16. 16
  17. 17
  18. 18
  19. 19
  20. 20
class Person {
    protected name: string;
    constructor(name: string) { this.name = name; }
}

class Employee extends Person {
    private department: string;

    constructor(name: string, department: string) {
        super(name);
        this.department = department;
    }

    public get ElevatorPitch() {
        return `Hello, my name is ${this.name} and I work in ${this.department}.`;
    }
}

let howard = new Employee("Howard", "Sales");
console.log(howard.ElevatorPitch);

наговнокодил компайлер TypeScript для Lua для тех кто терпеть не может такой говноязык как Lua но в экстазе от говно Vm от Lua 5.3

https://github.com/ASDAlexander77/TypeScriptLUA

Закомпили тестовый файл:
node __out/main.js test.ts

Теперь можно эту лажу запустить
lua test.lua

ASD_77 ASD_77, (Updated )

Комментарии (25, +25)