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

Помогите 2 вопроса по скриптам
http://forum.yoko.com.ua/viewtopic.php?f=20&t=3398		 Page 1 of 1
Author:  One Two [ 2005-03-15 07:24:38 ]
Post subject:  Помогите 2 вопроса по скриптам
....
Author:  One Two [ 2005-03-15 07:25:14 ]
Post subject: 
Code:
sub BombDrop() 
var bomb='0x0f0d' 
var i 
for i = 0 to 7
UO.FindType(bomb,'backpack') 
UO.UseObject('finditem') 
wait(100) 
UO.Drop('1',STR(UO.GetX('laststatus')),STR(UO.GetY('laststatus')),STR(UO.GetZ('laststatus')),'finditem') 
next 
UO.Cast('Magic Arrow',('finditem')) 
end sub

1 вопрос почему бомбы кидаются над галовой на 3 гдето выше и неципляют того в кого кидаеш
подправьте пожалуйста

Code:
sub loot() 
UO.FindType("0x1404","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x1438","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x1400","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x13b7","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x0f51","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x13b5","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x13fe","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x0f60","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x0f5c","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x0f4d","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x0f62","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x1b76","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x1bc3","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x1b72","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x1b7b","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if 

UO.FindType("0x1b7a","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x1b73","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x1b74","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x1b78","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x1bc4","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x1b74","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x1b78","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if 

UO.FindType("0x1410","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x1415","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x1412","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x140e","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x1413","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x140a","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x1408","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x140c","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x1411","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x13bf","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x13be","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x1414","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
end if  

UO.FindType("0x0e75","-1","lastcorpse") #Female Leather Armor 
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then 
UO.Grab("0","finditem") 
wait(500) 
endif 
end sub

2 Вопрос почему незапускается раньше работал а шяс нет хз почему
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/