маленький вопросик...

Ask for help

Moderators: Murderator+, Murderator

Post Reply
durDom
Posts: 47
Joined: 2008-11-03 21:51:26
Location: Ekb

маленький вопросик...

Post by durDom »

добрый день.
может ли кто подсказать как узнавать точки в бек паке?
One World One Dream
Destruction
Junior Expert
Posts: 3221
Joined: 2004-06-24 22:08:56

Post by Destruction »

Какие точки, как вы хотите их узнавать, с какой целью ?
YokoInjection CodeSweeper
Function not found?
Possession of mathematics at the level of art - a gift that is only available for election.
Sorry for my clumsy English.
Telegram: @tatikom
Mirage
Posts: 2802
Joined: 2009-05-28 09:58:28
Location: Иваново
Contact:

Re: маленький вопросик...

Post by Mirage »

durDom wrote:добрый день.
может ли кто подсказать как узнавать точки в бек паке?

на лубую вещь в сумке ,info X Y то что тебе надо. там от 0 до 180 помоему.
durDom
Posts: 47
Joined: 2008-11-03 21:51:26
Location: Ekb

Post by durDom »

Code: Select all

sub SortResi() 
DIM RESI[9] 
 

RESI[1] = 0x1940 # kegmani
RESI[2] = 0x1940 # kegmani
RESI[3] = 0x1F50 # mg
RESI[4] = 0x1F4A # lt
RESI[5] = 0x1F56 # eb
RESI[6] = 0x1F47 # golybenkie
RESI[7] = 0x1F3D # sinenkie
RESI[8] = 0x1F5F # fs
RESI[9] = 0x1F49 # gh


wait(100)
UO.FindType(RESI[1],-1,"backpack")
if UO.FindCount()>0 Then
UO.MoveItem("finditem","0","backpack","40","60","0")
wait(100)
Endif
wait(100) 
UO.FindType(RESI[2],-1,"backpack")
if UO.FindCount()>0 Then
UO.MoveItem("finditem","0","backpack","40","80","0")
wait(100)
Endif
wait(100)
UO.FindType(RESI[3],-1,"backpack")
if UO.FindCount()>0 Then
UO.MoveItem("finditem","0","backpack","50","60","0")
wait(100)
Endif
wait(100)
UO.FindType(RESI[4],-1,"backpack")
if UO.FindCount()>0 Then
UO.MoveItem("finditem","0","backpack","60","60","0")
wait(100)
Endif
wait(100)
UO.FindType(RESI[5],-1,"backpack")
if UO.FindCount()>0 Then
UO.MoveItem("finditem","0","backpack","75","60","0")
wait(100)
Endif
wait(100)
UO.FindType(RESI[6],-1,"backpack")
if UO.FindCount()>0 Then
UO.MoveItem("finditem","0","backpack","110","60","0")
wait(100)
Endif
wait(100)
UO.FindType(RESI[7],-1,"backpack")
if UO.FindCount()>0 Then
UO.MoveItem("finditem","0","backpack","130","60","0")
wait(100)
Endif
wait(100)
UO.FindType(RESI[8],-1,"backpack")
if UO.FindCount()>0 Then
UO.MoveItem("finditem","0","backpack","140","60","0")
wait(100)
Endif
wait(100)
UO.FindType(RESI[9],-1,"backpack")
if UO.FindCount()>0 Then
UO.MoveItem("finditem","0","backpack","100","75","0")
wait(100)
Endif
wait(100)
end sub


точки нужны были на этот скрипт :)
One World One Dream
Mirage
Posts: 2802
Joined: 2009-05-28 09:58:28
Location: Иваново
Contact:

Post by Mirage »

массив лишний Просто проВарил бы. Уж если массив то сократил бы скрипт.

Code: Select all

DIM RESI[3] 
RESI[1] = '0x1940'
RESI[2] = '0x1940'
RESI[3] = '0x1F50'

for i=1 to 3
UO.FindType(RESI[i],-1,"backpack")
if UO.FindCount()>0 Then
UO.MoveItem("finditem","0","backpack",x[i],y[i],'0')
wait(100)
Endif
next

хотя может быть не вариант.... На вкус и цвет...
ps так раскладывать стакующиеся предметы постоянно не удобно Они кладутся один на другой и не стакуются = > занимают больше 1 ячейки (у нас на шарде в контейнере может находиться только 255 предметов.)
Post Reply