ress i taming

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
Morph
Posts: 8
Joined: 2006-02-03 12:20:11
Contact:
Contact Morph

ress i taming

Post by Morph »

pliz umena takaya prosba nujna 2 malenkix i prostix scripta igraiu na drw
1: nujna shtobi kakda ya najimal hotkey adevalsa taming stuff vidavalsa target kavo tamit i kak toka zatamil jivku on srazu na neio sadilsa
2:ress s binta shto mojna bila padaiti klubomu ghostu najat hotkey i srazu resnut bez target nechevo
balshoe posiba budu blagadaren :roll:
Top
Morph
Posts: 8
Joined: 2006-02-03 12:20:11
Contact:
Contact Morph

Post by Morph »

ress uje nenada sam nashol posiba
a vot vpoiske paiskal takova scripta kak ya paprasil na taming netu
est na prakchaku a mne toka shtobi zatamit jivku
vscriptax 0 pliz help :)
Top
1a2a3a4a5a6a
Posts: 173
Joined: 2006-02-10 13:26:37

Post by 1a2a3a4a5a6a »

Можешь выложить на ресс скрипт?
Top
Destruction
Junior Expert
Posts: 3221
Joined: 2004-06-24 22:08:56

Post by Destruction »

Из расчёта, что после использования таминг-посоха, таргет вылетает для тейма.

Code: Select all

sub QuickTame()
var t_staff = "0x0000" ; тип таминг-посоха
var no_tame = "Сию кобылу хрен затамишь"
var tamed = "Я сию кобылу затамил"
var fail = "Что-то не затамилась кобыла"
if not uo.count(t_staff) then
   uo.print("Ну ты блин чуваак, а посоха у тебя нет? -)")
   return
endif
deljournal(no_tame+"|"+tamed+"|"+fail)
uo.usetype(t_staff)
checklag()
uo.print("Укажи - кого тамить")
while uo.targeting()
wait(100)
wend
var animal = uo.getSerial("lasttarget")
repeat
   if uo.injournal(no_tame) then
      uo.print("Указанный предмет нельзя затамить")
      return
   endif
   if uo.injournal(fail) then
      deljournal(tamed+"|"+fail+"|"+no_tame)
      uo.waittargetobject(animal)
      uo.usetype(t_staff)
   endif
   wait(100)
until uo.injournal(tamed)
until uo.injournal(tamed+"|"+fail)
endsub

Sub deljournal(msg)
while uo.injournal(msg)
uo.setjournalline(uo.injournal(msg)-1,'')
wend
endsub
Top
Morph
Posts: 8
Joined: 2006-02-03 12:20:11
Contact:
Contact Morph

Post by Morph »

[/code]sub ress()
var Band='0x0E21'
VAR Exit=0, i
DIM Gost[1]
Gost[0]=0x0192 ;Man GHOSTTYPE
Gost[1]=0x0193 ;Woman GHOSTTYPE

For i=0 to 1

UO.SetArm("1")
uo.set("finddistance","2")
uo.findtype(Gost[i],'-1','ground')
UO.WaitTargetobject('finditem')
uo.usetype(Band)
uo.set("finddistance","20")
wait(1000)
UO.Arm("1")
endsub[code][/code]
Top
Morph
Posts: 8
Joined: 2006-02-03 12:20:11
Contact:
Contact Morph

Post by Morph »

vscripte na taming kak toka najimaiu hotkey vot eta
unhandeld exception in parser
Top
Grin
Expert!
Posts: 2580
Joined: 2005-05-04 14:05:19
Location: Москва

Post by Grin »

Code: Select all

sub QuickTame() 
var t_staff = "0x0000" ; тип таминг-посоха 
var no_tame = "Сию кобылу хрен затамишь" 
var tamed = "Я сию кобылу затамил" 
var fail = "Что-то не затамилась кобыла"
var animal="" 
   if not uo.count(t_staff) then 
         uo.print("Ну ты блин чуваак, а посоха у тебя нет? -)") 
         return 
   endif 
   deljournal(no_tame+"|"+tamed+"|"+fail) 
   uo.usetype(t_staff) 
   checklag() 
   uo.print("Укажи - кого тамить") 
   while uo.targeting() 
      wait(100) 
   wend 
   animal = uo.getSerial("lasttarget") 
   repeat 
      deljournal(tamed+"|"+fail+"|"+no_tame) 
      uo.waittargetobject(animal) 
      uo.usetype(t_staff) 
      wait(100)
      while not uo.Injournal(no_tame+"|"+tamed+"|"+fail)
         wait(100)
      wend
   until uo.injournal(tamed+"|"+no_tame)
