| MaG1StR_Yoda | Дата: Пятница, 26.06.2020, 19:51 | Сообщение # 1 |
 Генералиссимус
Группа: Администраторы
Сообщений: 1026
Статус: Оффлайн
| #####################
##script by dracula##
#####################
#на землю ложим 10 пакетов: В скрипте таргеты прописаны , куда на какой пакет тыкать.
# 1) Пакет с кегами Хила и тотлами 2)пакет для тотлов хила 3)пакет с кегами рефреша 4)пакет для тотлов рефреша 5)пакет с кегами куры 6)пакет для тотлов куры 7) пакет с регами 8) пакет с пустыми пакетами ( нужны круглые a bag) 9) пакет для пустых кегов 10) пакет для готовых пакетов с регами
# Пакеты можно покрасить ( 10 таргетов ) чтобы не запутаться
# сначала запускаем setup ( устанавливаем таргетами пакеты)
# потом запускаем regi()
# Cобирает по 3 тотла хила , 14 курок , 14 стамы и всех регов по 30....( если каких то регов не будет , будет добирать без них)
# Скрипт проверен , работает
sub setup()
#Пакет Хилок
uo.addobject('kegs_heal')
while uo.targeting()
wait(200)
wend
wait(2000)
#Пакет для тотлов хилок
uo.addobject('th')
while uo.targeting()
wait(200)
wend
wait(2000)
#Пакет рефрешек
uo.addobject('kegs_refresh')
while uo.targeting()
wait(200)
wend
wait(2000)
#Пакет для тотлов рефреша
uo.addobject('tr')
while uo.targeting()
wait(200)
wend
wait(2000)
#Пакет курок
uo.addobject('kegs_cure')
while uo.targeting()
wait(200)
wend
wait(2000)
#Пакет для тотлов куре
uo.addobject('tc')
while uo.targeting()
wait(200)
wend
wait(2000)
#Пакет с регами
uo.addobject('regi')
while uo.targeting()
wait(200)
wend
wait(2000)
#пакет с пакетами
uo.addobject('bag')
while uo.targeting()
wait(200)
wend
wait(2000)
#пакет для пустых кегов
uo.addobject('empty')
while uo.targeting()
wait(200)
wend
wait(2000)
#Пакет для пакетов
uo.addobject('paket_dlya_paketov')
while uo.targeting()
wait(200)
wend
wait(2000)
end sub
sub heal()
while NOT Uo.dead()
uo.set('finddistance','5')
uo.useobject('kegs_heal')
uo.useobject('th')
Var i
Dim h[100]
For i=1 to 100
repeat
UO.FindType('0x1940','-1','kegs_heal')
h=Uo.GetSerial('finditem')
if uo.findcount('h')>0 then
end if
until UO.FindCount('h')>0
Uo.Moveitem(h,'backpack')
wait(1500)
repeat
If UO.Count('0x0F0E') == 0 then
Uo.FindType('0x0F0E','0x0000','kegs_heal')
Uo.moveitem('finditem','100',backpack)
wait(400)
end if
if uo.count('0x0F0E') > 0 then
uo.findtype('0x0F0E',-1,backpack)
uo.moveitem('finditem',1,h)
wait(2500)
end if
if uo.count('0x0F0C') > 0 Then
uo.findtype('0x0F0C','0x0000',backpack)
uo.moveitem('finditem','1','th')
wait(400)
end if
until uo.InJournal("Keg is out of charges")
wait(1500)
Uo.moveitem(h,'1','empty')
wait(2500)
Uo.DeleteJournal()
if uo.findcount('0x0F0C','0x0000','th')> 0 then
refresh()
end if
end sub
sub refresh()
while NOT Uo.dead()
uo.set('finddistance','5')
uo.useobject('kegs_refresh')
uo.useobject('tr')
Var i
Dim r[100]
For i=1 to 100
repeat
UO.FindType('0x1940','-1','kegs_refresh')
r=Uo.GetSerial('finditem')
if uo.findcount('r')>0 then
end if
until UO.FindCount('r')>0
Uo.Moveitem(r,'backpack')
wait(1500)
repeat
If UO.Count('0x0F0E') == 0 then
Uo.FindType('0x0F0E','0x0000','kegs_refresh')
Uo.moveitem('finditem','100',backpack)
wait(400)
end if
if uo.count('0x0F0E') > 0 then
uo.findtype('0x0F0E',-1,backpack)
uo.moveitem('finditem',1,r)
wait(2500)
end if
if uo.count('0x0F0B') > 0 Then
uo.findtype('0x0F0B','0x0000',backpack)
uo.moveitem('finditem','1','tr')
wait(400)
end if
until uo.InJournal("Keg is out of charges")
wait(1500)
Uo.moveitem(r,'1','empty')
wait(2500)
Uo.DeleteJournal()
if uo.findcount('0x0F0B','0x0000','tr')> 0 then
cure()
end if
end sub
sub cure()
while NOT Uo.dead()
uo.set('finddistance','5')
uo.useobject('kegs_cure')
uo.useobject('tc')
Var i
Dim c[100]
For i=1 to 100
repeat
UO.FindType('0x1940','-1','kegs_cure')
c=Uo.GetSerial('finditem')
if uo.findcount('c')>0 then
end if
until UO.FindCount('c')>0
Uo.Moveitem(c,'backpack')
wait(1500)
repeat
If UO.Count('0x0F0E') == 0 then
Uo.FindType('0x0F0E','0x0000','kegs_cure')
Uo.moveitem('finditem','100',backpack)
wait(400)
end if
if uo.count('0x0F0E') > 0 then
uo.findtype('0x0F0E',-1,backpack)
uo.moveitem('finditem',1,c)
wait(2500)
end if
if uo.count('0x0F07') > 0 Then
uo.findtype('0x0F07','0x0000',backpack)
uo.moveitem('finditem','1','tc')
wait(400)
end if
until uo.InJournal("Keg is out of charges")
wait(1500)
Uo.moveitem(c,'1','empty')
wait(2500)
Uo.DeleteJournal()
if uo.findcount('0x0F07','0x0000','tc')> 0 then
regi()
end if
end sub
sub regi()
VAR heal = '0x0F0C'
VAR refresh = '0x0F0B'
VAR Cure = '0x0F07'
while NOT Uo.dead()
uo.set('finddistance','5')
uo.useobject('th')
uo.useobject('tr')
uo.useobject('tc')
uo.useobject('regi')
if uo.count('0x0F88') < 1 then
uo.findtype('0x0F88','-1','regi')
uo.grab('30','finditem')
wait(400)
end if
if uo.count('0x0F8C') < 1 then
uo.findtype('0x0F8C','-1','regi')
uo.grab('30','finditem')
wait(400)
end if
if uo.count('0x0F8D') < 1 then
uo.findtype('0x0F8D','-1','regi')
uo.grab('30','finditem')
wait(400)
end if
if uo.count('0x0F7B') < 1 then
uo.findtype('0x0F7B','-1','regi')
uo.grab('30','finditem')
wait(400)
end if
if uo.count('0x0F86') < 1 then
uo.findtype('0x0F86','-1','regi')
uo.grab('30','finditem')
wait(400)
end if
if uo.count('0x0F84') < 1 then
uo.findtype('0x0F84','-1','regi')
uo.grab('30','finditem')
wait(400)
end if
if uo.count('0x0F85') < 1 then
uo.findtype('0x0F85','-1','regi')
uo.grab('30','finditem')
wait(400)
end if
if uo.count('0x0F7A') < 1 then
uo.findtype('0x0F7A','-1','regi')
uo.grab('30','finditem')
wait(400)
end if
if uo.count(heal)<3 then
uo.findtype(heal,'-1','th')
uo.moveitem('finditem','1',backpack)
wait(400)
end if
if uo.count(heal) == 0 then
heal()
end if
if uo.count(heal)<3 then
uo.findtype(heal,'-1','th')
uo.moveitem('finditem','1',backpack)
wait(400)
end if
if uo.count(heal)<3 then
uo.findtype(heal,'-1','th')
uo.moveitem('finditem','1',backpack)
wait(400)
end if
if uo.count(cure)<14 then
uo.findtype(cure,'-1','tc')
uo.moveitem('finditem','1',backpack)
wait(400)
end if
if uo.count(cure) == 0 then
cure()
end if
if uo.count(cure)<14 then
uo.findtype(cure,'-1','tc')
uo.moveitem('finditem','1',backpack)
wait(400)
end if
if uo.count(cure)<14 then
uo.findtype(cure,'-1','tc')
uo.moveitem('finditem','1',backpack)
wait(400)
end if
if uo.count(cure)<14 then
uo.findtype(cure,'-1','tc')
uo.moveitem('finditem','1',backpack)
wait(400)
end if
if uo.count(cure)<14then
uo.findtype(cure,'-1','tc')
uo.moveitem('finditem','1',backpack)
wait(400)
end if
if uo.count(cure)<14 then
uo.findtype(cure,'-1','tc')
uo.moveitem('finditem','1',backpack)
wait(400)
end if
if uo.count(cure)<14 then
uo.findtype(cure,'-1','tc')
uo.moveitem('finditem','1',backpack)
wait(400)
end if
if uo.count(cure)<14 then
uo.findtype(cure,'-1','tc')
uo.moveitem('finditem','1',backpack)
wait(400)
end if
if uo.count(cure)<14 then
uo.findtype(cure,'-1','tc')
uo.moveitem('finditem','1',backpack)
wait(400)
end if
if uo.count(cure)<14 then
uo.findtype(cure,'-1','tc')
uo.moveitem('finditem','1',backpack)
wait(400)
end if
if uo.count(cure)<14 then
uo.findtype(cure,'-1','tc')
uo.moveitem('finditem','1',backpack)
wait(400)
end if
if uo.count(cure)<14 then
uo.findtype(cure,'-1','tc')
uo.moveitem('finditem','1',backpack)
wait(400)
end if
if uo.count(cure)<14 then
uo.findtype(cure,'-1','tc')
uo.moveitem('finditem','1',backpack)
wait(400)
end if
if uo.count(cure)<14 then
uo.findtype(cure,'-1','tc')
uo.moveitem('finditem','1',backpack)
wait(400)
end if
if uo.count(refresh)<14 then
uo.findtype(refresh,'-1','tr')
uo.moveitem('finditem','1',backpack)
wait(400)
end if
if uo.count(refresh) == 0 then
refresh()
end if
if uo.count(refresh)<14 then
uo.findtype(refresh,'-1','tr')
uo.moveitem('finditem','1',backpack)
wait(400)
end if
if uo.count(refresh)<14 then
uo.findtype(refresh,'-1','tr')
uo.moveitem('finditem','1',backpack)
wait(400)
end if
if uo.count(refresh)<14 then
uo.findtype(refresh,'-1','tr')
uo.moveitem('finditem','1',backpack)
wait(400)
end if
if uo.count(refresh)<14 then
uo.findtype(refresh,'-1','tr')
uo.moveitem('finditem','1',backpack)
wait(400)
end if
if uo.count(refresh)<14 then
uo.findtype(refresh,'-1','tr')
uo.moveitem('finditem','1',backpack)
wait(400)
end if
if uo.count(refresh)<14 then
uo.findtype(refresh,'-1','tr')
uo.moveitem('finditem','1',backpack)
wait(400)
end if
if uo.count(refresh)<14 then
uo.findtype(refresh,'-1','tr')
uo.moveitem('finditem','1',backpack)
wait(400)
end if
if uo.count(refresh)<14 then
uo.findtype(refresh,'-1','tr')
uo.moveitem('finditem','1',backpack)
wait(400)
end if
if uo.count(refresh)<14 then
uo.findtype(refresh,'-1','tr')
uo.moveitem('finditem','1',backpack)
wait(400)
end if
if uo.count(refresh)<14 then
uo.findtype(refresh,'-1','tr')
uo.moveitem('finditem','1',backpack)
wait(400)
end if
if uo.count(refresh)<14 then
uo.findtype(refresh,'-1','tr')
uo.moveitem('finditem','1',backpack)
wait(400)
end if
if uo.count(refresh)<14 then
uo.findtype(refresh,'-1','tr')
uo.moveitem('finditem','1',backpack)
wait(400)
end if
if uo.count(refresh)<14 then
uo.findtype(refresh,'-1','tr')
uo.moveitem('finditem','1',backpack)
wait(400)
end if
unload()
wend
wend
end sub
sub countresourse()
VAR heal = '0x0F0C'
VAR refresh = '0x0F0B'
VAR Cure = '0x0F07'
if uo.count('0x0F0C','0x0000','th') == 0 then
heal()
if uo.count('0x0F0B','0x0000','tr') == 0 then
refresh()
if uo.count('0x0F07','0x0000','tc') == 0 then
cure()
regi()
wend
wend
end sub
sub unload()
VAR heal = '0x0F0C'
VAR refresh = '0x0F0B'
VAR Cure = '0x0F07'
Var i
Dim b[100]
For i=1 to 100
repeat
UO.FindType('0x0E76','0x0000','bag')
b=Uo.GetSerial('finditem')
if uo.findcount('b')>0 then
end if
until UO.FindCount('b')>0
Uo.Moveitem(b,'backpack')
wait(1500)
repeat
uo.usetype('0x0E76')
wait(200)
uo.findtype('0x0F88','-1',backpack)
uo.moveitem('finditem','30',b)
wait(400)
uo.findtype('0x0F8C','-1',backpack)
uo.moveitem('finditem','30',b)
wait(400)
uo.findtype('0x0F8D','-1',backpack)
uo.moveitem('finditem','30',b)
wait(400)
uo.findtype('0x0F7B','-1',backpack)
uo.moveitem('finditem','30',b)
wait(400)
uo.findtype('0x0F86','-1',backpack)
uo.moveitem('finditem','30',b)
wait(400)
uo.findtype('0x0F84','-1',backpack)
uo.moveitem('finditem','30',b)
wait(400)
uo.findtype('0x0F85','-1',backpack)
uo.moveitem('finditem','30',b)
wait(400)
uo.findtype('0x0F7A','-1',backpack)
uo.moveitem('finditem','30',b)
wait(400)
uo.findtype('0x0F07','-1',backpack)
uo.moveitem('finditem','14',b)
wait(400)
uo.findtype('0x0F07','-1',backpack)
uo.moveitem('finditem','14',b)
wait(400)
uo.findtype('0x0F07','-1',backpack)
uo.moveitem('finditem','14',b)
wait(400)
uo.findtype('0x0F07','-1',backpack)
uo.moveitem('finditem','14',b)
wait(400)
uo.findtype('0x0F07','-1',backpack)
uo.moveitem('finditem','14',b)
wait(400)
uo.findtype('0x0F07','-1',backpack)
uo.moveitem('finditem','14',b)
wait(400)
uo.findtype('0x0F07','-1',backpack)
uo.moveitem('finditem','14',b)
wait(400)
uo.findtype('0x0F07','-1',backpack)
uo.moveitem('finditem','14',b)
wait(400)
uo.findtype('0x0F07','-1',backpack)
uo.moveitem('finditem','14',b)
wait(400)
uo.findtype('0x0F07','-1',backpack)
uo.moveitem('finditem','14',b)
wait(400)
uo.findtype('0x0F07','-1',backpack)
uo.moveitem('finditem','14',b)
wait(400)
uo.findtype('0x0F07','-1',backpack)
uo.moveitem('finditem','14',b)
wait(400)
uo.findtype('0x0F07','-1',backpack)
uo.moveitem('finditem','14',b)
wait(400)
uo.findtype('0x0F07','-1',backpack)
uo.moveitem('finditem','14',b)
wait(400)
uo.findtype('0x0F0B','-1',backpack)
uo.moveitem('finditem','14',b)
wait(400)
uo.findtype('0x0F0B','-1',backpack)
uo.moveitem('finditem','14',b)
wait(400)
uo.findtype('0x0F0B','-1',backpack)
uo.moveitem('finditem','14',b)
wait(400)
uo.findtype('0x0F0B','-1',backpack)
uo.moveitem('finditem','14',b)
wait(400)
uo.findtype('0x0F0B','-1',backpack)
uo.moveitem('finditem','14',b)
wait(400)
uo.findtype('0x0F0B','-1',backpack)
uo.moveitem('finditem','14',b)
wait(400)
uo.findtype('0x0F0B','-1',backpack)
uo.moveitem('finditem','14',b)
wait(400)
uo.findtype('0x0F0B','-1',backpack)
uo.moveitem('finditem','14',b)
wait(400)
uo.findtype('0x0F0B','-1',backpack)
uo.moveitem('finditem','14',b)
wait(400)
uo.findtype('0x0F0B','-1',backpack)
uo.moveitem('finditem','14',b)
wait(400)
uo.findtype('0x0F0B','-1',backpack)
uo.moveitem('finditem','14',b)
wait(400)
uo.findtype('0x0F0B','-1',backpack)
uo.moveitem('finditem','14',b)
wait(400)
uo.findtype('0x0F0B','-1',backpack)
uo.moveitem('finditem','14',b)
wait(400)
uo.findtype('0x0F0B','-1',backpack)
uo.moveitem('finditem','14',b)
wait(400)
uo.findtype('0x0F0C','-1',backpack)
uo.moveitem('finditem','3',b)
wait(400)
uo.findtype('0x0F0C','-1',backpack)
uo.moveitem('finditem','3',b)
wait(400)
uo.findtype('0x0F0C','-1',backpack)
uo.moveitem('finditem','3',b)
wait(400)
repeat
uo.useobject('paket_dlya_paketov')
Uo.moveitem(b,'1','paket_dlya_paketov')
wait(2500)
regi()
wend
wend
end sub
|
| |
| |
