По колено в коде — Говнокод.ру

Куча / Говнокод #15866

+144

1
2
3

Кто против выхода языка программирования Lapis - ставьте минус, кто за - плюс.
P.s. если наберётся 10 плюсов, дам интерпретатор.
P.p.s. если наберётся 10 минусов, никогда никому тут не дам интерпретатор :)

Ждём-с, пока пост наберёт +-10.

Mobac, 30 Апреля 2014

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

C++ / Говнокод #15865

+59

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
38
39
40
41
42

#include <iostream>
using namespace std;

int main()
{
    setlocale(0, "");
    int a, b;
    cout << "Vvedite pervoe chislo: ";
    cin >> a;
    cout << "Vvedite vtoroe chislo: ";
    cin >> b;
    int c, d, e, f, h;
    cout << "Vvedite gelaemuy operaciu: ";
    cin >> c, d, e, f;
    if (c)
    {
        h = a + b;
    }
    else
    {
        if (d)
        {
            h = a - b;
        }
        else
        {
            if (e)
            {
                h = a * b;
            }
            else
            {
                if (f)
                {
                    h = a / b;
                }
            }
        }
    }
    cout << "Rezultat: " << h << endl;
    return 0;
}

jkhne4pijgberg, 29 Апреля 2014

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

Pascal / Говнокод #15864

+79

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

if (Grid.DataSource.DataSet.Name = 'tMMain')
      or (Grid.DataSource.DataSet.Name = 'tMain')
      then
        Tg := Grid.DataSource.DataSet.FieldByName('ARTID').AsInteger
      else
        if Grid.DataSource.DataSet.Name = 'tAnalog' then
          Tg := Grid.DataSource.DataSet.FieldByName('IDPROD').AsInteger
        else
          if Grid.DataSource.DataSet.Name = 'tPriceSet' then
            Tg := Grid.DataSource.DataSet.FieldByName('IDPROD').AsInteger
          else
            if Grid.DataSource.DataSet.Name = 'tProd' then
              Tg := Grid.DataSource.DataSet.FieldByName('ID').AsInteger
            else
              Tg := 0;

Крутое решение проблемы разных полей в разных источниках вызова.
А вы говорите виртуализация, перегрузка функций....

TikiRU, 29 Апреля 2014

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

Куча / Говнокод #15863

+118

01
02
03
04
05
06
07
08
09
10
11

put 'Сейчас я загадаю число от 1 до 100, и это будет..'
a = rnd(100)
put a.to_s + ' - загаданное число! В конце мы получим 4!'
b = a*2
put b.to_s + ' - это ' + a.to_s + ', умноженное на 2!'
c = b+8
put c.to_s + ' - это ' + b.to_s + ', к которому мы прибавили 8!'
e = c/2 
put e.to_s + ' - это ' + c.to_s + ', которое мы разделили на 2!'
d = e-a
put d.to_s + ' - это результат. То есть мы отняли от ' + e.to_s + ' - ' + a.to_s + '. Видите, это же ' + d.to_s + '!'

С названием языка всё-таки решился, называл его "Lapis". (На Ruby синтаксис немного похож, но очень много будет отличий)!
Кто-нибудь хочет принять участие в разработке интерпретатора? Пишу на javascript-е, будет транслируемый язык.
Кто за, ставьте плюс посту и пишите в комментарии.

Mobac, 29 Апреля 2014

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

PHP / Говнокод #15862

+153

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

if (!empty($_POST["favoriteColor"])) {
    switch($_POST["favoriteColor"]) {
        case "Lightred":
            $strBackgroundColor = "#FFDAB9";
            break;
        case "Lightgreen":
            $strBackgroundColor = "Lightgreen";
            break;
        case "Lightblue":
            $strBackgroundColor = "Lightblue";
            break;
        case "Lightgray":
            $strBackgroundColor = "Lightgray";
            break;
        default:
            $strBackgroundColor = "Gray";
            break;
    }
} else {
    $strBackgroundColor = "Gray";
}

