Одеваниелука,меча(не флуд)

Ask for scripts here

Moderators: Murderator+, Murderator

Post Reply
xarek
Posts: 115
Joined: 2006-03-08 20:53:28

Одеваниелука,меча(не флуд)

Post by xarek »

Давно года два назад у меня был очень хороший скрипт на одевалку лука и меча, вообщем жал на одну кнопку и уменя одевался лук жал на эту же кнопку и у меня одевался щит и меч или там алебка вообщем то что у меня было в руках до того как я одел лук. поможете?
SAMURAI
Posts: 203
Joined: 2004-07-10 00:38:43
Location: From DrW
Contact:

Post by SAMURAI »

Code: Select all

set arm 'arm'
Запомнить одетый айтем

Code: Select all

arm 'arm'
Одеть запомненный айтем

Code: Select all

sub arm() 
Var bow='0x13FC'
UO.Equipt('Lhand',bow)
wait(100)
end sub
Одевает лук или арбаль, в зависимости от типа...

Дальше разберёшся что к чему лепить?...)
Нет ничего невозможного...
Кто ИЩЕТ, тот всегда найдёт...

Code: Select all

sub UO() 
UO.Chto-To("S Chem-To")
end sub

© I'm
xarek
Posts: 115
Joined: 2006-03-08 20:53:28

Post by xarek »

Неа:) вообще ничего не втыкнул:) а ты не можешь мне написать его?:)
SAMURAI
Posts: 203
Joined: 2004-07-10 00:38:43
Location: From DrW
Contact:

Post by SAMURAI »

На одну немогу, моСКа нехватит...) :roll: :roll:
На 2 тоже - лень...) :roll:
На 3 - я тебе уже дал...)
Нет ничего невозможного...
Кто ИЩЕТ, тот всегда найдёт...

Code: Select all

sub UO() 
UO.Chto-To("S Chem-To")
end sub

© I'm
to4a
Posts: 265
Joined: 2006-03-10 00:19:11
Location: http://drw.ru/

Post by to4a »

SAMURAI wrote:На одну немогу, моСКа нехватит...) :roll: :roll:


да что там того моска то надо, через глобалы - легко, или через проверку по типу итема в руках
DRW - Glorior Belli
Image
I'm
Expert!
Posts: 1396
Joined: 2004-10-15 22:38:04
Location: Moscow City.
Contact:

Post by I'm »

Покажите мне проблему.
Может быть спросонья не вижу? :roll:
The End.
xarek
Posts: 115
Joined: 2006-03-08 20:53:28

Post by xarek »

блин ну помогите плз) я просто даже предтавление не умею как это сделать:)
Rivory
Posts: 205
Joined: 2005-01-06 11:49:28

Post by Rivory »

Code: Select all

sub mechluk()
var mech = '0x0000'
var shield = '0x0000'
var luk = '0x0000'

if uo.getgraphic(uo.objatlayer('RHand')) == mech or uo.getgraphic(uo.objatlayer('LHand')) == mech then
  uo.setarm('myarm1')
  uo.usetype(luk)
end if

if uo.getgraphic(uo.objatlayer('LHand')) == luk then
  uo.arm ('myarm1')
end if
end sub


Скрипт писал минуту, не пороверял, ради такого бреда, лень даже УО открывать.
Last edited by Rivory on 2007-06-19 22:38:44, edited 3 times in total.
to4a
Posts: 265
Joined: 2006-03-10 00:19:11
Location: http://drw.ru/

Post by to4a »

Rivory wrote:if uo.getgraphic(uo.objatgump('LArm')) = mech then


в 1 строке 3 ошибки)
1) uo.objatlayer(...)
2) Lhand и то если меч двуручный иначе Rhand
3) ==

и лучше юзать equip вместо usetype
DRW - Glorior Belli
Image
xarek
Posts: 115
Joined: 2006-03-08 20:53:28

Post by xarek »

помогите он че то не одевает ничего, пишет Invalid layer name
targitai25
Posts: 11
Joined: 2005-04-13 17:37:25

Post by targitai25 »

Code: Select all

sub BowGet() 
uo.findtype ('0x13B1',-1,'backpack')
if Uo.ContainerOf('finditem')==Uo.GetSerial('backpack') then
UO.Setarm('BowArm')
uo.waittargetobject('laststatus')
uo.usetype('0x13B1')
uo.print('Лук')
else
UO.Arm('BowArm')
uo.print('Меч')
end if
UO.Attack('laststatus')
end sub
Стадо баранов управляемое львом сильнее,
чем стадо львов управляемое бараном!
Post Reply