Воскресенье, 28.04.2024, 21:38
Приветствую Вас Гость | RSS
SONS OF INFERNO
Главная
Регистрация
Вход
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Модератор форума: Zenthas  
Форум » Ultima On line » Макросы под Stealth Client (Scripts) » Snooping
Snooping
TrickFoxДата: Вторник, 07.09.2010, 15:25 | Сообщение # 1
Admin
Группа: Администраторы
Сообщений: 1685
Репутация: 32767
Статус: Offline
Смысл таков ставите чара который будет качать снупинг возле тово чара накотором он будет качать етот скил!
В скрипте вам нада будет изменить токо аиди бекпака чара на котором он будет качаться вот
юзать нада будет версию Стелса(1,00)

Program snooping;
// v.2.01b (зделан (с)proZak- под шард AoP)

{$Include 'all.inc'}

var my_timer: Integer;
item_type : Word;
time_begin : TDateTime;
EnemyWarrior : Cardinal;

const
pack = $758E9271; // ID бекпака чара на котором мы будем качатсо
EnemyType1 = $0190; // типы чаров разных полов
EnemyType2 = $0191;

function AutoFindEnemy : Cardinal;
// функция поиска чаров рядом для определения жертви
// Возвращает сериал жертви.
begin
Finddistance := 1;
Ignore(self);
if FindType(EnemyType1, Ground) = 0 then FindType(EnemyType2, Ground);
if finditem = 0 then
begin
// не нашли врагов <img src="http://src.ucoz.net/sm/1/sad.gif" border="0" align="absmiddle" alt="sad">
AddToSystemJournal('Error: жертва не найдена!');
Result := $00000000;
Exit;
end
else
begin
// Ага! Вот он, гадина!
AddToSystemJournal('Enemy found: ' + GetName(finditem));
Result := finditem;
end;
end;

Begin

ClearJournal;
SetWarMode(false);
SetARStatus(true);
if not connected then connect;

repeat

while (dead = false) and (connected = true) do
begin
EnemyWarrior := AutoFindEnemy;
if EnemyWarrior = $00000000 then exit
UseObject(EnemyWarrior);
wait(1000);
checksave;
UseObject(pack);
wait(4000);
checksave;
end;
wait(500);
if dead then
begin
AddToSystemJournal('Умерли');
SetARStatus(false);
Disconnect;
Exit;
end;

until false;

End.


Кактус - это разочаровавшийся в жизни и не верящий ни во что огурец.
 
KrykДата: Среда, 26.10.2011, 07:06 | Сообщение # 2
Странник
Группа: Пользователи
Сообщений: 7
Репутация: 0
Статус: Offline
Представляем Вам сервис по слежению за пользователями Вконтакте socialonline.ru

Вы сможете узнать в какое время и сколько времени находился в контакте нужный Вам человек.
Сможете вести статистику как по дням так и по месяцам, сервис максимально удобен для Вас.
Сервис строго конфиденциальный. Отслеживаемые никогда не узнают, что за ними следят.
Сервис полностью бесплатный, не требует никаких кодов и прочего.

Сервис будет полезен:

Директорам каких либо компаний, которым не хочется, чтобы в рабочее время их
сотрудники вместо работы сидели в социальной сети. Естественно администратор
локальной сети, возможно запретил доступ к ним, но есть много сайтов которые
называются "анонимайзеры", они работают через proxy и могут обойти почти все
запреты установленые администратором. Благодаря нашему сервису, Вы сможете
увидеть сколько времени, и во сколько Ваши сотрудники находились в Вконтакте.

Родителям, которым очень интересно, чем занимается их ребенок как в свободное
время, так и в учебное время, сколько времени он проводит в социальных сетях.
Благодаря этому сервису, Вы получите всю необходимую для Вас информацию.

Возможно, Вам интересно когда и во сколько была Ваша девушка или Ваш парень
в контакте, или Вам просто хочется за кем-то проследить, либо личные причины.
Регистрируйтесь прямо сейчас, и Вы будете получать всю информацию.

Будем рады видеть вас на http://socialonline.ru

Для Яндекс и google

слежка за контактом, слежка, слежка за пользователями вконтакте, слежка за пользователем
сколько сидит в онлайн, следить за пользователями в контакте, следить. вконтакте.ру

Добавлено (26.10.2011, 07:06)
---------------------------------------------
Получите бесплатно индивидуальный Гороскоп на 2012 год
Уникальное предложение только для Вас!
Спешите: http://u.to/personalnyj-goroskop-2012/eXpDAQ

 
ПозитивчикДата: Среда, 21.03.2012, 04:54 | Сообщение # 3
Странник
Группа: Пользователи
Сообщений: 5
Репутация: 0
Статус: Offline
Учавствуйте в голосовании «Кто круче?» на сайте vk.com
Подписывайтесь и голосуйте! http://vk.com/kto_kruche_public

Скоро конкурс среди подписчиков! Девушки и парни будьте готовы к участию и получению призов!
 
Форум » Ultima On line » Макросы под Stealth Client (Scripts) » Snooping
  • Страница 1 из 1
  • 1
Поиск:


Copyright MyCorp © 2024