jkhne4pijgberg, 29 Апреля 2014

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

C# / Говнокод #15860

+126

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23

[System.Diagnostics.CodeAnalysis.SuppressMessage("Microsoft.Design", "CA1031:DoNotCatchGeneralExceptionTypes")]
private static void LoadSendMethodFromConfig()
{
    if (!sendMethod.HasValue)
    {
        sendMethod = SendMethodTypes.Default;

        try
        {
            // read SendKeys value from config file, not case sensitive
            string value = System.Configuration.ConfigurationManager.AppSettings.Get("SendKeys");

            if (string.IsNullOrEmpty(value))
                return;

            if (value.Equals("JournalHook", StringComparison.OrdinalIgnoreCase))
                sendMethod = SendMethodTypes.JournalHook;
            else if (value.Equals("SendInput", StringComparison.OrdinalIgnoreCase))
                sendMethod = SendMethodTypes.SendInput;
        }
        catch { } // ignore any exceptions to keep existing SendKeys behavior
    }
}

Сорцы дотнета. Игнорируем любые исключения. Возмущение компилятора отключаем атрибутом. Как мило!

Пруф: http://referencesource.microsoft.com/#System.Windows.Forms/ndp/fx/src/winforms/Managed/System/WinForms/SendKeys.cs#323f3884113aa0ae#references

Цимес ещё и в том, что раньше в коде не было строк:

if (string.IsNullOrEmpty(value))

    return;

То есть NullReferenceException тоже глушилось.

ЗЫ: пришлось пароль вспоминать, чтобы запостить. А то лень было логиниться, из под геста изредка комментил.

koodeer, 28 Апреля 2014

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

C# / Говнокод #15859

+133

1
2
3
4
5
6

public string ReturnBondCurrency(int billTableLine)
{
     return char.ConvertFromUtf32(Table[billTableLine, 1]) +
            char.ConvertFromUtf32(Table[billTableLine, 2]) +
            char.ConvertFromUtf32(Table[billTableLine, 3]);
}

Table - двумерный массив байт.
Encoding.ASCII.GetString() отдыхает.

yamamoto, 28 Апреля 2014

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

C# / Говнокод #15857

+130

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
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91

