- 1
- 2
- 3
$(EXTRA_SRC) :
cp -f $(PROJ_ROOT)/src/libA/com_print.c ./com_print.cpp
cp -f $(PROJ_ROOT)/src/libA/com_misc.c ./com_misc.cpp
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+131
$(EXTRA_SRC) :
cp -f $(PROJ_ROOT)/src/libA/com_print.c ./com_print.cpp
cp -f $(PROJ_ROOT)/src/libA/com_misc.c ./com_misc.cpp
из Makefile'а. /другой/ способ подключения нужной библиотеки к модулю.
+80
return false;
}
// создаём объект где перечислены id новых событий
// из них генерируем ссылки которые ведут на хуй, блять, как же меня заебал этот модуль...
if ( t.news.length ) {
+127
Lab1
s x(2,2)=1
s x(2,2,9)=0
s y(3,6,7)=3
s y(3,6,8)=4
s y(3,6,7,8,4)=5
s y(3,6,7,8,9)=6
m x(2,2)=y(3,6,7,8)
d Out("x(2,2)")
Out(l)
i $d(l)#10{
i l
w l_" =",?15,@l,!
i $d(@l)\10{
f {
s c=$q(@l,1)
q:c=""
d Out(c)
k @c
}
}
q
}
Вот так в Cache Object Script можно вывести ветку многомерного массива....
+128
<div>
<div style="position:absolute; z-index:1; width:100%; margin:0px; top:0px;">
<div class="wrapper">
<div style="height: 100%; width: 980px; float:left;background-color:#fff;">
<div class="header" style="background: url(photos/20110427033026.jpg) no-repeat 432px 20px">
<div class="logoHolder">
<a id="dnn_dnnLOGO_hypLogo" title="Chicco" href="/"><img src="images/chicco_logo.png" alt="Chicco" style="border-width: 0px;"/></a>
</div>
<div class="headerPane">
<a name="906"></a>
<div class="slogan">
<div class="sloganContentPane">
<!-- Start_Module_906 -->
<div class="MLHTMLContent">
<div class="Normal"></div>
<div class="Normal">
<span class="Head index_head">везде с ребенком</span>
</div>
</div>
<!-- End_Module_906 -->
</div>
</div>
<a name="1015"></a>
....
А вы кнопочки какие то...
+127
<span class="main_dnnmenu_rootitem mi mi1 id83 root" id="menuprod">
Оттуда же...
Ищу форму в которую мне надо передать значение, радуюсь что ния поддерживаю сайт.
+129
<input type="image" src="/Content/images/1x1.png" name="BasketB" id="submitbutton" />
<div class="buttons2" id="buttons" style="margin-top: 15px;">
<a href="javascript:$('#submitbutton').click();"><div class='left2'> </div><div class='center'>Bestellung abschicken</div><div class='right'> </div></a>
</div>
<script type="text/javascript">centerImageButtons();</script>
вот так вот можно сделать кнопку submit
+119
& = & = && = &&&& = ...
+127
resid := "ANeNaidenVidShortNameNA";
defval := "(Не найден вид '(ShortNameNA)')";
nenay:=@DbLookup("":"NoCache";"":"ResDB.nsf";"(Res)";lng+resid;2);
nenay:=@If(@IsError(nenay);defval;nenay);
key:=@Name([Abbreviate]; @UserName);
serv:=@GetProfileField("CommonDBProfile"; "StructServer"; @ServerName);
db:=@GetProfileField("CommonDBProfile"; "StructDB"; @ServerName);
@If (serv="" | db=""; @Do(
@Prompt([Ok];osh; vstr);
@Return(vstr)
); "");
StructServer1:=@DbLookup("":"NoCache"; serv:db; "(NAShortNamePost)"; key; "StructServer" ) ;
StructDB1:=@DbLookup("":"NoCache"; serv:db; "(NAShortNamePost)"; key; "StructDB" ) ;
@If(StructDB1 = ""; @Do(@Prompt([Ok]; vnim; vstr); @Return("")); @Success);
a := @Trim(@PickList([Custom];StructServer1 :StructDB1; "(ShortNameNA)";sel; sel1; 5));
@If(@IsError(a); @Do(@Prompt([Ok]; osh; nenay); @Return("")); @Success);
@If(a = ""; @Do(@Prompt([Ok]; vnim; vneob); @Return("")); @Success);
FIELD NamesAlias:= @Middle(a; "$"; "#");
FIELD IndDepart := @Explode(@Implode(@Trim(@Left(a;"*"));";");";");
FIELD Depart := @Middle(a; "*"; "$");
FIELD Empl := @Middle(a; "$"; "#");
FIELD EmplNotesAdr:= @Explode(@Implode(@Trim(@Middle(a; "#"; "%"));";");";");
FIELD Replacer := @Trim(@Middle(a; "%"; "?"));
FIELD ReplacerNotesAdr := @Explode(@Implode(@Trim(@Middle(a; "?"; "+"));";");";");
FIELD ServerName:=@Explode(@Implode(@Trim(@Right(a;"+"));";");";");
REM {FIELD CtrlDate:=@Adjust(@Today;0;1;0;0;0;0 )};
FIELD a3:=@Date(@Today);
FIELD a6:=@Middle(a; "$"; "#")+"<< >> " ;
FIELD IndDepart:=IndDepart ;
FIELD Depart:=Depart;
FIELD Replacer :=@Unique(Replacer );
FIELD ReplacerNotesAdr:=@Unique(@Name([Abbreviate]; ReplacerNotesAdr));
FIELD ServerName:=@Unique(@Name([Abbreviate];ServerName));
@Command([RunAgent];"(CheckWall)");
@Command([RefreshFrame];"Document")
документооборот епта
+141
<img src="http://govnokod.ru/ratings/code/MyCodeId/on" style="display:none;"/>
+130
%matlab
check=fread(fid,8,'uchar');
if sum(check == [255,255,255,255,255,255,255,255]')~=8
return;
end
Способ проверки того, что 8 прочитанных байт суть 0xFF.