Перейти к содержанию
Форум шарда Middle-Earth

wizardme

Members
  • Публикаций

    15
  • Зарегистрирован

  • Посещение

Репутация

0 Обычный

Информация о wizardme

  • Звание
    Member
  1. Не спеша буду сюда вставлять несложные скрипты, облегчающие жизнь. 1. Скрипт на перенос в бекпак нужных вещей. Нужно указать в скрипте id контейнера, в котором лежит, то что вы хотите взять. Дальше указываете тип, цвет и количество, а скрипт все переносит. После этого у вас будет ровно такое количество предметов, которое вы указали. sub toGet() var i,get,meshok dim toGetType[20],toGetColor[20],toGetQuan[20] #### Настройка скрипта #### Указываем контейнер meshok=0x7E720AFA ## id контейнера где у вас лежит, то что вы будете брать #### # в чате пишем ,info и указываем предмет, который вас интересует # берем тип (type) и цвет (colour) # ID=0x40B39A23 _Type=0x0E21_ DLBLJND Name=13 clean bandages # Quantity: 13 Colour: _0x0000_ Layer: 0 Has: 1 # X=68 Y=69 Z=0 C=0x7E846D22 F=0x00 ####### указываем тип toGetType[1]='0x0DD6' #fish toGetType[2]='0x0DD6' #fish toGetType[3]='0x0F0E' #gh toGetType[4]='0x0E21' #bandages toGetType[5]='0x0F84' #garlic toGetType[6]='0x0F8C' #s.ash toGetType[7]='0x0F85' #ginseng ####### указываем цвет toGetColor[1]='0x0029' # red toGetColor[2]='0x0009' #blue toGetColor[3]='0x0690' toGetColor[4]='0' toGetColor[5]='0' toGetColor[6]='0' toGetColor[7]='0' ####### указываем нужное количество toGetQuan[1]=3 toGetQuan[2]=3 toGetQuan[3]=2 toGetQuan[4]=250 toGetQuan[5]=15 toGetQuan[6]=15 toGetQuan[7]=15 ######## ######## Начало скрипта uo.useobject(meshok) wait(500) checklag() ######## for i=1 to 7 if uo.count(toGetType[i],toGetColor[i])<toGetQuan[i] then get=toGetQuan[i]-uo.count(toGetType[i],toGetColor[i]) uo.findtype(toGetType[i],toGetColor[i],meshok) uo.moveitem('finditem',get,'backpack') wait(1000) checklag() endif if uo.count(toGetType[i],toGetColor[i])>toGetQuan[i] then get=uo.count(toGetType[i],toGetColor[i])-toGetQuan[i] uo.findtype(toGetType[i],toGetColor[i],'backpack') uo.moveitem('finditem',get,meshok) wait(1000) checklag() endif next end sub Sub checklag() DelJournal("ackpack") UO.Click("backpack") repeat wait(100) until UO.InJournal("ackpack") end sub Sub DelJournal(msg) While UO.InJournal(msg) UO.SetJournalLine(UO.InJournal(msg) - 1,'') wend end sub
  2. Есть по 800 блад и целестит. 1к ашен. Около 4к фаер. icq 497722852
  3. sub Spar() uo.AddObject('opponent') While uo.Targeting() Wait(200) Wend While uo.SkillVal('Wrestling',1) < 1200 If uo.GetHP('opponent') < uo.GetMaxHP('opponent') / 1.8 Then uo.Warmode(0) Repeat Wait(2000) uo.WaitTargetObject('opponent') uo.Msg('.bandage') Until uo.GetHP('opponent') > uo.getMaxHP('opponent') / 1.1 EndIf Wait(500) uo.Attack('opponent') Wend uo.Warmode(0) End Sub Был на форуме. Сомневаюсь, что можно сделать проще.
  4. Не надо изобретать велосипед. На форуме есть работающий скрипт на спаринг.
  5. goto в скриптах лучше не использовать. Есть же на форуме работающий скрипт на фишинг.
  6. wizardme

    Скрипт на тайлоринг

    sub materials() while not uo.dead() uo.deletejournal('create') uo.deletejournal('make') uo.deletejournal('failed') checklag() uo.waittargettype('0x1766') uo.waitmenu('Choose a category.', 'carpets', 'Select', 'carpet1','Select', 'corner') uo.usetype('0x0F9D') repeat wait(1000) until uo.injournal("create|make|failed") wait(1000) checklag() rez() checklag() wend end sub Sub checklag() DelJournal("ackpack") UO.Click("backpack") repeat wait(100) until UO.InJournal("ackpack") end sub Sub DelJournal(msg) While UO.InJournal(msg) UO.SetJournalLine(UO.InJournal(msg) - 1,'') wend end sub sub rez() uo.waittargettype('0x0AC2') uo.usetype('0x0F9E') wait(1000) end sub
  7. Или поменяю на разные логи, реги, перья, алхимию. в игре Fury icq 497722852
  8. Предлагаю это на главную страницы мидлы выложить. Рост онлайна обеспечен.
  9. Убить new можно только багами, ты багоюзер, неоднократно убивал new в гвард зоне. К тому же матершинник. http://img686.imageshack.us/f/timkv.png/ Если тебя не накажут, то репутация данного сервера в моих глазах резко упадет. А вот и признание того, кто навсегда убирает тягу у новичков оставаться на этом риалме. http://img576.imageshack.us/f/confes.png/
  10. В 9:10 (московское время) 3 декабря http://img7.imageshack.us/f/nubikill.png/
  11. wizardme

    Обман

    Это можно посмотреть в логах общего чата с 12:00 по 12:15.
  12. http://middle-earth.ru/forum/index.php?showtopic=6325
  13. wizardme

    Обман

    Договорились с чаром DarkTampliers (он же Nepret) на обмен 27500 логов на 2 повер скролла и один грейт скролл (где- то в 12:00 29 ноября). Я посчитал что при цене 12 за лог, выйдет 330к, что вполне соответсвует рыночной цене трех скроллов. Так как Непрет добавился мне в аську и обсуждение проходи ло публично (по общему чату), то я позволил себе некоторую степень доверия Кто же знал, что меня собираются цинично обмануть. Я принес треть логов (9200), отдал ему, при этом он сказал, что первый скролл даст на второй ходке, а остальные после третьей. Тут была моя ошибка, стоило сразу по скроллу брать. На второй ходке (9200) логов он мне дал первый скролл. На третьей (9100) он меня пытался дать всего лишь один скролл вместо обещанных двух. На мои возражения о том, что нужен еще один скролл, он сказал что договор был на два скролла. На предложение обменять все обратно, я был несколько послан. Картинка прилагается. http://img543.imageshack.us/f/naeb3.png/ В итоге он у меня, получается, надул на 9200 логов. Так как дал один скролл за 18400 логов (220к в денежном эквиваленте). Прошу вас произвести обмен обратно. Забрать у меня этот розовенький скролл, а мне вернуть мои 18400 логов. Ну может и наказать этого обманщика. Спасибо.
  14. На чем тейлоринг качать, на коже или на ткани?
  15. Бинты не стакаются, пишет "buy price not equal".
×
×
  • Создать...