Клуб программистовлюбые вопросы по PHP, С++, JAVA, Python, Perl

<?
//error_reporting(E_ALL);
$l=$_GET['l'];
include "conff_ig.php";
include "fun.php";
include "dvig.php";

//admin?
$ipssa=getenv('HTTP_X_FORWARDED_FOR');
if($_COOKIE['login']!=$ipadminn)$ipadminn=false;
else $ipadminn=true;

$divd = 1024;
$isize = $max_size / $divd;
$isize2 = round($isize);

if(isset($_GET['ref'])){
if(!$IN_user){
$rriv = readselekt($Fbpart,'0:'.$_GET['ref']);
if($rriv[0]!=''):
$tm=explode("|",$rriv[0]); $loginpart=$tm[3];
logs2($loginpart,$Fbpartreflog,$Fbpartref,$ip);
//*********************************
$Browser = getenv("HTTP_USER_AGENT");
$Port = getenv("REMOTE_PORT");
$Connect = $_SERVER['HTTP_CONNECTION'];
$Host = gethostbyaddr(getenv("REMOTE_ADDR"));
$ip = $_SERVER["REMOTE_ADDR"];
$Refferal=$_SERVER['HTTP_REFERER'];
$Data = date("d-m-y H:i:s", time());
$text_to = "[$Data] Browser:[$Browser] Port:[$Port] Connect:[$Connect] Host:[$Host] IP:[$ip] REFER:[$Refferal]";
writesadd($Fbparrefferlog.$loginpart.".d",$text_to);
unset($text_to);
//*********************************
endif;
}
$link=$PTl.'reg.php';$namer='Регистрация';
}ELSE{
//++++mes
$mestrue=false;
$ff=readpos($Fmessage,"0:".$_COOKIE['login']);
if($ff[0]!=""):
$cont_size=sizeof($ff);
for($i=0;$i<$cont_size;$i++):
$st=explode('|',$ff[$i]);
if($st[5]=="no"): $mestrue=true; break;endif;
endfor;
if(($mestrue)&&($l=="ms")){
$cont_size=sizeof($ff);
delselekt($Fmessage,"0:".$_COOKIE['login']);
for($i=0;$i<$cont_size;$i++):
$st=explode('|',$ff[$i]);
writesadd($Fmessage,$st[0]."|".$st[1]."|".$st[2]."|".$st[3]."|".$st[4]."|".$das[0]."|");
endfor;
$mestrue=false;
}
endif;
//++++mes
switch($l) {

case 'static': $link=$PTl.'static.php';$namer='Статистика';
break;
case 'givemelogpic': $link=$PTl.'admingivemelog.php';$namer='Лог просмотра картинок сегодня';
break;
case 'givemelogpart': $link=$PTl.'admingivemelog.php';$namer='Лог переходов по партнёрской ссылке за всё время';
break;
case 'ms': $link=$PTl.'mes.php';$namer='Сообщения';
break;
case 'm': $link=$PTl.'main.php';$namer='Хостинг картинок';
break;
case 'd': $link=$PTl.'picdown.php';$namer='Загрузка файла';
break;
case 'p': $link=$PTl.'prav.php';$namer='Правила';
break;
case 'f': $link=$PTl.'faq.php';$namer='F.A.Q – часто задаваемые вопросы';
break;
case 'k': $link=$PTl.'kont.php';$namer='Контакты';
break;
case 'r': $link=$PTl.'reg.php';$namer='Регистрация';
break;
case 'i': $link=$PTl.'in.php';$namer='Вход';
break;
case 'z': $link=$PTl.'zab.php';$

Крупнейший портал о музыке рнб и хип-хоп ищет программиста со знанием языка parser . зарплата достойная. фриланс удаленно. пишите на arevik.chakhoyan@gmail.com

Аревик

Всем привет!

Я разработал скрипт RPG-игры для платформы Facebook, на этом скрипте сделано уже порядка двух десятков игр. Скрипт продается, пример приложения можно посмотреть тут:

//apps.facebook.com/sword-and-magic/?reference=vk

В ближайшее время я планирую портировать этот скрипт под ВКонтакте и продавать.

Вот список того, что уже реализовано в скрипте:

* Миссии – пользователи могут выполнять миссии, получать за это бонусы (деньги, вещи, апгрейды)
* Бои между игроками
* Сражения с боссами
* Магазин – покупка/продажа вещей, эксклюзивные вещи
* Инвентарь – возможность экипировать своего персонажа
* Недвижимость – возможность покупать землю, строения, бизнесы и получать с них доход
* Альянс – возможность приглашать друзей, назначать их на должности (боец, банкир, лекарь и т.д.)
* Рейтинг игроков
* Отправка подарков друзьям
* Инструменты монетизации – платная игровая валюта, продажа эксклюзивных вещей и недвижимости за реальные деньги
* Промо-ссылки – возможность создавать специальные ссылки, перейдя по которым игрок получает определенные бонусы
* Инструменты кастомизации – возможность настроить дизайн игры, основные игровые константы

Технические требования:
* VPS/VDS хостинг с не менее чем 300MB RAM
* Apache или Nginx (последняя стабильная версия)
* Ruby 1.8.7 + Ruby on Rails 2.3.5
* MySQL, Memcached, Imagemagick

Стоимость скрипта еще уточняется, но вероятнее всего будет в пределах $500 за копию. В стоимость входит лицензия на одну игру, а так же установка и настройка скрипта на хостинге клиента (при условии выбора OS из списка рекомендуемых).

Если вам интересно принять участие в тестировании и/или приобрести лицензию, то пожалуйста заполните эту форму:

//railorz.com/vkontakte/

Я свяжусь с вами как только будет доступна тестовая версия.

БОНУС! Те, кто заполнит форму до выхода тестовой версии, получают право на 20% скидку при покупке скрипта!

собственно, сабж таков:
у нас есть char, который весит 8 бит.
допустим, мы хотим создать кодировку, которая занимает 6 бит.
соответственно, массив char'ов надо использовать, используя 2 оставшихся бита или как-то по-другому.
хотя бы идею подкиньте, есть ли какое-то средство языка?

В компиляторе есть опция -S для генерация ассемблерного кода.
По умолчанию создаётся код под ту платформу на какой запускается.
Надо с генерировать код под PowerPC.
В документации сказано что есть какая то опция.
Кто знает как проще сделать это?

На какую тему, господа программисты, вы писали дипломную работу?
Какие предложения по будущему диплому?
На каком языке реализовывали?

Поделитесь опытом)))))

