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

    Всего: 1

  2. Pascal / Говнокод #24060

    0

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    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
    procedure ustbet;
    begin
    if (200*GCtrl.CurLines>coins.realBalance) then  begin
    if (150*GCtrl.CurLines>coins.realBalance) then  begin
    if (100*GCtrl.CurLines>coins.realBalance) then  begin
    if (50*GCtrl.CurLines>coins.realBalance) then  begin
        if (40*GCtrl.CurLines>coins.realBalance) then  begin
           if (30*GCtrl.CurLines>coins.realBalance) then  begin
             if (20*GCtrl.CurLines>coins.realBalance) then  begin
               if (15*GCtrl.CurLines>coins.realBalance) then  begin
                 if (10*GCtrl.CurLines>coins.realBalance) then  begin
                  if (5*GCtrl.CurLines>coins.realBalance) then  begin
                     if (4*GCtrl.CurLines>coins.realBalance) then  begin
                       if (3*GCtrl.CurLines>coins.realBalance) then  begin
                         if (2*GCtrl.CurLines>coins.realBalance) then  begin
                           if (1*GCtrl.CurLines>coins.realBalance) then  begin
     end else Coins.CurBet:=1
     end else Coins.CurBet:=2;
     end else Coins.CurBet:=3;
     end else Coins.CurBet:=4;
     end else Coins.CurBet:=5;
     end else Coins.CurBet:=10;
     end else Coins.CurBet:=15;
     end else Coins.CurBet:=20;
     end else Coins.CurBet:=30;
     end else Coins.CurBet:=40;
     end else Coins.CurBet:=50;
     end else Coins.CurBet:=100;
     end else Coins.CurBet:=150;
     end else Coins.CurBet:=200;
     coins.AllBet:=Coins.CurBet*gctrl.curlines;
    end;

    Предположительно, установка текущей ставки в слотовой игре. Но это ещё далеко не самый трэш в этом говнопроекте.

    SadButTrue, 03 Апреля 2018

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