Page 1 of 2
автострелка
Posted: 2006-04-14 10:30:00
by Old Holy.
Собстно ребят помогите зделать скрипт, чтобы кидал стрелку по ник, например если окло меня есть чар с ником "lol" он в него кидал стрелку, и вообще обьясните мне, возможно ли зделать такой скрипт, заранее благодарен...
Posted: 2006-04-14 10:52:02
by flake
Возможно. Но по нику будет менее надежно, чем по айди. Если тебе нужен именно конкретный человек/несколько людей, то лучше по айди.
1.Ищим вокруг себя чаров по типу.
2. Сравниваем айди найденного с айди нужного.
3. Если подходит - стрелка и выход.
4. Если не подходит - в Игнор с сново пункт 1.
Posted: 2006-04-14 11:47:09
by SLAK
flake wrote:Возможно. Но по нику будет менее надежно, чем по айди. Если тебе нужен именно конкретный человек/несколько людей, то лучше по айди.
1.Ищим вокруг себя чаров по типу.
2. Сравниваем айди найденного с айди нужного.
Зчем поиск ведь ИД известен? Просто через гетдистанс, если в зоне действия кастовать если нет ждём дальше..
Posted: 2006-04-14 12:22:40
by Old Holy.
Ребят
как узнать айди?
Через ,info (lol) пробывал, всё по нулям...
Зделайте такой скриптик, просто скажие куда вписать айди, СПАСИБО
Posted: 2006-04-15 09:03:53
by BigMouseI
,info и прицелом на чара
Posted: 2006-04-15 10:57:47
by Old Holy.
ну а дальше??
пример: ID=0x00053A00 Type=0x0190 Name=
Quantity: 0 Colour: 0x0000 Layer: 0 Has: 0
X=65535 Y=65535 Z=0 C=0xFFFFFFFF F=0x00
Posted: 2006-04-15 12:05:17
by BigMouseI
Самое простое:
Code: Select all
sub strelka()
UO.Waittargetobject('0x00053A00')
UO.Cast('Magic Arrow')
end sub
Posted: 2006-04-15 19:18:43
by Old Holy.
А как зделать задержку? Вот когда он кидает стрелку и находит ещё одного он кидает в него, а если их нету, то он просто быстро пропускает??? И кидает в того кого нашёл в списке, айди!
Posted: 2006-04-15 20:49:54
by BigMouseI
Old Holy. wrote:А как зделать задержку? Вот когда он кидает стрелку и находит ещё одного он кидает в него, а если их нету, то он просто быстро пропускает??? И кидает в того кого нашёл в списке, айди!
Code: Select all
sub strelka()
var time = 1500
var n
Dim A[2]
A[1] = '0x00053A00'
A[2] = '0x00000000'
FOR n=1 TO 2
UO.Findobject(A[n], '-1', 'ground')
If UO.FindCount() then
UO.Waittargetobject(A[n])
UO.Cast('Magic Arrow')
wait(time)
endif
NEXT
end sub
пробуй..
Posted: 2006-04-15 23:43:09
by Old Holy.
А куда добавлять новые айди играков??
Скрипт не пашет, вот чё пишет: Line 9: Function not found - uo.findobject
Posted: 2006-04-15 23:44:34
by Destruction
Old Holy. wrote:А куда добавлять новые айди играков??
Code: Select all
Dim A[2]
A[1] = '0x00053A00'
A[2] = '0x00000000'
FOR n=1 TO 2
Ну вообще так незя.. Ну ладно.
Posted: 2006-04-15 23:47:54
by Old Holy.
Скрипт не пашет, вот чё пишет: Line 9: Function not found - uo.findobject
Posted: 2006-04-16 00:02:37
by Destruction
Old Holy. wrote:Скрипт не пашет, вот чё пишет: Line 9: Function not found - uo.findobject
Замени на uo.FindType()
Posted: 2006-04-16 00:09:37
by Grin
я не пойму поголовная эпидемия мастдаев?;)
скаких пор объекты ищатся через фанд тайп???
Posted: 2006-04-16 00:11:37
by Destruction
Grin wrote:я не пойму поголовная эпидемия мастдаев?;)
скаких пор объекты ищатся через фанд тайп???
Незнаю, но через финдобджект вообще не исчуцца.
Если честно - вникать лень было, виноват вероятно.
Posted: 2006-04-16 00:14:27
by flake
Code: Select all
sub strelka()
var time = 1500 ; сюда время для задержки после каста.
var n
Dim A[2]
Ad[1] = '0x00053A00' ; сюда вставляем айдишники
Ad[2] = '0x00000000' ;
for n = 1 to 2
if uo.getdistance(Ad[n]) < 15 then
uo.cast( 'Magic Arrow', Ad[n] )
wait(time)
endif
next
end sub
Posted: 2006-04-16 00:15:26
by Grin
Чего там вникать то? пара строчек...
Зачем писать тогжа?;)
Posted: 2006-04-16 20:49:28
by Old Holy.
Опять Line 9: Function not found - uo.findobject
Posted: 2006-04-17 01:10:15
by flake
Ты какой скрипт взял? Тот, что в моем предыдущем посте? Там вообще ФайндАйтемом не пахнет.
Posted: 2006-04-17 05:28:06
by Old Holy.
Етот и взял, вставил туда всей айди, и вот что получилось...
Code: Select all
sub strelka()
var time = 1500 ; сюда время для задержки после каста.
var n
Dim A[20]
Ad[1] = '0x0002616B' ; сюда вставляем айдишники
Ad[2] = '0x00022256'
Ad[3] = '0x00029B3E'
Ad[4] = '0x00016780'
Ad[5] = '0x00031991'
Ad[6] = '0x00057EC3'
Ad[7] = '0x0001F68C'
Ad[8] = '0x00032126'
Ad[9] = '0x0000D386'
Ad[10] = '0x00017001'
Ad[11] = '0x0005C85C'
Ad[12] = '0x0003C2DB'
Ad[13] = '0x00021881'
Ad[14] = '0x0004F893'
Ad[15] = '0x0001A082'
Ad[16] = '0x0002A1C9'
Ad[17] = '0x000028C3'
Ad[18] = '0x0005A2F6'
Ad[19] = '0x00003320'
Ad[20] = '0x00040ACF'
for n = 1 to 2
if uo.getdistance(Ad[n]) < 15 then
uo.cast( 'Magic Arrow', Ad[n] )
wait(time)
endif
next
end sub
Сам попробуй, запустить...