end sub 

Sub deljournal(msg) 
while uo.injournal(msg) 
uo.setjournalline(uo.injournal(msg)-1,'') 
wend 
endsub
Top
Scripts Writer
Posts: 2259
Joined: 2005-04-19 18:00:29
Location: Московская область
Contact:
Contact Scripts Writer

Post by Scripts Writer »

Code: Select all

sub Taming()
var staff=' ' ;type of staff

uo.Set('finddistance','4')
  uo.Exec('addobject animal')
  while uo.Targeting()
    wait(500)
  wend
  uo.FindType(staff,'-1','backpack')
  if uo.FindCount('finditem') > 0 then
    uo.DeleteJournal()
    while not uo.InJournal('It seems')
      uo.DeleteJournal()
      uo.waittargetobject('animal')
      uo.UseType(staff)
      repeat
        wait(500)
      until uo.InJournal('You fail') or uo.InJournal('It seems')
    wend
    uo.UseObject('animal')
  else
    uo.Print('There is no Staff!')
  end if
end sub



попробуй
Last edited by Scripts Writer on 2006-04-01 15:02:40, edited 3 times in total.
Top
Grin
Expert!
Posts: 2580
Joined: 2005-05-04 14:05:19
Location: Москва

Post by Grin »

чего его пробовать то?;) ошибка на ошибке...
Top
Scripts Writer
Posts: 2259
Joined: 2005-04-19 18:00:29
Location: Московская область
Contact:
Contact Scripts Writer

Post by Scripts Writer »

Grin wrote:чего его пробовать то?;) ошибка на ошибке...


прокоментируй.
Top
Grin
Expert!
Posts: 2580
Joined: 2005-05-04 14:05:19
Location: Москва

Post by Grin »

Code: Select all

uo.FindType(staff,'-1','backpack') 
if uo.Count('finditem') > 0 then

uo.Count('finditem') всегда = 0

Code: Select all

repeat 
wait(500) 
until NOT uo.InJournal('You fail') and NOT uo.InJournal('It seems')

Как ты себе это представляешь?;) помоим подсчетам этот цикл всегда будет выдавать задержку 500...
Правельно

Code: Select all

repeat 
wait(500) 
until uo.InJournal('You fail') or uo.InJournal('It seems')


Тоже фантастика...

Code: Select all

uo.Exec('addobject animal')
uo.waittargetobject(animal)
uo.UseObject(animal)

animal это переменая скрипта, а если 'animal' то инжект будет искать в своих кладовых...

Правельно...

Code: Select all

uo.UseObject('animal')
Top
Scripts Writer
Posts: 2259
Joined: 2005-04-19 18:00:29
Location: Московская область
Contact:
Contact Scripts Writer

Post by Scripts Writer »

Grin wrote:

Code: Select all

uo.FindType(staff,'-1','backpack') 
if uo.Count('finditem') > 0 then

uo.Count('finditem') всегда = 0

Code: Select all

repeat 
wait(500) 
until NOT uo.InJournal('You fail') and NOT uo.InJournal('It seems')

Как ты себе это представляешь?;) помоим подсчетам этот цикл всегда будет выдавать задержку 500...
Правельно

Code: Select all

repeat 
wait(500) 
until uo.InJournal('You fail') or uo.InJournal('It seems')


Тоже фантастика...

Code: Select all

uo.Exec('addobject animal')
uo.waittargetobject(animal)
uo.UseObject(animal)

animal это переменая скрипта, а если 'animal' то инжект будет искать в своих кладовых...

Правельно...

Code: Select all

uo.UseObject('animal')



С большинством согласен,-исправил.
Top
Grin
Expert!
Posts: 2580
Joined: 2005-05-04 14:05:19
Location: Москва

Post by Grin »

В общем это моя последня попытка тебя в разумить... Даже твой Аднополчанин Купер признал что ты не прав.

Смотри. FindType ищет только потипу предметы которые находятся во внутреней памяти инжекта. никаких обращений ксерверу не идет. то что когдато инжект увидел и поместил себе укромно в память, там он и будет искать(по этому она так реактивно и работает). в конце работы заполнеются 2 структурки. первая заполняется ИД(finditem) вторая колво найденых объектов. Так вот ИД это 32 битный указатель (пример 0х00000000)

Count тоже самое ищет во внутреней памяти и подсчитывает параметры КОЛИЧЕСТВО(Quantity) этих объектов.

Что такое ТИП это тоже число но уже 16 разрядное (0х0000)

