Pomogite dobavitj paru strok - Page 2 - Yoko

Pomogite dobavitj paru strok

Moderators: Murderator+, Murderator

45 posts

yxTbl: Posts: 39; Joined: 2007-01-02 15:09:35

Quote

Post by yxTbl » 2007-01-05 21:51:25

пацаны вы кн4н мозги респект вам , но я вапше в скриптах дятел =))
после расхаидивания сервер пишет You have been revealed
скрипт хайдица снова и астанавливаеца =\
перезапускаеца он тока без удачки в руке :Р

DenjaGanjubass: Posts: 76; Joined: 2006-07-28 00:21:50

Quote

Post by DenjaGanjubass » 2007-01-05 23:41:01

pacani , nesluwajte uxti, ja emu potom gatovij scp skinu, na odnom serve igraem , no maza takaja,
1) tebja razxaidjilji, ti esli s pervova raza nezaxaidilsja, to scp stait i zdjot nadpisji "you cant seems to hide there" a u nas etova nepojevljajetsa, i scp prosto zdjot
2)vtoraja maza takaja, mnogaja riba s adinakovime tipami, toestj riba vrode vigledit odinakova a raznije imena, i scp razrezaet toljko 4astj vsi ribi, mozhno zdelatj wtob on eto razrezanije , xotjabi raza 2 provadil, ato razrezhet 4astj , i 4astj ostajotsa nerazrezanaja

DenjaGanjubass: Posts: 76; Joined: 2006-07-28 00:21:50

Quote

Post by DenjaGanjubass » 2007-01-05 23:51:39

P.S. s ignorom i podnimaniem vewej vsjo OK ! (respekt NMY)

GAUHAR: Posts: 137; Joined: 2006-11-06 21:45:23

Quote

Post by GAUHAR » 2007-01-06 01:02:03

Функция выйдет из цикла ожидания сообщения от сервера по счетчику, если персонаж захайдился, а сообщения не было.

Code: Select all

SUB ToHide()
   VAR k
   while not UO.Hidden()
      k = 0
      UO.WarMode(0)
      UO.DeleteJournal()
      UO.Print("Прячемся...")
      UO.UseSkill('Hiding')
      while not (UO.InJournal("You have hidden") or UO.InJournal("You can't seem")) or not k == 25
         k = k + 1
         wait(200)
      wend
   wend
endsub

Должно резать всю рыбу одного типа:

Code: Select all

UO.Print("!_SLICING_FISH_!")
   for i=0 to 3
      UO.FindType(ULOVtype[i])
      while UO.FindCount() > 0
         UO.WaitTargetType(ULOVtype[i])
         UO.UseType(nozh)
         wait(200)
         UO.FindType(ULOVtype[i])
      wend
   next

DenjaGanjubass: Posts: 76; Joined: 2006-07-28 00:21:50

Quote

Post by DenjaGanjubass » 2007-01-06 01:22:32

ne pacani, ne pomog ne updeit na haiding ne slaicing, vawe terj 1 ku4u razrezal i vsjo, sco ostanovilsja :cry:

DenjaGanjubass: Posts: 76; Joined: 2006-07-28 00:21:50

Quote

Post by DenjaGanjubass » 2007-01-06 01:30:22

tam fiwka v tom , wto kagda on uspewno zaxaidilisja , vsjo okey, prodolzhaem delatj denjgi, a kogda on nezaxaidilsja, tagda ostanavlivaetsa, a ostanavlivaetsa potamu wto u nas na serve nepoevljajetsa nadpisji "you can't seems to hide there", takwto nado mesto etova 4oto dumatj,

Nmy: Expert!; Posts: 2152; Joined: 2005-09-14 15:31:58; Location: Latvia

Quote

Post by Nmy » 2007-01-06 01:51:02

Code: Select all

while not UO.Hidden()
UO.Warmode("0")
uo.print("Прячемся...")
UO.UseSkill("Hiding")
wait(4000)
wend

Code: Select all

UO.WaitTargetType(ULOVtype[i])

мне кажется надо на

Code: Select all

