Напишите скрипт на перетаскивание рун по координатам?

Anything and all.

Moderators: Murderator+, Murderator

TSD Praetorian
Posts: 42
Joined: 2004-11-03 11:39:56
Contact:

Напишите скрипт на перетаскивание рун по координатам?

Post by TSD Praetorian »

Сабж, пожалуйста. И еще: как на инже узнать координаты точки?
Askaneli
Sphere expert
Posts: 1143
Joined: 2004-10-01 08:27:38
Location: Уфа

Re: Напишите скрипт на перетаскивание рун по координатам?

Post by Askaneli »

TSD Praetorian wrote:Сабж, пожалуйста. И еще: как на инже узнать координаты точки?

Координаты тайла ,infotail и прицелом на тайл.
Координаты итема ,info и прицелом на итем.
А координаты руны я ХЗ блин.
Сделал дело - флуди смело !!!
Savage
Expert!
Posts: 1205
Joined: 2004-04-04 11:13:54
Location: Балаково, Саратовская обл.
Contact:

Post by Savage »

Лучше бы подробно объяснил что скрипт должен делать.
TSD Praetorian
Posts: 42
Joined: 2004-11-03 11:39:56
Contact:

Post by TSD Praetorian »

Вот я крафтаю рунки - качаю карпентри, когда крафтается рунка, она летит в трашкан, буду очень признателен, если напишете...
autopilot
Posts: 57
Joined: 2004-07-25 05:16:04

Post by autopilot »

Возьми скрипти на карентри и впиши всего 2 строчки.. Это даже я смог бы сделать. !
Askaneli
Sphere expert
Posts: 1143
Joined: 2004-10-01 08:27:38
Location: Уфа

Post by Askaneli »

autopilot wrote:Возьми скрипти на карентри и впиши всего 2 строчки.. Это даже я смог бы сделать. !

Ваще с проверками и прочей лабудой штук 5-6 получается строк !!!
Сделал дело - флуди смело !!!
TSD Praetorian
Posts: 42
Joined: 2004-11-03 11:39:56
Contact:

Post by TSD Praetorian »

