- 1
- 2
- 3
$S=preg_replace('/(\')|(\")|(\,)|(\()|(\))|(\.)|(\‹)|(\:)|(\;)|(\$)|(\#)|(\/)|(\{)|(\})|(\*)|(\ )|(\|)|(\>)|(\<)|(\=)|(\-)|(\[)|(\])|(\!)|(\+)|(\☺)|(\☻)'
.'|(\♥)|(\♦)...................../', '', $S);
$S=trim($S);
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+173
$S=preg_replace('/(\')|(\")|(\,)|(\()|(\))|(\.)|(\‹)|(\:)|(\;)|(\$)|(\#)|(\/)|(\{)|(\})|(\*)|(\ )|(\|)|(\>)|(\<)|(\=)|(\-)|(\[)|(\])|(\!)|(\+)|(\☺)|(\☻)'
.'|(\♥)|(\♦)...................../', '', $S);
$S=trim($S);
Регулярные выражения! Супер!
+170
<?php
// Генерируем картинку для капчи, цифры и латынские литеры
// PHP код:
function rnd_str($str_size=1){
$str='';
$chars= array(
'a', 'b', 'c', 'd', 'e',
'f', 'g', 'h', 'i', 'j',
'k', 'l', 'm', 'n', 'o',
'p', 'q', 'r', 's', 't',
'u', 'v', 'w', 'x', 'y',
'z',
'A', 'B', 'C', 'D', 'E',
'F', 'G', 'H', 'I', 'J',
'K', 'L', 'M', 'N', 'O',
'P', 'Q', 'R', 'S', 'T',
'U', 'V', 'W', 'X', 'Y',
'Z'
);
for( $i=0; $i<$str_size; $i++ ){
$num= true;
if( rand(0,1) == 1 ) $num= false;
if($num) $str.= rand(0,9);
else $str.= $chars[rand(0,sizeof($chars)-1)];
}
return $str;
}
?>
<?php
// пример
// PHP код:
echo rnd_str();
?>
...Внезапно наткнулось...
> Важная информация
> 27.03.2010 - Ура! Форуму OnlyWM - 1 месяц
+144
function is_ints($s)
{
$s:=$s[0]+0;
if(gettype($s)=="integer"){return true}else{return false}
}
Из моей молодости.. Проверка является ли строка числом.. Даже стыдно :)
+119
/**
* Parses inlined match flags and set them appropriately.
*/
private void addFlag() {
int ch = peek();
for (;;) {
switch (ch) {
case 'i':
flags |= CASE_INSENSITIVE;
break;
case 'm':
flags |= MULTILINE;
break;
case 's':
flags |= DOTALL;
break;
case 'd':
flags |= UNIX_LINES;
break;
case 'u':
flags |= UNICODE_CASE;
break;
case 'c':
flags |= CANON_EQ;
break;
case 'x':
flags |= COMMENTS;
break;
case '-': // subFlag then fall through
ch = next();
subFlag();
default:
return;
}
ch = next();
}
}
/**
* Parses the second part of inlined match flags and turns off
* flags appropriately.
*/
private void subFlag() {
int ch = peek();
for (;;) {
switch (ch) {
case 'i':
flags &= ~CASE_INSENSITIVE;
break;
case 'm':
flags &= ~MULTILINE;
break;
case 's':
flags &= ~DOTALL;
break;
case 'd':
flags &= ~UNIX_LINES;
break;
case 'u':
flags &= ~UNICODE_CASE;
break;
case 'c':
flags &= ~CANON_EQ;
break;
case 'x':
flags &= ~COMMENTS;
break;
default:
return;
}
ch = next();
}
}
очередной кусок творчества Chen-Lieh Huang, Alan Liu
/* @(#)Pattern.java 1.113 07/05/07
* Copyright 2007 Sun Microsystems, Inc. All rights reserved.
* SUN PROPRIETARY/CONFIDENTIAL. Use is subject to license terms.
*/
продолжение #3976 #3975 #3940 #3998 #3999 #4007
+131
/***************************************/
Между прочим, сегодня у нас взят плановый гет 2000 пользователей!
С чем и поздравляем ГК.РУ!
/****************************************/
+87
/**
* The Time class is a faster replacement for the java.util.Calendar and
* java.util.GregorianCalendar classes. An instance of the Time class represents
* a moment in time, specified with second precision. It is modelled after
* struct tm, and in fact, uses struct tm to implement most of the
* functionality.
*/
public class Time {
...
/**
* Year. TBD. Is this years since 1900 like in struct tm?
*/
public int year;
...
}
Android 1.5. TBD в публичном API официального SDK - это пять. Ну мы ещё подумаем, как нам нравится, а вы пока просто посмотрите в дебаге! Гы.
−86
10 GOSUB 300
30 INPUT "Долгота (град)";B5,L5: INPUT "Часовая зона (час)";H
50 L5=L5/360: Z0=H/24
60 GOSUB 1170: T=(J-2451545)+F
70 TT=T/36525+1: ' TT = столетия, начиная с 1900.0
90 GOSUB 410: T=T+Z0
120 GOSUB 910: A(1)=A5: D(1)=D5 ' Получаем положение солнца
130 T=T+1
140 GOSUB 910: A(2)=A5: D(2)=D5
150 IF A(2)<A(1) THEN A(2)=A(2)+P2
160 Z1=DR*90.833: ' Вычисление зенита
170 S=SIN(B5*DR): C=COS(B5*DR)
180 Z=COS(Z1): M8=0: W8=0: PRINT
190 A0=A(1): D0=D(1)
200 DA=A(2)-A(1): DD=D(2)-D(1)
210 FOR C0=0 TO 23
220 P=(C0+1)/24
230 A2=A(1)+P*DA: D2=D(1)+P*DD
240 GOSUB 490
250 A0=A2: D0=D2: V0=V2
260 NEXT
270 GOSUB 820: ' Вывод информации
280 END
300 DIM A(2),D(2) ' Константы
320 P1=3.14159265: P2=2*P1: DR=P1/180: K1=15*DR*1.0027379: S$="Заход солнца в "
330 R$="Восход солнца в ": M1$="В этот день солнце не восходит"
370 M2$="В этот день солнце не заходит": M3$="Солнце заходит весь день"
390 M4$="Солнце восходит весь день"
400 RETURN
410 T0=T/36525 ' Получение часового пояса
430 S=24110.5+8640184.813*T0
440 S=S+86636.6*Z0+86400*L5
450 S=S/86400: S=S-INT(S)
460 T0=S*360*DR
470 RETURN
490 L0=T0+C0*K1: L2=L0+K1 ' Просматриваем возможные события на полученный час
510 H0=L0-A0: H2=L2-A2
520 H1=(H2+H0)/2: ' Часовой угол,
530 D1=(D2+D0)/2: ' наклон в получасе
550 IF C0>0 THEN 570
560 V0=S*SIN(D0)+C*COS(D0)*COS(H0)-Z
570 V2=S*SIN(D2)+C*COS(D2)*COS(H2)-Z
580 IF SGN(V0)=SGN(V2) THEN 800
590 V1=S*SIN(D1)+C*COS(D1)*COS(H1)-Z
600 A=2*V2-4*V1+2*V0: B=4*V1-3*V0-V2
610 D=B*B-4*A*V0: IF D<0 THEN 800
620 D=SQR(D)
630 IF V0<0 AND V2>0 THEN PRINT R$;
640 IF V0<0 AND V2>0 THEN M8=1
650 IF V0>0 AND V2<0 THEN PRINT S$;
660 IF V0>0 AND V2<0 THEN W8=1
670 E=(-B+D)/(2*A)
680 IF E>1 OR E<0 THEN E=(-B-D)/(2*A)
690 T3=C0+E+1/120: ' Округление
700 H3=INT(T3): M3=INT((T3-H3)*60)
710 PRINT USING "##:##";H3;M3;
720 H7=H0+E*(H2-H0)
730 N7=-COS(D1)*SIN(H7)
740 D7=C*SIN(D1)-S*COS(D1)*COS(H7)
750 AZ=ATN(N7/D7)/DR
760 IF D7<0 THEN AZ=AZ+180
770 IF AZ<0 THEN AZ=AZ+360
780 IF AZ>360 THEN AZ=AZ-360
790 PRINT USING ", азимут ###.#";AZ
800 RETURN
820 IF M8=0 AND W8=0 THEN 870 ' Процедура вывода информации
840 IF M8=0 THEN PRINT M1$
850 IF W8=0 THEN PRINT M2$
860 GOTO 890
870 IF V2<0 THEN PRINT M3$
880 IF V2>0 THEN PRINT M4$
890 RETURN
910 L=.779072+.00273790931*T ' Фундаментальные константы (Van Flandern & Pulkkinen, 1979)
950 G=.993126+.0027377785*T
960 L=L-INT(L): G=G-INT(G): L=L*P2: G=G*P2
980 V=.39785*SIN(L): V=V-.01000*SIN(L-G)
1000 V=V+.00333*SIN(L+G): V=V-.00021*TT*SIN(L)
1020 U=1-.03349*COS(G): U=U-.00014*COS(2*L)
1040 U=U+.00008*COS(L): W=-.00010-.04129*SIN(2*L)
1060 W=W+.03211*SIN(G): W=W+.00104*SIN(2*L-G)
1080 W=W-.00035*SIN(2*L+G): W=W-.00008*TT*SIN(G)
1120 S=W/SQR(U-V*V) ' Вычисление солнечных координат
1130 A5=L+ATN(S/SQR(1-S*S))
1140 S=V/SQR(U):D5=ATN(S/SQR(1-S*S))
1150 R5=1.00021*SQR(U)
1160 RETURN
1170 INPUT "Год, Месяц, День";Y,M,D ' Календарь --> JD
1190 G=1: IF Y<1583 THEN G=0
1200 D1=INT(D): F=D-D1-.5
1210 J=-INT(7*(INT((M+9)/12)+Y)/4)
1220 IF G=0 THEN 1260
1230 S=SGN(M-9): A=ABS(M-9)
1240 J3=INT(Y+S*INT(A/7))
1250 J3=-INT((INT(J3/100)+1)*3/4)
1260 J=J+INT(275*M/9)+D1+G*J3
1270 J=J+1721027+2*G+367*Y
1280 IF F>=0 THEN 1300
1290 F=F+1: J=J-1
1300 RETURN
Вот такой вот реликт. Вы всё ещё пользуетесь GOTO? Тогда мы идём к вам.
Программа вычисляет время восхода и захода солнца по дате (с точностью до минуты) в пределах нескольких текущих столетий. Производит корректировку, если географическая точка находится в арктичиском или антарктическом регионе, где заход или восход солнца на текущую дату может не состояться. Вводимые данные: положительная северная широта и отрицательная западная долгота. Часовой пояс указывается относительно Гринвича (например, 5 для EST и 4 для EDT). Алгоритм обсуждался в "Sky & Telescope" за август 1994, страница 84.
P. S. VisualBasic такой Visual...
+122
SqlCommand SomeCommand = new SqlCommand(SelectString, ConnectionString);
int result;
if(SomeCommand.ExecuteScalar() == null)
{
result = 0;
}
else
{
result = (int)SomeCommand.ExecuteScalar();
}
Why bad ?! The method execute twice ...
+109
if(!mysql_select_db($db_name,$data)){
print "<BR>";
echo mysql_error();
die();
}
Нашел в одном из движков онлайн игры
+144
#include <iostream>
#include <stdio.h>
using namespace std;
#define chislo int
#define osnovnoe main
#define nachalo {
#define konec }
#define chitaj scanf
#define pishi printf
#define CS ;
#define verni return
#define noleg 0
#define strochechka string
#define naruzhu <<
#define vnutr >>
#define vozmi cin
#define daj cout
#define esli if
#define PISCS endl
#define eshe &&
#define cicle for
#define poka while
#define simvol char
#define vozmis getchar()
#define shlak EOF
#define SPS '\n'
#define vozmozhno ||
#define eshe &&
#define inache else
chislo aasda[1000] CS
chislo chistka()
nachalo
chislo i CS
cicle(i=noleg CS i<1000 CS i++)
aasda[i]=noleg CS
verni aasda[noleg] CS
konec
chislo mnozh(chislo k)
nachalo
chislo i CS
cicle(i=noleg+2 CS i<k CS i++)
esli(k%i==0) nachalo aasda[i]++ CS verni mnozh(k/i)+1 CS konec
aasda[k]++ CS
verni 1 CS
konec
chislo krutilka(chislo k)
nachalo
esli(k==1) verni 1 CS
verni k*krutilka(k-1) CS
konec
chislo osnovnoe()
nachalo
chislo colm, ppm=1, k, i CS
vozmi vnutr k CS
chistka() CS
colm=mnozh(k) CS
cicle(i=noleg CS i<=1000 CS i++)
esli(aasda[i]>0) ppm*=krutilka(aasda[i]) CS
daj naruzhu krutilka(colm)/ppm naruzhu PISCS CS
verni noleg CS
konec
Так мы писали задачи на Турнире Архимеда=)