uo.waittargetobject('finditem')

да и вобше нелегко писать в окне форума, а так этот скрипт бы занял 3мин :roll:

Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net

Nmy: Expert!; Posts: 2152; Joined: 2005-09-14 15:31:58; Location: Latvia

Quote

Post by Nmy » 2007-01-06 01:57:48

пробуем

Code: Select all

sub FISHING()
   DIM ULOVtype[4]
       ULOVtype[0] = '0x09CC'      #fish1
       ULOVtype[1] = '0x09CD'      #fish2
       ULOVtype[2] = '0x09CE'      #fish3
       ULOVtype[3] = '0x09CF'      #fish4
   VAR udochka   = '0x0DBF'
   VAR nozh      = '0x0F52'
   VAR NumTile   = '6043'
   VAR MaxWeigth = 340
   VAR i, x, y, k
   wait(100)
   UO.Equipt('Rhand', udochka)
 start:
   for x=-1 to 1
      for y=-1 to 1
         ToHide()
         UO.Print("!_FISHING_IN_POINT_!: " + str(x) + " " + str(y))
         UO.DeleteJournal()
         while not UO.InJournal("no fish here") and not UO.InJournal("location") and not UO.InJournal("far away") and not UO.InJournal("in water")
            k = 0
            if UO.Weight > MaxWeigth then
               goto finish
            endif
            ToHide()
            UO.DeleteJournal()
            UO.WaitTargetTile(NumTile, str(UO.GetX()+x), str(UO.GetY()+y), str(UO.GetZ()))
            UO.UseType(udochka)
            while not (UO.InJournal("in water") or UO.InJournal("far away") or UO.InJournal("but fail") or UO.InJournal("You pull") or UO.InJournal("no fish here") or UO.InJournal("location") or k==50)
               k = k + 1
               wait(100)
               if UO.InJournal("you fail") then
                  goto start
               endif
            wend
            if UO.InJournal("You put") then
               UO.Set('finddistance','0')   #
               UO.Ignore('self')
               UO.FindType('-1', '-1', 'ground')
               while UO.FindCount()
                   if uo.GetGraphic('finditem') <> '0x0C2C' and uo.GetGraphic('finditem') <> '0x0DD6' and uo.GetGraphic('finditem') <> '0x1CEF' and uo.GetGraphic('finditem') <> '0x1CF0' and uo.GetGraphic('finditem') <> '0x0E31' and uo.GetGraphic('finditem') <> '0x1717' and uo.GetGraphic('finditem') <> '0x0007' and uo.GetGraphic('finditem') <> '0x0008' and uo.GetGraphic('finditem') <> '0x0009' and uo.GetGraphic('finditem') <> '0x0010' then
                    UO.MoveItem('finditem')
                    wait(200)
                   else
                    uo.ignore('finditem')
                   endif
                  UO.FindType('-1', '-1', 'ground')
               wend
            endif
         wend
      next
   next
 finish:
   UO.Print("!_MAX_WEIGHTH_!")
   wait(100)

   UO.Print("!_SLICING_FISH_!") 
   
   for i=0 to 3
    uo.findtype(ULOVtype[i])
    while uo.FindCount()   
      UO.WaitTargetObject('finditem')
      UO.UseType(nozh)
      wait(200)
      uo.findtype(ULOVtype[i])
    wend
   next
   
   if UO.Weight < MaxWeigth-5 then
      goto start
   endif
   UO.Print("!_FISHING_FINISHES_!")
endsub

SUB ToHide()
while not UO.Hidden()
UO.Warmode("0")
uo.print("Hiding ...")
UO.UseSkill("Hiding")
wait(4000)
wend
endsub

Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net

yxTbl: Posts: 39; Joined: 2007-01-02 15:09:35

Quote

Post by yxTbl » 2007-01-06 11:14:14

NMY wrote:пробуем

Code: Select all