Ну напишите, пожалуйста, я плохо понимаю в скриптинге! :( Я вас очень-очень прошу! :(
Goggy
Posts: 291
Joined: 2004-11-07 01:22:35
Location: Черкассы
Contact:

Post by Goggy »

Code: Select all

############################Cортировка мешков в сундуке##########

sub Sort()
 dim tmpBags[254]
 dim Bags[254]
 var s,z,c,n,x,y
 var i = 0
 var bag
uo.Print('Выбери Мусорку :)...')
uo.Exec('addobject bag')
while uo.Targeting()
wait(100)
wend
uo.DeleteJournal()
# var bag = '0x40089941'

 UO.Resend()
 UO.UseObject('bag')
 wait(1000)

# Ищем все мешочки в bag и заносим в массив
 UO.Useobject('bag')
 UO.findtype('0x0E76','-1','bag')
 while UO.FindCount()>0
  tmpBags[i] = UO.GetSerial("finditem")
  i = i + 1
  UO.Ignore("finditem")
  wait(100)
  UO.findtype('0x0E76','-1','bag')
 wend
 UO.IgnoreReset()
 i = i - 1

# Сортируем полученный массив по возрастанию серийника

 for s = 0 to i
  c = 0
  for z = 0 to i
   if tmpBags[s]>tmpBags[z] then
    c = c + 1
   endif
  next
  Bags[c] = tmpBags[s]
 next

# Раскладываем мешочки согласно сортировке

 for n = 0 to 254
  if Bags[n] then
   x = 28 + (n-10*int(n/10))*12
   y = 53 + int(n/10)*15
   UO.moveitem (Bags[n], 1, 'bag', str(x), str(y), 0)
   wait(1500)
  endif
 next
end sub


Вот те скриптик на сортировку мешочков чемодане указаном прицелом, а теперь просто подумай как его переделать что перетягивал руны и сортировал...
На халяву ненадейся!!! :wink:
TSD Praetorian
Posts: 42
Joined: 2004-11-03 11:39:56
Contact:

Post by TSD Praetorian »

Ну я бот тупой, че вы в самом-то деле? Издиваетес... :((
Goggy
Posts: 291
Joined: 2004-11-07 01:22:35
Location: Черкассы
Contact:

Post by Goggy »

Аж это всётаки для тебя сказал, чтоб ты хоть чемуто научился...
Я ведь тоже чтоб нифига не делать могу зайти и клянчать, крича что я тупорылый бот. Такчто учись здесь всё элементарно :wink:
BETEPAH
Expert!
Posts: 838
Joined: 2004-05-31 09:31:51
Contact:

Post by BETEPAH »

Сделай так

Code: Select all

uo.SetReceivingContainer('Помойка')  
uo.FindType(Вид рунки в паке )
if uo.GetQuantity('finditem')>0 then
uo.Grab('0','finditem')
uo.UnSetReceivingContainer('помойка')


Это нужно вставить в скрипт сразу после крафта рунки ..... что она делает .......ищет рунку в паке и бросает ее в помойку.
Все просто.
BETEPAH ™
Goggy
Posts: 291
Joined: 2004-11-07 01:22:35
Location: Черкассы
Contact:

Post by Goggy »

BETEPAH wrote:Сделай так

Code: Select all

uo.SetReceivingContainer('Помойка')  
uo.FindType(Вид рунки в паке )
if uo.GetQuantity('finditem')>0 then
uo.Grab('0','finditem')
uo.UnSetReceivingContainer('помойка')


Это нужно вставить в скрипт сразу после крафта рунки ..... что она делает .......ищет рунку в паке и бросает ее в помойку.


Фу чтото я на втыке жестоком...
Мне показалось чтоб ему по координатам расфасовывать в сундучке их :mrgreen:
TSD Praetorian
Posts: 42
Joined: 2004-11-03 11:39:56
Contact:

Post by TSD Praetorian »

BETEPAH wrote:Сделай так

Code: Select all

uo.SetReceivingContainer('Помойка')  
uo.FindType(Вид рунки в паке )
if uo.GetQuantity('finditem')>0 then
uo.Grab('0','finditem')
uo.UnSetReceivingContainer('помойка')


Это нужно вставить в скрипт сразу после крафта рунки ..... что она делает .......ищет рунку в паке и бросает ее в помойку.


Т.е. скрипт будет выглядеть так:

Code: Select all

Sub Tresh()
uo.SetReceivingContainer('0x4F825C0D') \\ИД трашкана
uo.FindType(0x1F14) \\ в апострафах или просто так надо писать тип?
if uo.GetQuantity('finditem')>0 then
uo.Grab('0','finditem')
uo.UnSetReceivingContainer('0x4F825C0D')
end sub


???????????
BETEPAH
Expert!
Posts: 838
Joined: 2004-05-31 09:31:51
Contact:

Post by BETEPAH »

нет вот так

Code: Select all

sub Tresh() 
uo.SetReceivingContainer('0x4F825C0D')
uo.FindType(0x1F14)
if uo.GetQuantity('finditem')>0 then
uo.Grab('0','finditem')
uo.UnSetReceivingContainer('0x4F825C0D')
endif
end sub


Но можно и не делать все это отдельным скриптом а просто "пихнуть" в " Тело" основного скрипта
Все просто.
BETEPAH ™
Askaneli
Sphere expert
Posts: 1143
Joined: 2004-10-01 08:27:38
Location: Уфа

Post by Askaneli »

BETEPAH wrote:нет вот так

Code: Select all

sub Tresh() 
uo.SetReceivingContainer('0x4F825C0D')
uo.FindType(0x1F14)
if uo.GetQuantity('finditem')>0 then
uo.Grab('0','finditem')
uo.UnSetReceivingContainer('0x4F825C0D')
endif
end sub


Но можно и не делать все это отдельным скриптом а просто "пихнуть" в " Тело" основного скрипта


Code: Select all

sub Tresh()  
uo.FindType(0x1F14)
if uo.GetQuantity('finditem')>0 then
uo.SetReceivingContainer('0x4F825C0D')
uo.Grab('0','finditem')
uo.UnSetReceivingContainer()
end if
end sub

)))))
Сделал дело - флуди смело !!!
TSD Praetorian
Posts: 42
Joined: 2004-11-03 11:39:56
Contact:

Post by TSD Praetorian »

BETEPAH wrote:нет вот так

Code: Select all

sub Tresh() 
uo.SetReceivingContainer('0x4F825C0D')
uo.FindType(0x1F14)
if uo.GetQuantity('finditem')>0 then
uo.Grab('0','finditem')
uo.UnSetReceivingContainer('0x4F825C0D')
endif
end sub


Но можно и не делать все это отдельным скриптом а просто "пихнуть" в " Тело" основного скрипта


Приходится вручную нажимать Ран Функш Треш, что бы он по одной рунке трешал :( А что бы сам постоянно? Я бы отошел от компа, а он трешал бы...
BETEPAH
Expert!
Posts: 838
Joined: 2004-05-31 09:31:51
Contact:

Post by BETEPAH »

мдя .......скопируй скрипт свой сюда.
Клинический случай........... Свой Скрит в который тебе надо вставить сброс ..
Все просто.
BETEPAH ™
TSD Praetorian
Posts: 42
Joined: 2004-11-03 11:39:56
Contact:

Post by TSD Praetorian »

sub Tresh()
uo.SetReceivingContainer('0x4F825C0D')
uo.FindType(0x1F14)
if uo.GetQuantity('finditem')>0 then
uo.Grab('0','finditem')
uo.UnSetReceivingContainer('0x4F825C0D')
endif
end sub
Askaneli
Sphere expert
Posts: 1143
Joined: 2004-10-01 08:27:38
Location: Уфа

Post by Askaneli »

М-да. Уже можно матерится ???
Сделал дело - флуди смело !!!
BETEPAH
Expert!
Posts: 838
Joined: 2004-05-31 09:31:51
Contact:

Post by BETEPAH »

Фараон стукни в асю.
Все просто.
BETEPAH ™
Locked