По колено в коде — Говнокод.ру

JavaScript / Говнокод #18395

+143

1
2
3
4
5
6
7

var pattern = /^([a-z0-9_\.-])+@[a-z0-9-]+\.([a-z]{2,4}\.)?[a-z]{2,4}$/i;

if (pattern.test($(e).val())){
    result = true;
} else {
    result = false;
}

перепроверка же)

fLa, 24 Июня 2015

Комментарии (0)

SQL / Говнокод #18394

−163

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98

SET DELETED ON
store 0 to r_klot,r_kpot,r_vspot,r_klgv,r_kpgv,r_vspgv,r_klvod,r_kpvod,r_vspvod,r_klngv,r_kpngv,r_vspngv
store 0 to r_klkan,r_kpkan,r_sumkan,r_klmys,r_kpmys,r_summys,r_klmys1,r_kpmys1,r_summys1,r_vspmys,r_vspkan,r_vspmys1
STORE 0 TO r_klmys2,r_kpmys2,r_summys2,r_vspmys2
STORE 0 TO r_klmys3,r_kpmys3,r_summys3,r_vspmys3
STORE 0 TO r_klmys4,r_kpmys4,r_summys4,r_vspmys4
STORE 0 TO r_klmys5,r_kpmys5,r_summys5,r_vspmys5
SELECT 2
USE tarif INDEX tarif SHARED
SELECT 1
use kw SHARED
SET RELATION TO kodtar INTO tarif
go top
do while .not. eof()
if kw.ot=0
r_klot=r_klot+1
r_kpot=r_kpot+kp
r_vspot=r_vspot+vsp
endif
if kw.gv#0 .or. prgvod=0
r_klgv=r_klgv+1
r_kpgv=r_kpgv+kp
r_vspgv=r_vspgv+vsp
endif
if kw.vod#0 .or. prv=0
r_klvod=r_klvod+1
r_kpvod=r_kpvod+kp
r_vspvod=r_vspvod+vsp
endif
IF tarif.tgv#0
r_klngv=r_klngv+1
r_kpngv=r_kpngv+kp
r_vspngv=r_vspngv+vsp
ENDIF
IF kw.kan#0
r_klkan=r_klkan+1
r_kpkan=r_kpkan+kp
r_sumkan=r_sumkan+kan
r_vspkan=r_vspkan+vsp
ENDIF
IF kw.mys#0
r_klmys=r_klmys+1
r_kpmys=r_kpmys+kp
r_summys=r_summys+mys
r_vspmys=r_vspmys+vsp
ENDIF
*газ.плита 2-х комфорочная
IF kw.gpp=1
r_klmys1=r_klmys1+1
r_kpmys1=r_kpmys1+kp
r_summys1=r_summys1+gps
r_vspmys1=r_vspmys1+vsp
ENDIF
*газ.плита 4-х комфорочная
IF kw.gpp=2
r_klmys2=r_klmys2+1
r_kpmys2=r_kpmys2+kp
r_summys2=r_summys2+gps
r_vspmys2=r_vspmys2+vsp
ENDIF
*нагреватель проточный (обычная колонка)
IF kw.gkp=1
r_klmys3=r_klmys3+1
r_kpmys3=r_kpmys3+kp
r_summys3=r_summys3+gks
r_vspmys3=r_vspmys3+vsp
ENDIF
*нагреватель емкостной, газовый (титан)
IF kw.gkp=2
r_klmys4=r_klmys4+1
r_kpmys4=r_kpmys4+kp
r_summys4=r_summys4+gks
r_vspmys4=r_vspmys4+vsp
ENDIF
*водоотведение
IF kw.yb#0
r_klmys5=r_klmys5+1
r_kpmys5=r_kpmys5+kp
r_summys5=r_summys5+yb
r_vspmys5=r_vspmys5+vsp
ENDIF
skip
enddo
REPORT FORM spr1r TO PRINTER prompt PREVIEW 
---
set date british
  select 2
 use sprstr index sprstr SHARED 