sub FISHING()
   DIM ULOVtype[4]
       ULOVtype[0] = '0x09CC'      #fish1
       ULOVtype[1] = '0x09CD'      #fish2
       ULOVtype[2] = '0x09CE'      #fish3
       ULOVtype[3] = '0x09CF'      #fish4
   VAR udochka   = '0x0DBF'
   VAR nozh      = '0x0F52'
   VAR NumTile   = '6043'
   VAR MaxWeigth = 340
   VAR i, x, y, k
   wait(100)
   UO.Equipt('Rhand', udochka)
 start:
   for x=-1 to 1
      for y=-1 to 1
         ToHide()
         UO.Print("!_FISHING_IN_POINT_!: " + str(x) + " " + str(y))
         UO.DeleteJournal()
         while not UO.InJournal("no fish here") and not UO.InJournal("location") and not UO.InJournal("far away") and not UO.InJournal("in water")
            k = 0
            if UO.Weight > MaxWeigth then
               goto finish
            endif
            ToHide()
            UO.DeleteJournal()
            UO.WaitTargetTile(NumTile, str(UO.GetX()+x), str(UO.GetY()+y), str(UO.GetZ()))
            UO.UseType(udochka)
            while not (UO.InJournal("in water") or UO.InJournal("far away") or UO.InJournal("but fail") or UO.InJournal("You pull") or UO.InJournal("no fish here") or UO.InJournal("location") or k==50)
               k = k + 1
               wait(100)
               if UO.InJournal("you fail") then
                  goto start
               endif
            wend
            if UO.InJournal("You put") then
               UO.Set('finddistance','0')   #
               UO.Ignore('self')
               UO.FindType('-1', '-1', 'ground')
               while UO.FindCount()
                   if uo.GetGraphic('finditem') <> '0x0C2C' and uo.GetGraphic('finditem') <> '0x0DD6' and uo.GetGraphic('finditem') <> '0x1CEF' and uo.GetGraphic('finditem') <> '0x1CF0' and uo.GetGraphic('finditem') <> '0x0E31' and uo.GetGraphic('finditem') <> '0x1717' and uo.GetGraphic('finditem') <> '0x0007' and uo.GetGraphic('finditem') <> '0x0008' and uo.GetGraphic('finditem') <> '0x0009' and uo.GetGraphic('finditem') <> '0x0010' then
                    UO.MoveItem('finditem')
                    wait(200)
                   else
                    uo.ignore('finditem')
                   endif
                  UO.FindType('-1', '-1', 'ground')
               wend
            endif
         wend
      next
   next
 finish:
   UO.Print("!_MAX_WEIGHTH_!")
   wait(100)

   UO.Print("!_SLICING_FISH_!") 
   
   for i=0 to 3
    uo.findtype(ULOVtype[i])
    while uo.FindCount()   
      UO.WaitTargetObject('finditem')
      UO.UseType(nozh)
      wait(200)
      uo.findtype(ULOVtype[i])
    wend
   next
   
   if UO.Weight < MaxWeigth-5 then
      goto start
   endif
   UO.Print("!_FISHING_FINISHES_!")
endsub

SUB ToHide()
while not UO.Hidden()
UO.Warmode("0")
uo.print("Hiding ...")
UO.UseSkill("Hiding")
wait(4000)
wend
endsub

хайдит , при расхайдинге хайдица , и дальше ловит , но рыбу резать отказываеца

DenjaGanjubass: Posts: 76; Joined: 2006-07-28 00:21:50

Quote

Post by DenjaGanjubass » 2007-01-06 12:12:45

slicing vawe perestal workatj, pomoimu nado prosto zdelatj , wtob on povtoril razrezanije 2 raza i vsjo

GAUHAR: Posts: 137; Joined: 2006-11-06 21:45:23

Quote

Post by GAUHAR » 2007-01-06 13:06:26

10 раз повторит разрезание рыбы одного типа. Скорость соответствующая.

Code: Select all

UO.Print("Режем рыбу на фиш стейки")
for i=0 to 3
   for k = 1 to 10  # 10 повторов.
      if UO.Waiting() then
         UO.CancelTarget()
      endif
      UO.WaitTargetType(ULOVtype[i])
      UO.UseType(nozh)
      wait(200)
   next
