А вот так?

Anfernee · Post by **Anfernee** » 2006-12-24 12:26:05

Нижу указан скрипт найденый у вас.

sub pereklad()
#****ДРВ*****#
# (C) Cooper
#****v1.0****#
VAR Ttov

UO.Print('vibirite istochnik')
UO.Exec('addobject istok')
while UO.Targeting()
wait(100)
wend
UO.UseObject('istok')

UO.Print('vibirite priemnik')
UO.Exec('addobject priem')
while UO.Targeting()
wait(100)
wend

UO.Print('vibirite tovar')
UO.Exec('addobject tovar')
while UO.Targeting()
wait(1000)
wend

TTov = UO.GetGraphic('tovar')
UO.FindType(Ttov,'-1','istok')
If UO.FindCount() > 0 then
repeat
UO.MoveItem('finditem', '0', 'priem')
wait(2000)
UO.FindType(Ttov,'-1','istok')
until not UO.FindCount()
UO.Print('Закончили...')
else
UO.Print('А кидать то нечего...')
endif
end sub

Всё бы здорово но при перекладовании, он часто кидает вещи не туда. даже на пол, да бог с ним, важно сделатьч то бы проверялость как на тип так и на цвет, как это сдлеать?
Спасибо

Mihail · Post by **Mihail** » 2006-12-24 16:53:43

Code: Select all

if uo.getgraphic('finditem')== тип
if uo.getcolor('finditem')== цвет

Anfernee · Post by **Anfernee** » 2006-12-24 19:47:58

Mihail wrote:

Code: Select all

if uo.getgraphic('finditem')== тип
if uo.getcolor('finditem')== цвет

Прости михаил, как правельно записать этоти строки в код указаный выше?

Mihail · Post by **Mihail** » 2006-12-24 21:30:11

