Search found 61 matches

by vertijok2000
2018-02-25 22:49:36
Forum: Scripting Ore
Topic: ПК и техт
Replies: 0
Views: 7020

ПК и техт

Добрый вечер всем
помогите пож со скриптом почему не хочит записывать ник игрока а то ко дата и время пишет
вот сам скрипт sub writeLog()
var ser
var n
for n=0 to 0
ser=uo.journalserial(n)
uo.TextOpen()
uo.TextPrint(uo.getname(ser)+' @ '+MakeTime())
endif
next
endsub
by vertijok2000
2018-02-13 00:12:07
Forum: Scripting Ore
Topic: гампы и скрипт
Replies: 0
Views: 5144

гампы и скрипт

есть скрипт но хз как зделать через гампы (Помогите пож )

sub grizli1()
var spelbuk = '0x4002A275'
uo.cast('Summ. Creature')
wait(500)
uo.WaitGump(29)
wait(500)
uo.WaitGump(12)
wait(1500)
uo.waittargetobject('self')
end sub

https://b.radikal.ru/b04/1802 ...
by vertijok2000
2018-01-28 16:08:48
Forum: Scripting Ore
Topic: Моб+ лут
Replies: 0
Views: 5041

Моб+ лут

Народ помогите пожалуста со скриптом я хз что с ним делать уже мне надо чтобы скрипт работал постояна я буду бегать по пещере искать мобы он находит по списку и начинает убивать его и потом уже лутать его вот скрипт но он чета крэшит спс




sub main()
var n, m, mob
var distance='1'

Dim npc ...
by vertijok2000
2018-01-23 21:50:40
Forum: Scripting Ore
Topic: Открывания кладов
Replies: 3
Views: 2541

Re: Открывания кладов

если не включять return то он то ко один раз делает то что должен делать если включять то он игнорирует

Code: Select all

until UO.InJournal("Этот сундук уже открыт.")
и скрипт не останавливается а мне надо что бы он остановился
by vertijok2000
2018-01-21 16:57:13
Forum: Scripting Ore
Topic: Открывания кладов
Replies: 3
Views: 2541

Re: Открывания кладов

есть карта сокровищи посли как нашол сундук убиваю мобов потом надо открыть сундук клячами
я так понял что

Code: Select all

 #return ; раскомментировать если сундуки встречаются только по одному дабы не гонять в холостую циклы

надо поставить?
by vertijok2000
2018-01-21 12:27:56
Forum: Scripting Ore
Topic: Открывания кладов
Replies: 3
Views: 2541

Открывания кладов

Здарсти всем вот зделал скрипт но почему та он не хочет работать
sub LP()
VAR i, n
DIM Loot[2]
Loot[1]=0x0E40
Loot[2]=0x0E41 ;

DIM color[3]
color[1]=0x0774
color[2]=0x0488
color[3]=0x0445


For i=1 to 2
For n=1 to 3
uo&#46 ...
by vertijok2000
2018-01-15 07:29:37
Forum: Scripting Ore
Topic: Ламбер
Replies: 0
Views: 4868

Ламбер

помогите с этим скриптом он автоламбер и жутко тупит если можно зделать по координатам типа как на мининг типа вот так
Walker(0000,001,0)
doMineTree()
Walker(0000,002,0)
doMineTree()
Walker(0000,003,0)
doMineTree()

var hatchet = "0x0F43"
sub searchTree()
var i, x, y, t, stp, max_search ...
by vertijok2000
2018-01-01 20:36:33
Forum: Scripting Ore
Topic: добор кирок
Replies: 4
Views: 2531

Re: добор кирок

спс
by vertijok2000
2017-12-31 14:38:23
Forum: Scripting Ore
Topic: добор кирок
Replies: 4
Views: 2531

Re: добор кирок

у нас на шарде что бы выкопать руду выше то нужно кирка выше
пример:
ирон кирка - копер руда
копер кирка - ирон,копер,бронза руда
бронз кирка - ирон,копер,бронза, стелл руда
и так дали
by vertijok2000
2017-12-31 12:12:40
Forum: Scripting Ore
Topic: добор кирок
Replies: 4
Views: 2531

добор кирок

Помогите пож вот скрипт что не правельно я зделал почему он берёт оба типа?
sub grabkirku()
var q, n
dim instrument[2]
instrument[0]='0x0E85'
instrument[1]='0x0E86'
for n=0 to 1
uo.print('Èùåì kirku')
uo.findtype(instrument[n],-1,Orechest)
if uo&#46 ...
by vertijok2000
2017-12-20 13:29:29
Forum: Scripting Ore
Topic: координаты шахт
Replies: 2
Views: 2319