next

yxTbl: Posts: 39; Joined: 2007-01-02 15:09:35

Quote

Post by yxTbl » 2007-01-06 13:29:52

GAUHAR wrote:10 раз повторит разрезание рыбы одного типа. Скорость соответствующая.

Code: Select all

UO.Print("Режем рыбу на фиш стейки")
for i=0 to 3
   for k = 1 to 10  # 10 повторов.
      if UO.Waiting() then
         UO.CancelTarget()
      endif
      UO.WaitTargetType(ULOVtype[i])
      UO.UseType(nozh)
      wait(200)
   next
next

таргетинг канцелд \ но итхем фоунд

GAUHAR: Posts: 137; Joined: 2006-11-06 21:45:23

Quote

Post by GAUHAR » 2007-01-06 14:59:35

Вопрос он рыбу то всю режет?
Вот, это код не будет давать сообщения: таргетинг канцелд \ но итем фоунд.

Code: Select all

UO.Print("Режем рыбу на фиш стейки")
for i=0 to 3
   for k = 1 to 10  # 10 повторов.
      if UO.Waiting() then
         UO.CancelTarget()
      endif
      if UO.Count(ULOVtype[i]) then
         UO.WaitTargetType(ULOVtype[i])
         UO.UseType(nozh)
         wait(200)
      endif
   next
next

yxTbl: Posts: 39; Joined: 2007-01-02 15:09:35

Quote

Post by yxTbl » 2007-01-06 15:31:13

у меня он вапше рыбу нережет =))))
если я правильно понял то код должен уже был стать вот таким

Code: Select all

sub FISHING() 
   DIM ULOVtype[4] 
       ULOVtype[0] = '0x09CC'      #fish1 
       ULOVtype[1] = '0x09CD'      #fish2 
       ULOVtype[2] = '0x09CE'      #fish3 
       ULOVtype[3] = '0x09CF'      #fish4 
   VAR udochka   = '0x0DBF' 
   VAR nozh      = '0x0F52' 
   VAR NumTile   = '6043' 
   VAR MaxWeigth = 780 
   VAR i, x, y, k 
   wait(100) 
   UO.Equipt('Rhand', udochka) 
 start: 
   for x=-1 to 1 
      for y=-1 to 1 
         ToHide() 
         UO.Print("!_FISHING_IN_POINT_!: " + str(x) + " " + str(y)) 
         UO.DeleteJournal() 
         while not UO.InJournal("no fish here") and not UO.InJournal("location") and not UO.InJournal("far away") and not UO.InJournal("in water") 
            k = 0 
            if UO.Weight > MaxWeigth then 
               goto finish 
            endif 
            ToHide() 
            UO.DeleteJournal() 
            UO.WaitTargetTile(NumTile, str(UO.GetX()+x), str(UO.GetY()+y), str(UO.GetZ())) 
            UO.UseType(udochka) 
            while not (UO.InJournal("in water") or UO.InJournal("far away") or UO.InJournal("but fail") or UO.InJournal("You pull") or UO.InJournal("no fish here") or UO.InJournal("location") or k==50) 
               k = k + 1 
               wait(100) 
               if UO.InJournal("you fail") then 
                  goto start 
               endif 
            wend 
            if UO.InJournal("You put") then 
               UO.Set('finddistance','0')   # 
               UO.Ignore('self') 
               UO.FindType('-1', '-1', 'ground') 
               while UO.FindCount() 
                   if uo.GetGraphic('finditem') <> '0x0C2C' and uo.GetGraphic('finditem') <> '0x0DD6' and uo.GetGraphic('finditem') <> '0x1CEF' and uo.GetGraphic('finditem') <> '0x1CF0' and uo.GetGraphic('finditem') <> '0x0E31' and uo.GetGraphic('finditem') <> '0x1717' and uo.GetGraphic('finditem') <> '0x0007' and uo.GetGraphic('finditem') <> '0x0008' and uo.GetGraphic('finditem') <> '0x0009' and uo.GetGraphic('finditem') <> '0x0010' then 
                    UO.MoveItem('finditem') 
                    wait(200) 
                   else 
                    uo.ignore('finditem') 
                   endif 
                  UO.FindType('-1', '-1', 'ground') 
               wend 
            endif 
         wend 
      next 
   next 
 finish: 
   UO.Print("!_MAX_WEIGHTH_!") 
   wait(100) 

   UO.Print("!_SLICING_FISH_!") 
    
   UO.Print("Ðåæåì ðûáó íà ôèø ñòåéêè") 
