Скрипт на фишинг

Ask for scripts here

Moderators: Murderator+, Murderator

Post Reply
-=Morf=-
Posts: 79
Joined: 2006-04-22 20:37:37

Скрипт на фишинг

Post by -=Morf=- »

короче нужен скрипт на фишинг чтобы ловил постоянно из точки 488, 361 к примеру.

Чтобы можно было добавлять по типу вещи которые он мог сразу перемещать в Trash Can а остальные в мешок. вот =)

Надеюсь что выручите 8)
-=Morf=-
Posts: 79
Joined: 2006-04-22 20:37:37

Post by -=Morf=- »

Вот я такой сделал скриптик, добавте пжлста сюда чтобы рыбачил в одну точку на экране и была постоянная проверка на улов в бекпаке, т.е если выловил что то из выше написанных type, перемещал это в трэш кэн =) :wink:
-=Morf=-
Posts: 79
Joined: 2006-04-22 20:37:37

Post by -=Morf=- »

Code: Select all


sub trash()
var musor1 = "0x1711"
var musor2 = "0x0C14"
var musor3 = "0x0C13"
var musor4 = "0x170F"
var musor5 = "0x170B"
var musor6 = "0x170D"
var musor7 = "0x0FC5"
var musor8 = "0x0FCB"
var musor9 = "0x0FC6"
var musor10 = "0x0FC9"
var musor11 = "0x0C24"
var musor12 = "0x1716"
var musor13 = "0x1EFF"
var musor14 = "0x152E"
var musor15 = "0x0C1C"
var musor16 = "0x0C25"
var musor17 = "0x0C30"
var musor18 = "0x0C11"
var musor19 = "0x0C2E"
var musor20 = "0x0C2C"
var musor21 = "0x0C1A"
var musor22 = "0x0C15"
var musor23 = "0x152E"
var musor24 = "0x0C12"
var musor25 = "0x0C10"
var musor26 = "0x0C1D"
var musor27 = "0x0C1B"
var musor28 = "0x0C2E"
var musor29 = "0x0C1B"
var musor30 = "0x1717"
var musor31 = "0x153B"
var musor32 = "0x1F9F"
var musor33 = "0x1EFD"
var musor34 = "0x1F01"
var musor35 = "0x171A"
var musor36 = "0x171B"
var musor37 = "0x1F7B"
var musor38 = "0x1719"
var musor39 = "0x1543"
var musor40 = "0x1515"
var musor41 = "0x1714"
var musor42 = "0x1FA1"
var musor43 = "0x0C2F"
var musor44 = "0x171C"
var musor45 = "0x1FFD"



var ulov = "0x0F7D"
var ulov2 = "0x0F7E"
var ulov3 = "0x0F91"
var ulov4 = "0x0F8E"
var ulov5 = "0x0F82"
var ulov6 = "0x0F78"



