Плавка дагеров!

Ask for scripts here

Moderators: Murderator+, Murderator

Post Reply
Toxa_
Posts: 8
Joined: 2008-01-23 22:33:11

Плавка дагеров!

Post by Toxa_ »

Пожалусто виложити скрипт на плавку дагеров, их очень много в сумке =)) спс зарание!
Kynep
Expert!
Posts: 1348
Joined: 2006-02-07 08:51:40
Location: г. Старый Оскол
Contact:

Re: Плавка дагеров!

Post by Kynep »

Toxa_ wrote:Пожалусто виложити скрипт на плавку дагеров, их очень много в сумке =)) спс зарание!


Code: Select all

sub smelt()

VAR dagger = '' #Тип даггера
VAR forge = '' #ID форжа

UO.FindType(dagger, '-1', 'backpack')
If UO.FindCount() > 0 then
  repeat
    UO.DeleteJournal()
    UO.WaitTargetObject('finditem')
    wait(100)
    UO.UseObject(forge)
    repeat
       wait(100)
    until UO.InJournal('You put') or UO.InJournal('in fire')
    wait(1000)
    UO.FindType(dagger, '-1', 'backpack')
  until not UO.FindCount()
end if
end sub
Last edited by Kynep on 2008-02-05 09:20:54, edited 1 time in total.
Toxa_
Posts: 8
Joined: 2008-01-23 22:33:11

Post by Toxa_ »

столкнулся с проблемой мне скрипт не работает.
не пойму что не правельно делаю.

,инфо НОЖИКА
ID=0x400549F6 Type=0x0F51 MDCLKMD Name=
Quantity: 1 Colour: 0x0641 Layer: 0 Has: 1
X=95 Y=106 Z=0 C=0x40123FEF F=0x00
,инфо Форжджа
ID=0x400B9DBF Type=0x0FB1 ZSRILMD Name=
Quantity: 0 Colour: 0x0000 Layer: 0 Has: 0
X=2348 Y=864 Z=0 C=0xFFFFFFFF F=0x00

подредоктируйте пожалусто и если не трудно обесните что куда записывали! Спс зарание :wink:
stickman
Posts: 139
Joined: 2005-04-05 04:13:24
Location: DRW
Contact:

Post by stickman »

все работает. просто кто-то забыл ' ' тут поставить

Code: Select all

UO.WaitTargetObject('finditem')

Code: Select all

sub smelt() 

VAR dagger = '0x0F51' #Тип даггера
VAR forge = '' #ID форжа

UO.FindType(dagger, '-1', 'backpack')
If UO.FindCount() > 0 then
  repeat
    UO.DeleteJournal()
    UO.WaitTargetObject('finditem')
    wait(100)
    UO.UseObject(forge)
    repeat
       wait(100)
    until UO.InJournal('You put') or UO.InJournal('in fire')
    wait(1000)
    UO.FindType(dagger, '-1', 'backpack')
  until not UO.FindCount()
end if
end sub
Mindfreak
Posts: 8
Joined: 2008-01-31 11:28:06

Post by Mindfreak »

не забыл, а защита от нубоф
Kynep
Expert!
Posts: 1348
Joined: 2006-02-07 08:51:40
Location: г. Старый Оскол
Contact:

Post by Kynep »

stickman wrote:все работает. просто кто-то забыл ' ' тут поставить


:roll: :roll: :roll: :oops: бывает )))
На работе писал, торопился, чтоб не запалили )))
stickman
Posts: 139
Joined: 2005-04-05 04:13:24
Location: DRW
Contact:

Post by stickman »

Mindfreak wrote:не забыл, а защита от нубоф

:lol:

2Купер:
да ладно отмазываться ))
лучше випку покупай и меня в гости зови :roll:
Kynep
Expert!
Posts: 1348
Joined: 2006-02-07 08:51:40
Location: г. Старый Оскол
Contact:

Post by Kynep »

stickman wrote:
2Купер:
да ладно отмазываться ))
лучше випку покупай и меня в гости зови :roll:


Ух ты какой ))) седня куплю ))), тока вот инвизок не ма (((
Toxa_
Posts: 8
Joined: 2008-01-23 22:33:11

Post by Toxa_ »

Ммм теперь он работает но как то страно мне к примеру он включён он сплавит 3-4 дагера и всё и стоит всём проблема? :shock:
Post Reply