Oskom Forums

Oskom Forums


Добро пожаловать на Oskom Forums.
 
 
Сейчас на шардах UO Oskom
 
+ Ответить в теме
Страница 9 из 30 ПерваяПервая ... 7 8 9 10 11 19 ... ПоследняяПоследняя
Показано с 161 по 180 из 588

Тема: Скрипты

  1. Neophyte
    [Banned]
    Регистрация
    02.05.2005
    Адрес
    Pancher'S
    Сообщений
    27
    #161

    По умолчанию

    Napisite pliz skript na prokachku Resisting Spells
    chtobi 4ar raz v tri minuti kastoval poison field i drugoy char po ney begal plizzz
    [*] Ar-Farazon: Транслит.

  2. Expert

    Регистрация
    13.03.2005
    Адрес
    [KACTA]
    Сообщений
    546
    #162

    По умолчанию

    Написал простейший скрипт на инскрипт,вроде все правильно,но как только запускаешь его чар тупо начинает медитировать до бесконечности...
    Клиент ставлюверсии 2.0.3
    А вот сам скрипт.Причем на бете 4 все работало,скрипт не менял(щас бета 7)

    while mana > 40
    double_left 656, 357
    wait 1000
    double_left 53, 70
    wait 4000
    end_while
    while_not mana = 121
    send f9
    wait 3000
    end_while
    double_left 680, 356

  3. All Seeing Eye

    Регистрация
    31.10.2001
    Адрес
    [Evil-Light]
    Сообщений
    2,661
    #163

    По умолчанию

    Цитата Сообщение от Vaserman
    Написал простейший скрипт на инскрипт
    Порой ошибка может заключаться в самой маленькой детали, которую очень трудно заметить...
    Код:
    while mana > 60
    double_left 656, 357 
    wait 1000 
    double_left 53, 70 
    wait 4000 
    end_while 
    
    while_not mana = int
    send F10
    wait 3000 
    end_while 
    double_left 680, 356
    У меня скрипт работает, попробуй.


    Цитата Сообщение от Nigolka
    На строке "while_not lastmsg = $not or lastmsg = $try or lastmsg = $can't or lastmsg = $noline or lastmsg = $far"
    Да, ошибка будет, я не вижу, где у тебя в скрипте объявлены переменные $try, $noline, $far? Видимо, ты их случайно удалил.

  4. All Seeing Eye

    Регистрация
    31.10.2001
    Адрес
    [Evil-Light]
    Сообщений
    2,661
    #164

    По умолчанию

    Цитата Сообщение от Vaserman
    Очень нужен скрипт на animal taming с подробным объяснением.Поделитесь плиз
    Код:
    // Animal Taming script v1.2 (c) Just StreameR
    // (обставливаем 50 лошадей сундуками и тамим их)
    // 03.03.2005 - рождение скрипта
    // 12.03.2005 - небольшое модифицирование
    // этим скриптом прокачал тейминг с 30 до 100, скрипт работает быстро
    // Биндим кнопки:
    // F1 - TargetNext
    // F2 - UseSkill: AnimalTaming
    // F3 - LastTarget
    // F7 - LastObject
    
    set $a Your skill
    set $b It seems to
    set $c You fail
    set $d You are your
    set $e remembers
    set $f already tame
    set $g You can't
    set $other sasag // Сюда пишем те ластмессаги, которые могут внезапно возникнуть во время скрипта (например, возле дома гуляет Horse и периодически портит нам ластмессагу)
    set $other2 You see // то же, что и сверху
    set #eda 1094480477 // ID еды
    
    set #i 1 // Просто
    set #rem 0 // переменные
    ////////////////////////////////////
    
    :1
    set #i #i + 1 // переменная i отвечает за еду
    
    if #i > 30 // после того, как затамим 30 лошадей, будем кушать
    goto eat
    end_if
    
    if #rem > 2 // Если последние три сообщения подряд были - Horse remembers you, значит лошади нас помнят, ждём, когда они нас забудут 
    wait 10m
    end_if
    
    send F1 // TargetNext
    wait 500
    
    :2
    send F2 // Skill: AnimalTaming
    waitfortarget 10000
    send F3 500 // LastTarget
    
    repeat 70
    if (lastmsg = $a) or (lastmsg = $b) or (lastmsg = $f) // Затамили
    set #rem 0
    goto 3 // Идём растамливать
    end_if
    if (lastmsg = $e) // Лошадь нас помнит
    set #rem #rem + 1
    goto 3 // Идём растамливать
    end_if
    if (lastmsg = $c) // У нас не получилось затамить
    set #rem 0
    goto 2 // Идём тамить
    end_if
    if (lastmsg = $d) or (lastmsg = $g) or(lastmsg = $other) or(lastmsg = $other2) // Посторонние сообщения
    set #rem 0
    goto 1 // Идём тамить
    end_if
    wait 300
    end_repeat
    
    goto 1
    
    :3
    say all release // Растамливаем
    repeat 100
    if lastmsg all release
    break
    end_if
    wait 300
    end_repeat
    goto 1 // Идём тамить
    
    
    :eat
    set #i 0
    set lastobjectid #eda
    repeat 3
    send F7 // LastObject
    wait 700
    end_repeat
    goto 1

    Цитата Сообщение от Vaserman
    Народ,а кто-нить может написать скрипт,что бы реколиться по нескольким рунам.
    1. Менеджер рекола
    2. подробности в скрипте
    3. в скрипте написано
    4. 1.07 beta 8 и далее

    Код:
    // Recall Manager v1.0 Beta (c) Just StreameR
    // Идея не моя, а Zanzarah'a, с форума UOPilot'a
    // Обращайтесь к скрипту через пати (например, /1 home - скрипт среколится домой /1 brit - скрипт среколится в британию)
    // Не забудьте поменять id рун
    // 06.05.2005 - рождение скрипта
    // Биндим кнопки:
    // F8 - LastSpell, WaitForTarget, LastTarget
    
    ///////////// Base of runes \\\\\\\\\\\\\
    set %rune [ 1 1 ] 1079120631 // home
    set %rune [ 1 2 ] home
    set %rune [ 2 1 ] 1079260510 // moon
    set %rune [ 2 2 ] moon
    set %rune [ 3 1 ] 1079260510 // bg
    set %rune [ 3 2 ] bg
    set %rune [ 4 1 ] 1079260512 // brit
    set %rune [ 4 2 ] brit
    set %rune [ 5 1 ] 1079260510 // bd
    set %rune [ 5 2 ] bd
    set %rune [ 6 1 ] 1079260510 // minoc
    set %rune [ 6 2 ] minoc
    
    set #vsego_run 6
    ////////////////////\\\\\\\\\\\\\\\\\\\\\
    set #ok random 99
    
    say ok#ok
    while_not (lastmsg ok#ok)
    wait 10
    end_while
    
    :start
    while_not (lastmsg Note to self)
     wait 50
    end_while
    
    set #i 1
    repeat #vsego_run
    set $rr %rune [ #i 2 ]
    if lastmsg = $rr
    say /1 Recalling to $rr
    goto recall
    end_if
    set #i #i + 1
    end_repeat
    
    say /1 There is no such rune in the base
    say ok#ok
    while_not (lastmsg ok#ok)
    wait 10
    end_while
    goto start
    
    
    :recall
    if mana < 12
    say /1 Warning! Your _mana < 12! Waiting ...
    wait 4000
    goto recall
    end_if
    
    set #runeid %rune [ #i 1 ]
    
    set lastspell 31
    set lasttargetid #runeid
    set lasttargetkind 1
    wait 100
    
    :fiz
    send F8 400
    
    repeat 50
     if lastmsg The spell
      say /1 Your spell fizzles, recalling...
      goto fiz
      else
      wait 100
     end_if
    end_repeat
    
    say ok#ok
    while_not (lastmsg ok#ok)
    wait 10
    end_while
    goto start

  5. #165

    По умолчанию

    Народ помогите на пилоте написать простенький скрипт что делать бутылки!

  6. All Seeing Eye

    Регистрация
    31.10.2001
    Адрес
    [Evil-Light]
    Сообщений
    2,661
    #166

    По умолчанию

    Цитата Сообщение от COBECTb
    Народ помогите на пилоте написать простенький скрипт что делать бутылки!
    Вы говорите про алхимию или про тинкеринг?
    Вот простенький на тинкеринг:

    Код:
    :start
    say /1 ok
    double_left 915, 402 // TinkerTools
    
    repeat 50
    if 105, 53 7039843 // Меню появилось?
    goto 1
    else
    wait 300
    end_if
    end_repeat
    goto start
    
    :1
    double_left 106, 53 // Выбор лопаты в меню
    
    repeat 50
    if 58, 67 13553358 // Следующее меню появилось?
    goto 2
    else
    wait 300
    end_if
    end_repeat
    goto start
    
    :2
    double_left 58, 67 // Выбор бутылки
    
    repeat 20
    if (lastmsg Tinkering failed) or (lastmsg You put) or (lastmsg Your) // Сделали предмет?
    break
    end_if
    wait 700
    end_repeat
    goto start

  7. #167

    По умолчанию

    Скример, у меня к тебе вопрос... Есть мешок с кучей рун, реально ли написать скрипт на рекалл что бы каждый раз при вызове подпрограммы командой goto чар реколился на следующею руну? И что бы подпрограмма была одна для всех рун.
    Если сможешь напиши плз, очень надо

  8. #168

    По умолчанию

    Короче решил проблему очень просто.... =)

    set #i 1
    set $file c:\runes.txt
    set $cant you can't
    :again
    if ( lastmsg = $cant )
    set #ltid lasttargetid

    exec cmd.exe /c >>$file echo while_not (lastmsg done)
    exec cmd.exe /c >>$file echo wait 500
    exec cmd.exe /c >>$file echo end_while
    exec cmd.exe /c >>$file echo :recall#i
    exec cmd.exe /c >>$file echo send f11 //targetnext
    exec cmd.exe /c >>$file echo set lasttargetid #ltid
    exec cmd.exe /c >>$file echo send f10 //cast recall w84target lasttarget
    exec cmd.exe /c >>$file echo wait 5s
    exec cmd.exe /c >>$file echo if (lastmsg spell)
    exec cmd.exe /c >>$file echo goto recall#i
    exec cmd.exe /c >>$file echo end_if

    wait 100
    set #i #i + 1
    say Mark next runa - #i
    end_if
    wait 1000
    goto again
    end_script

    Суть проста.. берем мешок нужных рун, запускаем этот скрипт берем бинтик и начинаем по очереди ккликать на рунки...
    Cоздается файл runes.txt в котором собсно уже пробит скрипт на поочередный рекалл...
    что бы рекальнутся надо получить сообщение с сервера в моем случае это done, вы можете вставить все что угодно.

  9. Novice
    [Banned]
    Регистрация
    06.05.2005
    Адрес
    *Senses[SoulBringerS]*
    Сообщений
    76
    #169

    По умолчанию

    Цитата Сообщение от Sinbad
    Скример, у меня к тебе вопрос... Есть мешок с кучей рун, реально ли написать скрипт на рекалл что бы каждый раз при вызове подпрограммы командой goto чар реколился на следующею руну? И что бы подпрограмма была одна для всех рун.
    Если сможешь напиши плз, очень надо
    Если в псевдоподбке пилота есть dorand или doswich, то да=)

  10. #170

    По умолчанию

    Папский макрос на Бс версия 1.02

    Качает какой-нибудь левый скилл и бс.
    При перегрузке сам продает и продолжает качать до полного исчерпывания ресурсов.
    В конце продает и выдает звуковое сообщение о конце работы и останавливает скрипт.
    Скрипт забинден под короткие копья.

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

    П.с. талибан.вав измените на свой звуковой файл в формате вэйв брошенный в дир с пилотом.

    Код:
    send f11 //писмакинг
    double_left 857, 395 //еда
    wait 1s
    double_left 812, 400 //инги
    while_not 69, 64 2181747 //ждем открытия менюшки
    wait 100
    end_while
    if 200, 65 526344  //проверка на цвет (кончились ресурсы)
    goto stop
    end_if
    double_left 203, 60 //выбираем мечи
    while_not 236, 82 4877196 //ждемс менюшку
    if 237, 80 526344 //если нет копий то идем в стоп
    goto stop
    end_if
    wait 100
    end_while
    double_left 236, 82 //выбираем меню копий
    while_not 57, 66 5929876 // ждемс менюшки с копьем
    wait 100
    end_while
    double_left 57, 66 //куем пресловутое копье
    wait 7s
    if wght > 624 //если перевес то начинаем продавать копья
    :stop
    say Axel Sell
    wait 2s
    double_left 158, 91//это верхнее копье
    repeat 69
    if 151, 154 3230298 //проверка если это в натуре копье
    double_left 151, 154 //среднее копье
    wait 300
    end_if
    left 343, 202 //стрелка вниз
    wait 200
    if 148, 76 9208947 //если отмотали весь список то...
    break
    end_if
    end_repeat
    double_left 316, 423  //это ОК :)
    wait 2s
    if wght < 150 //если вес 150 то все и у вас больше нет копий
    alarm taliban.wav
    stop_script
    end_if
    end_if
    p.s.s Вместо посылки сообщения нажал детранслите... перевело все команды на русский =) так что если будут проблемы на меня не пинайте

  11. Adept
    [Banned]
    Регистрация
    19.11.2003
    Адрес
    [CerberuS]
    Сообщений
    958
    #171

    По умолчанию

    Прожу в 1000-й раз, напишите простой или любой скрипт для прокачки пойзонинга (poisoning).

    Все что нашёл не пашу... (нашёл не на Оскоме...)

  12. Мираж былого...
    Аватар для Devil Dun'Shaar
    Регистрация
    06.09.2003
    Адрес
    Devil Dun'Shaar [BoS]; Metotron [D-Tox]; enJoy | Devil
    Сообщений
    3,480
    #172

    По умолчанию

    Без хилинга - в фулл титане:
    Код:
    // надо сложить 255 бутылок с поизоном в один угол сумки так, чтобы бутыли были одна на одной
    // сумка с бутылками должна лежать на полу
    :b
    double_left 570, 579 // координаты бутылки с поизоном
    set #bot lastobjectid
    send end // useskill poisoning
    waitfortarget 3000
    set lasttargetid 1091200021 // ид оружия, которое травим
    send home // lasttarget
    waitfortarget 3000
    set lasttargetid #bot
    send home
    wait 5000
    goto b
    С хилингом (без фулл титана):
    Код:
    // надо сложить 255 бутылок с поизоном в один угол сумки так, чтобы бутыли были одна на одной
    // сумка с бутылками должна лежать на полу
    :b
    double_left 570, 579 // координаты бутылки с поизоном
    set #bot lastobjectid
    if hits < str
    goto heal
    end_if
    send end // useskill poisoning
    waitfortarget 3000
    set lasttargetid 1091200021 // ид оружия, которое травим
    send home // lasttarget
    waitfortarget 3000
    set lasttargetid #bot
    send home
    wait 5000
    goto b
    
    :heal
    if stam < 60
    gosub s
    end_if
    double_left 420, 580 // bandage
    waitfortarget 3000
    left 291, 48 // statusbar
    wait 3s
    goto b
    
    :s
    double_left 397, 594 //refresh
    wait 100
    return

  13. Novice
    [Banned]
    Регистрация
    06.05.2005
    Адрес
    *Senses[SoulBringerS]*
    Сообщений
    76
    #173

    По умолчанию

    В скриптинг пилота не вникал особо, все знания из сферы.
    Вопрос-
    чем в пилоте отличается var от Set.
    Или перпменные var грузят проц?)

  14. Мираж былого...
    Аватар для Devil Dun'Shaar
    Регистрация
    06.09.2003
    Адрес
    Devil Dun'Shaar [BoS]; Metotron [D-Tox]; enJoy | Devil
    Сообщений
    3,480
    #174

    По умолчанию

    в пилоте просто нету "var"-ов

  15. Novice
    [Banned]
    Регистрация
    06.05.2005
    Адрес
    *Senses[SoulBringerS]*
    Сообщений
    76
    #175

    По умолчанию

    Цитата Сообщение от Devil Dun'Shaar
    в пилоте просто нету "var"-ов
    хммм...я в каком-то ривежне читал, что есть, тогда сенкс.
    П.С. Ты куда в асе пропал?

  16. The Truth is Out There

    Регистрация
    14.11.2004
    Адрес
    ex-BELOMOR[D-Tox].
    Сообщений
    10,610
    #176

    По умолчанию

    Про скрипт на пойзонинг ..
    Вопрос , как мне в пилоте узнать ИД того оружия , которое пойзонить надо ..
    Или это надо узнать только через ЗПО?

  17. Мираж былого...
    Аватар для Devil Dun'Shaar
    Регистрация
    06.09.2003
    Адрес
    Devil Dun'Shaar [BoS]; Metotron [D-Tox]; enJoy | Devil
    Сообщений
    3,480
    #177

    По умолчанию

    Кидаешь прицел на оружие, лежащее в паке/прилоченное на полу. Лезешь в пилоте в закладку еще. Там тыкаешь на кнопку "Char Parameters" и в графе LastTargetID смотришь этот показатель.

  18. Expert

    Регистрация
    13.03.2005
    Адрес
    [KACTA]
    Сообщений
    546
    #178

    По умолчанию

    Стример,я чужие скрипты неочень понимаю,но товй,насколько я понял, не учитывает то,что после введения антмакроса на энимал таминг после того,как скил прирос на 0.2 включается счетчик на полчаса и в течении этого временилюбая попытка затамить не повысит скилл.Если в течении этого времени(ну скажем после 20 минут после последней попытки) затамить еще одну животину,то счетчик сбрасывается и включается заново. кароче суть в том,что нужен скрипт,который увеличиват скилл на 0.2,потом полчаса чар просто тупо стоит и по истечении этого времени снова начинает тамить.

  19. Мираж былого...
    Аватар для Devil Dun'Shaar
    Регистрация
    06.09.2003
    Адрес
    Devil Dun'Shaar [BoS]; Metotron [D-Tox]; enJoy | Devil
    Сообщений
    3,480
    #179

    По умолчанию

    А вот счетчик вставить видимо непосильная задача...
    Вот тебе скрипт со счетчиком...
    Код:
    set $not you can't
    set $ok it seems to accept
    set $fail you fail to tame
    set $skill your skill
    set $already is already tame
    set $you you see
    set $fizzl the spell fizzles
    set $mas you are your own
    set #i 0
    :begin
    send delete // LastSkill
    waitfortarget 3000
    left 936, 19 
    repeat 29
    :re
    send end // LastSkill - WaitForTarget - LastTarget
    wait 5000
    set timer
    while_not lastmsg = $ok or lastmsg = $skill or lastmsg = $already
    if lastmsg = $already
    break 1
    end_if
    if timer > 30000
    goto re
    end_if
    if lastmsg = $fail
    goto re
    else
    end_if
    if lastmsg = $not or lastmsg = $you or lastmsg = $mas
    break
    else
    end_if
    if lastmsg=$ok
    set #i #i + 1
    if #i = 2
    wait 30m
    set #i 0
    end_if
    end_if
    end_while
    say all release
    send home // TargetNext
    wait 1000
    end_repeat

  20. Expert

    Регистрация
    31.12.2004
    Адрес
    [Green Town]-[Chaos Legion]***olo***
    Сообщений
    497
    #180

    По умолчанию

    Девил, а как сделать чтобы после того как скилл вырастет на 0,2 прлчаса не просто стоял, а качал например провокацию или любой другой скилл?

Ваши права

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