- 1
- 2
- 3
> 10,000 Domino Computer (4-bit Full Adder) Remade in Unreal Engine 4
https://www.youtube.com/watch?v=4KTfH1Gyn9g
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+1
> 10,000 Domino Computer (4-bit Full Adder) Remade in Unreal Engine 4
https://www.youtube.com/watch?v=4KTfH1Gyn9g
Надо запилить компилятор из Verilog в домино
+2
/* ../COBYLA2/cobyla2.f -- translated by f2c (version 20100827) */
...
/* Subroutine */ int cobyla_(integer *n, integer *m, doublereal *x,
doublereal *rhobeg, doublereal *rhoend, integer *iprint, integer *
maxfun, doublereal *w, integer *iact)
{
static integer ia, idx, mpp, icon, isim, isigb, idatm, iveta, isimi,
ivsig, iwork;
extern /* Subroutine */ int cobylb_(integer *, integer *, integer *,
doublereal *, doublereal *, doublereal *, integer *, integer *,
doublereal *, doublereal *, doublereal *, doublereal *,
doublereal *, doublereal *, doublereal *, doublereal *,
doublereal *, doublereal *, integer *);
/* Parameter adjustments */
--iact;
--w;
--x;
/* Function Body */
mpp = *m + 2;
icon = 1;
isim = icon + mpp;
isimi = isim + *n * *n + *n;
idatm = isimi + *n * *n;
ia = idatm + *n * mpp + mpp;
ivsig = ia + *m * *n + *n;
iveta = ivsig + *n;
isigb = iveta + *n;
idx = isigb + *n;
iwork = idx + *n;
cobylb_(n, m, &mpp, &x[1], rhobeg, rhoend, iprint, maxfun, &w[icon], &w[
isim], &w[isimi], &w[idatm], &w[ia], &w[ivsig], &w[iveta], &w[
isigb], &w[idx], &w[iwork], &iact[1]);
return 0;
} /* cobyla_ */
...
/* Subroutine */ int cobylb_(integer *n, integer *m, integer *mpp, doublereal
*x, doublereal *rhobeg, doublereal *rhoend, integer *iprint, integer *
maxfun, doublereal *con, doublereal *sim, doublereal *simi,
doublereal *datmat, doublereal *a, doublereal *vsig, doublereal *veta,
doublereal *sigbar, doublereal *dx, doublereal *w, integer *iact)
{
/* Format strings */
static char fmt_10[] = "(/3x,\002The initial value of RHO is\002,1pe13.6"
",2x,\002and PARMU is set to zero.\002)";
static char fmt_50[] = "(/3x,\002Return from subroutine COBYLA because t"
"he \002,\002MAXFUN limit has been reached.\002)";
static char fmt_70[] = "(/3x,\002NFVALS =\002,i5,3x,\002F =\002,1pe13.6,"
"4x,\002MAXCV =\002,1pe13.6/3x,\002X =\002,1pe13.6,1p4e15.6)";
static char fmt_80[] = "(1pe19.6,1p4e15.6)";
static char fmt_210[] = "(/3x,\002Return from subroutine COBYLA because"
" \002,\002rounding errors are becoming damaging.\002)";
static char fmt_410[] = "(/3x,\002Increase in PARMU to\002,1pe13.6)";
static char fmt_580[] = "(/3x,\002Reduction in RHO to\002,1pe13.6,\002 "
"and PARMU =\002,1pe13.6)";
static char fmt_590[] = "(/3x,\002Normal return from subroutine COBYL"
"A\002)";
/* System generated locals */
integer sim_dim1, sim_offset, simi_dim1, simi_offset, datmat_dim1,
datmat_offset, a_dim1, a_offset, i__1, i__2, i__3;
doublereal d__1, d__2;
/* Builtin functions */
integer s_wsfe(cilist *), do_fio(integer *, char *, ftnlen), e_wsfe(void);
double sqrt(doublereal);
/* Local variables */
static doublereal f;
static integer i__, j, k, l, mp, np, iz;
static doublereal phi, rho, sum, beta, cmin, cmax;
static integer ivmc;
static doublereal weta;
static integer ivmd;
static doublereal temp, wsig, gamma;
static integer iflag;
static doublereal alpha, delta, denom, tempa, barmu;
static integer nbest, ifull, iptem, jdrop;
static doublereal ratio, vmold, parmu, error, vmnew;
extern /* Subroutine */ int calcfc_(integer *, integer *, doublereal *,
doublereal *, doublereal *);
static integer ibrnch;
static doublereal edgmax, pareta, prerec, phimin, parsig;
static integer isdirn, nfvals, izdota;
static doublereal cvmaxm, dxsign, prerem;
static integer iptemp;
static doublereal resmax, cvmaxp;
static integer idxnew;
static doublereal resnew, trured;
extern /* Subroutine */ int trstlp_(integer *, integer *, doublereal *,
doublereal *, doublereal *, doublereal *, integer *, integer *,
doublereal *, doublereal *, doublereal *, doublereal *,
doublereal *, doublereal *);
/* Fortran I/O blocks */
static cilist io___22 = { 0, 6, 0, fmt_10, 0 };
static cilist io___29 = { 0, 6, 0, fmt_50, 0 };
static cilist io___33 = { 0, 6, 0, fmt_70, 0 };
static cilist io___34 = { 0, 6, 0, fmt_80, 0 };
static cilist io___39 = { 0, 6, 0, fmt_210, 0 };
Найдено в зависимостях «SlangTNG». Библиотека «COBYLA», автоматически переведённая с «Фортрана».
/* This subroutine minimizes an objective function F(X) subject to M */
/* inequality constraints on X, where X is a vector of variables that has */
/* N components. The algorithm employs linear approximations to the */
/* objective and constraint functions, the approximations being formed by */
/* linear interpolation at N+1 points in the space of the variables. */
https://tng.tuxfamily.org/index.php?title=Main_Page
−2
Пидарашки, приведите реальный пример говнокода.
−3
Пидарашке, хуле вам нада?
+1
setTimeout(function(){
document.getElementById('message').innerHTML = 'Это окно браузера закончило свою работу и может быть закрыто.' +
'<br>' +
'<button onclick="window.close()">Закрыть окно</button>';
},3000);
function objectValues(obj) {
var res = [];
for (var i = 0; i < obj.length; i++) {
if (obj.hasOwnProperty(i)) {
res.push(obj[i]);
}
}
return res;
}
sendMessage = function () {
var args = objectValues(arguments),
func = args.splice(1,1);
if (typeof window.postMessage !== 'undefined') {
window.opener.postMessage({
mine: 'uLogin',
func: func,
args: args
}, '*');
} else {
sendMessage = function () {
window.opener[func].apply(null, args);
};
}
};
if(/fill.php/.test("'ffdfdssdffsdfewfewfewfwf','redirect','https://dfssfd/login.php'")) {
try{
if(typeof window.opener.fill !== 'undefined') {
window.opener.fill('869becd1b998ec0add011915c7f4022e','redirect','https://asdasd/login.php');
} else {
sendMessage('869becd1b998ec0add011915c7f4022e','redirect','https://biglike.org/login.php');
}
} catch(e){
sendMessage('869becd1b998ec0add011915c7f4022e','redirect','https://asdas/login.php');
}
} else {
sendMessage('869becd1b998ec0add011915c7f4022e','redirect','https://sfdsfd/login.php');
}
window.close();
ulogin которым пользуются миллионы
−2
В России почти 10 лет легально работает сервис по псевдоремонту компьютеров. Его главные жертвы — пенсионеры
За переустановку Windows «мастера» сдирают до 200 тысяч рублей
https://dailystorm.ru/obschestvo/v-rossii-pochti-10-let-legalno-rabotaet-servis-po-psevdoremontu-kompyuterov-ego-glavnye-zhertvy-pensionery?utm_source=lentach&utm_medium=ctr&utm_campaign=lentach
0
#!/bin/sh
rm -rf /home/project/*
FOLDER=/home/project
cp ./*.php $FOLDER
cp -r css img js $FOLDER
FILES=$(find css js templates -type f -regex '.*.\(js\|css\|twig\)')
for f in $FILES; do
echo "$f"|grep twig 1>/dev/null
r=$?
if [ "$r" -eq 0 ]; then
minify --type html "$f" --output $FOLDER
else
minify "$f" --output $FOLDER
fi
done
лучший код, пользуйтесь
проверено ShellCheck!
0
FILES=`find css js templates -type f -regex '.*.\(js\|css\|twig\)'`
for f in $FILES; do
str=`echo -n $f|rev`
i=`expr index $str /`
ret=`echo -n ${str:$i}|rev`
echo $f|grep twig &>/dev/null
r=$?
echo $f :
if [ "$r" -eq 0 ]; then
minify --type html $f --output $FOLDER/$ret
else
minify $f --output $FOLDER/$ret
fi
done
сука блядь глючит! костыли ебаные
0
procedure TForm1.Button1Click(Sender: TObject);
var
RequestBody,SResponseBody: TStringStream;
ResponseBody: string;
begin
try
RequestBody := TStringStream.Create('{"login":"user","password":"pass999"}') ;
httpconn.HandleRedirects:=TRUE;
IdSSLIOHandlerSocketOpenSSL1.SSLOptions.Method:=sslvSSLv23;
//httpconn.Host:='api.owencloud.ru';
httpconn.Request.Accept:='application/xml';
httpconn.Request.ContentLength:=68;
httpconn.Request.ContentType:='application/x-www-form-urlencoded';
ResponseBody:=httpconn.Post('https://api.owencloud.ru/v1/auth/open', RequestBody);
SResponseBody:=TStringStream.Create(httpconn.Post('https://api.owencloud.ru/v1/auth/open', RequestBody));
memo1.Text:=utf8toansi(ResponseBody);
xmldocument1.LoadFromStream(SResponseBody);
finally
RequestBody.Free;
SResponseBody.Free;
end;
end;
Передача в мемо волшебна, а в xml так вообще виртуозна
+1
h1{color: #b60000; font-size: <?php if( $dop_for_evm==1 ){echo '3.5vw;';} else {echo '30px;';}?> line-height: 1.1;padding-right: 5%; padding-left: 5%; text-align: center;}
h2{font-size:<?php if( $dop_for_evm==1 ){echo '2.8vw;';} else {echo '30px;';}?>padding-right: 5%; padding-left: 5%; text-align: center;}
.h2{font-size: <?php if( $dop_for_evm==1 ){echo '2.2vw;';} else {echo '28px;';}?>padding-right: 5%; padding-left: 5%; text-align: center;}
h3{font-size: <?php if( $dop_for_evm==1 ){echo '2.6vw;';} else {echo '29px;';}?>padding-right: 5%; padding-left: 5%; text-align: center;}
h4{font-size: <?php if( $dop_for_evm==1 ){echo '2.6vw;';} else {echo '29px;';}?>padding-right: 5%; padding-left: 5%; text-align: center;}
h5{font-size: <?php if( $dop_for_evm==1 ){echo '2.6vw;';} else {echo '29px;';}?>padding-right: 5%; padding-left: 5%; text-align: center;}
h6{font-size: <?php if( $dop_for_evm==1 ){echo '2.6vw;';} else {echo '29px;';}?>padding-right: 5%; padding-left: 5%; text-align: center;}