Как сделать так, чтобы пользователь скачал файл, я уже давно понял =)
Недавно разобрался с докачкой.
Но у меня до сих пор остался вопрос: как именно переместить файл с ервера на клиента в определенное места, так скажем, без окна скачивания и поместить его в определенную папку (нужно НЕ для хакерства)?
Те кто обновлял Windows на узле майкрософта меня поймут.
И как в таком случае сделать докачку?

Интересно знать

Сорри, что возможно нарушил какие то правила по созданию тем.
Помогите пожалуйста с паскалем, сам гуманитарий, а брат ничего не понимает в нем. Если не сложно скиньте решения. Заранее благодарен.

В одномерном массиве, состоящем из п вещественных элементов, вычислить:
1. Максимальный по модулю элемент массива.
2. Сумму элементов массива, расположенных между первым и вторым положительными элементами.
3. Преобразовать массив таким образом, чтобы элементы, равные нулю, располага¬лись после всех остальных.

Народ, подскажите, пожалуйста, хорошие книжки про Maple 13.
Где скачать? Или может быть у кого-нибудь есть в электронном виде?

procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,Y: Integer);
begin
if (X>=8 or X<=241) and (Y>=816 or Y<=824) then
begin
…
end;
end;
X>=8 or X<=241 после этого он мне пишит "неприводимые типы" или что-то в этом роде. самую сложную часть программы написал нормально а на этом завис. подскажите пожалуйста

Кажется, у меня проблема в коде.
Сам-то он работает, но функция sinchange моментально меняет прозрачность, не смотря на setTimeout. Проще говоря, она моментально рекурсивно выполняется где-то 20 раз и потому срабатывает за мгновение, не смотря на таймер. В чем дело? Я даже 1000 миллисекунд поставил таймер – все равно.

См. код:

function setOpacity(elem, value) {
elem.style.opacity = value;
elem.style.filter = 'alpha(opacity=' + value*100 + ')';
return value;
}

function SinChange(elem,x, endx,func,sp,stx)
{
var r = endx-stx;
var d = setOpacity(elem, x+sp*Math.cos(1.57*(x-stx)/r));
alert(d);
if (d<endx)
{
setTimeout(function(arg1,arg2,arg3,arg4,agr5,arg6){SinChange(arg1,arg2,arg3,arg4,agr5,arg6)}(elem,d,endx,func,sp,stx), 1000)
}
}
SetOpacity – эта функция меняет прозрачность, SinChange – Функция, в которой сама проблема.
Да, и вызывается он тут же после загрузки страницы.