- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
- 21
Функция ВыделитьАртикул(А) Экспорт
Перем СтрВспом, Инд;
Инд = 1;
СтрВспом = "";
Пока Инд <= СтрДлина(А) Цикл
Если (Сред(А,Инд,1)="0") ИЛИ (Сред(А,Инд,1)="1") ИЛИ
(Сред(А,Инд,1)="2") ИЛИ (Сред(А,Инд,1)="3") ИЛИ
(Сред(А,Инд,1)="4") ИЛИ (Сред(А,Инд,1)="5") ИЛИ
(Сред(А,Инд,1)="6") ИЛИ (Сред(А,Инд,1)="7") ИЛИ
(Сред(А,Инд,1)="8") ИЛИ (Сред(А,Инд,1)="9") ИЛИ
(Сред(А,Инд,1)="/") ИЛИ (Сред(А,Инд,1)="-") Тогда
СтрВспом = СтрВспом + Сред(А, Инд, 1);
Инд = Инд + 1;
Иначе
Прервать;
КонецЕсли;
КонецЦикла;
Возврат СтрВспом;
КонецФункции
Нашел у клиента, когда рефакорил код конфы. Страшно подумать, если придется выделять еще с десяток символов...
Lure Of Chaos 09.09.2011 13:14 # +8
стрёмно вспоминать
> Сред
среднего
> Инд
индуса
i-- 09.09.2011 15:27 # 0
lucidfox 09.09.2011 15:37 # +1
YouAreEmpty 09.09.2011 16:11 # +2
eth0 09.09.2011 16:38 # +4
Мне в этом языке не нравится его говняность, непоследовательность и тотальная унылость. Немного сахару в нём бы не помешало.
Это всё случается, когда язык проектируют непрофессионалы.
guest 09.09.2011 16:48 # 0
YouAreEmpty 09.09.2011 16:53 # 0
Skaldov 28.09.2011 14:25 # +1
YouAreEmpty 09.09.2011 16:52 # +1
Cthulhu 05.11.2011 00:45 # −1
TarasB 09.09.2011 17:54 # +4
eth0 09.09.2011 19:52 # 0
TarasB 09.09.2011 20:32 # 0
TheHamstertamer 09.09.2011 21:21 # +3
илита
eth0 09.09.2011 22:15 # +1
TarasB 09.09.2011 23:28 # 0
eth0 10.09.2011 10:19 # +4
Lure Of Chaos 09.09.2011 18:10 # 0
bugmenot 09.09.2011 23:45 # 0
!!!
guest 10.09.2011 13:17 # +4
TarasB 10.09.2011 13:46 # 0
eth0 10.09.2011 17:15 # −2
TarasB 10.09.2011 17:33 # 0
eth0 10.09.2011 18:07 # −1
TarasB 10.09.2011 18:09 # 0
CPPGovno 10.09.2011 20:44 # +1
TarasB 10.09.2011 20:47 # 0
inkanus-gray 10.09.2011 21:11 # 0
TarasB 10.09.2011 23:20 # +3
CPPGovno 10.09.2011 23:37 # +1
Lure Of Chaos 10.09.2011 23:57 # +2
roman-kashitsyn 11.09.2011 00:23 # +1
inkanus-gray 11.09.2011 02:10 # +2
bugmenot 11.09.2011 03:50 # 0
roman-kashitsyn 11.09.2011 11:46 # +1
inkanus-gray 11.09.2011 00:03 # +1
Кстати, я жалею, что у меня нет педалей для шифта, контрола и альта. Было бы очень удобно.
roman-kashitsyn 11.09.2011 00:26 # +2
Именно для десятипальцевого набора Ctrl, Alt, Shift находятся по обоим сторонам клавиатуры. С педалью много времени уходило бы на синхронизацию :)
TarasB 11.09.2011 10:00 # +2
roman-kashitsyn 11.09.2011 10:57 # 0
v$ - выделить текст с текущей позиции в текущей строке до конца строки
vw - выделить текст до конца текущего/следующего слова
v5w - выделить пять следующих слов
Хотя выделение с vim нужно довольно редко...
Lure Of Chaos 11.09.2011 12:09 # 0
другое дело, если нужно переместить, а буфер обмена терять не хочется
roman-kashitsyn 11.09.2011 12:18 # 0
Lure Of Chaos 11.09.2011 12:21 # 0
roman-kashitsyn 11.09.2011 12:30 # 0
CPPGovno 11.09.2011 12:34 # 0
Клавиатура скрывается под одной рукой.
Lure Of Chaos 11.09.2011 12:35 # 0
просто большой и мизинец под ладонь надо сгибать :)
roman-kashitsyn 11.09.2011 12:37 # 0
Lure Of Chaos 11.09.2011 12:41 # 0
roman-kashitsyn 11.09.2011 13:35 # 0
wvxvw 12.09.2011 11:57 # +1
Но emacs - сильно на любителя, и, обычно, с самого начала вызывает много негативыных эмоций :)
eth0 12.09.2011 12:11 # +4
roman-kashitsyn 12.09.2011 12:16 # 0
К vim'у нужно привыкать пару месяцев, но он очень эргономичен и позволяет писать текст экстремально быстро. А уж после пары лет практики пальцы сами работают, даже не задумываешься над командами.
Я бы не перешёл на emacs, если бы не огромное количество плагинов. Elisp - главное преимущество emacs'а. К примеру, постоянно пользуюсь org-mode, у vim'а подобных вещей, наверное, никогда не будет (если не считать vim outliner, но он по сравнению с org-mode - унылая поделка).
eth0 10.09.2011 22:40 # 0
Ни малейшего юзабилити нет.
Хотя, если мне не отшибает память, пятый борланд цпп билдер вышел примерно в это время и там уже было автодополнение и клёвые фишки.
Думаю, это просто унылый русский высер, совершенно неюзабельный. А что мартышки его освоили - так это они от недостатка годных систем продолжают жрать кактус.
Cthulhu 05.11.2011 00:51 # −1
правда - на плечах энтузиастов.
openconf + telepat + colorer + ... , и скрипты в объектной(!) модели(!) конфигуратора(!!!) пишутся на js/vbs самостоятельно для чего угодно и какие угодно. :))
VladC 15.09.2011 00:34 # +1
eth0 17.09.2011 11:59 # −1
Для своих задач это говно. Просто говно уже привычное, только и всего. И провоцирует кодерков на обезьянокод.
Lure Of Chaos 10.09.2011 16:01 # +1
CPPGovno 10.09.2011 16:07 # 0
inkanus-gray 10.09.2011 21:12 # 0
CPPGovno 10.09.2011 23:05 # 0
У меня на нетбуке:
Fn+8=8
Fn+(=9
Fn+ш=6
CPPGovno 10.09.2011 23:13 # +1
Fn+д=2
В этом есть какая то логика...
guest 10.09.2011 22:53 # +2
bugmenot 11.09.2011 03:53 # 0
inkanus-gray 11.09.2011 03:56 # 0
bugmenot 11.09.2011 04:43 # 0
inkanus-gray 11.09.2011 06:12 # +1
bugmenot 11.09.2011 06:20 # 0
Пикча рядом постулирует такую раскладку: http://upload.wikimedia.org/wikipedia/commons/9/9f/APL-keybd2.svg
Не Вы ли постили тогда ссылку на раскладку для 1С, предлагаемую за донат?
inkanus-gray 11.09.2011 06:31 # 0
bugmenot 11.09.2011 08:56 # 0
bugmenot 11.09.2011 06:29 # +1
http://govnokod.ru/3617#comment36994
Disclaimer: Я её НЕ КОЧАЛ и без понятия, что внутри. Официальное дистро говорит, что там ВИРУС.
VladC 15.09.2011 00:39 # 0
Skaldov 28.09.2011 14:26 # +1
bugmenot 28.09.2011 15:18 # 0
Uhehesh 11.09.2011 09:46 # +1
YouAreEmpty 11.09.2011 18:11 # 0
Процедурка выглядит примерно так:
Функция ПроверитьАртикул(Артикул)
СтрокаПоиска = "0123456789-/";
Для Инд = 1 по СтрДлина(Артикул) Цикл
ТекСимв = Сред(Артикул, Инд ,1);
Если Найти(СтрокаПоиска, ТекСимв) = 0 Тогда
Возврат Ложь;
КонецЕсли;
КонецЦикла;
Возврат Истина;
КонецФункции
Uhehesh 11.09.2011 18:30 # 0
*ладн*
eth0 11.09.2011 20:28 # 0
Интересно, константа всегда вычисляется до цикла или на каждой итерации?
TarasB 11.09.2011 20:38 # +1
roman-kashitsyn 12.09.2011 08:15 # +2
greno 14.09.2011 21:30 # 0
Cthulhu 05.11.2011 00:55 # 0