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

Yoko http://forum.yoko.com.ua/

Скрипт на фишинг http://forum.yoko.com.ua/viewtopic.php?f=17&t=14129	Page 1 of 1

Author:	-=Morf=- [ 2008-11-02 08:33:01 ]
Post subject:	Скрипт на фишинг
короче нужен скрипт на фишинг чтобы ловил постоянно из точки 488, 361 к примеру. Чтобы можно было добавлять по типу вещи которые он мог сразу перемещать в Trash Can а остальные в мешок. вот =) Надеюсь что выручите

Author:	-=Morf=- [ 2008-11-02 10:43:09 ]
Post subject:
Вот я такой сделал скриптик, добавте пжлста сюда чтобы рыбачил в одну точку на экране и была постоянная проверка на улов в бекпаке, т.е если выловил что то из выше написанных type, перемещал это в трэш кэн =)

Author:

-=Morf=- [ 2008-11-02 10:43:49 ]

Post subject:

Code:


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

Author:

ADEPT_ABP [ 2008-11-02 21:29:27 ]

Post subject:

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

Code:

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

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

Code:

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

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

Code:

 repeat

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

Code:

until (условие)

Page 1 of 1	All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited https://www.phpbb.com/