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

scp na podbiranije
http://forum.yoko.com.ua/viewtopic.php?f=17&t=10328		 Page 1 of 1
Author:  DenjaGanjubass [ 2006-12-05 17:13:10 ]
Post subject:  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
Author:  Nmy [ 2006-12-05 17:23:01 ]
Post subject: 
Code:
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
Author:  Nmy [ 2006-12-05 17:23:52 ]
Post subject: 
можно с массивом
Code:
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
Author:  DenjaGanjubass [ 2006-12-06 16:19:18 ]
Post subject: 
v pervom on podberaet vsjo a vo vtorom toljko vibranoje ?
Author:  DenjaGanjubass [ 2006-12-06 16:56:34 ]
Post subject: 
Code:
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
Author:  Nmy [ 2006-12-06 18:48:16 ]
Post subject: 
сам чтото накавырячил... вот и ищи...
Author:  DenjaGanjubass [ 2006-12-06 20:08:20 ]
Post subject: 
Code:
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
Author:  Scripts Writer [ 2006-12-07 05:29:34 ]
Post subject: 
Code:
if not uo.GetGraphic('finditem') == '0x0DD6' then
  #loot ...
else
  uo.Ignore('finditem')
end if 
  #...
uo.IgnoreReset()
end sub
Author:  DenjaGanjubass [ 2006-12-08 21:52:56 ]
Post subject: 
a kuda mne eto vsavitj ?? :(
Author:  DenjaGanjubass [ 2007-01-04 20:23:04 ]
Post subject: 
eee, nu pomogite, ja bez vas, acani, kak bez ruk
Author:  Nmy [ 2007-01-04 21:52:18 ]
Post subject: 
Code:
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
Author:  DenjaGanjubass [ 2007-01-04 22:46:49 ]
Post subject: 
sps, a mozhno wtob on mnogije tipi ignoriroval ?
Author:  Nmy [ 2007-01-04 23:59:58 ]
Post subject: 
DenjaGanjubass wrote:
sps, a mozhno wtob on mnogije tipi ignoriroval ?


Code:
If uo.GetGraphic('finditem') == '0x0DD6' or uo.GetGraphic('finditem') == '0x0001' or uo.GetGraphic('finditem') == '0x0002' or uo.GetGraphic('finditem') == '0x0003'
Author:  DenjaGanjubass [ 2007-01-05 00:19:16 ]
Post subject: 
respekt
Author:  Killborn [ 2007-01-25 12:22:33 ]
Post subject: 
Спасибо за скрипт, но есть вопрос. Как только он подбирает вещь, скрипт останавливается. Как это исправить?
Author:  Nmy [ 2007-01-25 14:11:24 ]
Post subject: 
Killborn wrote:
Спасибо за скрипт, но есть вопрос. Как только он подбирает вещь, скрипт останавливается. Как это исправить?

Code:
while uo.weight < uo.str*4

он работает пока вес меньше чем сила * 4
Author:  Killborn [ 2007-01-25 21:58:14 ]
Post subject: 
Если в инже поставить галочку на verbose logging, то в окне УО побегут строки Items found:0, а как только он напишет Items found:1, строки прекращают бежать и скрипт перестает подбирать вещи.

Я подумал, это не может быть изза функции checklag? Потому что как только я убираю ее из скрипта, скрипт начинает поднимать все вещи подряд, без игнора.

А использовал я эту функцию:
Code:
sub CheckLag() 
   UO.DeleteJournal() ; вытрем все сообщения в журнале (Inj, но не клиента) 
   UO.Click('backpack') ; одиночный клик по вашему backpack 
;       ждем сообщения в журнале 
   repeat 
      wait(100) 
   until UO.InJournal("Backpack") 
;       этот цикл завершится, если это сообщение появится.... замечу "Backpack" и "backpack" 
;       регистр важен Пишите точно что ждете 
end sub
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/