for i=0 to 3 
   for k = 1 to 10  # 10 ïîâòîðîâ. 
      if UO.Waiting() then 
         UO.CancelTarget() 
      endif 
      if UO.Count(ULOVtype[i]) then 
         UO.WaitTargetType(ULOVtype[i]) 
         UO.UseType(nozh) 
         wait(200) 
      endif 
   next 
next
    
   if UO.Weight < MaxWeigth-5 then 
      goto start 
   endif 
   UO.Print("!_FISHING_FINISHES_!") 
endsub 

SUB ToHide() 
while not UO.Hidden() 
UO.Warmode("0") 
uo.print("Hiding ...") 
UO.UseSkill("Hiding") 
wait(4000) 
wend 
endsub

GAUHAR: Posts: 137; Joined: 2006-11-06 21:45:23

Quote

Post by GAUHAR » 2007-01-06 15:48:14

yxTbl wrote:у меня он вапше рыбу нережет =))))
если я правильно понял то код должен уже был стать вот таким

Все верно.

Я сдаюсь. У меня все работает с любым внесенным изменением в код.

yxTbl: Posts: 39; Joined: 2007-01-02 15:09:35

Quote

Post by yxTbl » 2007-01-06 16:03:39

GAUHAR wrote:
yxTbl wrote:у меня он вапше рыбу нережет =))))
если я правильно понял то код должен уже был стать вот таким

Все верно.

Я сдаюсь. У меня все работает с любым внесенным изменением в код.

всеравно пишет : таргетинг канцелд \ но итем фоунд.
может ему нада написать серийник дагера каторым резать рыбу ?

DenjaGanjubass: Posts: 76; Joined: 2006-07-28 00:21:50

Quote

Post by DenjaGanjubass » 2007-01-06 16:54:15

Code: Select all

