Стереокартинки. Гиперкубы. Стерео-Гиперкубы.
15.01.2010
Всем здрасте.
Я в очередной раз решил немного отвлечься от деньгоделания, и попрограммировать просто так
Вынес результат в отдельную статью.
Стереокартинки. Гиперкубы. Стерео-Гиперкубы.
Стерео тессеракт размещенный на википедии по сравнению с моими просто фигня.
Неравные длины граней, и более сложный способ просмотра.
Пошарил по рунету нигде больше и нет стерео пар гиперкубов, не считая уже упомянутой картинки на вике, многократно утянутой.
P.S Если вам понравится, поставьте на меня ссылку
Ну пажалуйста..
Почему то никогда не любил работать с файловой системой, поэтому код представленный ниже я предпочел бы иметь в готовом виде, а не писать заново при необходимости.
Поэтому оставлю его здесь.
procedure GetAllFiles( Path: string; Lb: TListBox );
var
sRec: TSearchRec;
isFound: boolean;
begin
isFound := FindFirst( Path + ‘\*.*’, faAnyFile, sRec ) = 0;
while isFound do
begin
if ( sRec.Name <> ‘.’ ) and ( sRec.Name <> ‘..’ ) then
begin
if ( sRec.Attr and faDirectory ) = faDirectory then
GetAllFiles( Path + ‘\’ + sRec.Name, Lb );
Lb.Items.Add( Path + ‘\’ + sRec.Name );
end;
Application.ProcessMessages;
isFound := FindNext( sRec ) = 0;
end;
FindClose( sRec );
end;
И вызов что-нибудь типа: GetAllFiles( ‘C:\’, listbox1 );
p.s. я его честно где-то стащил. ![]()
Очередной сцуко бан.
11.01.2010
Блин ну почему меня так любят банить ни за что.
Я понимаю яндекс выкидывает мои сайты, там все честно, там я нарушаю его правила.
Меня банил тизернет, так и не разбанили, но про них я уже итак много писал. Тогда я потерял три тысячи. Хотя продолжаю работать. Теперь они принимают сайты только со статистикой, и вроде обвинить в накрутке не должны. Бодиклик кстати выигрывает по доходности. Вчера бодиклик принес 90, а тизернет 60.
Меня банила зорька, но зорька плотно проанализировала мой трафик и разбанила и я с ней продолжаю до сих пор работать. Хоть и копейки уже приносит.
Теперь меня забанил попандер. Лишился я 200ру.
Имел я с них честные 30р в день. И тройка новых сайтов на подходе была. Но тут опять фак.
Вот их правила
“Мы лояльны к нашим партнерам и принимаем любые сайты. Единственным нашим условием является честность сотрудничества. При обнаружении накруток, модификации скрипта, накликиваний, сливе САР-трафика, размещении нашего кода на взломанных сайтах - блокировка аккаунта без предупреждения и навсегда. Апелляции не принимаются.”
Конечно я такой дурью не маялся. Как минимум если бы и пытался где то мухлевать, то одназначно в других масштабах и в отдельных аккаунтах.
Заипало свинское отношение к партнерам.
__
UPD:
По поводу попандера.
Сказали что была целевая накрутка с какого то московского IP.
Бан снимать отказываются.
Ну и пох на них. Тот же траф на бодиклике конвертится лучше в полтора-два раза.
Скрипт, упрощающий смену ссылок.
11.01.2010
В комментах к прошлой записи HenzO написал
Мне бы хотя бы один скрипт, который на главной каждого сайта ставит ссылку, а если нужно чтоб сразу все им же и убрать можно было)
Сказано, сделано.
Если я конечно правильно понял.
Самое просто что пришло на ум это:
Сайты под агс передают вес.
11.01.2010
Для эксперимента разместил на сайтах попавших под агс ссылки на один свой домен одностраничный, текста там слов десять, остальное картинки без подписей.
Ссылки были по нч (3000 ключей использовал). Сайт адалтовый, домен новый. Посещаемость сейчас 200.
Правда насколько много веса передается тот еще вопрос. Сам я проставил тысячи ссылок. Так что одна две может и не сыграют роли.
Ссылки ставил после того как сайты уже находились под агс недели две. Сайты до сих пор там, в агс.
Ап 8 числа не изменил ничего. Ни плюса ни минуса позиций. На гуглю и раму это не повлияло (пока?) наверное еще не пошуршали по тем сайтам что под агс.
У вас есть многостраничные сателиты попавшие под агс, но вы не знаете как поставить на тысячи страниц разные ссылки? Пишите в комментах. Приведу скрипт в более аккуратный вид и поделюсь.
А вы что делаете с сайтами попавшими под агс?
__
Скрипт разжевал тут