Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+67
if ($_GET['search'] == ' Поиск' || $_GET['search'] == 'Поиск') {
$_GET['search'] = '';
}
if ($_GET['date'] == ' Дата' || $_GET['date'] == 'Дата') {
$_GET['date'] = '';
} else {
$_GET['date'] = preg_replace('/(\d+).(\d+).(\d+)/i','$3-$2-$1', $_GET['date']);
}Уж не знаю, что и сказать... А вдруг перед текстом попадутся 2 пробела? Или 3?
domaster,
02 Июля 2012
−92
- (NSInteger)tableView:(UITableView *)tableView numberOfRowsInSection:(NSInteger)section {
self.view.frame=CGRectMake(10,10, 300, 200);
return 3;
}
- (UITableViewCell *)tableView:(UITableView *)tableView cellForRowAtIndexPath:(NSIndexPath *)indexPath {
static NSString *CellIdentifier = @"Cell";
UITableViewCell *cell = [tableView dequeueReusableCellWithIdentifier:CellIdentifier];
if (cell == nil) {
cell = [[[UITableViewCell alloc] initWithStyle:UITableViewCellStyleDefault reuseIdentifier:CellIdentifier] autorelease];
}
// Configure the cell...
cell.selectionStyle=UITableViewCellSelectionStyleNone;
switch (indexPath.row) {
case 0:
//ToDo: Add UserInfo's view into TableView
[cell.contentView addSubview:upperView];
break;
case 1:{
//Remove preous view/tableview
for (id vw in cell.contentView.subviews) {
if ([vw isKindOfClass:[UITableView class]]) {
[vw removeFromSuperview];
}
}
//
//Add View which contain tableview
EditListViewController *editlistvw=[[EditListViewController alloc] initWithNibName:@"EditListViewController" bundle:nil] ;
editlistvw.view.frame=CGRectMake(10, 10, 300, 20);
[cell.contentView addSubview:editlistvw.tableView];
//
break;
}
case 2:
//Remove previous view/tableview
for (id vw in cell.contentView.subviews) {
if ([vw isKindOfClass:[UITableView class]]) {
[vw removeFromSuperview];
}
}
break;
default:
break;
}
return cell;
}Творение индийского джуниора, совместно с которым приходится делать проект
GLvRzZZ,
29 Июня 2012
+137
public class Problem33 {
public static void main(String arg[]){
long l1 = Calendar.getInstance().getTimeInMillis();
int amount = 0;
for(int a=1; a<=9; a++){
for(int b=1; b<=9; b++){
for(int c=1; c<=9; c++){
for(int d=1; d<=9; d++){
int numerator = a*10+b;
int denominator = c*10+d;
double fraction = 1.0*numerator/denominator;
if(numerator < denominator){
if(
(a==c && (1.0*b/d == fraction)) ||
(a==d && (1.0*b/c == fraction)) ||
(b==c && (1.0*a/d == fraction)) ||
(b==d && (1.0*a/c == fraction))
){
amount++;
System.out.println(a + "" + b + "/" + c + "" + d);
}
}
}
}
}
}
System.out.println(amount);
long l2 = Calendar.getInstance().getTimeInMillis();
System.out.println("Time: " + (l2-l1) + "ms");
}
}
http://projecteuler.net/problem=33
http://projecteuler.net/thread=33
TheHamstertamer,
24 Июня 2012
+137
[ExposeProperty]
public bool Exhausted {
get {
if (this.State > FatigueConsts.globalNormalRange)
return true;
else
return false;
}
set {
if (this.State > FatigueConsts.globalNormalRange)
Exhausted = true;
else
Exhausted = false;
}
}И потом полчаса сидел, понимал, почему Юнити зависает, когда я пытаюсь открыть инспектор с этим объектом ) Потом поставил в сеттер return;, ибо для костыля [ExposeProperty] требуются и геттер, и сеттер.
sulnedinfind,
17 Июня 2012
+119
Func Terminate() ; Функция выключения скрипта так как он работает в бесконечном цикле
Exit 0
EndFunc
HotKeySet("{ESC}", "Terminate") ; Привязывает функцию выключения к клавиши ESC
FileChangeDir ("C:Program FilesQIPUsersXXXXXXXXXHistory"); Изменяет рабочую директорию
while 1 ; Начинает бесконечный цикл работы скрипта
$Search=FileFindFirstFile("*.txt") ; Ищет txt-файлы в рабочей директории и возвращаемое значение поиска заносим в переменную $Search
if $Search = -1 then ; Проверяет наличие файлов по содержимому переменной
Sleep(1000) ; Если файлов не найдено, ждет секунду и запускает цикл сначала
else ; Если найден txt-файл, то...
$File=FileFindNextFile($Search) ; Заносит название файла в перменную $File
$Log=FileRead ($File) ; Заносит содержимое файла в переменную $log
$Log=StringSplit ($Log, @LF) ; Так как в QIP'е одно сообщение состоит из трех строк (пометка сообщения как входящее или исходящее, имя автора/дата/время отправки сообщения и само сообщение), то делает из переменной массив, в котором каждый элемент равен одной строке
$Mess=$log[3] ; Само сообщение заносит в переменную $Mess
FileDelete($File) ; Удаляет файл истории
MsgBox ("0","", $Mess, 1) ; На секунду выводит на экран сообщение с командой, которую скрипт будет сейчас выполнять - это реализовано для отладки
WinActivate ('[REGEXPCLASS:(?i){97E27FAA-C0B3-4b8e-A693-ED7881E99FC1}]') ; Делает активным окно Foobar'a, реализовал посредством обращения к классу, так как заголовок плеера меняется в зависимости от исполняемой композиции
WinWaitActive ('[REGEXPCLASS:(?i){97E27FAA-C0B3-4b8e-A693-ED7881E99FC1}]') ; Ждет когда окно Foobar'a станет активным
$Check=StringInStr($Mess, "local") ; Проверяет вхождение слова "local" в текст сообщения
if $Check=1 then ; Если "local" находится в начале сообщения, то...
Send("^f") ; Отправляет нажатие сочетания клавиш CTRL+F
delay(500); //Ждет
if ( q == 1 ) { //Сравнивает
q += 2; } //Прибавляет
Взято отсюда: habrahabr.ru/post/145550/
ReckO,
09 Июня 2012
−125
// Преобразовывает геокоординаты из одной СК в другую
//
// КоординатыТочки - Структура - координаты
//
// ПараметрыПреобразования - Структура - параметры преобразования из одной системы коорднат в другую
//
// ВысотаТочки - Число - выстоа точки над уровнем моря
//
// Точность - Число - точность возвращаемых координат
//
// Возвращаемое значение:
// Структура - координаты
//
Функция ПреобразоватьКоординаты(КоординатыТочки, ПараметрыПреобразования, ВысотаТочки = 0, Точность = 6) Экспорт
ПП = ПараметрыПреобразования;
ШиротаВГрадусах = КоординатыТочки.Широта;
ДолготаВГрадусах = КоординатыТочки.Долгота;
ЧислоПи = 3.14159265358979;
ЧислоУгловыхСекундВРадиане = 206264.8062;
КвадратЭксцентриситетаИсходногоЭллипсоида = 2 * ПП.СжатиеИсходногоЭллипсоида - Pow(ПП.СжатиеИсходногоЭллипсоида , 2);
КвадратЭксцентриситетаКонечногоЭллипсоида = 2 * ПП.СжатиеКонечногоЭллипсоида - Pow(ПП.СжатиеКонечногоЭллипсоида , 2);
СреднееБольшаяПолуось = (ПП.БольшаяПолуосьИсходногоЭллипсоида + ПП.БольшаяПолуосьКонечногоЭллипсоида) / 2;
СреднееКвадратЭксцентриситета = (КвадратЭксцентриситетаИсходногоЭллипсоида + КвадратЭксцентриситетаКонечногоЭллипсоида) / 2;
РазностьБольшихПолуосей = ПП.БольшаяПолуосьКонечногоЭллипсоида - ПП.БольшаяПолуосьИсходногоЭллипсоида;
РазностьКвадратовЭксцентриситетов = КвадратЭксцентриситетаКонечногоЭллипсоида - КвадратЭксцентриситетаИсходногоЭллипсоида;
ШиротаВРадианах = ШиротаВГрадусах * ЧислоПи / 180;
ДолготаВРадианах = ДолготаВГрадусах * ЧислоПи / 180;
РадиусКривизныМеридианногоСечения = СреднееБольшаяПолуось * (1 - СреднееКвадратЭксцентриситета)
/ Pow(1 - СреднееКвадратЭксцентриситета * Pow(Sin(ШиротаВРадианах) , 2) , 1.5);
РадиусКривизныПервогоВертикала = СреднееБольшаяПолуось * Pow(1 - СреднееКвадратЭксцентриситета
* Pow(Sin(ШиротаВРадианах) , 2) , -0.5);
СмещениеШиротыВСекундах = ЧислоУгловыхСекундВРадиане / (РадиусКривизныМеридианногоСечения + ВысотаТочки)
* (РадиусКривизныПервогоВертикала / СреднееБольшаяПолуось * СреднееКвадратЭксцентриситета * Sin(ШиротаВРадианах)
* Cos(ШиротаВРадианах) * РазностьБольшихПолуосей + (Pow(РадиусКривизныПервогоВертикала , 2) / Pow(СреднееБольшаяПолуось , 2) + 1)
* РадиусКривизныПервогоВертикала * Sin(ШиротаВРадианах) * Cos(ШиротаВРадианах) * РазностьКвадратовЭксцентриситетов / 2
- (ПП.ЛинейноеСмещениеОсьАбсцисс * Cos(ДолготаВРадианах) + ПП.ЛинейноеСмещениеОсьОрдинат * Sin(ДолготаВРадианах))
* Sin(ШиротаВРадианах) + ПП.ЛинейноеСмещениеОсьАппликат * Cos(ШиротаВРадианах))
- ПП.УгловоеСмещениеОсьАбсцисс * Sin(ДолготаВРадианах) * (1 + СреднееКвадратЭксцентриситета * Cos(2 * ШиротаВРадианах))
+ ПП.УгловоеСмещениеОсьОрдинат * Cos(ДолготаВРадианах) * (1 + СреднееКвадратЭксцентриситета * Cos(2 * ШиротаВРадианах))
- ЧислоУгловыхСекундВРадиане * ПП.ДифференциальноеРазличиеМасштабов * СреднееКвадратЭксцентриситета * Sin(ШиротаВРадианах)
* Cos(ШиротаВРадианах);
СмещениеДолготыВСекундах = ЧислоУгловыхСекундВРадиане / ((РадиусКривизныПервогоВертикала + ВысотаТочки)
* Cos(ШиротаВРадианах)) * (-ПП.ЛинейноеСмещениеОсьАбсцисс * Sin(ДолготаВРадианах)
+ ПП.ЛинейноеСмещениеОсьОрдинат * Cos(ДолготаВРадианах)) + Tan(ШиротаВРадианах) * (1 - СреднееКвадратЭксцентриситета)
* (ПП.УгловоеСмещениеОсьАбсцисс * Cos(ДолготаВРадианах) + ПП.УгловоеСмещениеОсьОрдинат * Sin(ДолготаВРадианах))
- ПП.УгловоеСмещениеОсьАппликат;
СмещениеВысоты = -СреднееБольшаяПолуось / РадиусКривизныПервогоВертикала * РазностьБольшихПолуосей
+ РадиусКривизныПервогоВертикала * Pow(Sin(ШиротаВРадианах) , 2) * РазностьКвадратовЭксцентриситетов / 2
+ (ПП.ЛинейноеСмещениеОсьАбсцисс * Cos(ДолготаВРадианах) + ПП.ЛинейноеСмещениеОсьОрдинат * Sin(ДолготаВРадианах))
* Cos(ШиротаВРадианах) + ПП.ЛинейноеСмещениеОсьАппликат * Sin(ШиротаВРадианах)
- РадиусКривизныПервогоВертикала * СреднееКвадратЭксцентриситета * Sin(ШиротаВРадианах) * Cos(ШиротаВРадианах)
* (ПП.УгловоеСмещениеОсьАбсцисс / ЧислоУгловыхСекундВРадиане * Sin(ДолготаВРадианах)
- ПП.УгловоеСмещениеОсьОрдинат / ЧислоУгловыхСекундВРадиане * Cos(ДолготаВРадианах))
+ (Pow(СреднееБольшаяПолуось , 2) / РадиусКривизныПервогоВертикала + ВысотаТочки) * ПП.ДифференциальноеРазличиеМасштабов;
Возврат Новый Структура("Широта,Долгота,Высота", Окр(ШиротаВГрадусах + СмещениеШиротыВСекундах / 3600, Точность), Окр(ДолготаВГрадусах + СмещениеДолготыВСекундах / 3600, Точность), Окр(ВысотаТочки + СмещениеВысоты,3));
КонецФункцииКак ни странно, но работает)))
TamerlanDE,
08 Июня 2012
+127
# My first attempt in J:
+/(>/)"1 <.@(10&^.)(2 & x:) (+%)/\(1x,1000$2)
# It gave the right answer, but took about an hour.
# Based on other people's comments I went back and figured out the relationship
# between one answer and the next, and came up with this,
# which runs in less than 1 second:
((((0{])+([:$[:":1{])>([:$[:":2{])),(1{]+2*2{]),1{]+2{])^:1000) 0 3x 2x
http://projecteuler.net/thread=57;page=2
Как на этом можно писать?
TheHamstertamer,
04 Июня 2012
+51
$result = dbquery(
"SELECT a.tag_id, a.tag_name, a.tag_type, a.tag_tags, u.article_id, u.article_cat, u.article_7, u.article_6, u.article_8, u.article_subject, u.article_snippet
FROM ".DB_TAGS." a
LEFT JOIN ".DB_ARTICLES." u ON u.article_id=a.tag_name
WHERE a.tag_type = 'A' AND article_draft='0'
ORDER BY article_datestamp
DESC");
if (dbrows($result)) {
while ($data = dbarray($result)) {
if ($data['tag_tags']) {
$tags = explode(", ", $data['tag_tags']);
foreach ($tags as $values) {
if ($values == $tagname) {
echo "<tr><td class='tbl1'>";
echo "Статья: <a href='".BSFURL.article($data['article_id'])."' title='".$data['article_subject']."' class='side'><strong>".$data['article_subject']."</strong></a>"; if ($data['article_6']) { echo" (Язык: <b>".$data['article_6']."</b>) "; } if ($data['article_7']) { echo"(Тип: <b><a href='".BSFURL.articlesTypes($data['article_8'])."'>".$data['article_7']."</a></b>)";} echo"\n<br />";
echo nl2br(parsesmileys(parseubb($data['article_snippet'])))."<hr /></td>\n</tr>\n";
}
}
}
}
}
GggTtt,
01 Июня 2012
−22
// UNALIGNED only for IA64 (Itanium)
// for AMD64 & i386 this not needed
void * c_memmove(void *dest, void const *src, size_t n)
{
void *ret = dest;
if (n)
{
(__int8 *&)dest += n;
(__int8 *&)src += n;
switch (int x = n % 4)
{
do
{
if (!!'true')
{
case 0:
*--(UNALIGNED __int32 *&)dest = *--(UNALIGNED __int32 *&)src;
n -= 4;
}
else
{
case 3:
*--(__int8 *&)dest = *--(__int8 *&)src;
case 2:
*--(__int8 *&)dest = *--(__int8 *&)src;
case 1:
*--(__int8 *&)dest = *--(__int8 *&)src;
n -= x;
}
} while (n);
}
}
return ret;
}
63F45EF45RB65R6VR,
17 Мая 2012
+99
import Text.Parsec
import Control.Monad
romanToArabic :: String -> Either ParseError Integer
romanToArabic = parse (genParser (Nothing : Nothing : map Just romans)) "" where
romans = [('M', 1000), ('D', 500), ('C', 100),
('L', 50), ('X', 10), ('V', 5), ('I', 1)]
genParser [_] = eof >> return 0
genParser (ten : five : one : rest) = state1 where
state1 = choice [on one state2, on five state3, next]
state2 = choice [on (sub2 five one) next, on (sub2 ten one) next,
on one state5, next]
state3 = choice [on one state4, next]
state4 = choice [on one state5, next]
state5 = choice [on one next, next]
next = genParser (one : rest)
on Nothing _ = fail ""
on (Just (ch, val)) nextNode = char ch >> nextNode >>= return . (+val)
sub2 = liftM2 $ \(ch1, val1) (ch2, val2) -> (ch1, val1-2*val2)
Кучка в ответ на http://govnokod.ru/9995#comment136058
> с другой стороны раз хаскель, то хотелось бы, например:
> *Main> romanToArabic "LC"
> Left (line 1, column 2):
> unexpected 'C'
> expecting "X", "IX", "IV", "V", "I" or end of input
bormand,
25 Апреля 2012
Follow us!