sub FISHING() 
   DIM ULOVtype[4] 
       ULOVtype[0] = '0x09CC'      #fish1 
       ULOVtype[1] = '0x09CD'      #fish2 
       ULOVtype[2] = '0x09CE'      #fish3 
       ULOVtype[3] = '0x09CF'      #fish4 
   VAR udochka   = '0x0DBF' 
   VAR nozh      = '0x0F52' 
   VAR NumTile   = '6043' 
   VAR MaxWeigth = 340
   VAR i, x, y, k 
   wait(100) 
   UO.Equipt('Rhand', udochka) 
 start: 
   for x=-1 to 1 
      for y=-1 to 1 
         ToHide() 
         UO.Print("!_FISHING_IN_POINT_!: " + str(x) + " " + str(y)) 
         UO.DeleteJournal() 
         while not UO.InJournal("no fish here") and not UO.InJournal("location") and not UO.InJournal("far away") and not UO.InJournal("in water") 
            k = 0 
            if UO.Weight > MaxWeigth then 
               goto finish 
            endif 
            ToHide() 
            UO.DeleteJournal() 
            UO.WaitTargetTile(NumTile, str(UO.GetX()+x), str(UO.GetY()+y), str(UO.GetZ())) 
            UO.UseType(udochka) 
            while not (UO.InJournal("in water") or UO.InJournal("far away") or UO.InJournal("but fail") or UO.InJournal("You pull") or UO.InJournal("no fish here") or UO.InJournal("location") or k==50) 
               k = k + 1 
               wait(100) 
               if UO.InJournal("you fail") then 
                  goto start 
               endif 
            wend 
            if UO.InJournal("You put") then 
               UO.Set('finddistance','0') 
               UO.Ignore('self') 
               UO.FindType('-1', '-1', 'ground') 
               while UO.FindCount() 
                   if uo.GetGraphic('finditem') <> '0x0C2C' and uo.GetGraphic('finditem') <> '0x0DD6' and uo.GetGraphic('finditem') <> '0x1CEF' and uo.GetGraphic('finditem') <> '0x1CF0' and uo.GetGraphic('finditem') <> '0x0E31' and uo.GetGraphic('finditem') <> '0x1717' and uo.GetGraphic('finditem') <> '0x0C16' and uo.GetGraphic('finditem') <> '0x0C1F' and uo.GetGraphic('finditem') <> '0x0C1B' and uo.GetGraphic('finditem') <> '0x1D9F' and uo.GetGraphic('finditem') <> '0x1F5D' and uo.GetGraphic('finditem') <> '0x1DA2' and uo.GetGraphic('finditem') <> '0x1CDD' and uo.GetGraphic('finditem') <> '0x1CE1' and uo.GetGraphic('finditem') <> '0x19AB' and uo.GetGraphic('finditem') <> '0x1F3C' and uo.GetGraphic('finditem') <> '0x0E3E' and uo.GetGraphic('finditem') <> '0x1086' and uo.GetGraphic('finditem') <> '0x0EB2' then 
                    UO.MoveItem('finditem') 
                    wait(200) 
                   else 
                    uo.ignore('finditem') 
                   endif 
                  UO.FindType('-1', '-1', 'ground') 
               wend 
            endif 
         wend 
      next 
   next 
 finish: 
   UO.Print("!_MAX_WEIGHTH_!") 
   wait(100) 
    UO.Print("!_SLICING_FISH_!") 
  for i=0 to 3 
   for k = 1 to 5  # 5 ïîâòîðîâ. 
      if UO.Waiting() then 
         UO.CancelTarget() 
      endif 
      if UO.Count(ULOVtype[i]) then 
         UO.WaitTargetType(ULOVtype[i]) 
         UO.UseType(nozh) 
         wait(200) 
      endif 
   next 
next   
   UO.Print("!_FISHING_FINISHES_!") 
endsub 

SUB ToHide() 
while not UO.Hidden() 
UO.Warmode("0") 
uo.print("!_HIDING_!") 
UO.UseSkill("Hiding") 
wait(4000) 
wend 
endsub

kr4 pacani, muziki, s podbiranijem nuzhinh itemov vsjo ok, s haidingom toze vsjo ok, teperj rezka - ja postavil wtob on delal 5 povtorov a on kagda porezet, srazu idjot na finish, tam nado gdeto pribavitj poxodu eto

Code: Select all

   if UO.Weight < MaxWeigth-5 then 
      goto start

ja konewno cenju vawe terpenije, i znaju kak ja vas zae...

DenjaGanjubass: Posts: 76; Joined: 2006-07-28 00:21:50

Quote

Post by DenjaGanjubass » 2007-01-06 16:56:57

p.s. v dannij moment rezet zame4ateljno vsju ribu, toka vot opjatj lovitj vtoroi raz nexo4et :cry:

yxTbl: Posts: 39; Joined: 2007-01-02 15:09:35

Quote

Post by yxTbl » 2007-01-06 17:36:21

DenjaGanjubass wrote:

Code: Select all