var trash = "0x40005373"
var bochka = "0x4000EB5B"

 if UO.Count( musor1 ) > 0 then
 repeat
            UO.FindType( musor1, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if



 if UO.Count( musor2 ) > 0 then
 repeat
            UO.FindType( musor2, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor3 ) > 0 then
 repeat
            UO.FindType( musor3, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor4 ) > 0 then
 repeat
            UO.FindType( musor4, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         

 if UO.Count( musor5 ) > 0 then
 repeat
            UO.FindType( musor5, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor6 ) > 0 then
 repeat
            UO.FindType( musor6, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         

         
 if UO.Count( musor7 ) > 0 then
 repeat
            UO.FindType( musor7, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor8 ) > 0 then
 repeat
            UO.FindType( musor8, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         

 if UO.Count( musor9 ) > 0 then
 repeat
            UO.FindType( musor9, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor10 ) > 0 then
 repeat
            UO.FindType( musor10, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor11 ) > 0 then
 repeat
            UO.FindType( musor11, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor12 ) > 0 then
 repeat
            UO.FindType( musor12, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor13 ) > 0 then
 repeat
            UO.FindType( musor13, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor14 ) > 0 then
 repeat
            UO.FindType( musor14, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor15 ) > 0 then
 repeat
            UO.FindType( musor15, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor16 ) > 0 then
 repeat
            UO.FindType( musor16, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
          if UO.Count( musor17 ) > 0 then
 repeat
            UO.FindType( musor17, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor18 ) > 0 then
 repeat
            UO.FindType( musor18, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor19 ) > 0 then
 repeat
            UO.FindType( musor19, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor20 ) > 0 then
 repeat
            UO.FindType( musor20, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor21 ) > 0 then
 repeat
            UO.FindType( musor21, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor22 ) > 0 then
 repeat
            UO.FindType( musor22, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor23 ) > 0 then
 repeat
            UO.FindType( musor23, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor24 ) > 0 then
 repeat
            UO.FindType( musor24, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor25 ) > 0 then
 repeat
            UO.FindType( musor25, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor26 ) > 0 then
 repeat
            UO.FindType( musor26, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor27 ) > 0 then
 repeat
            UO.FindType( musor27, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor28 ) > 0 then
 repeat
            UO.FindType( musor28, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor29 ) > 0 then
 repeat
            UO.FindType( musor29, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor30 ) > 0 then
 repeat
            UO.FindType( musor30, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor31 ) > 0 then
 repeat
            UO.FindType( musor31, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor32 ) > 0 then
 repeat
            UO.FindType( musor32, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         

 if UO.Count( musor33 ) > 0 then
 repeat
            UO.FindType( musor33, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor34 ) > 0 then
 repeat
            UO.FindType( musor34, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor35 ) > 0 then
 repeat
            UO.FindType( musor35, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor36 ) > 0 then
 repeat
            UO.FindType( musor36, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor37 ) > 0 then
 repeat
            UO.FindType( musor37, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         

 if UO.Count( musor38 ) > 0 then
 repeat
            UO.FindType( musor38, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor39 ) > 0 then
 repeat
            UO.FindType( musor39, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor40 ) > 0 then
 repeat
            UO.FindType( musor40, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor41 ) > 0 then
 repeat
            UO.FindType( musor41, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor42 ) > 0 then
 repeat
            UO.FindType( musor42, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( musor43 ) > 0 then
 repeat
            UO.FindType( musor1, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if 
         

 if UO.Count( musor44 ) > 0 then
 repeat
            UO.FindType( musor44, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if 
         
         
 if UO.Count( musor45 ) > 0 then
 repeat
            UO.FindType( musor45, -1, -1 )
            UO.MoveItem( 'finditem', 0, trash )
            wait( 10 )
            UO.Print( 'trash moved' )
         end if
         
 if UO.Count( ulov ) > 0 then
 repeat
            UO.FindType( ulov, -1, -1 )
            UO.MoveItem( 'finditem', 0, bochka )
            wait( 10 )
            UO.Print( 'ulov moved' )
         end if
         
 if UO.Count( ulov2 ) > 0 then
 repeat
            UO.FindType( ulov2, -1, -1 )
            UO.MoveItem( 'finditem', 0, bochka )
            wait( 10 )
            UO.Print( 'ulov moved' )
         end if
         
 if UO.Count( ulov3 ) > 0 then
 repeat
            UO.FindType( ulov3, -1, -1 )
            UO.MoveItem( 'finditem', 0, bochka )
            wait( 10 )
            UO.Print( 'ulov moved' )
         end if
         
 if UO.Count( ulov4 ) > 0 then
 repeat
            UO.FindType( ulov4, -1, -1 )
            UO.MoveItem( 'finditem', 0, bochka )
            wait( 10 )
            UO.Print( 'ulov moved' )
         end if
         
 if UO.Count( ulov5 ) > 0 then
 repeat
            UO.FindType( ulov5, -1, -1 )
            UO.MoveItem( 'finditem', 0, bochka )
            wait( 10 )
            UO.Print( 'ulov moved' )
         end if
         
 if UO.Count( ulov6 ) > 0 then
 repeat
            UO.FindType( ulov6, -1, -1 )
            UO.MoveItem( 'finditem', 0, bochka )
            wait( 10 )
            UO.Print( 'ulov moved' )
         end if
       


         
end sub


ADEPT_ABP
Posts: 223
Joined: 2006-05-12 08:03:45
Contact:

Post by ADEPT_ABP »

Вместо кучи var-ов сделай dim.
Пример:

Code: Select all

Dim musor[3]
musor[0]="0x1711"
musor[1]="0x0C14"
musor[2]="0x0C13"


А после проверяй:

Code: Select all

For var a=0 to 2
if ulov==musor[a] then
 кидаем в трэш
endif
wait(200) ;паузу подберёшь :)
next


И ещё вопрос. Нахрена тебе столько

Code: Select all

 repeat 
- если нет ни одного.

Code: Select all

until (условие)
Играю на drw.ru
Использую инжект 505.18 VeNd0r
Начинающий скриптер.
Post Reply