- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
//DELPHI
Hex:string
Hex:='FFF123'
for i to length (Hex)
StrToInt('$' + InttoHex(Ord(Hex[i]),2))
//Какую только хрень не изобретут люди, не удосужившиеся найти в справке HexToBin...
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+116
//DELPHI
Hex:string
Hex:='FFF123'
for i to length (Hex)
StrToInt('$' + InttoHex(Ord(Hex[i]),2))
//Какую только хрень не изобретут люди, не удосужившиеся найти в справке HexToBin...
Действительно хорошая перекодировка.
−107
@tag.url = @tag.name.downcase.gsub('А','a').gsub('а','a').gsub('Б','b').gsub('б','b').gsub('В','v').gsub('в','v').gsub('Г','g').gsub('г','g').gsub('Д','d').gsub('д','d').gsub('Е','e').gsub('е','e').gsub('Ё','ye').gsub('ё','e').gsub('Ж','j').gsub('ж','j').gsub('З','z').gsub('з','z').gsub('И','i').gsub('и','i').gsub('Й','i').gsub('й','i').gsub('К','k').gsub('к','k').gsub('Л','l').gsub('л','l').gsub('М','m').gsub('м','m').gsub('Н','n').gsub('н','n').gsub('О','o').gsub('о','o').gsub('П','p').gsub('п','p').gsub('Р','r').gsub('р','r').gsub('С','s').gsub('с','s').gsub('Т','t').gsub('т','t').gsub('У','u').gsub('у','u').gsub('Ф','f').gsub('ф','f').gsub('Х','h').gsub('х','h').gsub('Ц','ts').gsub('ц','ts').gsub('Ч','ch').gsub('ч','ch').gsub('Ш','sh').gsub('ш','sh').gsub('Щ','sh').gsub('щ','sh').gsub('Ъ','').gsub('ъ','').gsub('Ы','y').gsub('ы','y').gsub('Ь','').gsub('ь','').gsub('Э','e').gsub('э','e').gsub('Ю','you').gsub('ю','you').gsub('Я','ya').gsub('я','ya').gsub('`','').gsub(' ','-')
Оригинальный подход к транслитерации
−102
""" in utils.py"""
try:
mongo = pymongo.Connection(settings.MONGO_HOST).topbrands
except:
# it's ok, nobody dies
mongo = None
''''everywhere"""
from utils import mongo
try:
mongo.objects.save(obj)
except Exception, e:
log.exception(e)
Ну в самом деле пусть везде будет написано о том, что инстанс NoneType не имеет аттрибута objects.
+138
var xmls = outPut.Select(x => new XmlSolutionRecord(x.Key, x.Value))
.Where(x => x.CanParse()) // check parameters
.Where(x =>
{
x.Parse(); // parse values
return true;
})
.GroupBy(
x => new Tuple<string, string, int>(x.DefSolutionName, x.SolutionName, x.DefSolutionVarsion)) // make groups
.Select(group => group.OrderByDescending(row => row.SolutionVersion).First().XmlId) // get id of latest solution for each group
.Select(config.GetXML);
Очередной шедевр чешского с шарп строения.
+137
foreach (BoxActor crate in crates)
{
crate.Body.EnableBody();
crate.Body.ApplyGravity = true;
physicSystem.RemoveBody(crate.Body);
Components.Remove(crate);
}
crates.Clear();
Раскопал древний код. Перед смертью не надышишься, как говорится...
+38
isset($params) && array_push(
$urlPart,
implode('/',
array_map(
function ($key, $value) {
return $key . '/' . $value;
},
array_keys($params),
array_values($params)
)
)
);
+41
public static function getById( $id )
{
$model = new self;
$data = $model->load();
foreach( $data AS $item ){
if( $item->id == $id ){
return $item;
}
}
return null;
}
Нашел в текущем проекте.
+39
<?php
set_time_limit(86400);
$begin = new DateTime($_GET["min_date"]);
$end = new DateTime($_GET["max_date"]);
$begincp = clone $begin;
$begincp_2 = clone $begin;
$dt_diff = $begin->diff($end);
$dt_diff = (int) $dt_diff->format("%a");
for($i = 1; $i <= $dt_diff; $i++)
{
$begincp_2->modify("+1 day");
$q = mysql_query("SELECT * FROM `skud_stat` WHERE
`arrival` >= '".$begincp->getTimestamp()."' AND
`arrival` < '".$begincp_2->getTimestamp()."'
ORDER BY `name`");
while($data = mysql_fetch_array($q))
{
$workers[$data["name"]][] = $data;
}
/* Сортировку */
//uksort($workers, "strnatcasecmp");
//ksort($workers);
$coun = 0;
$begincp->modify("+1 day");
}
/* быстрая сортировка */
uksort($workers, "strnatcasecmp");
?>
<table class="table table-striped table-hover table-condensed skud-chart">
<thead></thead>
<tr>
<th style="text-align: left">Имя</th>
<?php
$begin = new DateTime($_GET["min_date"]);
$end = new DateTime($_GET["max_date"]);
$bgcp = clone $begin;
$dt_diff = $begin->diff($end);
$dt_diff = (int) $dt_diff->format("%a");
for($i = 1; $i <= $dt_diff; $i++)
{
?>
<th><?=date("d.m.Y", $bgcp->getTimestamp());?></th>
<?php
$bgcp->modify("+1 day");
}
?>
</tr>
<?php
foreach($workers as $worker => $arr)
{
$begin_copy = clone $begin;
$begin_copy2 = clone $begin;
?>
<tr>
<td class="b"><?=$worker?></td>
<?php
for($i = 1; $i <= $dt_diff; $i++)
{
$begin_copy2->modify("+1 day");
foreach($arr as $day)
{
if($day["arrival"] > $begin_copy->getTimestamp() && $day["leaving"] < $begin_copy2->getTimestamp())
{
/* 28800 - рабочее время (8 часов)
27000 - как погрешность (7 часов 30 минут)
*/
?>
<td><?=date("H:i", $day["arrival"]);?> / <?=date("H:i", $day["leaving"]);?> / <?php if($day["worktime"] < 27000) { ?><b class="notenough"><?php } ?><?=date("H:i", $day["worktime"]);?><?php if($day["worktime"] < 21600) { ?></b><?php } ?></td>
<?php
$success_day = true;
}
else
{
?>
<!--<td>-</td>-->
<?php
}
}
if(!$success_day)
{
?>
<td class="naw">-</td>
<?php
}
unset($success_day);
//if($begin_copy->getTimestamp())
Корпоративная Статистика (!). Читаю из базы и строю отчёт.
+95
if length(fsizeS)<=9 then fsize:=strtoint(fsizeS);
if (length(fsizeS)>9) and (length(fsizeS)<18) then
fsize:=strtoint(copy(fsizeS,length(fsizeS)-8,length(fsizeS)-9))+
strtoint(copy(fsizeS,1,length(fsizeS)-9))*1000000000{10**9};
if length(fsizeS)>18 then
begin
writeln;
writeln('File:'+curstr);
writeln('Size:'+fsizeS);
write('Please input file''s size, written above:');
readln(fsize);
end;
Интересный способ конвертации строки в число. Думаю, у вас здесь такого ещё не было. Нашел в своих исходниках времён 8 - 9 класса.
+154
http://kbyte.ru/ru/Programming/Sources.aspx?id=824&mode=show
063