Re: координаты шахт

спс за помощь
я маленька переделал скрипт а то по msg очень трудна все пишут в чят и в результате он сохраняет все
вот сам скрипт sub test()
uo.textprint("Walker("+str(UO.GetX('self'))+","+str(UO.GetY('self'))+",0)")
uo.textprint("minround()")
endsub
для мининга очень удобно ...
by vertijok2000
2017-12-19 18:26:23
Forum: Scripting Ore
Topic: координаты шахт
Replies: 2
Views: 2319

координаты шахт

народ помогите есть ли такой скрипт что бы собирать координаты шахты а то руками очень долго
или напишите пож суть скрипта ходим с киркой и тыкаем на пол и в тех файле должно быть такой

Code: Select all

Walker(2567,463,0)
спс большое
by vertijok2000
2017-12-14 23:37:04
Forum: Scripting Ore
Topic: Про гампы и кнопка
Replies: 2
Views: 2391

Про гампы и кнопка

Хотелось бы спросить как узнать гамп той или иной кнопки
а вот кусочик из скрипта UO.SendGumpSelect(508)
вот что выдоёт инжа


_____infogump_______
injection id 0x540dd2c8
serial 0x0021b403
gumpid 0xb4a8852f
X 40
Y 40
in client yes
3259 packet size
0 reply packet size
Buttons: ________
page ...
by vertijok2000
2017-11-28 19:53:09
Forum: Scripting Ore
Topic: Ковка и инги
Replies: 0
Views: 4719

Ковка и инги

sub BS()
uo.findtype('0x1BEF','0x0000','backpack')
UO.WaitTargetType('0x1BEF')
UO.UseType('0x13E3')
wait(3000)
While uo.count('0x1BEF') > 11
UO.SendGumpSelect(508)
wait(7000)
wend
PlavcaItem()
endsub

вот скрипт как зделать что бы он прекратил работать как останица 11 ...
by vertijok2000
2017-03-22 22:19:53
Forum: Scripting Ore
Topic: Forensic
Replies: 3
Views: 2635

Re: Forensic

sub fore()
; var telo = '0x2006' #???? ?????
var i
Dim fore[2]
fore[0] = '0x0000'
fore[1] = '0x2006'
For i = 0 To 1
uo.warmode(0)
uo.findtype(fore[i],-1,"ground")
while uo.findcount() > 5
uo.waittargetobject("finditem")
uo.UseSkill ...
by vertijok2000
2017-03-22 13:41:46
Forum: Scripting Ore
Topic: Forensic
Replies: 3
Views: 2635

Forensic

Помогите разобраца с этим скриптом а то что то не могу зделать
суть скрипта что бы он пять раза то ко использовал скил форенсик sub fore()
var telo = '0x2006' #???? ?????
uo.warmode(0)
uo.findtype(telo,-1,"ground")
if uo&#46;findcount()<5 then
uo&#46;waittargetobject("finditem")
uo ...
by vertijok2000
2017-02-21 16:26:46
Forum: Scripting Ore
Topic: Camping
Replies: 9
Views: 4234

Re: Camping

а это долго если делать?
by vertijok2000
2017-02-21 10:35:18
Forum: Scripting Ore
Topic: Camping
Replies: 9
Views: 4234

Re: Camping

он заканчивает но где то через 30 сек
checklag() это для сэйва
by vertijok2000
2017-02-19 22:53:49
Forum: Scripting Ore
Topic: Camping
Replies: 9
Views: 4234

Re: Camping

спс что помог вот сам не заметил про next
то ко вот твой скрипт не останавливается после как в бекпаке заканчиваются хворост
by vertijok2000
2017-02-18 23:59:39
Forum: Scripting Ore
Topic: Camping
Replies: 9
Views: 4234

Camping

народ помогите со скриптом надо чтобы он бросал и поджигал хворост а если в бекпаке нету хворост чтобы скрипт остановился как то не получилось у меня
Вот сам скрипт
sub Camping()
var i,j,mX=uo&#46;GetX(),mY=uo&#46;GetY(),mZ=uo&#46;GetZ(),time=uo&#46;Time()
uo&#46;FindType('0x0DE1',-1,'backpack ...