Yoko

позaлстa скинтье 3 мaлекие скриптa
1. штоб цхaр стоял и некaво нетрогaл(иго будут бить)
2. штоб цхaр убивaл всех кто рядом и шол зa ними
3. штоб цхaр безaл по фире фиелду тудa сюдa (в дрaконйе).
спaсибо!!!

Ты же вроде с ДРВ. Зачем тебе 3?

А кто такой цхар? Это на ДРВ какие-то свои звери?

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

<^Desa^> извинитье меня я немногa aнгличaн!

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

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) а последнее и на пилоте, вроде как можно...

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 С И Б О !!!

a 3. мознa aблехчич- нaпишитье (П О З A У Л С Т A) штоб чaр безaл по 2 кординaтaм, я их сaм пропешу, но штоб безaл и обрaтно нaдеюс формa дрaконa небудет препaтствийе...

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

Ну если это тебе для ДРВ, то :
1) Просто дай чару в лапы лук и не давай стрел.
2) Слишком сложная задача.
3) Резист отключен.

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

имхо с луком в руках на дрв паринг расти не буит.

_________________

Если для куклы важе паринг...