Page 1 of 1
Подсчет бутылок химии в паке? Оском.
Posted: 2006-03-03 13:00:51
by Dron D.
Привет всем. Хотел только что написать скрипт такой, чтобы подсчитывал сколько в паке осталось гх, ман, инвизок, но что то не пойму смысл и логику скрипта
Хотел чтобы он выдавал мне вот так инфу:
Code: Select all
"xx Mana refresh" - '0x0F09', '0x0388'
"xx Greater Heal" - '0x0F0C', '0x0000'
"xx Invisibilty" - '0x0F09', '0x0060'
Если не сложно - помогите, буду благодарен.
Re: Подсчет бутылок химии в паке? Оском.
Posted: 2006-03-03 13:38:03
by CFA
Code: Select all
sub countBottles()
var bottles = 3
dim bottleType[3]
dim bottleColor[3]
dim bottleName[3]
bottleType[0] = '0x0F09'
bottleType[1] = '0x0F0C'
bottleType[2] = '0x0F09'
bottleColor[0] = '0x0388'
bottleColor[1] = '0x0000'
bottleColor[2] = '0x0060'
bottleName[0] = 'Mana refresh'
bottleName[1] = 'Greater Heal'
bottleName[2] = 'Invisibilty'
uo.IgnoreReset()
var bottleCount
for var f = 0 to bottles - 1
bottleCount = 0
repeat
uo.FindType(bottleType[f], bottleColor[f])
if (uo.FindCount()) then
bottleCount = bottleCount + uo.GetQuantity('finditem')
uo.ignore('finditem')
end if
until uo.FindCount() == 0
uo.print(STR(bottleCount) + ' ' + bottleName[f])
next
uo.IgnoreReset()
end sub