Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+141
if(!empty($_GET['DEP'])){
setVar('DEP_ID',$_GET['DEP']);
}else{
setVar('DEP_ID',null);
}
if(!empty($_GET['P_KIND'])){
setVar('P_KIND',$_GET['P_KIND']);
}else{
setVar('P_KIND',null);
}
if($_GET['IS_VMP']==0){
setVar('IS_VMP',null);
}else{
setVar('IS_VMP',$_GET['IS_VMP']);
}Одно и то же дерьмо аж в двух файлах.
downmedic,
24 Июня 2015
+142
var _0xdb2a=["","\x6A\x6F\x69\x6E","\x72\x65\x76\x65\x72\x73\x65","\x73\x70\x6C\x69\x74"];
function getCoo2(_0x733fx2,_0x733fx3){
return _0x733fx2[_0xdb2a[3]](_0xdb2a[0])[_0xdb2a[2]]()[_0xdb2a[1]](_0xdb2a[0])+_0x733fx3}Чтобы жизнь маслом ботоводам не казалась. Вот вам загадочка - что здесь происходит?
kyzi007,
23 Июня 2015
+142
### TASK 1
R <- 1.987
toSi <- function (value, molar_mass) {
return (value * 4190 / molar_mass)
}
delta <- function (experiment, theory) {
return((experiment - theory)/experiment*100)
}
einsteinFormula <- function (t, A, B, D) {
return(A + B * t + D * t^2)
}
bennewitzRossner <- function (cv, Cnu, n, m, Cd, q) {
coeff1 = (3*n-6-m-q)/q
return(cv + R + 1/2 * m * R + Cnu + coeff1*Cd)
}
heatCapacity <- function(n, links, t, Anu, Bnu, Dnu, Ad, Bd, Dd, m, M) {
c_nu <- einsteinFormula(t, Anu, Bnu, Dnu)
#print(c_nu)
c_d <- einsteinFormula(t, Ad, Bd, Dd)
#print(c_d)
C_rot <- sum(c_nu*links)
C_bend <- sum(c_d*links)
q <- sum(links)
C_kalmol <- bennewitzRossner(3*R, C_rot, n, m, C_bend, q)
C_br <- toSi(C_kalmol, M)
return(data.frame(C_kalmol, C_br, C_rot, C_bend))
}
task11 <- function () {
t_C6H14 <- c(400, 600, 800)
n_C6H14 <- 20
m_C6H14 <- 5
M_C6H14 <- 86.2
Cp_C6H14_kalmol <- (3 * n_C6H14 - 2) * R
#print(Cp_C6H14_kalmol)
Cp_C6H14_mkt <- toSi(Cp_C6H14_kalmol, M_C6H14)
# print(Cp_C6H14_mkt)
Cp_C6H14_exp <- c(1890, 2611, 3159)
deltaC <- delta(Cp_C6H14_exp, Cp_C6H14_mkt)
cp_C6H14_1 <- heatCapacity(
20,
c(5, 14), #Links number
400, #Temperatures
c(-1.09, 0.229), c(6*10^-3, -1.224*10^-3), c(-4.495*10^-6, 1.658*10^-6), #A, B, D rotational
c(0.73, -0.928), c(3.414*10^-3, 3.9*10^-3), c(-2.577*10^-6, -1.324*10^-6), #A, B, D bending
m_C6H14, 86.2
)
cp_C6H14_2 <- heatCapacity(
20,
c(5, 14), #Links number
600, #Temperatures
c(-1.09, 0.229), c(6*10^-3, -1.224*10^-3), c(-4.495*10^-6, 1.658*10^-6), #A, B, D rotational
c(0.73, -0.928), c(3.414*10^-3, 3.9*10^-3), c(-2.577*10^-6, -1.324*10^-6), #A, B, D bending
m_C6H14, 86.2
)
cp_C6H14_3 <- heatCapacity(
20,
c(5, 14), #Links number
800, #Temperatures
c(-1.09, 0.229), c(6*10^-3, -1.224*10^-3), c(-4.495*10^-6, 1.658*10^-6), #A, B, D rotational
c(0.73, -0.928), c(3.414*10^-3, 3.9*10^-3), c(-2.577*10^-6, -1.324*10^-6), #A, B, D bending
m_C6H14, 86.2
)
cp <- c(cp_C6H14_1$C_br, cp_C6H14_2$C_br, cp_C6H14_3$C_br)
print(c(cp_C6H14_1$C_rot, cp_C6H14_2$C_rot, cp_C6H14_3$C_rot))
print(c(cp_C6H14_1$C_bend, cp_C6H14_2$C_bend, cp_C6H14_3$C_bend))
deltaC_br <- delta(Cp_C6H14_exp, cp)
#r <- data.frame(t, Cp_C6H14_mkt, Cp_C6H14_exp, cp, deltaC, deltaC_br)
return(data.frame(t_C6H14, Cp_C6H14_mkt, Cp_C6H14_exp, deltaC, cp, deltaC_br))
}Мой грязный говнокод на R. Решал дз в инст, рассчет теплоемкости дряни по методу -Д-ж-и-г-у-р-д-ы-и-Б-а-р-р-и-А-л-е-б-а-с-о-в-а- Бенневица-Росснера. Шлю в кучу, потому что нет раздела для эрочки :( Особая ржака начинается со строчки №46.
k1r1ll0v,
23 Июня 2015
+143
if(count($events->getItems()))
{
$c = 0;
foreach($events->getItems() as $event)
{
if($c == 0) { echo "<div class=\"text-block\">"; }
$eventStartDate = getStartTimeEvent($event);
echo "<div class=\"eventContainer\">";
echo "<div class=\"eventTime\">".$eventStartDate->format('H:i')."</div>";
echo "<div class=\"eventPlace\">".$event->location."</div>";
echo "<div class=\"eventName\">".$event->getSummary()."</div>";
echo "</div>";
echo "<hr class=\"dottedHr\">";
$c++;
if($c == 12) { echo "</div>"; $c = 0;}
}
}
else echo "<div class=\"NonEvent\">Нет запланированных мероприятий на сегодня</div>";
kraldraav,
23 Июня 2015
+69
debug("Continue current `round={}`", next);
/** 3-мя строчками ниже */
debug("Next round `round={}`", current);
stasmarkin,
23 Июня 2015
+141
package eapi
// #include <eggdrop/mod/module.h>
// #include <eggdrop/main.h>
// #include <eggdrop/proto.h>
import (
"C"
"errors"
)
const (
DP_STDOUT = 0x7FF1
DP_LOG = 0x7FF2
DP_SERVER = 0x7FF3
DP_HELP = 0x7FF4
DP_STDERR = 0x7FF5
DP_MODE = 0x7FF6
DP_MODE_NEXT = 0x7FF7
DP_SERVER_NEXT = 0x7FF8
DP_HELP_NEXT = 0x7FF9
)
var (
binds []struct{
flags,match string
list *C.tcl_bind_list_t
}
bind_num int = 0
)
//...
func Bind(event,flags,match string, proc func(cd *C.ClientData, irp *C.Tcl_Interp, argc C.int, argv *[]C.char)) int,error{
tl := C.find_bind_table(C.CString(event))
if tl == nil{
return -1,errors.New("No such event table : "+ event)
}
func_name := bname(bind_num)
bind_num++
var cmd []C.tcl_cmds = {
{func_name,proc},
{nil,nil}
}
C.tcl_add_commands(cmd)
C.bind_bind_entry(tl, C.CString(flags), C.CString(match), C.CString(func_name))
append(binds,{flags,match,tl})
return bind_num-1,nil
}
func Unbind(int num){
if binds[num] == nil{
return
}
C.unbind_bind_entry(binds[num].list, C.CString(binds[num].flags), C.CString(binds[num].match), C.CString(bname(num)))
}обертка на Go для Eggdrop API
unn4m3d,
23 Июня 2015
−125
print "value: %s" % str(e)А вдруг tuple?
3_14dar,
23 Июня 2015
+142
foreach($_REQUEST as $key => &$val) {
$val = htmlspecialchars(stripslashes(trim($val)));
}
$officeId = intval($_REQUEST["office-id"]);
$date = $_REQUEST["date"];
// [...]Эпик вин, однозначно
creamy,
22 Июня 2015
+142
float SGammaUIPanel::OnGetGamma() const
{
float DisplayGamma = GEngine->DisplayGamma;
return GEngine ? DisplayGamma : 2.2f;
}Этот и другие прелести из UE в статье https://www.unrealengine.com/blog/how-pvs-studio-team-improved-unreal-engines-code
makc3d,
22 Июня 2015
+124
http://m.habrahabr.ru/post/249637/
LispGovno,
21 Июня 2015
Follow us!