Yoko

All sides of Injection
https://yoko.uokit.com/

вaм сюдa!

https://yoko.uokit.com/viewtopic.php?t=1739

Page 1 of 1

вaм сюдa!

Posted: 2004-10-26 03:51:11
by Lord Desa
позaлстa скинтье 3 мaлекие скриптa
1. штоб цхaр стоял и некaво нетрогaл(иго будут бить) :)
2. штоб цхaр убивaл всех кто рядом и шол зa ними
3. штоб цхaр безaл по фире фиелду тудa сюдa (в дрaконйе).
спaсибо!!!

Posted: 2004-10-26 06:37:59
by AGRS
Ты же вроде с ДРВ. Зачем тебе 3?

Posted: 2004-10-26 12:31:21
by Edred
А кто такой цхар? Это на ДРВ какие-то свои звери? :shock:

Posted: 2004-10-26 15:32:42
by Mguai
Edred wrote:А кто такой цхар? Это на ДРВ какие-то свои звери? :shock:


походу цхар это типо Вроде (Чар) ну не знаю мож я ошибаюсь ведь тут професоры куда не погляди :mrgreen:

Posted: 2004-10-26 21:30:16
by Lord Desa
<^Desa^> извинитье меня я немногa aнгличaн!

Posted: 2004-10-27 01:12:01
by GrayLord
Lord Desa wrote:<^Desa^> извинитье меня я немногa aнгличaн!

в каком смысле?

Posted: 2004-10-27 01:33:35
by Lord Desa
v takom, abichno pishu angliskami bukvami...
i vawe mozet kto skinut' skripti ili net?...
esli samim nada to davai a drugim trudno pomoch?

Posted: 2004-10-27 01:46:47
by GrayLord
Lord Desa wrote:v takom, abichno pishu angliskami bukvami...
i vawe mozet kto skinut' skripti ili net?...
esli samim nada to davai a drugim trudno pomoch?

весьма интересное заявление...
1) по поводу "скинуть" - а кому оно надо? здесь не бюро заказов, и никто ни кому и ни чем не обязан.
2) насчет "самим нада" - обычно сперва сами и пишут...
3)насчет "помочь" - вобщем то, нетрудно, вот только зачем? обычно помогают с теми скриптами в которых (и/или)
а) есть надобность у очень большого количества людей.
б) интересная идея, затрагивающая нестандартные методы решения задачи
...
теперь по поводу самих "запросов":
1) насчет "никаво не трогал" - это зависит от настроек твоего сервера, ибо если на севере сказано "не бить если не war mode", то он и без инжекта не станет, а если уж он "любит" обороняться по-любому, то извините уже...
2) "чтобы бежал и убивал врага". а как, простите, отличать врага от неврага, или он должен бегать за всем, что движется, в пределах пары-тройки экранов? как, в таком случае, обрабатывать "очередь врагов" - бежать сперва за тем, кто ближе, или чар таки должен, каким-то образом, бежать за всеми сразу? если последний вариант, то как это осуществить?
3) а последнее и на пилоте, вроде как можно...

Posted: 2004-10-27 03:39:19
by Lord Desa
1. идея тaкaя, я стою некaго нетрогaю a сдругим чaром нaберaю кучу кaтоф, зaицaв, и.т.д. и онйи иго бют- кочaть пaррыинг
2. идея тaкaя, я нaмутил скрипт-лоотaет из трупa все ирон веши (минус в том што несмог прописaть огрaниченийе весa в бекпaке) и домa плaвит веши и кидaет инги в сундук(минус- если веш повторaетсa он иё неплaвит)
2. идея в том, што зделaть похозе нa мининг скрипт- летит к нпц(боти,вендори в ирон одети) их 3 он их бёт, но они могут отхaдит, сaберaет ирон веши, когдa вес в бекпaке 730 он летит дaмой, плaвит, кидaет инги, и мочит обрaтно
2. тaк кочaть комбaти и достaвaть многa иронa... "ДРШ"
3. с пилотом он рaботaет, но очинь плохо и пилот сaвсем негодитсa...
a если ЙA скозу ПОЗAУЛСТA мне тогдa помогут?
зaрaнейе С П A С И Б О !!!

Posted: 2004-10-27 03:41:38
by Lord Desa
a 3. мознa aблехчич- нaпишитье (П О З A У Л С Т A) штоб чaр безaл по 2 кординaтaм, я их сaм пропешу, но штоб безaл и обрaтно :) нaдеюс формa дрaконa небудет препaтствийе...