SET ORDER TO TAG KST OF SPRSTR.CDX
SELE 3
 USE TARIF INDEX TARIF SHARED
  select 1
 use kw index kw1 SHARED 

 set relation to kst into b,kodtar INTO c
SET FILTER TO ls=r_ls  
sdr=DTOC(thisform.text1.Value)
REPORT FORM subsid PREVIEW

Вот такой пиздец мне надо сопровождать и дописывать. Судя по говённости кода, по уёбскому названию переменных, по дико ебланской манере писать код - аффтар из Дульфистов, только у них может получиться настолько уёбский код.

DelphiGovno, 24 Июня 2015

Комментарии (285)

PHP / Говнокод #18391

+143

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59

<?php

 $i1=217; $i2=12; $i3=200; $i4=1; //здесь надо вписать начало диапазона

 $a1=217; $a2=12; $a3=240; $a4=255; //здесь конец диапазона

 $o1=$i1; $o2=$i2; $o3=$i3; $o4=$i4;

 for( ; ; ){

  $host=gethostbyaddr($o1.'.'.$o2.'.'.$o3.'.'.$o4);
  if($host & $host != $o1.'.'.$o2.'.'.$o3.'.'.$o4)
   echo $o1.'.'.$o2.'.'.$o3.'.'.$o4.': '.$host."\r\n";

  $o4++;

  if($i3<$a3 or $i2<$a2 or $i1<$a1){
   if($o4>255){

    $o3++;

    if($i2<$a2 or $i1<$a1){
     if($o3>255){

      $o2++;

      if($i1<$a1){
       if($o2>255){

        $o1++;

        if($o1>$a1){
         break;
        }

        $o2=1;

       }
      }elseif($o2>$a2){
       break;
      }

      $o3=1;

     }
    }elseif($o3>$a3){
     break;
    }

    $o4=1;

   }
  }elseif($o4>$a4){
   break;
  }

 }

?>

Как найти все домены в определенном диапазоне ip адресов ?
https://toster.ru/q/138021

pi3141592653, 24 Июня 2015

Комментарии (0)

JavaScript / Говнокод #18390

+143

1
2
3
4
5
6
7
8

if(_dataArray['HAS_AT'] == 0)
{
            	_newDom.style.backgroundColor = '';
}
else
{
		_newDom.style.backgroundColor = ''
}

downmedic, 24 Июня 2015

Комментарии (0)

Куча / Говнокод #18389

+144

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15

<!--
    Правил верстку, затем решил не коммитить без необходимости
    <table border="1" style=" width: 900pt; margin-top: 20px; table-layout: fixed;">
        <col style=" width: 55pt"/>
        <col style=" width: 65pt"/>
        <col style=" width: 140pt"/>
        <col style=" width: 70pt"/>
        <col style=" width: 65pt"/>
        <col style=" width: 65pt"/>
        <col style=" width: 70pt"/>
        <col style=" width: 70pt"/>
        <col style=" width: 75pt"/>
        <col style=" width: 70pt"/>
        <col style=" width: 75pt"/>
 -->

И все-таки закоммитил.

downmedic, 24 Июня 2015

Комментарии (0)

JavaScript / Говнокод #18388

+141

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15

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

Комментарии (1)

JavaScript / Говнокод #18387

+142

1
2
3

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

Комментарии (13)

Куча / Говнокод #18386

+142

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76

### 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

Комментарии (11)

Говнокод: по колено в коде.

JavaScript / Говнокод #18397

JavaScript / Говнокод #18396

JavaScript / Говнокод #18395

SQL / Говнокод #18394

PHP / Говнокод #18391

JavaScript / Говнокод #18390

Куча / Говнокод #18389

JavaScript / Говнокод #18388

JavaScript / Говнокод #18387

Куча / Говнокод #18386