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

Moderators: Murderator+, Murderator
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
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 (условие)