sub FISHING() 
   DIM ULOVtype[4] 
       ULOVtype[0] = '0x09CC'      #fish1 
       ULOVtype[1] = '0x09CD'      #fish2 
       ULOVtype[2] = '0x09CE'      #fish3 
       ULOVtype[3] = '0x09CF'      #fish4 
   VAR udochka   = '0x0DBF' 
   VAR nozh      = '0x0F52' 
   VAR NumTile   = '6043' 
   VAR MaxWeigth = 340
   VAR i, x, y, k 
   wait(100) 
   UO.Equipt('Rhand', udochka) 
 start: 
   for x=-1 to 1 
      for y=-1 to 1 
         ToHide() 
         UO.Print("!_FISHING_IN_POINT_!: " + str(x) + " " + str(y)) 
         UO.DeleteJournal() 
         while not UO.InJournal("no fish here") and not UO.InJournal("location") and not UO.InJournal("far away") and not UO.InJournal("in water") 
            k = 0 
            if UO.Weight > MaxWeigth then 
               goto finish 
            endif 
            ToHide() 
            UO.DeleteJournal() 
            UO.WaitTargetTile(NumTile, str(UO.GetX()+x), str(UO.GetY()+y), str(UO.GetZ())) 
            UO.UseType(udochka) 
            while not (UO.InJournal("in water") or UO.InJournal("far away") or UO.InJournal("but fail") or UO.InJournal("You pull") or UO.InJournal("no fish here") or UO.InJournal("location") or k==50) 
               k = k + 1 
               wait(100) 
               if UO.InJournal("you fail") then 
                  goto start 
               endif 
            wend 
            if UO.InJournal("You put") then 
               UO.Set('finddistance','0') 
               UO.Ignore('self') 
               UO.FindType('-1', '-1', 'ground') 
               while UO.FindCount() 
                   if uo.GetGraphic('finditem') <> '0x0C2C' and uo.GetGraphic('finditem') <> '0x0DD6' and uo.GetGraphic('finditem') <> '0x1CEF' and uo.GetGraphic('finditem') <> '0x1CF0' and uo.GetGraphic('finditem') <> '0x0E31' and uo.GetGraphic('finditem') <> '0x1717' and uo.GetGraphic('finditem') <> '0x0C16' and uo.GetGraphic('finditem') <> '0x0C1F' and uo.GetGraphic('finditem') <> '0x0C1B' and uo.GetGraphic('finditem') <> '0x1D9F' and uo.GetGraphic('finditem') <> '0x1F5D' and uo.GetGraphic('finditem') <> '0x1DA2' and uo.GetGraphic('finditem') <> '0x1CDD' and uo.GetGraphic('finditem') <> '0x1CE1' and uo.GetGraphic('finditem') <> '0x19AB' and uo.GetGraphic('finditem') <> '0x1F3C' and uo.GetGraphic('finditem') <> '0x0E3E' and uo.GetGraphic('finditem') <> '0x1086' and uo.GetGraphic('finditem') <> '0x0EB2' then 
                    UO.MoveItem('finditem') 
                    wait(200) 
                   else 
                    uo.ignore('finditem') 
                   endif 
                  UO.FindType('-1', '-1', 'ground') 
               wend 
            endif 
         wend 
      next 
   next 
 finish: 
   UO.Print("!_MAX_WEIGHTH_!") 
   wait(100) 
    UO.Print("!_SLICING_FISH_!") 
  for i=0 to 3 
   for k = 1 to 5  # 5 ïîâòîðîâ. 
      if UO.Waiting() then 
         UO.CancelTarget() 
      endif 
      if UO.Count(ULOVtype[i]) then 
         UO.WaitTargetType(ULOVtype[i]) 
         UO.UseType(nozh) 
         wait(200) 
      endif 
   next 
next   
   UO.Print("!_FISHING_FINISHES_!") 
endsub 

SUB ToHide() 
while not UO.Hidden() 
UO.Warmode("0") 
uo.print("!_HIDING_!") 
UO.UseSkill("Hiding") 
wait(4000) 
wend 
endsub

kr4 pacani, muziki, s podbiranijem nuzhinh itemov vsjo ok, s haidingom toze vsjo ok, teperj rezka - ja postavil wtob on delal 5 povtorov a on kagda porezet, srazu idjot na finish, tam nado gdeto pribavitj poxodu eto

Code: Select all

   if UO.Weight < MaxWeigth-5 then 
      goto start

ja konewno cenju vawe terpenije, i znaju kak ja vas zae...

у меня нехочет резать =)))
чем ты режеш ? купер дагером ?

DenjaGanjubass: Posts: 76; Joined: 2006-07-28 00:21:50

Quote

Post by DenjaGanjubass » 2007-01-06 17:47:58

samo saboi

Post Reply

45 posts