Oskom Forums

Oskom Forums


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

    Регистрация
    26.08.2006
    Адрес
    Enemy No.1
    Сообщений
    9
    #1

    По умолчанию Помогите! Очень нужен скрипт на тэйлоринг. (уох или пилот)

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

  2. #2

    По умолчанию

    Код:
    set #checklag 1 // включаем/выключаем проверку лагов. 
    set #lags 0 
    set #escr 0 // включаем/выключаем остановку скрипта 
    set #n 10 // количество предметов, через которое хотим делать проверку на лаги. Если #escr = 1, то количество предметов, которое хотим произвести. 
    
    :begin 
    if #checklag = 1 
    gosub chlg 
    end_if 
    gosub settime 
    
    :craft 
    repeat #n 
    send F2 #wt // LastObject 
    if lastmsg You can't make 
    alarm 
    end_script 
    end_if 
    double_left 69, 58 
    wait #wt 
    left 268, 68 
    wait #wt 
    double_left 233, 64 
    wait 4000 
    end_repeat 
    if #escr = 1 
    alarm 
    end_script 
    else 
    goto begin 
    end_if 
    
    :settime 
    if #checklag = 0 
    :lags0 
    set #wt 750 
    gosub swtc 
    return 
    end_if 
    if #lags = 0 
    goto lags0 
    end_if 
    if #lags = 1 
    set #wt 1000 
    gosub swtc 
    return 
    end_if 
    if #lags = 2 
    set #wt 1500 
    gosub swtc 
    return 
    end_if 
    if #lags = 3 
    set #wt 2500 
    gosub swtc 
    return 
    end_if 
    
    :chlg 
    set timer 
    say lags? 
    while_not lastmsg lags? 
    if timer > 60000 
    goto chlg 
    end_if 
    if lastmsg error 
    goto chlg 
    end_if 
    end_while 
    set #tis timer 
    if #tis < 200 
    set #lags 0 
    end_if 
    if #tis > 300 
    set #lags 1 
    end_if 
    if #tis > 700 
    set #lags 2 
    end_if 
    if #tis > 1500 
    set #lags 3 
    end_if 
    return 
    
    :swtc 
    set #swt #wt * 3 
    set #ct 4000 - #swt 
    if #wt > 1500 
    set #ct 1000 
    end_if 
    return
    cуда загляни http://www.uoo.ru/phpBB/viewtopic.php?t=179357&029026

  3. Neophyte

    Регистрация
    26.08.2006
    Адрес
    Enemy No.1
    Сообщений
    9
    #3

    По умолчанию

    Благодарю судрь за помощь. Да хранит вас вашь мечь, копье, топор и молот.

Ваши права

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