class Users : Data
    {
        public int ID { get; set; }
        public string Name { get; set; }
        public int PostID { get; set; }
        public int SubdivID { get; set; }
        public QueryType qType { get; set; }
        public static QueryState qState { get; set; }
        
        /// <summary>
        /// Типы запроса для QueryBuilder
        /// </summary>
        public enum QueryType : int
        {
            Insert = 1,
            Delete,
            Update,
            SelectUsers,
            SelectUser,
            SelectUsersbyName
        }

        /// <summary>
        ///  Статусы открытия формы (добавление или редактирование)
        /// </summary>
        public enum QueryState : int
        {
            Insert = 1,
            Update
        }

        public Users()
        {
            ID = -1;
            Name = null;
        }

        /// <summary>
        /// Формирует запрос на основе значения переменной qType и осуществляет выборку данных
        /// </summary>
        public void QueryBuilder()
        {
            switch (qType)
            {
                case QueryType.SelectUsers:
                    {
                        QueryText = "Select Users.ID, Users.Name, Posts.Name, Subdivisions.Name from Users, Posts, Subdivisions Where Users.SubdivID = subdivisions.ID and Users.PostID = Posts.ID";
                        Select();
                        break;
                    }
                case QueryType.SelectUser:
                    {
                        if (ID != -1)
                        {
                            QueryText = "Select Users.ID, Users.Name, Posts.Name, Subdivisions.Name, Posts.ID, Subdivisions.ID From Users, Posts, Subdivisions " +
                                        " Where Users.SubdivID = subdivisions.ID and Users.PostID = Posts.ID and Users.ID = " + ID;
                            SelectRow();
                        }
                        else
                        {
                            MessageBox.Show("ID пользователя не найден");
                        }
                        break;
                    }
                case QueryType.Insert:
                    {
                        QueryText = "Insert Into Users(Name, PostID, SubdivID) Values('" + Name + "', '" + PostID + "', '" + SubdivID + "')";
                        InsertRecord();
                        break;
                    }
                case QueryType.Delete:
                    {
                        QueryText = "Delete From Users Where ID = " + ID;
                        DeleteRecord();
                        break;
                    }
                case QueryType.Update:
                    {
                        QueryText = "Update Users set Name = '" + Name + "', PostID = '" + PostID + "', SubdivID = '" + SubdivID + "'  Where ID = " + ID;
                        UpdateRecord();
                        break;
                    }
                case QueryType.SelectUsersbyName:
                    {
                        QueryText = "Select Users.ID, Users.Name, Posts.Name, Subdivisions.Name from Users, Posts, Subdivisions " +
                                    "Where Users.SubdivID = subdivisions.ID and Users.PostID = Posts.ID and Users.Name like " + "'%" + Name + "%'";
                        Select();
                        break;
                    }
            }
        }

15856 Продолжение...

Ate1st, 28 Апреля 2014

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

C# / Говнокод #15856

+133

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
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95

abstract class Data
    {
        public string QueryText { get; protected set; }
        public BindingSource SelectResult { get; private set; }
        public object[] SelectedRow { get; protected set; } 

    
        /// <summary>
        /// Добавляет новую запись в таблицу
        /// </summary>
        protected virtual void InsertRecord()
        {
            if (IsConnected())
            {
                SqlDataAdapter DA = new SqlDataAdapter();
                DA.InsertCommand = new SqlCommand(QueryText, DB.Connection);
                DA.InsertCommand.ExecuteNonQuery();
            }

        }

        protected virtual void UpdateRecord()
        {
            if (IsConnected())
            {
                SqlDataAdapter DA = new SqlDataAdapter();
                DA.UpdateCommand = new SqlCommand(QueryText, DB.Connection);
                DA.UpdateCommand.ExecuteNonQuery();
            }
        }

        protected virtual void DeleteRecord()
        {
            if (IsConnected())
            {
                SqlDataAdapter DA = new SqlDataAdapter();
                DA.DeleteCommand = new SqlCommand(QueryText, DB.Connection);
                DA.DeleteCommand.ExecuteNonQuery();
            }
        }


        /// <summary>
        /// Выбирает данные и записывает результат в переменную SelectResult
        /// </summary>
        protected virtual void Select()
        {
            DataSet DS = new DataSet();
            DS.Tables.Add("Tbl");
            SqlDataAdapter ADP = new SqlDataAdapter();

            if (IsConnected())
            {
                ADP.SelectCommand = new SqlCommand(QueryText, DB.Connection);
                ADP.Fill(DS.Tables["Tbl"]);

                SelectResult = new BindingSource();
                string s = DS.Tables[0].TableName;
                SelectResult.DataMember = s;
                SelectResult.DataSource = DS;
            }

        }


        /// <summary>
        /// Выбирает данные и записывает результат в Object массив SelectedRow
        /// </summary>
        public virtual void SelectRow()
        {
            DataSet DS = new DataSet();
            DS.Tables.Add("Tbl");
            SqlDataAdapter ADP = new SqlDataAdapter();

            if (IsConnected())
            {
                ADP.SelectCommand = new SqlCommand(QueryText, DB.Connection);
                ADP.Fill(DS.Tables["Tbl"]);
            }

            SelectedRow = DS.Tables[0].Rows[0].ItemArray;

        }

        private bool IsConnected()
        {
            if(DB.Connection.State == System.Data.ConnectionState.Open)
            {
                return true;
            }
            else
            {
                return false;
            }
        }

Ate1st, 28 Апреля 2014

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

Куча / Говнокод #15855

+143

1
2

Небольшие программки :)
Советую посмотреть и написать отзыв о любой из них.

Скачать >> http://coun.at.ua/stuff/1-1-0-122

Mobac, 28 Апреля 2014

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

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