Так вот Count'у наплевать скальки разрядное число ему в пихнули.
если повезет и ИД будет вида 0x00000eed, то коунт подсчитает все деньги (а не кирки как могло быть)...
Если ИД это уникальный номер который не должен повторятся в рамках одного сервера, то ТИП это параметр груп (вданом случаи грубу можно объеденить по одному и томуже числу).
так вот чтобы подсчитать количиство кирок ТИП 3717 (0xE85)
надо или uo.count(3717)
или uo.findtype(3717, -1, 'backpack') (по легенде файнд тайп поумолчанию ищет в бекпеке поэтому можно попробовать uo.findtype(3717))

в случаи с кирками uo.count(3717)==uo.FindCount()
если же это будут деньги 3821 (0х0eed) и в паке не 1 монетка то
uo.findtype(3821, -1, 'backpack')
uo.count(3821)<>uo.FindCount()

Уменя все...
Top
Grin
Expert!
Posts: 2580
Joined: 2005-05-04 14:05:19
Location: Москва

Post by Grin »

Ужас... не ребят нафиг вас...

P.S. Гыгы Купер пост удалил;))
Top
Kynep
Expert!
Posts: 1348
Joined: 2006-02-07 08:51:40
Location: г. Старый Оскол
Contact:
Contact Kynep

Post by Kynep »

Grin wrote:Ужас... не ребят нафиг вас...

P.S. Гыгы Купер пост удалил;))


Да чет я загнался )))
Карче UO.Count можно юзать и без поиска, просто дать ему тип, а UO.FindCount работает только с поиском и дает кол-во найденых вещей при последнем поиске
Top
Grin
Expert!
Posts: 2580
Joined: 2005-05-04 14:05:19
Location: Москва

Post by Grin »

Count'у не нужен поиск он сам кого хошь найдет...
ты своему другу объесни что бы он не пихал туда ИД(указатели обхектов) и не ора что это правельно...
Top
Morph
Posts: 8
Joined: 2006-02-03 12:20:11
Contact:
Contact Morph

Post by Morph »

Code: Select all

sub QuickTame()
var t_staff = "0x0000" ; тип таминг-посоха
var no_tame = "Сию кобылу хрен затамишь"
var tamed = "Я сию кобылу затамил"
var fail = "Что-то не затамилась кобыла"
var animal=""
   if not uo.count(t_staff) then
         uo.print("Ну ты блин чуваак, а посоха у тебя нет? -)")
         return
   endif
   deljournal(no_tame+"|"+tamed+"|"+fail)
   uo.usetype(t_staff)
   checklag()
   uo.print("Укажи - кого тамить")
   while uo.targeting()
      wait(100)
   wend
   animal = uo.getSerial("lasttarget")
   repeat
      deljournal(tamed+"|"+fail+"|"+no_tame)
      uo.waittargetobject(animal)
      uo.usetype(t_staff)
      wait(100)
      while not uo.Injournal(no_tame+"|"+tamed+"|"+fail)
         wait(100)
      wend
   until uo.injournal(tamed+"|"+no_tame)
end sub

Sub deljournal(msg)
while uo.injournal(msg)
uo.setjournalline(uo.injournal(msg)-1,'')
wend
endsub


karoche tak etat script uje luche kakda ya najimaiu hotkey adevaetca stuff vidaiot target kak nada nachenaiu tamit on nezatamil srazu
i dalshe nepradoljil tamit a prosta stayal i script pradaljal rabotat
patom ya isho raz zapustil on spervoi palki tamnul no ne sel na jivku mojete eta ispravit ? pliz :roll:
Top
Grin
Expert!
Posts: 2580
Joined: 2005-05-04 14:05:19
Location: Москва

Post by Grin »

поповоду стоял...
проверь правельно ли ты добавил сообщение fail
и сесть на животное тут нету в этом скрите было в мастовском..
что бы сесть достаточно если животное рядом добавить uo.UseObject(animal)
Top
Morph
Posts: 8
Joined: 2006-02-03 12:20:11
Contact:
Contact Morph

Post by Morph »

bratan ya necho nedabavlal tak kak esli ya vazmus za script on vashe rabotat nebudet kak ti evo napisal tak ya evo i testil :)
esli mojesh zdelai dobrae dela isprav :roll:
Top
Grin
Expert!
Posts: 2580
Joined: 2005-05-04 14:05:19
Location: Москва

Post by Grin »

Ну от тебя требуется 4 вещи
Тип палки
Сообщеие когда ты затамил животное
сообщение когда неудачно
и когда ты не можешь затамить
Top
Post Reply

Return to “Scripting Ore”