- 1
- 2
- 3
https://github.com/xexpanderx/conky-drawer-interactive/tree/master/lua
а вы тоже храните автосейв файлы редактора на гитхабе?
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
0
https://github.com/xexpanderx/conky-drawer-interactive/tree/master/lua
а вы тоже храните автосейв файлы редактора на гитхабе?
https://github.com/xexpanderx/conky-drawer-interactive/blob/master/lua/drawer.lua
cairo_arc(cr,hdd_x+22, hdd_y-5,10,270*math.pi/180,360*math.pi/180)
cairo_arc(cr, hdd_x+22, hdd_y-5+28,10,0*math.pi/180,90*math.pi/180)
−1
Функция РазрешеноСозданиеИлиЗаписьНаЗанятие(
ТипЗанятия,
Период,
СтруктурунаяЕдиница,
ОснованиеОплаты,
Номенклатура,
ВремяНачала,
ВремяОкончания,
Сотрудник,
Помещение,
Занятие,
Статус,
ИсклРег,
КонтрольРабВремениСотрудника,
КонтрольЗанятостиПомещения,
ОписаниеОграничения,
КодОграничения)
Возврат Документы.Занятие.РазрешеноСозданиеИлиЗаписьНаЗанятие(
ТипЗанятия,
Период,
СтруктурунаяЕдиница,
ОснованиеОплаты,
Номенклатура,
ВремяНачала,
ВремяОкончания,
Сотрудник,
Помещение,
Занятие,
Статус,
ИсклРег,
КонтрольРабВремениСотрудника,
КонтрольЗанятостиПомещения,
ОписаниеОграничения,
КодОграничения);
КонецФункции
Оформление по красоте, как и количество параметров.
+2
https://blog.aragon.one/update-on-aragon-courts-first-mock-dispute/
Вы уж простите, но я снова с криптовалютчиками. Их мир оказался слишком охуенным.
Криптовалютчики запустили свой собственный суд! Потому что все существующие, как известно, несовершенны,
а из блокчейна слов не выкинешь и perfect transparency.
В первом же тестовом деле суд проебался (хоть и не в юридическом поле - а может и в юридическом тоже,
я не читал), сыграв реальную ситуацию с реальными персонажами из крипто-системы.
Персонажи ожидаемо оказались инфантилами и забиделись.
Что же сделали организаторы суда? Правильно, «удалили решение» из системы блокчейн, сделав вид, что
ничего и не происходило.
Пропагандируемый эфирными поехавшими веб3.0 - это такая россия будущего, где данные о преступлениях
даже не скрываются, но все делают вид, что ничего не происходило, потому что так надо и вообще иначе
весь манямирок рухнет.
+1
SystemD нарушает философию UNIX.
Вместо больших программ которые решают несколько задач одновременно, делайте много маленьких программ, которые решают одну задачу, но делают это хорошо.
Не то, чтобы он плохо справлялся со своими задачами, но он управляет и сервисами, и udev'ом, через него уже и смотрят лог ядра, через него настраивают автозагрузку.
Много задач через одну программу.
Именно поэтому я против SystemD.
дискасс.
0
Давайте в жопу ебацца
−2
Пока в пидорашке стабильность, в Японии учат застойно-хуйловский диалект ордынского языка.
https://pbs.twimg.com/media/EOBV94QXUAY8fBq.jpg:large
0
unit Unit1;
interface
uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls;
type
TForm1 = class(TForm)
Edit1: TEdit;
Edit2: TEdit;
Button1: TButton;
ListBox1: TListBox;
Button2: TButton;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var
a,b:string;
i:integer;
begin
a := Edit1.Text;
b := Edit2.Text;
for i := 0 to 9 do
begin
ListBox1.Items.Add('BEGIN:VCARD');
ListBox1.Items.Add('VERSION:2.1');
ListBox1.Items.Add('N:' + '000' + IntToStr(i) + ';' + '000' + IntToStr(i) + ';;;');
ListBox1.Items.Add('FN:' + '000' + IntToStr(i) + ' ' + '000' + IntToStr(i));
ListBox1.Items.Add('TEL;CELL:' + a + '000' + IntToStr(i) + b);
ListBox1.Items.Add('END:VCARD');
end;
for i := 10 to 99 do
begin
ListBox1.Items.Add('BEGIN:VCARD');
ListBox1.Items.Add('VERSION:2.1');
ListBox1.Items.Add('N:' + '00' + IntToStr(i) + ';' + '00' + IntToStr(i) + ';;;');
ListBox1.Items.Add('FN:' + '00' + IntToStr(i) + ' ' + '00' + IntToStr(i));
ListBox1.Items.Add('TEL;CELL:' + a + '00' + IntToStr(i) + b);
ListBox1.Items.Add('END:VCARD');
end;
for i := 100 to 999 do
begin
ListBox1.Items.Add('BEGIN:VCARD');
ListBox1.Items.Add('VERSION:2.1');
ListBox1.Items.Add('N:' + '0' + IntToStr(i) + ';' + '0' + IntToStr(i) + ';;;');
ListBox1.Items.Add('FN:' + '0' + IntToStr(i) + ' ' + '0' + IntToStr(i));
ListBox1.Items.Add('TEL;CELL:' + a + '0' + IntToStr(i) + b);
ListBox1.Items.Add('END:VCARD');
end;
for i := 1000 to 9999 do
begin
ListBox1.Items.Add('BEGIN:VCARD');
ListBox1.Items.Add('VERSION:2.1');
ListBox1.Items.Add('N:' + IntToStr(i) + ';' + IntToStr(i) + ';;;');
ListBox1.Items.Add('FN:' + IntToStr(i) + ' ' + IntToStr(i));
ListBox1.Items.Add('TEL;CELL:' + a + IntToStr(i) + b);
ListBox1.Items.Add('END:VCARD');
end;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
ListBox1.Items.SaveToFile('C:\Users\Admin\Desktop\import_tel.vcf');
end;
end.
Программа для генерации номеров телефона которую написал друг)
0
"""ASCII art generator braille only.
To start, put this and the image (you need to rename it to input.jpg) in one folder.
The main problem of the algorithm:
Due to the fact that the 8 empty dots symbol and any other Braille symbol have different widths,
the picture may 'float'.
"""
from PIL import Image, ImageDraw
# Change scale of image.
scale = int(input('% of scale: ')) / 100
imgForScale = Image.open('input.jpg')
widthOldForScale, heightOldForScale = imgForScale.size
widthNewForScale, heightNewForScale = int(widthOldForScale * scale), int(heightOldForScale * scale)
scaleImg = imgForScale.resize((widthNewForScale, heightNewForScale), Image.ANTIALIAS)
scaleImg.save('inputScale.jpg')
# -------------
# Makes the image BW.
factor = int(input('factor: ')) # The more, the darker.
imgForBW = Image.open('inputScale.jpg')
draw = ImageDraw.Draw(imgForBW)
widthForBW, heightForBW = imgForBW.size
pix = imgForBW.load()
for i in range(widthForBW):
for j in range(heightForBW):
a = pix[i, j][0]
b = pix[i, j][1]
c = pix[i, j][2]
S = a + b + c
if S > (((255 + factor) * 3) // 2):
a, b, c = 255, 255, 255
else:
a, b, c = 0, 0, 0
draw.point((i, j), (a, b, c))
imgForBW.save("inputScaleBW.jpg")
# -------------
# The image should be divided by 2 horizontally, by 4 vertically. Otherwise, the extra pixels will be removed.
img = Image.open('inputScaleBW.jpg')
size = w, h = img.size
if (w % 2) == 0:
pass
else:
w -= 1
hCut = h % 4
if hCut == 0:
pass
else:
h -= hCut
# -------------
data = img.load()
yStart, yEnd = 0, 4
xStart, xEnd = 0, 2
valueOfPixNow = []
b = w // 2 # I don`t remember.
a = b - 1 # The same thing.
i = 0
while (yEnd <= h) and (xEnd <= w):
# Getting data from a image.
valueOfPixNow = []
for y in range(yStart, yEnd):
for x in range(xStart, xEnd):
if not ((230 <= data[x, y][0] <= 255) and (230 <= data[x, y][1] <= 255) and (230 <= data[x, y][2] <= 255)):
valueOfPixNow.append(1)
else:
valueOfPixNow.append(0)
# -------------------
# Convert data from image.
normalBinaryReversed = [valueOfPixNow[0], valueOfPixNow[2], valueOfPixNow[4], valueOfPixNow[1], valueOfPixNow[3],
valueOfPixNow[5], valueOfPixNow[6], valueOfPixNow[7]]
normalBinary = list(reversed(normalBinaryReversed))
strBinary = ''.join(map(str, normalBinary))
strHex = hex(int(strBinary, 2))
twoLastNum = strHex[2:]
if len(twoLastNum) == 1:
twoLastNum = '0' + twoLastNum
hexStrBraille = '28' + twoLastNum
decimalBraille = int(hexStrBraille, 16)
answer = chr(decimalBraille)
# -------------------
if i == a:
a += b
print(answer)
else:
print(answer, end='')
i += 1
if xEnd < w:
xStart += 2
xEnd += 2
else:
xStart = 0
xEnd = 2
yStart += 4
yEnd += 4
+1
Функция ДобавитьКДатеМесяц(НачальнаяДата, Количество)
РезультатФункции = Дата("00010101");
ЗапросПериода = Новый Запрос;
ЗапросПериода.УстановитьПараметр("ДатаНачала", НачальнаяДата);
ЗапросПериода.УстановитьПараметр("Количество", Количество);
ЗапросПериода.Текст =
"ВЫБРАТЬ
| ДОБАВИТЬКДАТЕ(&ДатаНачала, МЕСЯЦ, &Количество) КАК ДатаСмещения
|";
РезультатЗапросПериода = ЗапросПериода.Выполнить().Выбрать();
Если РезультатЗапросПериода.Следующий() Тогда
РезультатФункции = РезультатЗапросПериода.ДатаСмещения;
КонецЕсли;
Возврат РезультатФункции;
КонецФункции
0
let res: boolean = result.lmr_customertype === typeOfSaleValue ? false : true;