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

Помогите подправить скрипт на подщёт химии в паке
http://forum.yoko.com.ua/viewtopic.php?f=17&t=14345		 Page 1 of 1
Author:  -Old Kosyak- [ 2009-01-30 16:44:03 ]
Post subject:  Помогите подправить скрипт на подщёт химии в паке
Как туда вставить ещё экспы и рефрешки!?
ЗАРАНЕЕ СПОСИБО!

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
Author:  Tiny [ 2009-01-31 02:50:55 ]
Post subject: 
Code:
dim bottleType[5] 
dim bottleColor[5] 
dim bottleName[5] 

bottleType[0] = '0x0F09' 
bottleType[1] = '0x0F0C' 
bottleType[2] = '0x0F09' 
bottleType[3] = 'тип рефрехи' 
bottleType[4] = 'тип инвизки' 

bottleColor[0] = '0x0388' 
bottleColor[1] = '0x0000' 
bottleColor[2] = '0x0060' 
bottleColor[3] = 'цвет рефрехи' 
bottleColor[4] = 'цвет инвизки' 

bottleName[0] = 'Mana refresh' 
bottleName[1] = 'Greater Heal' 
bottleName[2] = 'Invisibilty'
bottleName[3] = 'refresh' 
bottleName[4] = 'unvis'
Author:  -Old Kosyak- [ 2009-02-01 08:27:53 ]
Post subject: 
Да я уже сам додумался, но всё равно спосиб)
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/