Oskom Forums

Oskom Forums


Добро пожаловать на Oskom Forums.
 
 
Сейчас на шардах UO Oskom
 
Закрытая тема
Показано с 1 по 4 из 4

Комбинированный просмотр

  1. Journeyman

    Регистрация
    16.11.2006
    Адрес
    аГАтА КрисТИ!!! в ад за тобой и 1000 душ за собой!!!!
    Сообщений
    277
    #1

    По умолчанию ПОМОГИТЕ ОТРЕДОКТИРОВАТЬ СКРИПТ

    нашол етот скрипт! и немогу его запустить!
    если не сложно обесните што нетак в нём!
    (UOScript 1.6.4)

    Для крафта чего угодно:
    1) Создаем файл methods.uops в папке с uoscript.exe
    2) Его содержимое:
    Код:
    Function FindType(aType:Word): LongInt;
    var
    * GL,H,C,aID,i: LongInt;
    * S: String;
    begin
    * GetGumpsList(GL);
    * GetListCount(GL,C);
    * for i:=0 to C-1 do
    * begin
    * * GetListItem(GL,i,H,S);
    * * if FindObject(H,aType,aID) then Break;
    * end;
    * Result:=aID;
    end;
    Procedure MenuChoice(S1, S2: String);
    var
    * i,H: LongInt;
    * S: String;
    begin
    * i:=0;
    * while (i<30) and not FindCraftMenu(S1,H) do
    * begin
    * * i:=i+1;
    * * Delay(100);
    * end;
    * i:=0;
    * GetMenuItemName(H,i,S);
    * while (pos(S2,S)=0) and (i<20) do
    * begin* *
    * * i:=i+1;
    * * GetMenuItemName(H,i,S);
    * end;
    * SetFirstItemIndex(H,i);
    * LeftDoubleClick(57,73);
    end;


    3) Пример использования - делаем стилскины
    Код:
    Program Steelskin;
    {$include methods.uops}
    var
    * id: LongInt;
    const
    * aType = $0F84; // материал - гарлик
    begin
    * id:=findtype(aType);
    * while (id<>0) do
    * begin
    * * SetLastObject(aType,id);
    * * SendKey(k_F1); // Last Object
    * * MenuChoice('What sort of potion','Steelskin');//Выбор меню
    * * Delay(15000);
    * * id:=findtype(aType);
    * end;
    end.


    4) Переделать этот скрипт для своих потребностей нетрудно. Меняем тип материала, заголовок меню и выбор.
    Если надо несколько раз выбирать в меню - дописываем строки
    Код:
    MenuChoice('заголовок','что выбираем');

  2. Journeyman

    Регистрация
    16.11.2006
    Адрес
    аГАтА КрисТИ!!! в ад за тобой и 1000 душ за собой!!!!
    Сообщений
    277
    #2

    По умолчанию

    ну и ладно! сам какнит разберусь раз вы все такие! топ клоуз!

  3. Journeyman

    Регистрация
    04.06.2006
    Адрес
    ImaFlooder
    Сообщений
    392
    #3

    По умолчанию

    Да ладно тебе, это какой-то офигенный скрипт, я, например, в таких ничего не понимаю Я для пилота писал максимум:
    send f1
    wait 1000
    double_left 100,5
    wait 500

  4. Neophyte
    [Banned]
    Регистрация
    26.11.2007
    Сообщений
    49
    #4

    По умолчанию

    а в чем проблема то? какую ошибку выдает?

Ваши права

  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения