Сайт Антареса Сайт Антареса Форум Антарес
> >

Здравствуйте, гость ( Вход | Регистрация )


> > База Скриптов, скрипты, полезные статьи, файлы и прочее >
pikachu
сообщение 18.7.2007, 7:08
Сообщение #1


Ступивший на тропу
Group Icon

Группа: Пользователи
Сообщений: 770
Регистрация: 4.3.2006
Из: Москва, ЗАО
Пользователь №: 2 884
Спасибо сказали: 15 раз(а)
Класс: Человек



БАЗА СКРИПТОВ
скрипты, полезные статьи, файлы и прочее

Прежде всего хочется заметить, что при ровных руках и отсутствии врожденных психических заболеваний почти любой скрипт можно без особых трудностей найти в Поиске.
База будет постоянно дополняться. В последний раз обновлялась 6 апреля 1942 года.

СКРИПТЫ
скрипты на крафт, прокачку скиллов, охоту, пвп и прочее

ДОБЫЧА РЕСУРСОВ:КРАФТ, ЗАКАЗЫ:ПРОКАЧКА СКИЛЛОВ:ФСЯКОЕ:
ФАЙЛЫ
ссылки на полезный софт, вердаты, патчи, обновления и прочее
СТАТЬИ
полезные статьи для скриптоделов и не только
Вы вольны использовать как угодно и что угодно из представленного выше. Естественно, никакой ответственности за возможные проблемы ни я, ни кто-либо другой не несет. О некорректной работе скриптов просьба сообщить модераторам раздела по ЛС с подробным описанием проблемы.

Сообщение отредактировал pikachu - 10.9.2007, 17:30


Спасибо сказали:
Пользователь в офлайнеКарточкаОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
 
 
Ответить в эту темуОткрыть новую тему
> > Ответов(1 - 1) >
Fatality***
сообщение 30.3.2009, 19:13
Сообщение #2


За базар отвечу базаром
Group Icon

Группа: Гости
Сообщений: 2 086
Регистрация: 16.5.2007
Пользователь №: 4 792
Спасибо сказали: 90 раз(а)
Класс: Человек



Код
var S : Integer;
Begin
Repeat
    UseSkill('Hiding');
    For S:=0 To 1500 Do
    Begin
        wait(50);
        If (InJournal('You have hidden|seem to hide here')>-1) Or Dead Then Break;
    End;
    If (InJournal('You have hidden|seem to hide here')>-1) Then SetJournalLine(LineIndex,'_');
    S:=FloatToStr(GetSkillValue('Hiding'));
    AddToSystemJournal('Хайдинг: ['+Copy(S,1,Pos('.',S)+1)+']');
Until Dead;
End.
Это только хайдинг. laught.gif
Пользователь в офлайнеКарточкаОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
 

Ответить в эту темуОткрыть новую тему
> >
2 чел. читают эту тему (гостей: 2, скрытых пользователей: 0)
Пользователей: 0

 

- Текстовая версия Сейчас: 19.10.2018, 15:51
Design: Fisana  © 2005-2006 IBR Team