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

А вот так?
http://forum.yoko.com.ua/viewtopic.php?f=17&t=10752		 Page 1 of 1
Author:  Anfernee [ 2006-12-24 12:26:05 ]
Post subject:  А вот так?
Нижу указан скрипт найденый у вас.
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('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

Всё бы здорово но при перекладовании, он часто кидает вещи не туда. даже на пол, да бог с ним, важно сделатьч то бы проверялость как на тип так и на цвет, как это сдлеать?
Спасибо
Author:  Mihail [ 2006-12-24 16:53:43 ]
Post subject: 
Code:
if uo.getgraphic('finditem')== тип
if uo.getcolor('finditem')== цвет
Author:  Anfernee [ 2006-12-24 19:47:58 ]
Post subject: 
Mihail wrote:
Code:
if uo.getgraphic('finditem')== тип
if uo.getcolor('finditem')== цвет

Прости михаил, как правельно записать этоти строки в код указаный выше?
Author:  Mihail [ 2006-12-24 21:30:11 ]
Post subject: 
мде...(
иди уроки скриптинга читай :)
Code:
uo.getgraphic('finditem')==uo.getgraphic('tovar') and uo.getcolor('finditem')==uo.getcolor('tovar') then
...
Author:  Anfernee [ 2006-12-26 11:47:40 ]
Post subject: 
Mihail wrote:
мде...(
иди уроки скриптинга читай :)
Code:
uo.getgraphic('finditem')==uo.getgraphic('tovar') and uo.getcolor('finditem')==uo.getcolor('tovar') then
...

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

Я добавлял строки эти везде, менял даже так, но ничего не выходит,
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 Если кого то обидел, то не обесудте.
Author:  Mihail [ 2006-12-26 15:43:47 ]
Post subject: 
Code:
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


вот короче нашел среди старых скриптов - попробуй разобратьтся
Author:  Anfernee [ 2006-12-29 01:03:53 ]
Post subject: 
Mihail wrote:
Code:
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"
Author:  Savage [ 2006-12-29 01:17:52 ]
Post subject: 
Недостающее время на изучение скриптинга можно почерпнуть из того времени, что уделяется самой игре.

По поводу ошибок возникающих при запуске чужих скриптов, есть замечательный оператор - точка с запятой ( ; ) им можно пользоваться для проверки на ненужность отсутствующих в скрипте функций. То есть, перед строкой с ошибкой ставим этот магический символ и смотрим что произойдет при следующем запуске...
Author:  Anfernee [ 2006-12-29 19:50:14 ]
Post subject: 
Savage wrote:
Недостающее время на изучение скриптинга можно почерпнуть из того времени, что уделяется самой игре.

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

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

по поводу скрипта, я воспользовался вашим советом, ввёл в ";" их 2 думал в вареации сначало 1 потом дургой-нет, ошибка вылетает пока не закроешь их всех, в данном случае 2.
смотрим что получилось))
Code:
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()
Тпереь макрос кидает))) только не бутылки а весь мешок и сразу))))
ЧТо дальше делать?
Author:  Savage [ 2006-12-29 21:03:26 ]
Post subject: 
Щаз я выйду из ванной, уроню кого нить и посмторим что можно сделать с твоим скриптом...
Author:  Anfernee [ 2006-12-31 12:04:52 ]
Post subject: 
Savage wrote:
Щаз я выйду из ванной, уроню кого нить и посмторим что можно сделать с твоим скриптом...

ты не утонул?
Author:  Savage [ 2006-12-31 14:18:07 ]
Post subject: 
По коду скрипта не ясно что он должен делать, попробуй объяснить что тебе требуется.
Author:  Anfernee [ 2007-01-01 11:51:43 ]
Post subject: 
Savage wrote:
По коду скрипта не ясно что он должен делать, попробуй объяснить что тебе требуется.

Просто напросто, благодоря этому скрипту, я перетаскиваю однотипные вещи с оджного пака в другой, только вот в чём беда, тип у манки и у ивныизни у нас 1 , надо что бы проверялось не просто на типу но и по цвету. :roll:
Author:  Savage [ 2007-01-01 14:18:08 ]
Post subject: 
,massmove 1000
Author:  Anfernee [ 2007-01-01 15:04:00 ]
Post subject: 
Savage wrote:
,massmove 1000

:P супер, как же я раньше не додумался, точно этим словом можно написать этот скрипт.
ps ты издеваешься надо мной? я не знаю куда его встовлять!
Author:  Savage [ 2007-01-01 19:45:22 ]
Post subject: 
Не надо никуда вставлять. Просто пиши это в клиенте как разговор. А потом перекидываеш один предмет и ждеш.
Author:  Anfernee [ 2007-01-10 12:22:43 ]
Post subject: 
Savage wrote:
..

пасибо, но эта команда перекидывает все бутылки, даже не то что бы оп цвету и типу, а просто все бутылки, всё вместе.!
Но всё равно спасибо за помошь.
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/