Yoko

Code: Select all

	sub astloot()
		var t,l
		t=600
		uo.UseObject('lastcorpse')
		wait(t)
		dim astloot[101]
		uo.Print('Starting loot')
		
		astloot[0]=0x13B9
		astloot[1]=0x13BA
		astloot[2]=0x13FE
		astloot[3]=0x13FF
		astloot[4]=0x13B5
		astloot[5]=0x13B6
		astloot[6]=0x143E
		astloot[7]=0x143F
		astloot[8]=0x0F4D
		astloot[9]=0x0F4E
		astloot[10]=0x1440
		astloot[11]=0x1441
		astloot[12]=0x0F60
		astloot[13]=0x0F61
		astloot[14]=0x0F5E
		astloot[15]=0x0F5F
		astloot[16]=0x13B7
		astloot[17]=0x13B8
		astloot[18]=0x13FA
		astloot[19]=0x13FB
		astloot[20]=0x0F45
		astloot[21]=0x0F46
		astloot[22]=0x0F4B
		astloot[23]=0x0F4C
		astloot[24]=0x13AF
		astloot[25]=0x13B0
		astloot[26]=0x0F49
		astloot[27]=0x0F4A
		astloot[28]=0x0F62
		astloot[29]=0x0F63
		astloot[30]=0x1402
		astloot[31]=0x1403
		astloot[32]=0x1400
		astloot[33]=0x1401
		astloot[34]=0x0F51
		astloot[35]=0x0F52
		astloot[36]=0x1406
		astloot[37]=0x1407
		astloot[38]=0x1438
		astloot[39]=0x1439
		astloot[40]=0x0F5C
		astloot[41]=0x0F5D
		astloot[42]=0x143A
		astloot[43]=0x143B
		astloot[44]=0x143C
		astloot[45]=0x143D
		astloot[46]=0x1B76
		astloot[47]=0x1B77
		astloot[48]=0x1B7B
		astloot[49]=0x1B7A
		astloot[50]=0x1B72
		astloot[51]=0x1B73
		astloot[52]=0x1B74
		astloot[53]=0x1B75
		astloot[54]=0x1B79
		astloot[55]=0x1B78
		astloot[56]=0x1416
		astloot[57]=0x1415
		astloot[58]=0x13BF
		astloot[59]=0x13C4
		astloot[60]=0x1411
		astloot[61]=0x141A
		astloot[62]=0x13BE
		astloot[63]=0x1410
		astloot[64]=0x1417
		astloot[65]=0x1412
		astloot[66]=0x1419
		astloot[67]=0x140C
		astloot[68]=0x140D
		astloot[69]=0x140A
		astloot[70]=0x140B
		astloot[71]=0x1408
		astloot[72]=0x1409
		astloot[73]=0x140E
		astloot[74]=0x140F
		astloot[75]=0x13BB
		astloot[76]=0x13C0
		astloot[77]=0x1414
		astloot[78]=0x1418
		astloot[79]=0x1413
		astloot[80]=0x1086
		astloot[81]=0x13B1
		astloot[82]=0x13B2
		astloot[83]=0x0F4F
		astloot[84]=0x0F50
		astloot[85]=0x13FC
		astloot[86]=0x13FD
		astloot[87]=0x0F0E
		astloot[88]=0x1F4A
		astloot[89]=0x1F5F
		astloot[90]=0x0E76
		astloot[91]=0x0E75
		astloot[92]=0x0E79
		astloot[93]=0x09B0
		astloot[94]=0x0F7A #bp
		astloot[95]=0x0F88 #ns
		astloot[96]=0x1F5F #fs
		astloot[97]=0x1F52 #paral scrolls
		astloot[98]=0x0F8C #regs->Sulf Ash
		astloot[99]=0x09CF #regs->garlic
		astloot[100]=0x0E21 #bandages
		
		uo.Print('FIIIIIINESHHHHH!')
		for l=0 to 100
			uo.FindType(astloot[l],"-1","lastcorpse")
			if uo.FindCount()>0 and uo.GetDistance("lastcorpse")<=2 then
				uo.Grab(1,"finditem")
				wait(t)
			end if
		next
	end sub

Code: Select all

uo.FindType(astloot[l],"-1","lastcorpse")
			if uo.findcount()>0 then
					CheckLag()
					UO.MoveItem('finditem',-1,'backpack')
					wait(500)