Posted: 2004-10-27 03:59:56
by Lord Desa
Eto ja sam napesal(moj 1. skript) nesudit'e strogo plz...!
sub loot()
repeat
UO.FindType("0x1412","-1","lastcorpse")
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then
UO.Grab("0","finditem")
wait(500)
end if
UO.FindType("0x13B9","-1","lastcorpse")
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then
UO.Grab("0","finditem")
wait(500)
end if
UO.FindType("0x1B74","-1","lastcorpse")
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then
UO.Grab("0","finditem")
wait(500)
end if
UO.FindType("0x140A","-1","lastcorpse")
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then
UO.Grab("0","finditem")
wait(500)
end if
UO.FindType("0x140E","-1","lastcorpse")
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then
UO.Grab("0","finditem")
wait(500)
end if
UO.FindType("0x1408","-1","lastcorpse")
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then
UO.Grab("0","finditem")
wait(500)
end if
UO.FindType("0x0F4B","-1","lastcorpse")
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then
UO.Grab("0","finditem")
wait(500)
end if
UO.FindType("0x13BB","-1","lastcorpse") ;up
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then
UO.Grab("0","finditem")
wait(500)
end if
UO.FindType("0x1414","-1","lastcorpse")
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then
UO.Grab("0","finditem")
wait(500)
end if
UO.FindType("0x1411","-1","lastcorpse")
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then
UO.Grab("0","finditem")
wait(500)
end if
UO.FindType("0x1410","-1","lastcorpse")
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then
UO.Grab("0","finditem")
wait(500)
end if
UO.FindType("0x1415","-1","lastcorpse")
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then
UO.Grab("0","finditem")
wait(500)
end if
UO.FindType("####","-1","lastcorpse")
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then
UO.Grab("0","finditem")
wait(500)
end if
UO.FindType("platemail","-1","lastcorpse")
If UO.FindCount() == 0 Then
UO.Print("Iron Ingots not found, script terminated")
return
if uo.weight > 730 then
goto end
endif
wend
UO.DeleteJournal()
next
next
endif
end sub


sub Smelt()

UO.FindType('0x13BB','-1',2)
UO.WaitTargetObject('finditem')
UO.UseObject(0x400B8263)
repeat
wait(1000)
UO.FindType('0x0F4B','-1',2)
UO.WaitTargetObject('finditem')
UO.UseObject(0x400B8263)
repeat
wait(1000)
UO.FindType('0x1408','-1',2)
UO.WaitTargetObject('finditem')
UO.UseObject(0x400B8263)
repeat
wait(1000)
UO.FindType('0x140E','-1',2)
UO.WaitTargetObject('finditem')
UO.UseObject(0x400B8263)
repeat
wait(1000)
UO.FindType('0x140A','-1',2)
UO.WaitTargetObject('finditem')
UO.UseObject(0x400B8263)
repeat
wait(1000)
UO.FindType('0x1B74','-1',2)
UO.WaitTargetObject('finditem')
UO.UseObject(0x400B8263)
repeat
wait(1000)
UO.FindType('####','-1',2)
UO.WaitTargetObject('finditem')
UO.UseObject(0x400B8263)
repeat
wait(1000)
UO.FindType('0x1412','-1',2)
UO.WaitTargetObject('finditem')
UO.UseObject(0x400B8263)
repeat
wait(1000)
UO.FindType('0x13B9','-1',2)
UO.WaitTargetObject('finditem')
UO.UseObject(0x400B8263)
repeat
wait(1000)
UO.FindType('0x1411','-1',2)
UO.WaitTargetObject('finditem')
UO.UseObject(0x400B8263)
repeat
wait(1000)
UO.FindType('0x1415','-1',2)
UO.WaitTargetObject('finditem')
UO.UseObject(0x400B8263)
repeat
wait(1000)
UO.FindType('0x1410','-1',2)
UO.WaitTargetObject('finditem')
UO.UseObject(0x400B8263)
repeat
wait(1000)
UO.FindType('0x1414','-1',2)
UO.WaitTargetObject('finditem')
UO.UseObject(0x400B8263)
repeat
wait(1000)

UO.FindType('0x1BEF','0x0000','backpack')
If UO.GetQuantity('finditem')>0 Then
UO.SetReceivingContainer(0x400515AA)
repeat
wait(100)
UO.Grab('all','finditem')
repeat
wait(100)
UO.UnSetReceivingContainer(0x400515AA)
Endif
repeat
wait(1000)
UO.DeleteJournal()

end sub

Posted: 2004-10-27 06:29:16
by AGRS
Ну если это тебе для ДРВ, то :
1) Просто дай чару в лапы лук и не давай стрел.
2) Слишком сложная задача.
3) Резист отключен.

Posted: 2004-10-27 19:02:42
by GrayLord
AGRS wrote:Ну если это тебе для ДРВ, то :
1) Просто дай чару в лапы лук и не давай стрел.

кстати, не подумал... эх, давно не играл уже... совсем всё забыл =)

имхо

Posted: 2004-10-30 12:38:30
by bobba
имхо с луком в руках на дрв паринг расти не буит.

Re: имхо

Posted: 2004-10-30 12:49:56
by AGRS
bobba wrote:имхо с луком в руках на дрв паринг расти не буит.


Если для куклы важе паринг...
All times are UTC+02:00
Page 1 of 1

Powered by phpBB® Forum Software © phpBB Limited