Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
−126
#!/bin/bash
c=0;
declare -a fls;
cat $*| while read line
do
# echo "line $line №$c"
fls[$c]=$line;
let c++;
for((i=0;i<=${#fls[@]}-1;i++))
{
for((i2=$i+1;i2<=${#fls[@]};i2++))
{
# echo "${fls[$i]} ${fls[$i2]}";
if [ ${fls[$i]} = "${fls[$i2]}" ];then
echo "Zeile $i ist gleich Zeile $i2";
#else
# echo "Строка $i не равна строке $i2";
fi
}
}
doneНаходит одинаковые строки в файле
AliceGoth,
13 Января 2011
+114
TMapObj = record
Size: integer;
Selected, Valid: boolean;
case Kind: TKind of
// дохрена пропущено
koTxr: (
TxrFileName: string [31];
tLast: integer;
TxrCorrect: boolean;
LODS: array [0 .. 3] of TBitmap;
Pixel: TBitmap;
);
koItem: (
Location: TLocation;
ItemEndSel: boolean; // выделена ли для перетаскивания
TimeBeforeReborn: integer; // времени до восстановления
DescrIndex: integer; // индекс описателя
Rotation: integer;
TeamColor, EnemyColor: integer;
iLast: integer;
CannotGet: boolean;
case TKindItem of
kiWeapon: (
iwpFallen: boolean;
iwpBulletsLeft: integer;
iwpState: TWeaponState;
);
kiHuman: (
ihState: integer;
);
kiFlag: (
ifState: TFlagState;
ifHome: integer;
);
kiScepter: (
isState: TScepterState;
);
);
koItemDescr: (
ItemFileName: string [31]; // файл с описанием предмета
idLast: integer;
ItemCorrect: boolean;
ItemName: string [31]; // название предмета
SpriteIndName: string [31];
SpriteInd: integer; // картинка
RebornTime: integer; // время перерождения
case KindItem: TKindItem of
kiHealth: (
hlCount: integer;
);
kiShield: (
shCount: integer;
);
kiFlag: (
flTeam: integer;
);
kiSL: (
slTeam: integer;
);
kiAmmo: (
amCount: integer;
amIndex: integer; // тип патрона
);
kiWeapon: ( // всё про пушку
wpAmmoIndex: integer; // тип патронов
wpKeyNumber: integer; // кнопка на клавиатуре
wpBulletsInCharge: integer; // патронов в обойме
wpInitBullets: integer; // изначальное число патронов
wpMaxBullets: integer; // максимальное число патронов
wpShotBullets: integer; // патронов за раз
wpReloadTime, wpShotTime: integer; // время перезарядки, скорострельность (скорострельность в миллисекундах)
wpDispersion, wpKickBack: integer; // разброс самого оружия и отдача
wpBasic: integer; // базовое ли
wpDamage: integer; // урон
wpDistance, wpBulletSpeed: integer; // предельная дальность выстрела, скорость пуль
wpSound: integer; // номер ноты
wpColor: TColor; // цвет
);
);
koBullet: (
bLast: integer;
BLocP: array [0 .. 1] of TPoint;
BLocRoom: integer;
BVector: TPoint; // нормализованный вектор направления
BDamage: integer; // параметры, которые надо передавать в процедуру создания пули
BSpeed: integer;
BLengthLeft: integer;
BOwner: integer;
Bn, Bm: TDistFunc;
BColor: TColor;
);
end;
Меня попросили показать, до чего может довести структурное программирование при отрицании ООП. Разветвлённая структура с кучей ветвей.
Для лучшего эффекта обмазываться вместе с http://govnokod.ru/4249
TarasB,
13 Января 2011
+157
session_start();
$value = array(
"severity" => $severity,
"message" => $message,
"filepath" => $filepath,
"line" => $line
);
if(empty($_SESSION['data']))
{
$_SESSION['data'] = serialize($value);
}
else
{
unset($_SESSION['data']);
$_SESSION['data'] = serialize($value);
}
header("Location: ".BASE_URL."/error/php_error/");Вот обработчик ошибок из уже упомянутого мною проекта. Тот же самый кодер обрабатывает ошибки. При более чем одной ошибке валиться весь проект, из-за того что сессия уже стартовала. Увидев это у меня возник facepalm.
bazyaka,
12 Января 2011
−166
Private Sub btnNew_Click()
Dim i As Integer
Dim asCopy() As clsCitizen
ReDim asCopy(LBound(modCitizen.asDB) To UBound(modCitizen.asDB)) As clsCitizen
For i = LBound(modCitizen.asDB) To UBound(modCitizen.asDB)
Set asCopy(i) = modCitizen.asDB(i)
Next i
ReDim modCitizen.asDB(UBound(modCitizen.asDB) + 1) As clsCitizen
For i = LBound(asCopy) To UBound(asCopy)
Set modCitizen.asDB(i) = asCopy(i)
Next i
Set modCitizen.asDB(UBound(modCitizen.asDB)) = New clsCitizen
modCitizen.asDB(UBound(modCitizen.asDB)).bNew = True
iRecNum = UBound(modCitizen.asDB)
RecordRead
UpdateControls
LockMe True
End Sub
вот через какое место мучительно вспоминал давно забытый, старый добрый VB6
процедура дополняет массив новым элементом
Lure Of Chaos,
10 Января 2011
+165
$query = mysql_query("SELECT * FROM `accounts` WHERE `login` = '".@$_COOKIE['sc2tACC']."' LIMIT 1");
if ($query and @isset($_COOKIE['sc2tACC']) AND mysql_num_rows($query)) {
$auth = mysql_fetch_array($query);
if($auth['password'] == $_COOKIE['sc2tPASS'] and @isset($_COOKIE['sc2tPASS'])) {
$AS = "OK";
if($_SERVER['PHP_SELF'] != "/chat.php" and $auth['status'] != 1) {
mysql_query("UPDATE `accounts` SET `timestamp` = '".microtime(1)."', `ip` = '".$_SERVER['REMOTE_ADDR']."', `lastpage` = '".$_SERVER['REQUEST_URI']."' WHERE `id` = '".$auth['id']."' LIMIT 1;");
}
} else {
$loginError = "Неверный пароль";
}
} else {
$loginError = "Неверный логин";
}
ne0n,
09 Января 2011
+145
<?xml version="1.0" encoding="UTF-8"?>
<ui version="4.0">
<class>QRSelector</class>
<widget class="QWidget" name="QRSelector">
<property name="geometry">
<rect>
<x>0</x>
<y>0</y>
<width>400</width>
<height>300</height>
</rect>
</property>
<property name="windowTitle">
<string>QRSelector</string>
</property>
<widget class="QLabel" name="label">
<property name="geometry">
<rect>
<x>10</x>
<y>10</y>
<width>371</width>
<height>16</height>
</rect>
</property>
<property name="text">
<string/>
</property>
</widget>
</widget>
<layoutdefault spacing="6" margin="11"/>
<resources/>
<connections/>
</ui>qrselector.ui
Resager,
06 Января 2011
+100
dats:=datetostr(DateTimePicker1.Date);
datp:=datetostr(DateTimePicker2.Date);
datsc:=copy(dats,1,2);
datsm:=copy(dats,4,2);
datsg:=copy(dats,7,4);
datpc:=copy(datp,1,2);
datpm:=copy(datp,4,2);
datpg:=copy(datp,7,4);
idatsc:=strtoint(datsc);
idatsm:=strtoint(datsm);
idatsg:=strtoint(datsg);
idatpc:=strtoint(datpc);
idatpm:=strtoint(datpm);
idatpg:=strtoint(datpg);
tdatc:=strtoint(copy(p[i,6],1,2));
tdatm:=strtoint(copy(p[i,6],4,2));
tdatg:=strtoint(copy(p[i,6],7,4));
if not ((idatsg>tdatg) or ((idatsg=tdatg) and (idatsm>tdatm)) or ((idatsc>tdatc) and (idatsm>=tdatm)) or (idatpg<tdatg) or ((idatpg=tdatg) and (idatpm<tdatm)) or ((idatpc<tdatc) and (idatpm<=tdatm))) then
Проверка или дата с массива включена в диапазон дат с DateTimePicker'ов (еще и с ошибкой в условии)
И вся эта фигня в цикле... Как это увидел, валерьянкой отпаивали меня долго
Nikitiy_II,
04 Января 2011
+159
/** Связанный JavaScript **/
/*
var script = new Array();
var s = 0;
linked = e.match(/<script type=("|')text\/javascript("|') src=("|').*?("|')><\/script>/gi);
if (linked != null)
{
src_link = new Array();
j = 0;
for (i = 0; i < linked.length; i++)
{
e = e.replace(linked[i], '');
new_link = linked[i].match(/src=("|').*?("|')>/gi);
if (new_link != null)
{
script[s] = document.createElement('script');
script[s].setAttribute('type', 'text/javascript');
script[s].id = 'JavaScript_' + hist.length + '_' + j;
script[s].setAttribute('src', new_link[0].substr(5, (new_link[0].length - (5 + 2))));
s++; j++;
}
}
}
*/
/** Внедрённый JavaScript **/
/*
e = e.replace(/[\r\n]/g, ' ');
intruded = e.match(/<script type=("|')text\/javascript("|')>.*?<\/script>/gi);
if (intruded != null)
{
for (i = 0; i < intruded.length; i++)
{
inner = '';
e = e.replace(intruded[i], '');
inner = intruded[i].replace(/<script type=("|')text\/javascript("|')>/, '').replace(/<\/script>/, '');
if (navigator.appName == 'Microsoft Internet Explorer')
{
script[s] = inner;
}
else
{
script[s] = document.createElement('script');
script[s].setAttribute('type', 'text/javascript');
script[s].id = 'JavaScript_' + hist.length + '_' + i;
script[s].innerHTML = inner;
}
s++;
}
}
*/А вставить в элемент и найти через getElementsByTagName("script") слишком просто :D
Genka,
28 Декабря 2010
+159
function is_int_string ($str) {
return ((string)(int)($str) == $str);
}Уже даже не помню зачем оно было нужно.
byss,
27 Декабря 2010
+161
function bonus($host, $uri, $go_form)
{
if (is_array($go_form)) {
$body = "";
foreach ($go_form as $name => $value) {
$body .= $go_form[] = $name . '=' . urlencode($value) . "&";
}
}
$length = strlen($body);
$socket = fsockopen($host, 80);
fwrite($socket, "POST {$uri} HTTP/1.0\r\n");
fwrite($socket, "Host: {$host}\r\n");
fwrite($socket, "User-Agent: Mozilla/4.0\r\n");
fwrite($socket, "Content-Type: application/x-www-form-urlencoded\r\n");
fwrite($socket, "Content-Length: $length\r\n\r\n");
fwrite($socket, "$body\r\n");
$fgets = '';
while (!feof($socket)) {
$fgets .= fread($socket, 4096);
}
//print_r($fgets);
//echo '<br><br>$fgets<br><br>';
fclose($socket);
}
bonus("balans.kz","/bonus/",$go_form = Array( 'pursedest' => 'Rxxxxxxxxx',));
Unknown,
27 Декабря 2010
Follow us!