Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+113
open System
let mutable str = "1234455566667778888"
for i = str.Length - 1 downto 1 do
if str.[i] = str.[i-1] && Char.IsDigit(str.Chars(i)) then
str <- str.Remove(i, 1);
printfn "%s" str
Console.ReadKey() |> ignore
qbasic,
01 Января 2011
+113
let rnd = System.Random()
// список из 10-ти случайных элементов
let myList = [1..10] |> List.map (fun x -> rnd.Next(1, 100))
// функция, исключающая элементы с нечётными номерами
let removeEven lst = [
let i = ref 0
for n in lst do
if (!i % 2 <> 0) then yield n
i := !i + 1]
// выводим список
printfn "%A" myList
// исключаем нечётные и выводим
printfn "%A" (removeEven myList)
qbasic,
01 Января 2011
+143
Hello, <em>ujkbktj</em>!<br />
<br />
Пользователь <a href="http://govnokod.ru/user/1997">istem</a> ответил на Ваш комментарий к <a href="http://govnokod.ru/5120">говнокоду #5120</a>!<br />
<br />
Напомним, Вы <a href="http://govnokod.ru/5120#comment66331">написали</a>:<br />
<em><span style="text-decoration:blink;">это не код!!</span></em><br />
<br />
На что получили <a href="http://govnokod.ru/5120#comment66347">ответ</a>:<br />
<em>И чё ж у Вас айдишник-то не 666...</em>
<br /><br /><br />
С уважением, Ваш <a href="http://govnokod.ru">Говнокод</a>....
ujkbktj,
31 Декабря 2010
+151
/*
[... выдержки из файла functions.php ...]
*/
function secure_input_string($string,$strip = true) {
/*Функция позволяет обезопасить вводимые пользователем данные путем применения ряда функций в входной строке
* Входная строка должна быть текстом (string) */
if ((bool)$strip) {
//Усечение пробелов
$string = trim($string);
//Удаление PHP и HTML тегов
//$string = strip_tags($string);
//Перевод специальных символов в html эквиваленты
$string = htmlspecialchars($string);
//Отмена спец-символов обратными косыми чертами
}
//Удаление попыток вставки кода php или xml
$badcode = array('<?php','?>');
$code = array('<','>');
$string = str_replace($badcode,$code,$string);
$str='';
$chars= array(
'a', 'b', 'c', 'd', 'e',
'f', 'g', 'h', 'i', 'j',
'k', 'l', 'm', 'n', 'o',
'p', 'q', 'r', 's', 't',
'u', 'v', 'w', 'x', 'y',
'z',
'A', 'B', 'C', 'D', 'E',
'F', 'G', 'H', 'I', 'J',
'K', 'L', 'M', 'N', 'O',
'P', 'Q', 'R', 'S', 'T',
'U', 'V', 'W', 'X', 'Y',
'Z'
function str_size($size) {
//Функция для предаставления размера файла из функции filesize (возвращающуу байты) в удобочитаемый вид
//Приведение к строковому типу
$size = (string)$size;
if (strlen($size) == 0) {
//Не удалось получить размер файла
return false;
}
else if (strlen($size) <= 3) {
//Размер указан в Байтах
return $size.' byte';
}
else if (strlen($size) >= 4 && strlen($size) < 7) {
//Размер указан в Килобайтах
$size = (int)$size;
$size_k = $size/1024;
//Удалить двойную точность
$size_k = (int)$size_k;
return $size_k.' Kb';
}
else if (strlen($size) >= 7 && strlen($size) < 10) {
//Размер указан в Мегабайтах
$size = (int)$size;
$size_m = $size/1024;
$size_m = $size_m/1024;
//Оставить только один знак после точки
$size_m = round($size_m,1);
$size_m = $size_m.' Мб';
return $size_m;
}
else if (strlen($size) >= 10 && strlen($size) < 13) {
//Размер указан в Гигабайтах
$size = (int)$size;
$size_m = $size/1073741824;
//Оставить только один знак после точки
$size_m = round($size_m,1);
$size_m = $size_m.' Гб';
return $size_m;
}
======================================== ======================================== ======================================== ============
|слияне кодов
======================================== ======================================== ======================================== ============
ujkbktj,
31 Декабря 2010
+144
коеокококоокококоъпакопмшъуаоимапщиттитеапиьльиильлилпььпиьлиьлиьлиьлипьлпиьлпиь
аак3ruiogburfguiowdfbuiefbuwfwfbujhwfhd
f
fgfgifgdfuidfui<>>>>>>>>>>>>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<<<<rfgifgeoefgbnioefbo>>>>>>>>>>>>>>>>>>>.>>>>>,><><><><><><><><><><><>><><><
rteetbmiiitbtbbbm////////////pfuheprffd;dfldfklqefwefpprprrpperprp////????\\\\\\v,gkkhghkegmdtk:\\bjdgrughrtugbfu.efbbuweh
sdf
гглглгллглглглгjetfgbuiobuibutyнастояще гавно
ujkbktj,
31 Декабря 2010
+62
Уважаемые коллеги!
Вот и наступает Новый Год!
Пускай в новом году у каждого будет как можно меньше сбоев и багов!
Пусть будет профессиональный рост идти по экспоненте!
А тем, кто уже профессионалы своего дела - не останавливаться на достигнутом!
Желаю меньше говнокода в программах, пусть даже с бодуна и на больную голову будет писаться код!
Всех с наступающим, хорошего настроения и веселого празднования!
1_and_0,
31 Декабря 2010
−110
require "date"
#Конвертируем массив цифр в двухмерный масив для отображения
def get_numbers(numbers)
output = []
one = [["-","-","-","*","*"],["-","-","*","-","*"],["-","*","-","-","*"],["*","-","-","-","*"],["-","-","-","-","*"],["-","-","-","-","*"],["-","-","-","-","*"]]
two = [["*","*","*","*","*"],["-","-","-","-","*"],["-","-","-","-","*"],["*","*","*","*","*"],["*","-","-","-","-"],["*","-","-","-","-"],["*","*","*","*","*"]]
three = [["*","*","*","*","*"],["-","-","-","-","*"],["-","-","-","-","*"],["*","*","*","*","*"],["-","-","-","-","*"],["-","-","-","-","*"],["*","*","*","*","*"]]
four = [["*","-","-","-","*"],["*","-","-","-","*"],["*","-","-","-","*"],["*","*","*","*","*"],["-","-","-","-","*"],["-","-","-","-","*"],["-","-","-","-","*"]]
five = [["*","*","*","*","*"],["*","-","-","-","-"],["*","-","-","-","-"],["*","*","*","*","*"],["-","-","-","-","*"],["-","-","-","-","*"],["*","*","*","*","*"]]
six = [["*","*","*","*","*"],["*","-","-","-","-"],["*","-","-","-","-"],["*","*","*","*","*"],["*","-","-","-","*"],["*","-","-","-","*"],["*","*","*","*","*"]]
seven = [["*","*","*","*","*"],["-","-","-","-","*"],["-","-","-","*","-"],["-","-","*","-","-"],["-","*","-","-","-"],["*","-","-","-","-"],["*","-","-","-","-"]]
eight = [["*","*","*","*","*"],["*","-","-","-","*"],["*","-","-","-","*"],["*","*","*","*","*"],["*","-","-","-","*"],["*","-","-","-","*"],["*","*","*","*","*"]]
nine = [["*","*","*","*","*"],["*","-","-","-","*"],["*","-","-","-","*"],["*","*","*","*","*"],["-","-","-","-","*"],["-","-","-","-","*"],["*","*","*","*","*"]]
zero = [["*","*","*","*","*"],["*","-","-","-","*"],["*","-","-","-","*"],["*","-","-","-","*"],["*","-","-","-","*"],["*","-","-","-","*"],["*","*","*","*","*"]]
seperator = [["-","-","-","-","-"],["-","*","-","*","-"],["-","-","-","-","-"],["-","-","-","-","-"],["-","-","-","-","-"],["-","*","-","*","-"],["-","-","-","-","-"]]
for i in numbers
case i
when "0"
output += [zero]
when "1"
output += [one]
when "2"
output += [two]
when "3"
output += [three]
when "4"
output += [four]
when "5"
output += [five]
when "6"
output += [six]
when "7"
output += [seven]
when "8"
output += [eight]
when "9"
output += [nine]
when ":"
output += [seperator]
end
end
return output
end
#Получаем массив с текущим временем
def get_time
t = Time.new
if t.hour.between?(0,9)
hour = "0" + t.hour.to_s
else
hour = t.hour.to_s
end
if t.min.between?(0,9)
min = "0" + t.min.to_s
else
min = t.min.to_s
end
if t.sec.between?(0,9)
sec = "0" + t.sec.to_s
else
sec = t.sec.to_s
end
time = [hour[0],hour[1],":",min[0],min[1],":",sec[0],sec[1]]
end
#Рисуем с заменой символов на в
def display_time(symbols = {:star => "0", :line => " "})
color_taf = 0
color_tab = 7
loop do
#Для очитки экрана в UNIX
if RUBY_PLATFORM == "i386-mingw32" then
system("cls")
else
system("tput reset")
end
#Цвет и фон
#system("tput setaf #{color_taf}")
#system("tput setab #{color_tab}")
m = get_numbers(get_time)
#Посимвольная прорисовка
for j in 0..6
for i in 0..m.size-1
for z in m[i][j]
case z
when "*"
print symbols[:star]
when "-"
print symbols[:line]
#sleep(0.01) Для просмотра прорисовки
end
end
print " "
end
print "\n"
end
sleep(1)
end
end
#Рисуем
display_time :star => "0", :line => " "Фух... урезал до 100 строк :)
naker,
30 Декабря 2010
+164
<?php
/**
* Sticky Notes pastebin
* @ver 0.1
* @license BSD License - www.opensource.org/licenses/bsd-license.php
*
* Copyright (c) 2011 Sayak Banerjee <[email protected]>
* All rights reserved. Do not remove this copyright notice.
*/
class core
{
// Global vars
var $build;
// Constructor
function __construct()
{
$this->build = '0.1.17122010.2';
}
// Function to return root path
function path()
{
$path = $_SERVER['PHP_SELF'];
$snip = strrpos($path, '/');
$path = substr($path, 0, $snip + 1);
return $path;
}
// Function to return remote IP
function remote_ip()
{
return $_SERVER['REMOTE_ADDR'];
}
// Function to set a cookie
function setcookie($name, $value, $expire = 0)
{
setcookie('stickynotes_' . $name, $value, $expire);
}
// Slash fix
function fixslashes(&$data, $list = false)
{
global $db;
$data = addslashes($data);
$db->unescape($data);
}
// Function to fetch query strings / post data
function variable($name, $default, $is_cookie = false)
{
if (gettype($default) == "integer")
{
settype($default, "double");
}
if ($is_cookie && isset($_COOKIE['stickynotes_' . $name]))
{
$cookie_data = $_COOKIE['stickynotes_' . $name];
settype($cookie_data, gettype($default));
return $cookie_data;
}
else if (isset($_POST[$name]))
{
$post_data = $_POST[$name];
settype($post_data, gettype($default));
return $post_data;
}
else if (isset($_GET[$name]))
{
$get_data = $_GET[$name];
settype($get_data, gettype($default));
return $get_data;
}
else
{
return $default;
}
}
qbasic,
30 Декабря 2010
+145
<?php
class Pwd {
private static $pc='bcdfghjklmnprstvwxyz';
private static $pv='aeiou';
private static $pd='0123456789';
private static $ps='!@#$%^&*_-+=';
private static function randsub($s) {
$c=$s[rand(0, strlen($s)-1)];
return rand(0, 1)?strtoupper($c):strtolower($c);
}
public static function password($min=4,$max=10) {
$p='';
for($i=0;$i<$max;$i++) {
switch (rand(0, 7)) {
case 0:
$p.=self::randsub(self::$pc);
break;
case 1:
$p.=self::randsub(self::$pv);
break;
case 2:
$p.=self::randsub(self::$pd);
break;
case 3:
$p.=self::randsub(self::$pc).self::randsub(self::$pv);
break;
case 4:
$p.=self::randsub(self::$pv).self::randsub(self::$pc);
break;
case 5:
$p.=self::randsub(self::$pc).self::randsub(self::$pv).self::randsub(self::$pc);
break;
case 6:
$p.=self::randsub(self::$pv).self::randsub(self::$pc).self::randsub(self::$pv);
break;
case 7:
$p.=self::randsub(self::$ps);
break;
}
}
return substr($p, 0,rand($min, $max));
}
}
хитровыебанный лисапедрильный пассвордоген.
и PHP тут не причем, лень - это зло = )
Lure Of Chaos,
30 Декабря 2010
+132
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<style type="text/css">
<!--
.стиль2 {
font-family: "Times New Roman", Times, serif;
font-style: italic;
}
.стиль3 {
font-size: 16px;
font-weight: bold;
font-style: italic;
}
.стиль4 {font-size: 12px; font-weight: bold; font-style: italic; }
-->
</style>
<head>
<meta name="description" content="<?php echo $myrow['meta_d']; ?>" />
<meta name="keywords" content="<?php echo $myrow['meta_k']; ?>" />
<meta http-equiv="Content-Type" content="text/html; charset=windows-1251" />
<title><?php echo "Заметки по запросу - $search"; ?></title>
<link href="style.css" rel="stylesheet" type="text/css" />
</head>
<body>
<table width="700" align="center" cellpadding="0" cellspacing="0" class="main_border">
<!--Блок с шапкой сайта-->
<? include ("blocks/header.php"); ?>
<tr>
<!--Блок меню сайта-->
<? include ("blocks/menu.php"); ?>
<td width="554" valign="top" bgcolor="#FFFFFF">
qbasic,
30 Декабря 2010
Follow us!