Yoko

All sides of Injection
It is currently 2025-12-02 21:39:59

All times are UTC+02:00




Post new topic  Reply to topic  [ 4 posts ] 
Author Message
 Post subject: Фишинг
PostPosted: 2006-11-19 15:09:12 
Offline
User avatar

Joined: 2006-04-22 20:37:37
Posts: 79
таксь таксь таксь. Незнаю был ли тут такой скрипт на фишинг чтобы постоянно рыбачил вокруг себя без остановок????Если да то дайте линк :wink: :cry:


Top
   
 Post subject: Re: Фишинг
PostPosted: 2006-11-19 16:45:00 
Offline
User avatar

Joined: 2006-11-06 21:45:23
Posts: 137
Вот только что хотел разместить отдельным топиком, может тебе подойдет.
Code:
# Версия YokoInjection: 505.18 VeNdOr
# Sphere Server : v0.55i
# Версия клиента: 2.0.3
# Автор: GAUHAR

#########################################################################
# Простой фишинг с разделкой рыбы на фишстейки.                         #
#                                                                       #
# ОПИСАНИЕ:                                                             #
# В бекпаке персонажа должна быть удочка и нож (dagger).                #
# Выбираем место для рыбалки. Запускаем скрипт FISHING().               #
# Во время рыбалки персонаж уходит в хайд и ловит рыбу в хайде, улов    #
# сразу же собирает в бекпак (собираемый улов находится в массиве).     #
# Набрав максимальный вес улова приступает к разделке рыбы на           #
# фишстейки и снова приступает к ловле.                                 #
# Рыбачит в цикле до тех пор пока не будет набран максимальный вес.     #
#-----------------------------------------------------------------------#
sub FISHING()
   DIM ULOVtype[7]
       ULOVtype[0] = '0x09CC'      #fish1
       ULOVtype[1] = '0x09CD'      #fish2
       ULOVtype[2] = '0x09CE'      #fish3
       ULOVtype[3] = '0x09CF'      #fish4
       ULOVtype[4] = '0x0DD6'      #Prize Fish
       ULOVtype[5] = '0x0DD6'      #Truly Rare Fish
       ULOVtype[6] = '0x14EB'      #Tattered Treasure map
   VAR udochka   = '0x0DBF'
   VAR nozh      = '0x0F51'
   VAR NumTile   = '6043'
   VAR MaxWeigth = UO.STR*4
   VAR i, x, y, k
   wait(500)
   UO.Equipt('Rhand', udochka)
 start:
   for x=-6 to 6
      for y=-6 to 6
         ToHide()
         UO.Print("Рыбачим в точке: " + 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(200)
               if UO.InJournal("Targeting Cancelled") then
                  goto start
               endif
            wend
            #собираем улов
            if UO.InJournal("You pull") then
               for i=0 to 6
                  UO.FindType(ULOVtype[i], '-1', 'ground')
                  UO.MoveItem('finditem')
                  wait(50)
               next
            endif
         wend
      next
   next
 finish:
   UO.Print("Набран максимальный вес улова")
   wait(1000)
   #режем рыбу
   UO.Print("Режем рыбу на фиш стейки")
   for i=0 to 3
      UO.WaitTargetType(ULOVtype[i])
      UO.UseType(nozh)
      wait(1000)
   next
   if UO.Weight < MaxWeigth-5 then
      goto start
   endif
   UO.Print("Рыбалка закончилась")
endsub

SUB ToHide()
   while not UO.Hidden()
      UO.WarMode(0)
      UO.DeleteJournal()
      UO.Print("Прячемся...")
      UO.UseSkill('Hiding')
      while not (UO.InJournal("You have hidden") or UO.InJournal("You can't seem"))
         wait(100)
      wend
   wend
endsub
#-----------------------------------------------------------------------#
#########################################################################


Last edited by GAUHAR on 2006-11-19 18:37:35, edited 1 time in total.

Top
   
 Post subject:
PostPosted: 2006-11-19 18:28:13 
Offline
User avatar

Joined: 2006-04-22 20:37:37
Posts: 79
не не то, я на корабле рыбачу, мне бы еще помог бы скриптик который по "Type" вещей рассовывал бы их в определенные мешки на корабле =)))


Top
   
 Post subject:
PostPosted: 2006-11-19 18:41:29 
Offline
User avatar

Joined: 2006-11-06 21:45:23
Posts: 137
Ну чтож, я хотел помочь, может кому другому пригодится.
Замечание к скрипту: если рыба валится на землю, уменьшите максимальный вес в переменной MaxWeigth.


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 4 posts ] 

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 9 guests


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
cron
Powered by phpBB® Forum Software © phpBB Limited