scp na podbiranije
Moderators: Murderator+, Murderator
-
- Posts: 76
- Joined: 2006-07-28 00:21:50
scp na podbiranije
napewite plz kamu ne trudno takuju fiwku, 4ar stoit i kagda wtota padaet rjadom on momentaljno eto podbiraet, krome nekotarix vewej, prosto u nas na sewrve fishingom ewo vsjakaja vsjachina vilavlevaetsa, krome ribi, kakajata nuzna, kakajata net
Code: Select all
sub AFKLoot2()
If uo.getglobal('AFKLoot')=='On' then
uo.setglobal('AFKLoot',0)
uo.print(' !!! -= AFKLoot Terminated =- !!! ')
uo.exec('terminate AFKLoot')
else
uo.setglobal('AFKLoot','On')
uo.print(' !!! -= AFKLooting =- !!! ')
endif
uo.set('finddistance','3')
uo.exec('addobject bag')
while uo.targeting()
wait(100)
wend
while uo.weight < uo.str*4
UO.FindType( -1 , -1 ,'ground')
while UO.FindCount()
uo.moveitem('finditem', 0 ,'bag')
uo.ignore('finditem')
Wait(500)
CheckLag()
UO.FindType( -1 , -1 ,'ground')
wend
wait(100)
wend
uo.setglobal('AFKLoot',0)
end sub
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net
можно с массивом
Code: Select all
sub AFKLoot()
If uo.getglobal('AFKLoot')=='On' then
uo.setglobal('AFKLoot',0)
uo.print(' !!! -= AFKLoot Terminated =- !!! ')
uo.exec('terminate AFKLoot')
else
uo.setglobal('AFKLoot','On')
uo.print(' !!! -= AFKLooting =- !!! ')
endif
VAR n
Dim Loot[80]
Loot[1] = '0x1B7A';terrium etc
Loot[2] = '0x13B9';weps
Loot[3] = '0x0F60'
Loot[4] = '0x1440'
Loot[5] = '0x13B5'
Loot[6] = '0x13FE'
Loot[7] = '0x1400'
Loot[8] = '0x1442'
Loot[9] = '0x0F4B'
Loot[10]= '0x13FA'
Loot[11]= '0x0F49'
Loot[12]= '0x13AF'
Loot[13]= '0x0F47'
Loot[14]= '0x0F45'
Loot[15]= '0x1438'
Loot[16]= '0x143C'
Loot[17]= '0x0F5C'
Loot[18]= '0x1406'
Loot[19]= '0x143A'
Loot[20]= '0x1404'
Loot[21]= '0x0F62'
Loot[22]= '0x1402'
Loot[23]= '0x143E'
Loot[24]= '0x0F4D';weps
Loot[25]= '0x13B1';longbow
Loot[26]= '0x35B6';bow
Loot[27]= '0x13FC';heavy crossbow
Loot[28]= '0x35B4';gladiator
Loot[29]= '0x0DF0';staff
Loot[30]= '0x0DF2';wand
Loot[31]= '0x0EFA';book
Loot[32]= '0x1541';sash
Loot[33]= '0x1BC3';shield
Loot[34]= '0x35B5';knuckle
Loot[35]= '0x1B78';shield
Loot[36]= '0x1718';hat
Loot[37]= '0x171A';hat
Loot[38]= '0x1549';mask
Loot[39]= '0x1547';headdress
Loot[40]= '0x1C08';skirt
Loot[41]= '0x1DB9';leather
Loot[42]= '0x13C7';l
Loot[43]= '0x13CC';l
Loot[44]= '0x13C6';l
Loot[45]= '0x13CB';l
Loot[46]= '0x1DB9';studded
Loot[47]= '0x13D6';s
Loot[48]= '0x13DB';s
Loot[49]= '0x13D4';s
Loot[50]= '0x13D5';s
Loot[51]= '0x13DA';s
Loot[52]= '0x13BB';chainmail
Loot[53]= '0x13BF';c
Loot[54]= '0x13BE';c
Loot[55]= '0x13EC';ringmail
Loot[56]= '0x13F0';r
Loot[57]= '0x13EE';r
Loot[58]= '0x13EB';r
Loot[59]= '0x1413';platemail
Loot[60]= '0x1415';p
Loot[61]= '0x1410';p
Loot[62]= '0x1414';p
Loot[63]= '0x1411';p
Loot[64]= '0x1B76';shields
Loot[65]= '0x1B7B';s
Loot[66]= '0x1B74';s
Loot[67]= '0x1B73';s
Loot[68]= '0x140E';helms
Loot[69]= '0x1412';h
Loot[70]= '0x1408';h
Loot[71]= '0x140A';h
Loot[72]= '0x140C';h
Loot[73]= '0x182D';potions
Loot[74]= '0x183D';p
Loot[75]= '0x183A';p
Loot[76]= '0x1088';jewelery
Loot[77]= '0x1087';j
Loot[78]= '0x1086';j
Loot[79]= '0x108A';j
Loot[80]= '0x1451';bone helm
uo.set('finddistance','3')
uo.exec('addobject bag')
while uo.targeting()
wait(100)
wend
while uo.weight < uo.str*4
For n = 1 To 80
UO.FindType( Loot[n] , -1 ,'ground')
while UO.FindCount()
uo.moveitem('finditem', 0 ,'bag')
uo.ignore('finditem')
Wait(500)
CheckLag()
UO.FindType( Loot[n] , -1 ,'ground')
wend
Next
wend
uo.setglobal('AFKLoot',0)
end sub
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net
-
- Posts: 76
- Joined: 2006-07-28 00:21:50
-
- Posts: 76
- Joined: 2006-07-28 00:21:50
Code: Select all
sub AFKLoot()
If uo.getglobal('AFKLoot')=='On' then
uo.setglobal('AFKLoot',0)
uo.print(' !!!AFKLOOT OFF!!! ')
uo.exec('terminate AFKLoot')
else
uo.setglobal('AFKLoot','On')
uo.print(' !!!AFKLOOT START!!! ')
endif
VAR n
Dim Loot[62]
Loot[1] = '0x0EED';Money money money
Loot[2] = '0x13B9';weps
Loot[3] = '0x0F60'
Loot[4] = '0x1440'
Loot[5] = '0x13B5'
Loot[6] = '0x13FE'
Loot[7] = '0x1400'
Loot[8] = '0x1442'
Loot[9] = '0x0F4B'
Loot[10]= '0x13FA'
Loot[11]= '0x0F49'
Loot[12]= '0x13AF'
Loot[13]= '0x0F47'
Loot[14]= '0x0F45'
Loot[15]= '0x1438'
Loot[16]= '0x143C'
Loot[17]= '0x0F5C'
Loot[18]= '0x1406'
Loot[19]= '0x143A'
Loot[20]= '0x1404'
Loot[21]= '0x0F62'
Loot[22]= '0x1402'
Loot[23]= '0x143E'
Loot[24]= '0x0F4D';weps
Loot[25]= '0x14ED';Waterstained sos
Loot[26]= '0x35B6';bow
Loot[27]= '0x13FC';heavy crossbow
Loot[28]= '0x35B4';gladiator
Loot[29]= '0x0DF0';staff
Loot[30]= '0x1DB9';leather
Loot[31]= '0x13C7';l
Loot[32]= '0x14ED';tresure map
Loot[33]= '0x13CC';l
Loot[34]= '0x13C6';l
Loot[35]= '0x13CB';l
Loot[36]= '0x1DB9';studded
Loot[37]= '0x13D6';s
Loot[38]= '0x13DB';s
Loot[39]= '0x13D4';s
Loot[40]= '0x13D5';s
Loot[41]= '0x13DA';s
Loot[42]= '0x13BB';chainmail
Loot[43]= '0x13BF';c
Loot[44]= '0x13BE';c
Loot[45]= '0x13EC';ringmail
Loot[46]= '0x13F0';r
Loot[47]= '0x13EE';r
Loot[48]= '0x13EB';r
Loot[49]= '0x1413';platemail
Loot[50]= '0x1415';p
Loot[51]= '0x1410';p
Loot[52]= '0x1414';p
Loot[53]= '0x1411';p
Loot[54]= '0x1B76';shields
Loot[55]= '0x1B7B';s
Loot[56]= '0x1B74';s
Loot[57]= '0x1B73';s
Loot[58]= '0x140E';helms
Loot[59]= '0x1412';h
Loot[60]= '0x1408';h
Loot[61]= '0x140A';h
Loot[62]= '0x140C';h
uo.set('finddistance','3')
uo.exec('addobject bag')
while uo.targeting()
wait(100)
wend
while uo.weight < uo.str*4
For n = 1 To 80
UO.FindType( Loot[n] , -1 ,'ground')
while UO.FindCount()
uo.moveitem('finditem', 0 ,'bag')
uo.ignore('finditem')
Wait(1000)
CheckLag()
UO.FindType( Loot[n] , -1 ,'ground')
wend
Next
wend
uo.setglobal('AFKLoot',0)
end sub
sub CheckLag()
if uo.Waiting()>0 then
uo.Exec('canceltarget')
end if
uo.DeleteJournal()
uo.Click('backpack')
repeat
wait(50)
until uo.InJournal('backpack')
end sub
PROVERJ V CHOM VIWKA TAVO WTO KAGDA JA ZAPUSKAJU AFKLOOT 2 U MENJA VISKAKEVAET TABLICHKA Unhandled exception in parser. ?? V CHOM FISHKA , HELP PLIZ
сам чтото накавырячил... вот и ищи...
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net
-
- Posts: 76
- Joined: 2006-07-28 00:21:50
Code: Select all
sub AFKLoot2()
If uo.getglobal('AFKLoot')=='On' then
uo.setglobal('AFKLoot',0)
uo.print(' !!! -= AFKLoot Terminated =- !!! ')
uo.exec('terminate AFKLoot')
else
uo.setglobal('AFKLoot','On')
uo.print(' !!! -= AFKLooting =- !!! ')
endif
uo.set('finddistance','3')
uo.exec('addobject bag')
while uo.targeting()
wait(100)
wend
while uo.weight < uo.str*4
UO.FindType( -1 , -1 ,'ground')
while UO.FindCount()
uo.moveitem('finditem', 0 ,'bag')
uo.ignore('finditem')
Wait(500)
CheckLag()
UO.FindType( -1 , -1 ,'ground')
wend
wait(100)
wend
uo.setglobal('AFKLoot',0)
end sub
a kak mne zdelatj wtobon vsjo podnemal krome odnavo itema, kak izlju4itj onu vewj , tip etova 4udo 0x0DD6
-
- Posts: 2259
- Joined: 2005-04-19 18:00:29
- Location: Московская область
- Contact:
Code: Select all
if not uo.GetGraphic('finditem') == '0x0DD6' then
#loot ...
else
uo.Ignore('finditem')
end if
#...
uo.IgnoreReset()
end sub
-
- Posts: 76
- Joined: 2006-07-28 00:21:50
Code: Select all
sub AFKLoot2()
If uo.getglobal('AFKLoot')=='On' then
uo.setglobal('AFKLoot',0)
uo.print(' !!! -= AFKLoot Terminated =- !!! ')
uo.exec('terminate AFKLoot')
else
uo.setglobal('AFKLoot','On')
uo.print(' !!! -= AFKLooting =- !!! ')
endif
uo.set('finddistance','3')
uo.exec('addobject bag')
while uo.targeting()
wait(100)
wend
while uo.weight < uo.str*4
UO.FindType( -1 , -1 ,'ground')
while UO.FindCount()
If uo.GetGraphic('finditem') == '0x0DD6' then
uo.ignore('finditem')
Endif
uo.moveitem('finditem', 0 ,'bag')
uo.ignore('finditem')
Wait(500)
CheckLag()
UO.FindType( -1 , -1 ,'ground')
wend
wait(100)
wend
uo.setglobal('AFKLoot',0)
end sub
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net
-
- Posts: 76
- Joined: 2006-07-28 00:21:50
DenjaGanjubass wrote:sps, a mozhno wtob on mnogije tipi ignoriroval ?
Code: Select all
If uo.GetGraphic('finditem') == '0x0DD6' or uo.GetGraphic('finditem') == '0x0001' or uo.GetGraphic('finditem') == '0x0002' or uo.GetGraphic('finditem') == '0x0003'
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net
Killborn wrote:Спасибо за скрипт, но есть вопрос. Как только он подбирает вещь, скрипт останавливается. Как это исправить?
Code: Select all
while uo.weight < uo.str*4
он работает пока вес меньше чем сила * 4
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net
Если в инже поставить галочку на verbose logging, то в окне УО побегут строки Items found:0, а как только он напишет Items found:1, строки прекращают бежать и скрипт перестает подбирать вещи.
Я подумал, это не может быть изза функции checklag? Потому что как только я убираю ее из скрипта, скрипт начинает поднимать все вещи подряд, без игнора.
А использовал я эту функцию:
Я подумал, это не может быть изза функции checklag? Потому что как только я убираю ее из скрипта, скрипт начинает поднимать все вещи подряд, без игнора.
А использовал я эту функцию:
Code: Select all
sub CheckLag()
UO.DeleteJournal() ; вытрем все сообщения в журнале (Inj, но не клиента)
UO.Click('backpack') ; одиночный клик по вашему backpack
; ждем сообщения в журнале
repeat
wait(100)
until UO.InJournal("Backpack")
; этот цикл завершится, если это сообщение появится.... замечу "Backpack" и "backpack"
; регистр важен Пишите точно что ждете
end sub