Page 1 of 1
помогите доработать
Posted: 2011-08-14 20:09:49
by rusa
достали уже эти перекупы..............................
собрал из 2 1 и немного измен под себя
1) проверку на хайд, а если выходит из хайда то не ждать окончания времени и начать заново (сам пытался вставить не получилось)
2) 3 предмета переложить в рядом стоящий сундук
sub blank()
while true
UO.Exec('buy reg Halima')
wait(3000)
UO.Exec('buy reg Neron')
wait(3000)
UO.Say('Kal Ort Por')
uo.useskill('Hiding')
wait(54000)
wend
end sub
Re: помогите доработать
Posted: 2011-08-14 22:53:58
by ZeroDX
Накатал в окне ответа, работоспособность не гарантируется
Code: Select all
sub Blank()
var Time = UO.Timer()
While true
If Time + 540 <= UO.Timer() then
Time = UO.Timer()
UO.Buy('reg', 'Halima')
Wait(3000)
UO.Buy('reg', 'Neron')
Wait(3000)
else
Wait(100)
Endif
Stealth()
Wend
Endsub
Sub Stealth()
var msg = 'have hidden|seem to hide', Time, Delay = 10
While not UO.Hidden()
DelJournal(msg)
Time = UO.Timer()
UO.UseSkill('Hiding')
Repeat
Wait(100)
Until UO.InJournal(msg) or UO.Hidden() or Time + Delay * 10 <= UO.Timer()
Wend
Endsub
Sub DelJournal(msg)
While UO.InJournal(msg)
UO.SetJournalLine(UO.InJournal(msg) - 1, '')
Wend
Endsub
Re: помогите доработать
Posted: 2011-08-15 06:59:29
by Mirage
Code: Select all
var item1 = 'тип первого предмета'
var item2 = 'тип второго предмета'
var item3 = 'тип третьего предмета'
var Sund = 'ID контейнера куда складывать'
var itemM, timemove
sub Blank()
//////////
//////////
Stealth()
PUT(item1 , Sund)
PUT(item2 , Sund)
PUT(item3 , Sund)
Wend
Endsub
Sub PUT(item, cont)
while UO.Count( item ) > 0
UO.FindType( item, -1, -1 )
itemM=UO.GetSerial('finditem')
timemove=UO.Timer()
UO.MoveItem( 'finditem', 0, cont )
while UO.ContainerOf(itemM)=='my' && timemove+20>UO.Timer()
wait(300)
wend
wend
end sub
Re: помогите доработать
Posted: 2011-08-15 18:35:22
by ZeroDX
Это чё?
Re: помогите доработать
Posted: 2011-08-15 19:01:35
by Mirage
Это 2)
rusa wrote:2) 3 предмета переложить в рядом стоящий сундук
Re: помогите доработать
Posted: 2011-08-15 19:52:10
by ZeroDX
а ну да
Re: помогите доработать
Posted: 2011-08-22 05:42:41
by rusa
спасиб....
только есть один минус
кто та увидел этот скрипт и залутал мя, точнее 3 чаров
Re: помогите доработать
Posted: 2011-08-22 07:45:42
by Mirage
А ты хотел в 40 строках прописать искусственный интелект? Чтобы он палил по IP комп противника и форматировал ему хард попутно гипнотизируя на подчинение тебе?
Такими занятиями надо заниматься в пределах ГЗ, в противном случае надо либо руками либо прописывать нормальный боевой бот и то это как правило нереально.
Re: помогите доработать
Posted: 2011-08-22 17:49:49
by rusa
Mirage wrote:А ты хотел в 40 строках прописать искусственный интелект? Чтобы он палил по IP комп противника и форматировал ему хард попутно гипнотизируя на подчинение тебе?
Такими занятиями надо заниматься в пределах ГЗ, в противном случае надо либо руками либо прописывать нормальный боевой бот и то это как правило нереально.
я и занимался этим в ГЗ залутали в рядом стоящих сундуках
Re: помогите доработать
Posted: 2011-08-22 20:27:22
by ZeroDX
Ого! Вот мерзавцы!
Re: помогите доработать
Posted: 2011-11-29 15:59:54
by rusa
а между чем и чем можно вставить вот эту строчку в первый скрипт
Code: Select all
if uo.life < uo.str - 30 then
Uo.Say("GUARDS");
endif
если я правильно понимаю она отвечает за то что если хп падает то кричит гвардов
и ещё - если меня кто та ударил не уходит в хайд тобишь включается вар
Re: помогите доработать
Posted: 2011-11-29 17:54:41
by Mirage
Code: Select all
While not UO.Hidden()
if uo.life < uo.str then
Uo.Say("GUARDS");
endif
DelJournal(msg)
Time = UO.Timer()
UO.UseSkill('Hiding')
можно сюда. А зачем - 30? Если опустилось меньше силы значит пусть орет. Только при ударе у тебя скрипт умрет от такого if-а. Лечилки то нет - надо регенерацию продумывать а то кинут в джайл за спам
Re: помогите доработать
Posted: 2011-11-29 20:17:53
by rusa
а если сделать так - хп падает кричал или кричать на атаку?
что лучше?
Re: помогите доработать
Posted: 2011-11-29 20:27:32
by Mirage
Лучше будет сделать:
rusa wrote:хп падает кричал или кричать на атаку
Re: помогите доработать
Posted: 2011-11-30 05:17:48
by ZeroDX
Кричал лучше. Хотя кричать на атаку тоже ни чё, и в некоторых случаях даже лучше будет