(defun inlist (lst1 lst2 &OPTIONAL p)
 (let ((cp 0) (vrlst lst1) (result nil))
  (loop
    (cond ((null vrlst) (return result)))
    (when (equal (car vrlst) lst2)
	(setq result (append result (list (append p (list cp))) ) )
    )
    (unless (atom (car vrlst))
     (setq result (append result (inlist (car vrlst) lst2 (append p (list cp)))))
    )
   (setq vrlst (cdr vrlst))
   (setq cp (1+ cp))
  )
 )
)

Хотя нет, это не настоящий LISP. Настоящий — это когда проверять наличие элемента в списке (кажется, это делает программа — если не вызывает духов-предков-Гамлетов) и всех его подписках мы будем без циклов и присваиваний, как рекурсивные люди:

(progN
(defun evrika (a b p cp)
	(and
	 (equal a b)
	 (list (append p (list cp)))
	)
)
(defun search (l1 l2 pos curpos)
 (cond  ((null l1) nil)
  ((atom (car l1)) (append
			   (evrika (car l1) l2 pos curpos)
			   (search (cdr l1) l2 pos (1+ curpos))
		   )
  )
  (T (append (evrika (car l1) l2 pos curpos)
		 (search (car l1) l2 (append pos (list curpos)) 0)
 		 (search (cdr l1) l2 pos (1+ curpos))
     )
  )
 )
)
(defun inlist (lst1 lst2)
 (cond ((not (listp lst1)) 'Not_a_list)
  ((null lst2) T)
  ((null lst1) nil)
  (T (search lst1 lst2 () 0))
 )
)
)

Наверное, стоит бросить всю эту туфту с пхп и руби, и научиться все-таки кодить на величайшем языке вселенной.

P.S. А еще оценил, что попытки с DirectDraw не запускаются, а вот FASM'овый пёрл (это такой WinAPI-style ассемблер) — легко. Нет, вспоминая программируемую на ЛИСПе музыки, да еще в реальном времени, свои опусы я стыдливо спрячу обратно. Потом все равно отбрешусь 1 апреля. Но самое прекрасное из воспоминаний — что я на протяжении всего семестра не мог поставить себе интерпретатор, прогоняя пусть даже простенькие алгоритмы в голове, а о блокнотах с подсветкой скобок тогда еще даже не помышлял. Вот извращенец же!

P.P.S. Ладно, я помню, что делал половине курса решения задач на этом ужасном языке — но чтобы такое! Оказывается, дописался до очень милой реализации игры «Быки и Коровы» (я думаю, если и сейчас запустить (startgame), она запустится):

(progN

;;Определение класса, просчитывающего игру в "Быки и коровы"
(defclass BIK ()
	(
		;;Число, которое загадывает компьютер (трансформированное в список)
		;;загаданное число храним для удобной сверки его с вводимым пользователем _по цифрам_
		(comp-chislo
			:accessor get-comp)
		;;количество совершенных ходов
		(hod
			:initform 0
			:accessor get-hod)
		;;число, которое вводит юзверь (трансформированное в список)
		(user-chislo
			:accessor get-user)
	)
)

;;вспомогательный метод, преобразовывающая число в список цифр
(defmethod num2list ((new BIK) n)
 (cond
	((zerop n) nil)
	(T (append
			(num2list new (truncate n 10))
			(list (mod n 10))
	))
 )
)

;;вспомогательный метод, преобразовывающая список цифр в число
(defmethod list2num ((new BIK) l &optional i)
 (cond
	((null i) (list2num new (reverse l) 0))
	((null l) 0)
	(T (+ (* (car l) (expt 10 i)) (list2num new (cdr l) (1+ i))))
 )
)

;;случайное создание числа компьютером и пересылка его в список
(defmethod create-chislo ((new BIK))
	(setf (get-comp new) (num2list new (+ (random 9000) 1000) ))
)

;; подсчет полных совпадений - цифра и положение (быков)
(defmethod test-biki ((new BIK) l1 l2)
 (cond
	((null l1) 0)
	((equal (car l1) (car l2)) (1+ (test-biki new (cdr l1) (cdr l2)) ) )
	(T (test-biki new (cdr l1) (cdr l2)))
 )
)

;;для подсчета коров - проверяет весь список на первое же совпадение, кроме своего места
(defmethod test2 ((new BIK) a1 l2 i j)
 (cond
	((null l2) 0)
	((equal i j) (test2 NEW a1 (cdr l2) i (1+ j)))
	((equal a1 (car l2)) 1)
	(T (test2 NEW a1 (cdr l2) i (1+ j)))
 )
)

;;подсчет неполных совпадений - цифра, но не положение(коров)
(defmethod test-korovi ((new BIK) l1 l2 i)
 (cond
	((null l1) 0)
	(T (+
		(test2 NEW (car l1) l2 i 0)
		(test-korovi NEW (cdr l1) l2 (1+ i))
	   )
	)
 )
)

;;основный цикл игры
(defmethod start ((NEW BIK))
 (let ((vvod 0))
	(loop
		;;вывод вопроса
		(terpri)
		(prin1 (get-hod NEW))
		(princ " popitka. Vvedite chislo [1000-9999] (to exit - any symbol): ")
		;;ввод с клавы
		(setf vvod (read))
		;;проверка, если не число - выход
		(if (not (numberp vvod))
		(progN
				(terpri)
				(princ (list2num NEW (get-comp NEW)))
				(princ " - bilo zagadannoe chislo.")
				(return 'GAMEOVER)
			)
		)
		;;переводим введенное число в списочный вид
		(setf (get-user NEW) (num2list NEW vvod))
		;;в случае совпадения списков, победа
		(if (equal (get-user NEW) (get-comp NEW))
			(progN
				(terpri)
				(write "Hoooray! You're win!")
				(return 'GAMEWIN)
			)
		)
		;;в случае если число не той длины, возвращаемся к началу
		(if (not (= (length (get-user NEW)) 4))
		 (progN
				(terpri)
				(princ "VVODITE CHISLA OT 1000 DO 9999!!!")
		 )
		;;иначе - считаем быков и коров
		 (progN
			(prin1 (test-biki NEW (get-comp new) (get-user new)))
			(princ " bikov, ")
			(prin1 (test-korovi NEW (get-comp new) (get-user new) 0))
			(princ " korov")
			(setf (get-hod NEW) (1+ (get-hod NEW)))
		 )
		)
		;;
		(terpri)
	)
 )
)
;;функция, создающая образец класса, рандомизирующая загаданное число и запускающая игру
(defun startgame ()
 (let ((a nil))
	;;
	(terpri)
	(princ "Hello, you begin play in very great game, BIKI I KOROVI")
	(terpri)
	;;
	(setf a (make-instance 'BIK))
	(create-chislo a)
	(start a)
 )
)
)

© Сергей М., специально для iskariot.ru.

Самый яркий пример — это, конечно же, метафора для действия Save — дискета. Все мы уже давно перестали пользоваться дискетами, но метафора оказалась очень устойчивой. Я бегло осмотрел программы, которыми пользуюсь каждый день, и не нашел ни одного тулбара с дискеткой (Поискал внимательнее — нашел в Microsoft Office и в дебрях Adobe Creative Suite). Плюс, наши клиенты уже очень давно не просили нас нарисовать этот магнитный носитель информации.

В принципе, согласен почти по всем пунктам статьи от Турбомилковцев (особенно с трендами в сенсорных устройствах и возвратом к плоским и одноцветным иконкам — сам устал от тенюшек). Но автор, за погоней к центральной теме (кто придумает крутую иконку сохранения, тот будет новым гуру дизайна), забывает, что знаки не могут устареть (просто потому, что это объективный заместитель предмета, свойства, отношения, действия — т.е. приобретенная ассоциация), и выводит неверные предпосылки (загадка объясняется проще — нарастающий тренд в ПО, где для пользователя подменяют абстракцию файловой системы другой абстракцией, упорядоченных документов; в некоторых случаях автоматическая синхронизация и вовсе заменяет любое сохранение, которое происходит мгновенно, как и ведение ревизий и множество операций более низкого уровня, невидимых для end user).

Хотя что там, там же, по ссылке, в обсуждениях тема «почему не надо искать замену дискете как метафоре сохранения» предельно разжевана:

ВСЕ они видели иконку «save» с дискетой. Все!

Где люди видели маленький кружочек с большим треугольником, обозначающий туалет?

Где люди видели полусферический аппарат с трубкой-бананом и дисковым номеронабирателем?

Когда вы в последний раз видели в реале колокольчик, изображение которого используется для вызова диспетчера из кабины лифта?

Когда в последний раз видели бумажный конверт? Ноту? Глобус? Рупор? Песочные часы? Лупу, может быть, недавно в руках держали? Мобильник с внешней антенной? Картонную коробку из-под программного обеспечения? Может, вы недавно зубчатое колесо отверткой ковыряли?

Я вот ни разу в жизни не видел tabbed folder. Никогда! И это мне (и миллионам других!) не мешает опознавать изображение tabbed folder как директорию. Или вы и иконку папки предлагаете упразднить?

Я уже не говорю про такие абстракции, как зигзагообразная молния, концентрические дуги радио- и звуковых волн, перечеркивающий крест, остроконечные каплю воды и сердце, стрелку — их НИКТО и НИКОГДА не видел в реале. И как-то пользуются ведь? ;)

Конечно, для сохранения можно предложить довольно простые метафоры вроде стрелочек, направленных вниз, но тут придется очень хорошо поработать с контекстом (так можно считать, что крутящиеся по кругу стрелочки в «Синхронизации» Эвернота — это тоже сохранение). А в вебе можно, и нужно продвигать идею ненавязчивого (мгновенного и незаметного) сохранения при совершении действий. Но дискета — все еще хорошо узнаваемый знак для десктопных приложений.

© Сергей М., специально для iskariot.ru.

Так что, 5шотс пошли по кривой дорожке — в их диалогах с Рунетом крутые мастера вакома и чародеи иллюстратора генерируют контент сами. По шаблонному вопроснику с пустыми и, в принципе, бесполезными вопросами (которые годные интервьюеры, если и зададут, то только для острастки). Диалога не получается (особенно, когда не хотят отвечать вообще), ресурс использован зря.

Предположение, что кто-то воскликнет «Ах, скоро 5 ответов от самого Bolk'а!», мне напоминает идею названия того самого лучшего фильма, что совсем говно. Вроде завлекалка — а на что? Еще один монолог от интересного человека (по знакомым сужу — дизайнеры практически всегда странно-необычные люди), которого заставляют повторюшничать за своими коллегами по цеху. И совершенно без технической возможности посмотреть ответы других человеков на этот же вопрос.

Вообще, Алексей Черенкевич сверстал этакую лубочную картинку — красиво, а в пищу не пригодится. Симпатичные желто-черные блоки, полупрозрачные плашки и рекламка — все для того, чтобы люди щелкали на кнопочки и велись на мини-бренд (как и в в «Ёшкин кот, совете»). А внутри ничего нет (чинопочитание разве что?).

И, честно говоря, даже блиц-опросы, когда что-то более-менее актуальное подается со стороны нескольких профи, или такие сочинения «как я провел этим летом», где дизайнер отвечает всего на один вопрос, что нового для себя открыл за это время или прочитал с пересказом своими словами, — любая мини-идея, поддержанная идейно или технически, смотрится куда более выигрышной и вкусной по сравнению с текущим ЧСВ.

А, как вариант, можно было и выстроить механизмы вокруг текущей идеи, и получить в итоге Designers & Books о дизайнерах и их инструментах, книгах и первом сексуальном опыте. Хотя бы какой-то смысл в проекте появился бы.

© Сергей М., специально для iskariot.ru.

Но я лечусь. Пользуюсь ssh заместо ftp, мою голову семнадцатыми ессентуками и стараюсь не разговаривать о литературе и политике. И читаю Дэшила Хаммета, чтобы понять, как сестрой таланта можно победить словоохотливую болезнь и поймать хоть какие-то ценные мысли. Пока получается только обходиться внутренними диалогами без описательных абзацев.

Я давно страдаю плеоназмами, и замечаю, что избавляться от них очень тяжело. Выход — отделять кожу от мяса именно здесь, в давно заброшенном местечке. Простите.

© Сергей М., специально для iskariot.ru.

А потом мучают капчей. О, капча! Эта капча, говорящая мне, что здесь должно быть ровно 6 символов — вот и мне хотелось бы узнать, куда хитрый алгоритм спрятал шестую буквоцифру. Через тернии к кругам ада, и еще парочку раз обновить картинку, гадая, через сколько секунд она все же соизволит смениться (да и меняет ли она — на невидимом лоадере не видно). Нет, не прошел тест Тьюринга, пусть лежат запросы, ждут своего часа — дружба, она такая, должна пройти испытание временем.

Неувядающий тренд — граммар-наци, каты и обращения к переводчику как автору (или плагиатору) в первых же комментариях. Падонки всячески сочувствуют — они это уже успели пройти. Правда, авторов они клеймили больше в шутку своим бессмертным КГ/АМ, навсегда остающимся в моей душе мерилом честности и прямоты.

Хабр, ты почти такой же вкусный, как раньше (записки в моем эверноте доказывают это), но деньрожденческие свечки ставить на тебя не очень хочется.

Интерфейсное — оно от человеческого, и если там очередные детские войнушки , то и начальник-соколлеги гоняют баклуш и прочих компьютерных чудовищ вместо того, чтобы работать. Впрочем, там все такие вселенские разборки были.

© Сергей М., специально для iskariot.ru.

Твиттер выжал все, что можно из ориентированности на мобильность и открытое API, оставив в основе тот же принцип социальных связей, к какому мы привыкли на сотнях других сайтов — подписывайся, люби, читай. Френдфидик от этого тоже далеко не ушел, хотя у него получилось сделать процесс куда более увлекательным: самой структурой ленты, где комментарии и лайки поднимают пост вверх, можно скрыть тот тип постов, что не нравится (помните то раздражение, которое появляется от «I'm liked this Youtube fucking sheet»?), а лучшие и комментируемые попадают в подборку лучших постов за день. Кроме того, там есть комнаты, в отличие от твиттеровых листов (ладно, списков, списков), состоящих из уже собранных по тематике постов. Но все же это не такой удобный инструмент для отслеживания информации. Что уж говорить, что флуд ограничен и там, и там: в синенькой птичке формат реплаев и то, что они попадают в ленту, напрягает даже самых заявленных болтунов, а в фрф как-то не особенно идет — наверное, просто потому, что в нем весь день сидеть не будешь.

В общем, Hobius -это, по видимому, что-то среднее концептуальное между комнатами, хештегами и чатрулетом. В подобном формате пыталась выступить уже и ТМ, но как-то неудачно. У Хобиуса, думаю, перспектив тоже немного (в первую очередь, массу собрать на новом проекте все сложнее, ну и баззворд у команды Смирнова выбрали совсем уж не внятный), но — идея очень вкусная. Читать не людей а темы (не твиплов, а хештеги).

Только концепция станет по-настоящему хороша только тогда, когда тематика постов, ссылок и прочего контента будет определяться сама, без костылей вроде лишних селектов или ручного набора хештега. Хотя за этим мы упустим и хаотичность получения информации, которая и делает нас интересными людьми.

© Сергей М., специально для iskariot.ru.

Но, боже мой, какая скука,
Верстать и думать про себя:
Когда же чёрт возьмет меня!

Пристрастье к Джорджии его сгубило,
Как губит новость
Ализар.

© Сергей М., специально для iskariot.ru.

Вот возьмем Серёжу, который устроил интересный эксперимент. Экспиримент, говорите? Вы смеетесь что ли?

Пока в Америке продают устройства по адекватной цене и всячески насаждают спрос на книги (да что там, помните, как все сомневались, что айфон сможет стать игровой приставкой, и что никто не будет писать под него нормальные приложения — а сейчас в эту сферу рванулись все кому не лень), наши упоротые издательства продолжают зарабатывать тем, чем зарабатывали всегда. И наши авторы, которым лень отрывать свои задницы от насиженных кресел и выбираться в мороз, оставляют все финансовые вопросы на долю издательства (и при этом хотят получать больше, не платя торговцу!).

Мне, как и многим, думаю, весь этот фарс был смешон. Увидев, что кто-то пиарится за их счет, прося рубль ни за что (почему писатель не мог для своего эксперимента написать эксклюзивный рассказ), ограничивая в способах оплаты и плюя на своих читателей с высокой колокольни, нормальные люди прошли мимо. И при всем этом, CTR рекламной акции в не самой платежеспособной аудитории за очень короткий срок, вышел аж в 5% — и это не учитывая разные суммы оплат. Но, оказывается, все это «печально».

При том, что я сам ценитель бумажной книги, покрытой сверху высокой маржой и пахнущей пылью типографских складов, предпочитаю читать многие вещи «в потоке» именно в электронном виде, переплачивая только за шедевры (достойные стоять на полке в компании не менее вечных личностей). Даже не касаясь вопроса качества будущей литературы, то, что электронная дистрибуция поменяет все в бизнесе, — бесспорно, как и то, что сегодняшние издательства и ленивые авторы будут пережеваны и выплюнуты.

Революцию будут делать совсем другие люди.

© Сергей М., специально для iskariot.ru.

Надо сказать, Daos сразу подкупает. Стилем оформления, простотой и тем, что можно отложить получение аттестата мерчанта.

Конечно, не без огрехов — но в глаза бросаются разноплановые мелочи. Ну вы знаете, те самые, что не влияют на продажи, но оставляют ощущение сумбура.

Вроде управляющих ссылок в админке, у которых область реагирования блочная, а не обтекающая текст, так что скликивание белого фона на тачпаде может привести к уходу со странички. К тому же, по устройству ссылок их, как и кнопку сохранения, можно сделать fixed.

Или кучи внешних ссылок, никак не отделенных от других (стоит хоть сопроводить такие ссылки ext-иконкой) — то же «предложить улучшение» можно было бы сделать и небольшой формой, отсылающей к какому-нибудь сервису предложений по сайту. Инструкции по добавлению сервисов вообще лучше держать внутри системы, не заставляя клиента гулять по ссылкам, периодически возвращаясь и читая груды текста в формах. Да и выход я бы тоже отделил от списка и выделил цветом/иконкой (необязательно графической, если соблюдать дао-простоту).

Несмотря на «улучшение», бан пользователей ужасен — метафору текстовой иконке подобрать не получилось, да и можно ведь js'ом переспрашивать меня (if(!confirm('')) return false;), а вдруг я ошибся и не хочу потом метаться по окнам настроек в поисках отключения бана автора сего замечательного движка (клянусь, так и было).

Нехватка возможности перехода на корневой сайт — что в клиентской, что в серверной части, наверное, собрала бы больше всего голосов, если бы ты завел себе публичный багтрекер.

Еще информация для рекламодателей забавная — HTML разрешен, но на подсказке пишется, что «кроме блочных элементов» (нет, я, конечно понимаю, что ul — не совсем блочный элемент). Кроме того, можно было бы и привязать что-нибудь вроде $set['txt']['info'] = preg_replace("/(\n)?(.+?)(?:\n\s*\n*|\z)/s","<p>$2</p>", $set['txt']['info']); — чтобы не надо было мучиться с переносами строки (но придется еще чистить от неправильного HTML после — впрочем, это и так надо было бы; тут можно посмотреть в стороны wpautop из Вордпресса, к примеру).

Ну и в настройках биллинга механизм «выбор биллинга» непрозрачен — два селекта, находящиеся рядом, кажутся связанными элементами, а на самом деле, второй — это переключатель режима первого (предпочитаемый/единственный).

Полотно сервисов, следующее за этим, можно было бы и сворачивать, оставляя только активные (и, кстати, почему там нет — «включить/выключить» в каждом блоке? это же неудобно — я могу заранее ввести данные сервиса, но не принимать с него платежи, потому что не авторизован или временно изменил мировоззрение по поводу SMS). А текстовые описания сервисов под формой оплаты для рекламодателей заменить все же логотипами, чтобы сэкономить место на растягивании на второй экран.

При работе со строчкой же не вижу смысла в лишнем экране проверки — почему бы не показывать ее и код вставки сразу? Здесь же бы не мешало не учитывать админские показы, давать возможность кастомизировать идентификаторы контейнера (появится ли #daos в AdBlock — вопрос на миллион). Стилям контейнера я бы предпочел классы, да и при попытке использовать одинарные кавычки, Даос сначала правит их на двойные, потом валит скрипт строчки (все дело в неэкранированных кавычках).

В сами строчки даже спецсимволов (???????§???±) не загнать — нещадно режутся. А зря, ASCII-арт и псевдокоды должны спасти Интернет от вебдваноля (кекеке).

И в свете начала работы с a1a, можно добавить в даос2 лишние 5% вебмастеру, добавив «страницу техподдержки» по дефолту.

А так — мне нравится. Симпатичное решение с сохранением форм (можно пойти дальше с игрой в формы, и мониторить изменения инпутов[type=text] и текстарий на странице, и тем же читай — «ноконфирмом» предупреждать о том, что изменения не будут сохранены, «точно ли хотите уйти?»), мои любимые крупные формы, человечное удобство — все вкусно. Даже спорная необязательность полей для рекламодателя — фишка.

Весь дёготь, конечно, в коде — отсутствие нормальной модульности и разнесения представления и обработки (особенно умиляют километровые куски хтмл, завернутые в пхп-шные строки), стремненький CSS... Остается надеяться, что Daos в новой версии заимеет нормальную разделенную архитектуру (через постоянные обновления и потери информации он уже прошел, надеюсь, и идеи кешера переживет), сервисы превратятся в плагины под API, а сам Тормоз вырастет как программист.

Возобновим тогда что ли раздел «Аудиты».

© Сергей М., специально для iskariot.ru.

В общем, прожили они минут пять.

Инстинкты динозавра победили, и стол остался в первозданном (если не первобытном состоянии) — заваленный бумажками и записульками, разложенными в строго художественном беспорядке.

Разрыв шаблона — великая вещь.

© Сергей М., специально для iskariot.ru.