- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
-(bool)hasInternetConnection
{
return true;
}
-(void)checkInternetConnection
{
NSLog(@"checking connection");
mTmp.loggedIn = ([self hasInternetConnection]==YES) ? 0 : -1;
}
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
−357.8
-(bool)hasInternetConnection
{
return true;
}
-(void)checkInternetConnection
{
NSLog(@"checking connection");
mTmp.loggedIn = ([self hasInternetConnection]==YES) ? 0 : -1;
}
Мой начальник-тимлид, американский индус по происхождению, узнав, что я уже несколько часов потратил на попытки неизвращенной реализации нужного нам "простого" функционала, сказал, что поможет мне, хоть я и не просил.
Уже через несколько минут я увидел у себя вот эти строки...
P.S. если кто не знает, то код на Objective-C
+162.5
$s_name=$_POST['s_name'];
$f_name=$_POST['f_name'];
$m_name=$_POST['m_name'];
$login=$_POST['login'];
$password1=$_POST['password1'];
$password2=$_POST['password2'];
$post_id=$_POST['post'];
$query="SELECT person.login as login FROM person ORDER BY ID";
$res=Select($query);
$flag=false;
While(OCIFetch($res))
{
$login_base=text($res,'LOGIN');
if ($login==$login_base)
{
$flag=true;
break;
}
}
If($flag)
{
echo "</br><center><h3>Такой логин уже существует...придумайте еще что-нибудь!</center></h3></br>";
?>
<center><h4><a href="index.php?menu=reg">Назад</a></h4><center>
<?
}
if (!$flag)
{
if ($password1==$password2)
{
If (($login!='') and ($password1!='') and ($s_name!='') and ($f_name!='') and ($m_name!=''))
{
.... Ну и дальше добавение и все такое))
ммм.. альтернативные способы защиты от инъекций в запросах???)))
+153.6
var xmlhttp
var dlid;
function showHint(id)
{
xmlhttp=GetXmlHttpObject();
if (xmlhttp==null)
{
alert ("Your browser does not support XMLHTTP!");
return;
}
dlid="dl"+id;
var url="download.php";
xmlhttp.onreadystatechange=stateChanged;
xmlhttp.open("GET",url+"?update="+id,false);
xmlhttp.send(null);
window.location=url+"?id="+id;
}
function stateChanged()
{
if (xmlhttp.readyState==4)
{
document.getElementById(dlid).innerHTML=xmlhttp.responseText;
}
}
function GetXmlHttpObject()
{
if (window.XMLHttpRequest)
{
// code for IE7+, Firefox, Chrome, Opera, Safari
return new XMLHttpRequest();
}
if (window.ActiveXObject)
{
// code for IE6, IE5
return new ActiveXObject("Microsoft.XMLHTTP");
}
return null;
}
Разбираюсь с AJAX
+137.5
void TWindowTID::SetStyle(GtkWidget* widget, const char *form, gint Red_, gint Green_, gint Blue_)
{
struct _GtkStyle *style;
GdkColor bg;
style=gtk_style_new();
bg.red = Red_;
bg.blue = Blue_;
bg.green = Green_;
if (form=="TEXT")
{
style->fg[GTK_STATE_NORMAL]=bg; //TEXT
}
else
if (form=="BORDER")
{
style->base[GTK_STATE_NORMAL]=bg; //BORDER
}
else
if (form=="ALL")
{
style->bg[GTK_STATE_NORMAL]=bg;
style->base[GTK_STATE_NORMAL]=bg; //BORDER
style->fg[GTK_STATE_NORMAL]=bg; //TEXT
}
else
if (form=="button")
{
style->bg[GTK_STATE_PRELIGHT]=bg;
style->base[GTK_STATE_PRELIGHT]=bg; //BORDER
style->bg[GTK_STATE_SELECTED]=bg;
style->base[GTK_STATE_SELECTED]=bg; //BORDER
}
else
{
style->bg[GTK_STATE_NORMAL]=bg;
}
style->font = gdk_font_load("-adobe-helvetica-*-r-*-*-12-*-*-*-*-*-*-*");
if ((GtkWidget *)widget!=NULL) gtk_widget_set_style((GtkWidget *)widget, style);
}
Сравнение строк умиляет
+107.2
procedure TFormMoneyToBag.AMEditVirtualKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
var
Field : string;
Value : integer;
begin
if (Key = 16) or (Key = 13) then begin
with ADOHardCash.FieldByName('Dengi') do begin
if AsString = '500 грн' then Field := '[500hrn]'
else if AsString = '200 грн' then Field := '[200hrn]'
else if AsString = '100 грн' then Field := '[100hrn]'
else if AsString = '50 грн' then Field := '[50hrn]'
else if AsString = '20 грн' then Field := '[20hrn]'
else if AsString = '10 грн' then Field := '[10hrn]'
else if AsString = '5 грн' then Field := '[5hrn]'
else if AsString = '2 грн' then Field := '[2hrn]'
else if AsString = '1 грн' then Field := '[1hrn]'
else if AsString = '1 грн монета' then Field := '[1hrnCoin]'
else if AsString = '50 коп' then Field := '[50kopCoin]'
else if AsString = '25 коп' then Field := '[25kopCoin]'
else if AsString = '10 коп' then Field := '[10kopCoin]'
else if AsString = '5 коп' then Field := '[5kopCoin]'
else if AsString = '2 коп' then Field := '[2kopCoin]'
else if AsString = '1 коп' then Field := '[1kopCoin]'
end;
UpdateIncassationCurrentValue.Parameters.ParamByName('@IncassationId').Value := IncassationId;
UpdateIncassationCurrentValue.Parameters.ParamByName('@Field').Value := Field;
if AMEditVirtual.Text = '' then Value := 0 else Value := StrToInt(AMEditVirtual.Text);
UpdateIncassationCurrentValue.Parameters.ParamByName('@Value').Value := Value;
ExecStoredProc(UpdateIncassationCurrentValue);
RequeryADO(ADOHardCash);
RequeryADO(ADOCashDeskInfo);
ButtonStatus;
AMEditVirtual.Visible := false;
end;
end;
Сие Чудо техники заполняет параметры для выполнения хранимой процедуры на сервере.
Написал Большой Мудила, хотя в целом он хороший человек.
+147
final public function getModelId()
{
return '42';
}
+118.9
.loginField {
color: красний;
}
+63.6
struct window_t
{
int Frame;
int Window;
int Title;
};
int TWindowTID::CreateWindow(int width,int height,int posX,int posY,int WindowType,int &win)
{
GtkWidget* fixed;
fixed = get_new_fixed()
window_t* w0 = new window_t;
// здесь всякие разные манипуляции разной степени бессмысленности
w0->Window=reinterpret_cast<int>(fixed);
return static_cast<int>(w0->Window);
}
Буйство кастов
+96.5
......
int a1=0,a2=0,a3=0,a4=0,a5=0,a6=0,a7=0,a8=0,a9=0,a10=0;
for (int i=0;i<arl->Count;i++)
{
if(arl[i]<0.1)
{
a1++;
}
if(arl[i]<0.2&&arl[i]>0.1)
{
a2++;
}
if(arl[i]<0.3&&arl[i]>0.2)
{
a3++;
}
if(arl[i]<0.4&&arl[i]>0.3)
{
a4++;
}
if(arl[i]<0.5&&arl[i]>0.4)
{
a5++;
}
if(arl[i]<0.6&&arl[i]>0.5)
{
a6++;
}
if(arl[i]<0.7&&arl[i]>0.6)
{
a7++;
}
if(arl[i]<0.8&&arl[i]>0.7)
{
a8++;
}
if(arl[i]<0.9&&arl[i]>0.8)
{
a9++;
}
if(arl[i]<1&&arl[i]>0.9)
{
a10++;
}
}
.....
определение количества элементов в каждом диапазоне. Было написано быстро и влоб, т.к ничего красивее придумать не смог, да и времени не было.
+131.8
def ad30 // Все понятно из названия, да?
vgl start_naht 3
baw gr
spg ad40
aktuelle_naht = 3 ;
lad vsp 53 aktuelle_naht ;
spg up setze_npk_abs ;
vgl start_naht 3
baw gl
PPZ # R100 Z1 z1_start Z2 P8 Z3 P9 ;
z1_start = -1590
z1_ziel = -2985
vgl tisch_nr 2
baw gl
spg ad31
z1_start = z1_start + tisch_abstand ;
z1_ziel = z1_ziel + tisch_abstand ;
def ad31
z1_soll = z1_start
lad r1 R65
lad r2 R66
R1.C = c3_soll ;
R2.C = c3_soll ;
R1.B = 0;
R2.B = 0;
spg up verschiebe_nahtanfang ;
spg up fahre_z1 ;
PPZ # A1 -12.13 A2 -15.73 A3 114.05 A4 24 A5 40 A6 -208 Z1 z1_start Z2 P8 Z3 P9
pnd_amp = pnd_amp_laengs ;
pnd_len = pnd_amp * 0.8
dx = -delta_x_npk
ges_schweiss = ges_schweiss_orig * 0.85
npk 4 rel x dx y 0 z delta_z_npk a 0 b 0 c 0
spg up laengsnaht_ohne_messen ;
; ------- Veraenderte Punkte speichern
vgl za_soll 90
baw kl
spg ad35
; ------- Oberseite -----------------------
lad r605 r1
lad r606 r2
spg ad36
; ------- Unterseite ----------------------
def ad35
lad r625 r1
lad r626 r2
def ad36
lad p1 pos
spg up freifahren
spg up anfahr_ges ;
p2 = p2 - ( z1_start - z1_ziel )
liz x p1 y p2 z p3 a p4 b p5 c p6 z1 z1_start z2 p8 z3 p9
spg up grundstellung
spg up brenner_reinigen ;
; --------------------------------------------------------------
; Schweissnaht 4 (Roboterseite)
; --------------------------------------------------------------
def ad40
vgl start_naht 4
baw gr
spg ad50
aktuelle_naht = 4 ;
lad vsp 53 aktuelle_naht ;
spg up brenner_reinigen ;
z1_start = -1590
z1_ziel = -2985
vgl tisch_nr 2
baw gl
spg ad41
z1_start = z1_start + tisch_abstand ;
z1_ziel = z1_ziel + tisch_abstand ;
def ad41
z1_soll = z1_start ;
lad r1 R67
lad r2 R68
Это язык SRCL, используется на некоторых роботах, зовется высокоуровневым. Однако не умеет даже передавать параметры в функции.
Особенно умиляют команды типа PPZ и LIZ и названия типа aktuelle_naht - писал немец :)
В конце концов, чтобы запрограммировать этого робота пришлось писать свой конструктор программ, который выдавал эту лажу мегатоннами (а в чем еще измерять разрушительную силу этой хрени??).