мде...(
иди уроки скриптинга читай

Code: Select all

uo.getgraphic('finditem')==uo.getgraphic('tovar') and uo.getcolor('finditem')==uo.getcolor('tovar') then
...

Anfernee · Post by **Anfernee** » 2006-12-26 11:47:40

Mihail wrote:мде...(
иди уроки скриптинга читай
Code: Select all
uo.getgraphic('finditem')==uo.getgraphic('tovar') and uo.getcolor('finditem')==uo.getcolor('tovar') then
...

Изучать уроки , в частности програмирование нужно с особой нимательностью и при огромном колличестве свободного веремени, что катострофически не хватает мне.
"Занятость" делами не позволяет освоить этот язык, если бы, было время я бы не выкладывал подобно "тупые" вопросы, по-сколько вижу сам, что легко сделать это, только надо понять, что и где вставить.
По вопросу моего скрипта, я бы купил бы его, но если есть и надо доработь только несколько строк, вот я и обратился именно к вам, к тем людям которые могут и хотят помочь людям, которые не "подкованы" в этой области, следуя из этого я прошу по возможности самим добавить (исправить) тот скрипт который я выложил, если принципияально нужны деньги за добавление 1, 2-х строк, я могу выплатить (если что).
Но не надо меня "тыкать" постоянно в эти уроки, я прошу помоч и предупредил, что я "ЧАЙНИК" в этом, есть желание и возможность помоч, помогите.
А теперь к скрипту:

sub pereklad()
#****ДРВ*****#
# (C) Cooper
#****v1.0****#
VAR Ttov

UO.Print('vibirite istochnik')
UO.Exec('addobject istok')
while UO.Targeting()
wait(100)
wend
UO.UseObject('istok')

UO.Print('vibirite priemnik')
UO.Exec('addobject priem')
while UO.Targeting()
wait(100)
wend

UO.Print('vibirite tovar')
UO.Exec('addobject tovar')
while UO.Targeting()
wait(1000)
wend

TTov = UO.GetGraphic('tovar')
UO.FindType(Ttov,'-1','istok')
If UO.FindCount() > 0 then
repeat
UO.MoveItem('finditem', '0', 'priem')
wait(2000)
UO.FindType(Ttov,'-1','istok')
until not UO.FindCount()
UO.Print('Закончили...')
else
UO.Print('А кидать то нечего...')
endif
end sub

Всё бы здорово но при перекладовании, он часто кидает вещи не туда. даже на пол, да бог с ним, важно сделатьч то бы проверялость как на тип так и на цвет, как это сдлеать?
Спасибо[/quote]

Я добавлял строки эти везде, менял даже так, но ничего не выходит,

sub pereklad()
#****ДРВ*****#
# (C) Cooper
#****v1.0****#
VAR Ttov

UO.Print('vibirite istochnik')
UO.Exec('addobject istok')
while UO.Targeting()
wait(100)
wend
UO.UseObject('istok')

UO.Print('vibirite priemnik')
UO.Exec('addobject priem')
while UO.Targeting()
wait(100)
wend

UO.Print('vibirite tovar')
UO.Exec('addobject tovar')
while UO.Targeting()
wait(1000)
wend

TTov = uo.getgraphic('finditem')==uo.getgraphic('tovar') and uo.getcolor('finditem')==uo.getcolor('tovar')
UO.FindType(Ttov,'-1','istok')
If UO.FindCount() > 0 then
repeat
UO.MoveItem('finditem', '0', 'priem')
wait(2000)
UO.FindType(Ttov,'-1','istok')
until not UO.FindCount()
UO.Print('Закончили...')
else
UO.Print('А кидать то нечего...')
endif
end sub

не соизволите просто написать скрипт с заменой(добавить строку, туда куда надо).

ps Если кого то обидел, то не обесудте.

Mihail · Post by **Mihail** » 2006-12-26 15:43:47

Code: Select all

sub dropmana()
var t, n, item='item to throw out'
uo.addobject(item)
while uo.targeting()
wait(100)
wend
uo.addobject('container')
while uo.targeting()
wait(100)
wend
uo.ignorereset()
uo.click(item)
checklag()
n=uo.getname(item)
uo.print(item+' is: '+uo.getname(item))
repeat
uo.findtype(uo.getgraphic(item),uo.getcolor(item),2)
if uo.findcount() then
uo.print(str(uo.findcount(uo.getgraphic(item))))
uo.click('finditem')
uo.ignore('finditem')
checklag()
if uo.getname('finditem')==n then
uo.moveitem('finditem',0,'container')
t=500
uo.print('wait: '+str(t))
wait(t)
end if
end if
until uo.findcount()==0
uo.ignorereset()
uo.print('all selected items are thrown out')
end sub

вот короче нашел среди старых скриптов - попробуй разобратьтся

Anfernee · Post by **Anfernee** » 2006-12-29 01:03:53

Mihail wrote:

Code: Select all

sub dropmana()
var t, n, item='item to throw out'
uo.addobject(item)
while uo.targeting()
wait(100)
wend
uo.addobject('container')
while uo.targeting()
wait(100)
wend
uo.ignorereset()
uo.click(item)
checklag()
n=uo.getname(item)
uo.print(item+' is: '+uo.getname(item))
repeat
uo.findtype(uo.getgraphic(item),uo.getcolor(item),2)
if uo.findcount() then
uo.print(str(uo.findcount(uo.getgraphic(item))))
uo.click('finditem')
uo.ignore('finditem')
checklag()
if uo.getname('finditem')==n then
uo.moveitem('finditem',0,'container')
t=500
uo.print('wait: '+str(t))
wait(t)
end if
end if
until uo.findcount()==0
uo.ignorereset()
uo.print('all selected items are thrown out')
end sub

вот короче нашел среди старых скриптов - попробуй разобратьтся

Ошибка "checklag"

Savage · Post by **Savage** » 2006-12-29 01:17:52

Недостающее время на изучение скриптинга можно почерпнуть из того времени, что уделяется самой игре.

По поводу ошибок возникающих при запуске чужих скриптов, есть замечательный оператор - точка с запятой ( ; ) им можно пользоваться для проверки на ненужность отсутствующих в скрипте функций. То есть, перед строкой с ошибкой ставим этот магический символ и смотрим что произойдет при следующем запуске...

Anfernee · Post by **Anfernee** » 2006-12-29 19:50:14

Savage wrote:Недостающее время на изучение скриптинга можно почерпнуть из того времени, что уделяется самой игре.

По поводу ошибок возникающих при запуске чужих скриптов, есть замечательный оператор - точка с запятой ( ; ) им можно пользоваться для проверки на ненужность отсутствующих в скрипте функций. То есть, перед строкой с ошибкой ставим этот магический символ и смотрим что произойдет при следующем запуске...

Расмотрим и это,но буду краток, по сколько только вышел из ванной ине как не настроен поемы, я рабоаю ,на игру в день остаётся 1 час 20 минут одеться за 40 минут упать или кого нибудь уронить, на выходных больше, в общем продолжать не буду.

по поводу скрипта, я воспользовался вашим советом, ввёл в ";" их 2 думал в вареации сначало 1 потом дургой-нет, ошибка вылетает пока не закроешь их всех, в данном случае 2.
смотрим что получилось))

