Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
Всего: 7
+1
ПPOЦ COKO_БAH;
ИMEHA:P,B,PR,И,ИM,Г;
975->P;
767->B;
<32,100,27,141,65,AДPЧ(6994),169,32,133,83,169,0,133,153,169,0,133,152,32,79,187,32,92,27,76,96,27>->PR;
ДЛЯ И OT 1 ДO #PR::
AДPЗ(P+И,PR[И]);
BCE;
ДЛЯ Г ИЗ<"1","2">::
"S"+Г->ИM;
ДЛЯ И OT 1 ДO 30::
ECЛИ И>#ИM TO
AДPЗ(B+И,160);
ИHAЧE
AДPЗ(B+И,KOД(ИM[И]));
BCE;
BCE;
AДPBЫЗ(976);
BCE;
AДPBЫЗ(17548);
KHЦ;
«Сокобан» («Мудрый крот») из пакета «Роботландия» для «Агата».
Язык программирования: «Рапира».
Форматирование моё (в оригинале был однострочник).
TEH3OPHblu_nemyx,
15 Августа 2020
+2
/* meta */
typedef struct r_anal_meta_item_t {
ut64 from;
ut64 to;
ut64 size;
int type;
int subtype;
char *str;
int space;
} RAnalMetaItem;
typedef struct {
struct r_anal_t *anal;
int type;
int rad;
SdbForeachCallback cb;
void *user;
int count;
struct r_anal_type_function_t *fcn;
} RAnalMetaUserItem;
typedef struct r_anal_range_t {
ut64 from;
ut64 to;
int bits;
} RAnalRange;
#define R_ANAL_UNMASK_TYPE(x) (x&R_ANAL_VAR_TYPE_SIZE_MASK)
#define R_ANAL_UNMASK_SIGN(x) (((x& R_ANAL_VAR_TYPE_SIGN_MASK)>> R_ANAL_VAR_TYPE_SIGN_SHIFT)==R_ANAL_VAR_TYPE_UNSIGNED)?0:1
#define R_ANAL_GET_OFFSET(x,y,z) \
(x && x->binb.bin && x->binb.get_offset)? \
x->binb.get_offset (x->binb.bin, y, z): -1
enum {
R_ANAL_DATA_TYPE_NULL = 0,
R_ANAL_DATA_TYPE_UNKNOWN = 1,
R_ANAL_DATA_TYPE_STRING = 2,
R_ANAL_DATA_TYPE_WIDE_STRING = 3,
R_ANAL_DATA_TYPE_POINTER = 4,
R_ANAL_DATA_TYPE_NUMBER = 5,
R_ANAL_DATA_TYPE_INVALID = 6,
R_ANAL_DATA_TYPE_HEADER = 7,
R_ANAL_DATA_TYPE_SEQUENCE = 8,
R_ANAL_DATA_TYPE_PATTERN = 9,
};
// used from core/anal.c
#define R_ANAL_ADDR_TYPE_EXEC 1
#define R_ANAL_ADDR_TYPE_READ 1 << 1
#define R_ANAL_ADDR_TYPE_WRITE 1 << 2
#define R_ANAL_ADDR_TYPE_FLAG 1 << 3
#define R_ANAL_ADDR_TYPE_FUNC 1 << 4
#define R_ANAL_ADDR_TYPE_HEAP 1 << 5
#define R_ANAL_ADDR_TYPE_STACK 1 << 6
#define R_ANAL_ADDR_TYPE_REG 1 << 7
#define R_ANAL_ADDR_TYPE_PROGRAM 1 << 8
#define R_ANAL_ADDR_TYPE_LIBRARY 1 << 9
#define R_ANAL_ADDR_TYPE_ASCII 1 << 10
#define R_ANAL_ADDR_TYPE_SEQUENCE 1 << 11
#define R_ANAL_ARCHINFO_MIN_OP_SIZE 0
#define R_ANAL_ARCHINFO_MAX_OP_SIZE 1
#define R_ANAL_ARCHINFO_ALIGN 2
#define R_ANAL_ARCHINFO_DATA_ALIGN 4
Как нужно называть идентификаторы.
Источник:
https://github.com/radareorg/radare2/
TEH3OPHblu_nemyx,
11 Июля 2020
+1
namespace Test;
/**
* MyTest (test/mytest.zep)
*/
class MyTest
{
public function someMethod()
{
/* Variables must be declared */
var myArray;
int i = 0, length;
/* Create an array */
let myArray = ["hello", 0, 100.25, false, null];
/* Count the array into a 'int' variable */
let length = count(myArray);
/* Print value types */
while i < length {
echo typeof myArray[i], "\n";
let i++;
}
return myArray;
}
}
Язык программирования «Зефир».
https://docs.zephir-lang.com/0.12/en/introduction
TEH3OPHblu_nemyx,
03 Июня 2020
0
apibrėžti WSGIHandler(aplin, pradžia_atsakymas):
globalinis prašymas
globalinis atsakymas
prašymas.įpareigoti(aplin)
atsakymas.įpareigoti()
bandyti:
prižiūrėtojas, argi = rungtynės_url(prašymas.kelias, prašymas.metodas)
jei not prižiūrėtojas:
kelti HTTPKlaida(404, "Nerastas")
produkcija = prižiūrėtojas(**argi)
išskyrus BreakButelio kaip antsparnis:
produkcija = antsparnis.produkcija
išskyrus Exception kaip išimtis:
atsakymas.statusas = getattr(išimtis, 'http_statusas', 500)
klaidaprižiūrėtojas = KLAIDA_HANDLER.get(atsakymas.statusas, klaida_nutylėjimą)
bandyti:
produkcija = klaidaprižiūrėtojas(išimtis)
išskyrus:
produkcija = "Išimtis per klaidos prižiūrėtojas! Prašymas sustabdyti."
jei atsakymas.statusas == 500:
prašymas._aplin['wsgi.errors'].write("Error (500) on '%s': %s\n" % (prašymas.kelias, išimtis))
db.uždaryti()
jei turiatrib(produkcija, 'read'):
failąišvesties = produkcija
jei 'wsgi.file_wrapper' iš aplin:
produkcija = aplin['wsgi.file_wrapper'](failąišvesties)
kitas:
produkcija = iter(lambda: failąišvesties.read(8192), '')
kijei isinstance(produkcija, stg):
produkcija = [produkcija.encode()]
dėl c iš atsakymas.SLAPUKAI.values():
atsakymas.antraštė.papildyti('Set-Cookie', c.OutputString())
statusas = '%d %s' % (atsakymas.statusas, HTTP_KODAI[atsakymas.statusas])
pradžia_atsakymas(statusas, sąrašas(atsakymas.antraštė.daiktai()))
sugrįžti produkcija
Отсюда:
https://github.com/Setonas/setonas
TEH3OPHblu_nemyx,
01 Июня 2020
+1
# -*- coding: iso-8859-1 -*-
schön = Wahr
häßlich = Falsch
für bäh in [schön, häßlich]:
drucke bäh
def sovielwiemöglich():
"gib"
zurück "was mir gehört"
Отсюда:
http://www.fiber-space.de/EasyExtend/doc/teuton/teuton.htm
TEH3OPHblu_nemyx,
01 Июня 2020
+1
enchufar Chamuyo
un Árbol de a es
bien Hoja a
bien Nodo a (Árbol de a) (Árbol de a)
el máximo
dados n m
si n > m da n
si no da m
la altura de Árbol de a en Numerito
dado (Hoja _) da 1
dado (Nodo _ a b) da 1 + máximo (altura a)
(altura b)
el programa es escupir . mostrar . altura $
Nodo 'a'
(Nodo 'b'
(Hoja 'c')
(Hoja 'd'))
(Nodo 'e'
(Hoja 'f')
(Hoja 'g'))
Отсюда:
https://qriollo.github.io/
TEH3OPHblu_nemyx,
01 Июня 2020
+2
def get_build_version():
"""Return the version of MSVC that was used to build Python.
For Python 2.3 and up, the version number is included in
sys.version. For earlier versions, assume the compiler is MSVC 6.
"""
prefix = "MSC v."
i = sys.version.find(prefix)
if i == -1:
return 6
i = i + len(prefix)
s, rest = sys.version[i:].split(" ", 1)
majorVersion = int(s[:-2]) - 6
if majorVersion >= 13:
# v13 was skipped and should be v14
majorVersion += 1
minorVersion = int(s[2:3]) / 10.0
# I don't think paths are affected by minor version in version 6
if majorVersion == 6:
minorVersion = 0
if majorVersion >= 6:
return majorVersion + minorVersion
# else we don't know what version of the compiler this is
return NoneОпределение версии конпелятора, которой был собран «CPython».
TEH3OPHblu_nemyx,
30 Мая 2020
Follow us!