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

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
  64. 64
  65. 65
  66. 66
  67. 67
  68. 68
  69. 69
  70. 70
  71. 71
  72. 72
  73. 73
  74. 74
  75. 75
  76. 76
  77. 77
  78. 78
  79. 79
  80. 80
--загрузка шрифта
MyFont = pge.font.load("verdana.ttf",12)

--цвета шрифта
white = pge.gfx.createcolor(255,255,255)
green = pge.gfx.createcolor(0,255,0)

--загрузка графики
A01 = pge.texture.load("pics/A-01.png")
A02 = pge.texture.load("pics/A-02.png")
A03 = pge.texture.load("pics/A-03.png")
A04 = pge.texture.load("pics/A-04.png")
A05 = pge.texture.load("pics/A-05.png")
A06 = pge.texture.load("pics/A-06.png")
A07 = pge.texture.load("pics/A-07.png")
A08 = pge.texture.load("pics/A-08.png")
A09 = pge.texture.load("pics/A-09.png")
A10 = pge.texture.load("pics/A-10.png")
A11 = pge.texture.load("pics/A-11.png")
A12 = pge.texture.load("pics/A-12.png")
A13 = pge.texture.load("pics/A-13.png")
A14 = pge.texture.load("pics/A-14.png")
A15 = pge.texture.load("pics/A-15.png")
A16 = pge.texture.load("pics/A-16.png")
A17 = pge.texture.load("pics/A-17.png")
A18 = pge.texture.load("pics/A-18.png")
A19 = pge.texture.load("pics/A-19.png")
A20 = pge.texture.load("pics/A-20.png")
A21 = pge.texture.load("pics/A-21.png")
A22 = pge.texture.load("pics/A-22.png")
A23 = pge.texture.load("pics/A-23.png")
A24 = pge.texture.load("pics/A-24.png")

--переменная для счётчика
index = 1


while pge.running() do
pge.controls.update()
pge.gfx.startdrawing() -- начало рисования
pge.gfx.clearscreen() -- очистка экрана
if pge.controls.pressed(PGE_CTRL_DOWN) then
index = index+1 -- увеличиваем index на 1
end

A01:activate()
A01:draw(30,25) -- отрисовка первой картинки
-- далее отрисовка последующих картинок в зависимости от значения переменной index
	if index==2 then
		pge.gfx.clearscreen()
		A02:activate()
		A02:draw(30,25)
	end
	if index==3 then
		pge.gfx.clearscreen()
		A03:activate()
		A03:draw(30,25)
	end
	if index==4 then
		pge.gfx.clearscreen()
		A04:activate()
		A04:draw(30,25)
	end
	if index==5 then
		pge.gfx.clearscreen()
		A05:activate()
		A05:draw(30,25)
	end
	if index==6 then
		pge.gfx.clearscreen()
		A06:activate()
		A06:draw(30,25)
	end

pge.gfx.enddrawing() -- конец отрисовки
pge.gfx.swapbuffers()
	if pge.controls.pressed(PGE_CTRL_START) then
		break
	end
end

Увидел и не смог не запостить
Lua

Запостил: Werdn Werdn, (Updated )

Комментарии (16) RSS

  • Я так на паскале в 8 классе писал... пока про массивы не узнал. Потом долго рыдал.
    Ответить
  • Я тут новый поэтому даты постов не смотрю...

    А
    if index==n then
    		pge.gfx.clearscreen()
    		A0n:activate()
    		A0n:draw(30,25)
    	end

    для остальных опущены чтобы поместилось в сотню?
    Ответить
  • писать на луа и не знать про таблицы это как писать на cи и не знать про char и int
    Ответить
    • В «PHP» ничего из этого нет. Именно поэтому я за «PHP».
      Ответить
      • Перевёл в терминах “PHP”:
        писать на луа и не знать про таблицы это как писать на “PHP” и не знать про array.
        Ответить
        • В «PHP», кстати, можно обойтись без массивов благодаря поиску переменных в рантайме.

          Если $a = 42; то $$a будет обозначать переменную с именем 42. Фактически $$a можно использовать как элемент массива.
          Ответить
  • ф H:WEQ?R$F"K!J:L?T.J$B)U"V)CW.U)L G$R!K.W A)PL:S)X J II.MG:J,H"QR"S,D"Q:F.W$K)A?G.G!H!G(FW"Q,W Z)L)R"P"N?H:R!G.E X!Y,K.E:U!S V?V$P)R)A)IZ P!Z(D P:G"W$B:M(C$N$T?J"T.G)H"L E!H$U(K(V:T(P"J.F!Q(X?Z.N"O:G"K?N?I?Q?A:U!O)M$E?O,T$H:G?J?W(O$G Q(I(LN)P V(E,H!A?X?B)P!B.T(IL:M?J$S?R,W U.M(Y B"S?P J N?K)V.Y D?C Z:F K,Y:D!P:R(W,N"A:O)F.V(B!Y"J(W R!N(J I)R$Q"A(R"B"B"T R:U$L)D?S E,B?W!BL!Z.M"M!M)T:S.D!J:T:V$M OQ Y!J)I,Q!K!VL$X,E?R$H!R)J!H!B:V N?B)P.R:G)M L,D.R(I"P C,LJ:V"U:Y.W"T$L?RV!T:W.WY.FU Z(I$G:E$KДUQPTKGERDYLNYBEMGCTWFQPYDTJQNNPJARVMYAYWFKCPNVORPGSTDSMWQZTTVEVLUZRJVXISOKYPRHYVSUMXEJTUUCRSEKZBNRTIVHKLZARWKKMAVUBTDXJTIIPYZWUBYLHPNAARJIKQGTAWVQRXERDJQHIMBHD
    Ответить

Добавить комментарий

Семь раз отмерь — один отрежь, guest!

    А не использовать ли нам bbcode?


    8