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

count ресурсов (проблема со стопками)
http://forum.yoko.com.ua/viewtopic.php?f=20&t=8453		 Page 1 of 1
Author:  Mihail [ 2006-08-09 00:04:44 ]
Post subject:  count ресурсов (проблема со стопками)
Вот решил написать удобный подсчет разных ресурсов

Code:
sub count()
var i
Dim a[2]
;       [тип]  [цвет] [отображаемое название]
a[0] = '0x0F09 0x0060 Invistiblity'
a[1] = '0x0F09 0x0388 Mana Refresh'
for i=0 to 1
uo.print(Right(a[i],len(a[i])-14)+': '+str(uo.count(Left(a[i],6),Right(Left(a[i],13),6))))
next
end sub

Но столкнулся с такой проблемой: - этот скрипт хорош только для предметов не_складывающихся в стопку..
взять те же скроллы- их кол-во будет отображаться некорректно..
в идеале конечно нужна команда типа uo.stackable(object) :) но такой насколько мне известно нету..
вобщем надо как-то решить проблему :(
у меня были мысли использывать findtype и потом сравнивать результаты uo.count(uo.getgraphic('finditem')) и uo.getquantity('finditem')
но что-то не очень получается (
Author:  SESTRA [ 2006-08-09 04:44:21 ]
Post subject: 
Могу поделитсЯ) работает норм ток итамы вписывай и все)
Code:
########################## 
sub S4italka() 
UO.Print(STR(UO.count('0x0E20','0x000'))+" Бинты") 
UO.Print(STR(UO.count('0x1F49','0x000'))+" Гх") 
UO.Print(STR(UO.count('0x1F50','0x000'))+" Рефлекты") 
UO.Print(STR(UO.count('0x1F5F','0x000'))+" Фсы") 
UO.Print(STR(UO.count('0x1F52','0x000'))+" Парализы") 
UO.Print(STR(UO.count('0x1F4A','0x000'))+" Лайты") 
UO.Print(STR(UO.count('0x1F44','0x000'))+" Стенки") 
UO.Print(STR(UO.count('0x1F5B','0x000'))+" Филды") 
UO.Print(STR(UO.count('0x1F69','0x000'))+" Деманы")
UO.Print(STR(UO.count('0x1F4C','0x000'))+" Реколы")
UO.Print(STR(UO.count('0x0F06','0x07F2'))+" Инвизки") 
UO.Print(STR(UO.count('0x0F0B','0x000'))+" Рефрешки")
end sub
##########################
Author:  Nmy [ 2006-08-09 06:39:31 ]
Post subject: 
:roll: :wink:

все оказывается очень просто...
Author:  CONDOMchick [ 2006-08-09 12:28:28 ]
Post subject: 
SESTRA wrote:
Могу поделитсЯ) работает норм ток итамы вписывай и все)
Code:
########################## 
sub S4italka() 
UO.Print(STR(UO.count('0x0E20','0x000'))+" Бинты") 
UO.Print(STR(UO.count('0x1F49','0x000'))+" Гх") 
UO.Print(STR(UO.count('0x1F50','0x000'))+" Рефлекты") 
UO.Print(STR(UO.count('0x1F5F','0x000'))+" Фсы") 
UO.Print(STR(UO.count('0x1F52','0x000'))+" Парализы") 
UO.Print(STR(UO.count('0x1F4A','0x000'))+" Лайты") 
UO.Print(STR(UO.count('0x1F44','0x000'))+" Стенки") 
UO.Print(STR(UO.count('0x1F5B','0x000'))+" Филды") 
UO.Print(STR(UO.count('0x1F69','0x000'))+" Деманы")
UO.Print(STR(UO.count('0x1F4C','0x000'))+" Реколы")
UO.Print(STR(UO.count('0x0F06','0x07F2'))+" Инвизки") 
UO.Print(STR(UO.count('0x0F0B','0x000'))+" Рефрешки")
end sub
##########################


Да.
У меня такойже - пашет нормально
Author:  Mihail [ 2006-08-09 13:49:58 ]
Post subject: 
ну это фигня - у меня у самого такой же (тока в звыисимости от кол0-ва разными цветами высвечивает) - но это трэш :) - и неудобно + некрасиво :)
мне надо как я написал :)
Author:  SESTRA [ 2006-08-09 14:02:57 ]
Post subject: 
Ну ты прям тебе золотой ниткой его не обшить?)
Author:  Mihail [ 2006-08-09 17:06:44 ]
Post subject: 
все сделал..
пришлось оформить в 2 массива складывающиеся в стопку и не складывающиеся
топ клоуз
Author:  BoBBaH [ 2006-08-09 17:22:52 ]
Post subject: 
скрипт твой в студию
Author:  Sfagnum [ 2006-08-21 14:25:03 ]
Post subject: 
от АГРСа
Code:
Sub get_amount_(Type, Color, Cont)
Var item_amount = 0
   UO.IgnoreReset()
   repeat
      UO.FindType(Type, Color, Cont)
      if UO.FindCount()>0 Then
         if UO.GetQuantity('finditem')==0 Then
            item_amount = item_amount + 1
         else
            item_amount = item_amount + UO.GetQuantity('finditem')
         end If
         UO.Ignore('finditem')
         UO.FindType(Type, Color, Cont)
      end if
   Until UO.FindCount()<1
   UO.IgnoreReset()
   return item_amount
end sub
переделать под нужное думаю сдюжите.
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/