Page 1 of 1
scp na podbiranije
Posted: 2006-12-05 17:13:10
by DenjaGanjubass
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
Posted: 2006-12-05 17:23:01
by Nmy
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
Posted: 2006-12-05 17:23:52
by Nmy
можно с массивом
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
Posted: 2006-12-06 16:19:18
by DenjaGanjubass
v pervom on podberaet vsjo a vo vtorom toljko vibranoje ?
Posted: 2006-12-06 16:56:34
by DenjaGanjubass
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
Posted: 2006-12-06 18:48:16
by Nmy
сам чтото накавырячил... вот и ищи...
Posted: 2006-12-06 20:08:20
by DenjaGanjubass
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
Posted: 2006-12-07 05:29:34
by Scripts Writer
Code: Select all
if not uo.GetGraphic('finditem') == '0x0DD6' then
#loot ...
else
uo.Ignore('finditem')
end if
#...
uo.IgnoreReset()
end sub
Posted: 2006-12-08 21:52:56
by DenjaGanjubass
a kuda mne eto vsavitj ??

Posted: 2007-01-04 20:23:04
by DenjaGanjubass
eee, nu pomogite, ja bez vas, acani, kak bez ruk
Posted: 2007-01-04 21:52:18
by Nmy
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
Posted: 2007-01-04 22:46:49
by DenjaGanjubass
sps, a mozhno wtob on mnogije tipi ignoriroval ?
Posted: 2007-01-04 23:59:58
by Nmy
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'
Posted: 2007-01-05 00:19:16
by DenjaGanjubass
respekt
Posted: 2007-01-25 12:22:33
by Killborn
Спасибо за скрипт, но есть вопрос. Как только он подбирает вещь, скрипт останавливается. Как это исправить?
Posted: 2007-01-25 14:11:24
by Nmy
Killborn wrote:Спасибо за скрипт, но есть вопрос. Как только он подбирает вещь, скрипт останавливается. Как это исправить?
он работает пока вес меньше чем сила * 4
Posted: 2007-01-25 21:58:14
by Killborn
Если в инже поставить галочку на verbose logging, то в окне УО побегут строки Items found:0, а как только он напишет Items found:1, строки прекращают бежать и скрипт перестает подбирать вещи.
Я подумал, это не может быть изза функции checklag? Потому что как только я убираю ее из скрипта, скрипт начинает поднимать все вещи подряд, без игнора.
А использовал я эту функцию:
Code: Select all
sub CheckLag()
UO.DeleteJournal() ; вытрем все сообщения в журнале (Inj, но не клиента)
UO.Click('backpack') ; одиночный клик по вашему backpack
; ждем сообщения в журнале
repeat
wait(100)
until UO.InJournal("Backpack")
; этот цикл завершится, если это сообщение появится.... замечу "Backpack" и "backpack"
; регистр важен Пишите точно что ждете
end sub