- 1
<img title="(495) 980-68-49" alt="(495) 980-68-49" src="/images/phones/9c1fc37d7d851137eca84579f7346b66">
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+142
<img title="(495) 980-68-49" alt="(495) 980-68-49" src="/images/phones/9c1fc37d7d851137eca84579f7346b66">
Защита от граба данных
Уровень: Бог
http://www.plan1.ru/podolsk/magazinyi/salonyi-svyazi/
+134
{GENDER, select,
male {He}
female {She}
other {They}
https://github.com/SlexAxton/messageformat.js
+129
# Превратим входную строку в вектор, и отсортируем
used_letter <- sort(strsplit(s, "")[[1]])
# Находим самый большой используемый индекс(у нас уже есть гарантии, что в строке остались только допустимые символы)
big_letter <- used_letter[length(used_letter)]
Оригинальный способ поиска максимального элемента в массиве
+132
Opt("WinTitleMatchMode", 2) ; нечувствительность к неточным именам заголовков
WinWaitActive("Total Commander") ; ждать активации Тотала
Send("{TAB}") ; перейти в соседнюю (от панели, где лежит скрипт) панель
Send("!^{F12}") ; глобал хоткей Ctrl+Alt+F12 Пунто Свитчера = вырубить автопереключение (чтоб не мешал)
Send("{END}") ; перейти в конец списка файлов в Тотале (папок в конце списка точно нет)
Send("сmd") ; вызвать заранее в Тотал-консоли cmd-консоль (у меня Тотал-консоль (sic!) вдруг забастовала насчёт дос-команды move)
Send("{ENTER}")
WinWaitActive("cmd.exe") ; дождаться появления cmd-консоли
$count = 0 ; счётчик для цикла-1 в положении "включено"
Do ; цикл-1
WinActivate("Total Commander") ; повторная активация Тотала
ClipPut("") ; опустошение буфера
$namefull = "" ; опустошение переменной памяти, подготовка к циклу-2
Do ; цикл-2
Send("{F11}") ; хоткей Тотала F11 = cm_CopyNamesToClip, взять имя файла в буфер
$namefull = ClipGet() ; заполнить переменную памяти из буфера ("картинка_by_автор-хэш.png")
Until $namefull <> "" ; хреначить цикл-2, пока переменная точно не заполнится
If StringInStr($namefull, ".") > 0 Then ; условие-1 если это файл, то
If StringInStr($namefull, "_by_") > 0 Then ; условие-2 если этот файл девиантартовский, то
$nameright = StringSplit ($namefull, "_by_", 1) ; порвать имя файла на начало и хвост ($nameright[2] = "автор-хэш.png")
$name = StringSplit ($nameright[2], "-") ; у хвоста оторвать кончик (оставив "автор" в name[1])
WinActivate("cmd.exe") ; активировать cmd-консоль
$newname = "md " & $name[1] & " & move " & $namefull & " " & $name[1] ; набить цепь из трёх дос-команд на создание папки, перенос картинки в неё
Send($newname) ; послать эту цепь в cmd-консоль
Send("{ENTER}")
Else ; иначе-2 (напоролся на девиантарт-неформатный файл)
Send("{UP}") ; листнуть выше
EndIf ; конец условия-2
Else ; иначе-1 (напоролся на папку)
$count = 1 ; счётчик для цикла-1 в положении "выключено"
EndIf ; конец условия-1
Until $count <> 0 ; хреначить цикл-1, пока не сработает счётчик остановки
WinActivate("cmd.exe") ; активировать cmd-консоль
Send("exit") ; дать команду на выход
Send("{ENTER}")
Send("!^{F12}") ; врубить автопереключение Пунто Свитчера обратно
Beep () ; дать звуковой сигнал
Скрипт для AutoIt (который сам по себе костыль), который рассортировывает кучу скачанных с девиантарта файлов по папкам. Но КАК он это делает!
+122
slu4ajnoe4islo interval xyuma = unsafeDupablePerformIO (if xyuma==xyuma then randomRIO interval else undefined)
+132
@font-face {
font-family: 'MyWebFont';
src: url('webfont.eot#') format('eot'),
url('webfont.woff') format('woff');
}
Если в «src» поместить больше одного формата шрифта, то IE не сможет загрузить его и сообщит об ошибке 404. Причина в том, что IE пытается использовать как адрес файла всё, что записано после первой открывающей скобки и до самой последней закрывающей скобки.
IE как всегда в своём стиле...
+140
(ð“¹ð“»ð“²ð“·ð“½ "ð“—ð“®ð“µð“µð“¸, ð“¦ð“¸ð“»ð“µð“!")
В продолжение темы юникода. К сожалению, крестокомпилятор не захотел кушать эти символы, а в других языках нет препроцессора. Поэтому пришлось на лиспе.
http://ideone.com/14yidz
+133
lc = $(subst A,a,$(subst B,b,$(subst C,c,$(subst D,d,$(subst E,e,$(subst F,f,$(subst G,g,$(subst H,h,$(subst I,i,$(subst J,j,$(subst K,k,$(subst L,l,$(subst M,m,$(subst N,n,$(subst O,o,$(subst P,p,$(subst Q,q,$(subst R,r,$(subst S,s,$(subst T,t,$(subst U,u,$(subst V,v,$(subst W,w,$(subst X,x,$(subst Y,y,$(subst Z,z,$1))))))))))))))))))))))))))
VAR = MixedCaseText
LOWER_VAR = $(call lc,$(VAR))
all:
@echo $(VAR)
@echo $(LOWER_VAR)
как реализовать портабельно lowercase функцию в GNU Make.
как же я тебя временами лублу, мэйк.
ЗЫ было случайно найдено в http://stackoverflow.com/questions/664601/in-gnu-make-how-do-i-convert-a-variable-to-lower-case
+129
#audio_mouse_sensor
position absolute
top -1000000px
left -1000000px
width 0
height 0
z-index 10000000000
&.expanded
width 10000000px
height 10000000px
//background red
свежий коммит css (stylus) в проекте
+175
http://www.intel.com/content/dam/www/public/us/en/documents/specification-updates/xeon-e3-1200v3-spec-update.pdf
http://www.anandtech.com/show/8376/intel-disables-tsx-instructions-erratum-found-in-haswell-haswelleep-broadwelly
На этот раз мне зогплатила амд, и принёс вам почитать.