1. 1C / Говнокод #16641

    −169

    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
    //  Параметры - реквизит объекта. Больше (!) нигде не используется.

Процедура ПередОткрытием(Отказ, СтандартнаяОбработка)
	Если ЭтоНовый() Тогда
		Параметры = "000001000";
	КонецЕсли;
	
	ФлагОписания = ?(Сред(Параметры,7,1) = "1", Истина, Ложь);
	ФлагМестоX     = ?(Сред(Параметры,8,1) = "1", Истина, Ложь);
	ФлагМестоY      = ?(Сред(Параметры,9,1) = "1", Истина, Ложь);		
КонецПроцедуры

Процедура СменаФлага()    
	Параметры = Лев(Параметры,6)+Строка(Число(ФлагОписания))+Строка(Число(ФлагМестоX))+Строка(Число(ФлагМестоY));
КонецПроцедуры


Процедура ФлагОписанияПриИзменении(Элемент)	
	СменаФлага();	
КонецПроцедуры

Процедура ФлагМестоXПриИзменении(Элемент)	
	СменаФлага();	
КонецПроцедуры

Процедура ФлагМестоYПриИзменении(Элемент)	
	СменаФлага();	
КонецПроцедуры

    Хотел быть шифровальщиком, но кривая дорожка жизни…

    Запостил: safer_bwd, 04 Сентября 2014

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

    • ava alexinzaz 05.09.2014 08:10 # +1

      технология "запутывания программного кода" в действии.
      Ответить

    • ava jenik15 25.08.2021 04:17 # 0

      - Как же мы, Пашка... как же мы будем дальше... потом. Что я буду делать без тебя, один. Я люблю тебя... - я вжался в него еще сильнее.
      Ответить

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