- 1
- 2
- 3
- 4
- 5
- 6
<table width="500" height="10">
<td>
<br>
</tr>
</table>-
Куча / Говнокод #3375
+132
Дипломная работа... no comments
Sinless,
02 Июня 2010
Комментарии (48) -
SQL / Говнокод #3374
−163
- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
$SQL = "SELECT rq.*, c.login, r.name as raceName, IF(rq.status = 1, '<span style=\'color:green\'>".$this->kernel->msg->get('raceRequest.status.done')."</span>', IF(rq.status = -1, '<span style=\'color:red\'>".$this->kernel->msg->get('raceRequest.status.cancel')."</span>', '".$this->kernel->msg->get('raceRequest.status.request')."')) as statusMsg, IF(rq.currentLevel = 1, '<span style=\'color:#eeb300\'>".$this->kernel->msg->get('raceRequest.level.gold')."</span>', IF(rq.currentLevel = 2, '<span style=\'color:#c6cccd\'>".$this->kernel->msg->get('raceRequest.level.silver')."</span>', '<span style=\'color:#d58b72\'>".$this->kernel->msg->get('raceRequest.level.bronzet')."</span>')) as currentLevelMsg, IF(rq.requestLevel = 1, '<span style=\'color:#eeb300\'>".$this->kernel->msg->get('raceRequest.level.gold')."</span>', IF(rq.requestLevel = 2, '<span style=\'color:#c6cccd\'>".$this->kernel->msg->get('raceRequest.level.silver')."</span>', '<span style=\'color:#d58b72\'>".$this->kernel->msg->get('raceRequest.level.bronzet')."</span>')) as requestLevelMsg FROM raceRequests rq LEFT JOIN customers c ON c.ID = rq.customerID LEFT JOIN races r ON r.ID = rq.raceID WHERE rq.ID = '%ID'";Формирование HTML с помощью SQL
blaster999,
01 Июня 2010
Комментарии (32) -
Pascal / Говнокод #3373
+100
- 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
procedure WriteCharXY(_bx,by:integer; ch:char; tcol:word); var buf:array[1..18,1..12] of word; XOfs:longint; x,y,px,py:integer; begin XOfs:=GetCharOffset(ch); if xofs=0 then fillchar(buf,sizeof(buf),200) else fromXMS(XOfs,addr(buf),432); for y:=1 to 18 do for x:=1 to 12 do begin if buf[y,x]=0 then begin px:=_bx+x; py:=by+y; asm mov bx,px; add bx,actviewport.x1; cmp bx,fillviewport.x1; jl @end; cmp bx,fillviewport.x2; jg @end; mov cx,currentmode.scanline; cmp bx,cx; jnb @end; mov ax,py; add ax,actviewport.y1; cmp ax,fillviewport.y1; jl @end; cmp ax,fillviewport.y2; jg @end; add ax,pageadd; mul cx; add bx,bx; add ax,bx; adc dx,0; mov si,ax; cmp dx,lastbank; je @next; push dx; call nearsetbank2; @next: mov es,[currentmode.writeptr]; mov ax,tcol; {cmp writemode,0; jne @doxor;} mov es:[si],ax; {jmp @end; @doxor: xor es:[si],ax;} @end: end; end; end; end; procedure WriteStringXY(x,y,maxx:integer; s:string; col:word); var tx,ty:integer; i:word; begin tx:=x; ty:=y; for i:=0 to length(s) do begin writecharXY(tx,ty,s[i],col); inc(tx,GetCharWidth(s[i])); if (tx>=maxx) and (s[i]=' ') then begin inc(ty,18); tx:=x; end; end; end; procedure Write5Strings(x,y,maxx:integer; col:word; s1,s2,s3,s4,s5:string; letterdelay:byte); var tx,ty:integer; t,i:word; st:array[1..5] of string; begin tx:=x; ty:=y; st[1]:=s1; st[2]:=s2; st[3]:=s3; st[4]:=s4; st[5]:=s5; for t:=1 to 5 do begin if length(st[t])=0 then exit; for i:=1 to length(st[t]) do begin writecharXY(tx,ty,st[t][i],col); if letterdelay>0 then pdel(letterdelay); inc(tx,GetCharWidth(st[t][i])); if (tx>=maxx-100) and (st[t][i]=' ') then begin inc(ty,18); tx:=x; end; end; end; end;Молодость.
runewalsh,
01 Июня 2010
Комментарии (21) -
Си / Говнокод #3372
+144
- 1
- 2
- 3
bool somevar; //... ... ... if(somevar==true)doSomething();И это в книге, по которой учат детей.
frp,
01 Июня 2010
Комментарии (11) -
Pascal / Говнокод #3371
+101
- 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
function IPtoDWORD(const s: string):DWORD; var L: TStringList; b: packed array [0..3] of byte; i: Integer; begin Result := 0; L := TStringList.Create; try L.Delimiter := '.'; L.DelimitedText := s; for i := 0 to 3 do b[3 - i] := StrToInt(L[i]); Result := pdword(@b[0])^; finally L.Free end; end; ... if (NewIP >= IPtoDWORD('192.168.0.0')) and (NewIP <= IPtoDWORD('192.168.0.255')) then //Пускаем else ServerSocket.Socket.Connections[i - 1].SendText('запрет'); //Запрет ServerSocket.Socket.Connections[i - 1].Close; //Закрываем канал if (NewIP >= IPtoDWORD('193.168.0.0')) and (NewIP <= IPtoDWORD('193.168.0.255')) then //Пускаем if (NewIP >= IPtoDWORD('194.168.0.0')) and (NewIP <= IPtoDWORD('194.168.0.255')) then //Пускаем if (NewIP >= IPtoDWORD('195.168.0.0')) and (NewIP <= IPtoDWORD('195.168.0.255')) then //Пускаемличинка быдлокодера в схватке с IPv4
примечательно искрометное форматирование кода
bugmenot,
01 Июня 2010
Комментарии (18) -
PHP / Говнокод #3370
+159
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
public static function getSizeformat($iNumber){ $value = "-"; if($iNumber){ $iNumber = $iNumber/100000; $value = number_format($iNumber, 2, '.', ''); } return $value; }Кусочек который пришел по наследству, судя по подписям в таблице на фронтэнде в итоге мы должны получить размер файлов в мегабайтах, но как то не получается... :)
psych,
01 Июня 2010
Комментарии (23) -
C# / Говнокод #3369
+121
- 1
- 2
lbxLibrary.Columns[2].ColumnWidth = lbxLibrary.Width - (2 + 15 + 4 + 15 + 4 + 15 + 4 + 16 + 2 + 2); lbxSamples.Columns[2].ColumnWidth = lbxLibrary.Width - (2 + 15 + 4 + 15 + 4 + 15 + 4 + 16 + 2 + 2);Американское спагетти.
Подобное содержится в методе InitializeComponent() более чем в 20-ти формах! Кто не помнит, InitializeComponent() формируется дизайнером автоматически, и крайне нежелательно вносить в него изменения. Везде разные объекты, и во многих местах отличны числа.
Dmitriy,
01 Июня 2010
Комментарии (6) -
Си / Говнокод #3368
+144
- 1
- 2
- 3
- 4
- 5
if (nidx == -1) { networkIdx = -1; } else { networkIdx = nidx; }
raorn,
01 Июня 2010
Комментарии (15) -
SQL / Говнокод #3367
−861
- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
errnum := 0; if (bitand(err, 1) != 0) then errnum := -20027; end if; if (bitand(err, 2) != 0) then if (errnum = 0) then errnum := -20028; else errnum := -20029; end if; end if;Это PL/SQL
Это мой первый вариант, я заменил его потом на этот, в одну строку:
errnum := -20026 - (bitand(err, 1) + bitand(err, 2));
Oleg_quadro_,
01 Июня 2010
Комментарии (6) -
JavaScript / Говнокод #3366
+159
- 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
function HighlightSelectedKaskoPriceCell(currentCell, toggle, useParent) { if(currentCell) { if(toggle) { if(!useParent) $(currentCell).css("background-color", "rgb(247, 144, 52)"); else $(currentCell).parent().css("background-color", "rgb(247, 144, 52)"); } else { if(!useParent) $(currentCell).css("background-color", "#FEF3EB"); else $(currentCell).parent().css("background-color", "#FEF3EB"); } } } function GetSelectedKaskoPriceCellHighlighting(currentCell, useParent) { if(!useParent) return ($(currentCell).css("background-color") == "rgb(247, 144, 52)"); else return ($(currentCell).parent().css("background-color") == "rgb(247, 144, 52)"); }Способ выделить ячейку таблицы и выяснить, была ли она выделена.
blaster999,
01 Июня 2010
Комментарии (10)
Follow us!