Yoko
http://forum.yoko.com.ua/

вaм сюдa!
http://forum.yoko.com.ua/viewtopic.php?f=20&t=1739		 Page 1 of 1
Author:  Lord Desa [ 2004-10-26 03:51:11 ]
Post subject:  вaм сюдa!
позaлстa скинтье 3 мaлекие скриптa
1. штоб цхaр стоял и некaво нетрогaл(иго будут бить) :)
2. штоб цхaр убивaл всех кто рядом и шол зa ними
3. штоб цхaр безaл по фире фиелду тудa сюдa (в дрaконйе).
спaсибо!!!
Author:  AGRS [ 2004-10-26 06:37:59 ]
Post subject: 
Ты же вроде с ДРВ. Зачем тебе 3?
Author:  Edred [ 2004-10-26 12:31:21 ]
Post subject: 
А кто такой цхар? Это на ДРВ какие-то свои звери? :shock:
Author:  Mguai [ 2004-10-26 15:32:42 ]
Post subject: 
Edred wrote:
А кто такой цхар? Это на ДРВ какие-то свои звери? :shock:


походу цхар это типо Вроде (Чар) ну не знаю мож я ошибаюсь ведь тут професоры куда не погляди :mrgreen:
Author:  Lord Desa [ 2004-10-26 21:30:16 ]
Post subject: 
<^Desa^> извинитье меня я немногa aнгличaн!
Author:  GrayLord [ 2004-10-27 01:12:01 ]
Post subject: 
Lord Desa wrote:
<^Desa^> извинитье меня я немногa aнгличaн!

в каком смысле?
Author:  Lord Desa [ 2004-10-27 01:33:35 ]
Post subject: 
v takom, abichno pishu angliskami bukvami...
i vawe mozet kto skinut' skripti ili net?...
esli samim nada to davai a drugim trudno pomoch?
Author:  GrayLord [ 2004-10-27 01:46:47 ]
Post subject: 
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) а последнее и на пилоте, вроде как можно...
Author:  Lord Desa [ 2004-10-27 03:39:19 ]
Post subject: 
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 С И Б О !!!
Author:  Lord Desa [ 2004-10-27 03:41:38 ]
Post subject: 
a 3. мознa aблехчич- нaпишитье (П О З A У Л С Т A) штоб чaр безaл по 2 кординaтaм, я их сaм пропешу, но штоб безaл и обрaтно :) нaдеюс формa дрaконa небудет препaтствийе...
Author:  Lord Desa [ 2004-10-27 03:59:56 ]
Post subject: 
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
Author:  AGRS [ 2004-10-27 06:29:16 ]
Post subject: 
Ну если это тебе для ДРВ, то :
1) Просто дай чару в лапы лук и не давай стрел.
2) Слишком сложная задача.
3) Резист отключен.
Author:  GrayLord [ 2004-10-27 19:02:42 ]
Post subject: 
AGRS wrote:
Ну если это тебе для ДРВ, то :
1) Просто дай чару в лапы лук и не давай стрел.

кстати, не подумал... эх, давно не играл уже... совсем всё забыл =)
Author:  bobba [ 2004-10-30 12:38:30 ]
Post subject:  имхо
имхо с луком в руках на дрв паринг расти не буит.
Author:  AGRS [ 2004-10-30 12:49:56 ]
Post subject:  Re: имхо
bobba wrote:
имхо с луком в руках на дрв паринг расти не буит.


Если для куклы важе паринг...
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/