Code: Select all

sub dropmana() 
var t, n, item='item to throw out' 
uo.addobject(item) 
while uo.targeting() 
wait(100) 
wend 
uo.addobject('container') 
while uo.targeting() 
wait(100) 
wend 
uo.ignorereset() 
uo.click(item) 
;checklag() 
n=uo.getname(item) 
uo.print(item+' is: '+uo.getname(item)) 
repeat 
uo.findtype(uo.getgraphic(item),uo.getcolor(item),2) 
if uo.findcount() then 
uo.print(str(uo.findcount(uo.getgraphic(item)))) 
uo.click('finditem') 
uo.ignore('finditem') 
;checklag() 
if uo.getname('finditem')==n then 
uo.moveitem('finditem',0,'container') 
t=500 
uo.print('wait: '+str(t)) 
wait(t) 
end if 
end if 
until uo.findcount()==0 
uo.ignorereset() 
uo.print('all selected items are thrown out') 
end sub

;checklag()
Тпереь макрос кидает))) только не бутылки а весь мешок и сразу))))
ЧТо дальше делать?

Savage · Post by **Savage** » 2006-12-29 21:03:26

Щаз я выйду из ванной, уроню кого нить и посмторим что можно сделать с твоим скриптом...

Anfernee · Post by **Anfernee** » 2006-12-31 12:04:52

Savage wrote:Щаз я выйду из ванной, уроню кого нить и посмторим что можно сделать с твоим скриптом...

ты не утонул?

Savage · Post by **Savage** » 2006-12-31 14:18:07

По коду скрипта не ясно что он должен делать, попробуй объяснить что тебе требуется.

Anfernee · Post by **Anfernee** » 2007-01-01 11:51:43

Savage wrote:По коду скрипта не ясно что он должен делать, попробуй объяснить что тебе требуется.

Просто напросто, благодоря этому скрипту, я перетаскиваю однотипные вещи с оджного пака в другой, только вот в чём беда, тип у манки и у ивныизни у нас 1 , надо что бы проверялось не просто на типу но и по цвету. :roll:

Savage · Post by **Savage** » 2007-01-01 14:18:08

,massmove 1000

Anfernee · Post by **Anfernee** » 2007-01-01 15:04:00

Savage wrote:,massmove 1000

супер, как же я раньше не додумался, точно этим словом можно написать этот скрипт.
ps ты издеваешься надо мной? я не знаю куда его встовлять!

Savage · Post by **Savage** » 2007-01-01 19:45:22

Не надо никуда вставлять. Просто пиши это в клиенте как разговор. А потом перекидываеш один предмет и ждеш.

Anfernee · Post by **Anfernee** » 2007-01-10 12:22:43

Savage wrote:..

пасибо, но эта команда перекидывает все бутылки, даже не то что бы оп цвету и типу, а просто все бутылки, всё вместе.!
Но всё равно спасибо за помошь.