Считывание инфы из-под таргета

Avel Mink · Post by **Avel Mink** » 2008-01-30 20:04:49

Нужен срочно маленький скрипт, который считывает информацию из-под таргета и записывает ее. Например запускаю скрипт, появляется таргет, я им клацаю на рунбук, а в блокнот записывается строка такого типа

Runebook
0x0EFA 0x0510 0x404070A3

Первая строка - считывается имя итема
Во второй - Тип/Цвет/ID итема

Заранее спасибо.
ЗЫ: Нужен срочно

Kynep · Post by **Kynep** » 2008-01-30 20:14:58

Avel Mink wrote:Нужен срочно маленький скрипт, который считывает информацию из-под таргета и записывает ее. Например запускаю скрипт, появляется таргет, я им клацаю на рунбук, а в блокнот записывается строка такого типа

Runebook
0x0EFA 0x0510 0x404070A3

Первая строка - считывается имя итема
Во второй - Тип/Цвет/ID итема

Заранее спасибо.
ЗЫ: Нужен срочно

По моему уже пора хелп прочитать, это скрипт на пять команд. Неужели лень хоть что то самому написать?

Avel Mink · Post by **Avel Mink** » 2008-01-30 20:29:51

Я же не прошу чего-то сверхестественного, мне нужен этот скрипт срочно. Напиши пожалуйста

ЗЫ: Я бы и сам написал, но не знаю какими командами считывается Тип/Цвет/ID

Kynep · Post by **Kynep** » 2008-01-30 20:45:33

Avel Mink wrote:Я же не прошу чего-то сверхестественного, мне нужен этот скрипт срочно. Напиши пожалуйста

ЗЫ: Я бы и сам написал, но не знаю какими командами считывается Тип/Цвет/ID

Code: Select all

sub targinfo()
   var tip, cvet, id, name, ser

   uo.Print('Выбери Обьект: ') 
   uo.Exec('addobject podop') 
   while uo.Targeting() 
      wait(100) 
   wend 

   UO.TextOpen()
   UO.TextClear()
   UO.Click('podop')
   ser = UO.GetSerial('podop')  
   name = UO.GetName(ser)
   wait(100)
   tip = UO.GetGraphic(ser)
   wait(100)
   cvet = UO.GetColor(ser)
   wait(100)
   UO.TextPrint(name)
   UO.TextPrint(tip + ' / ' + cvet + ' / ' + ser)
end sub

Avel Mink · Post by **Avel Mink** » 2008-01-30 21:11:24

Вот как получилось правильно

Code: Select all

sub targinfo() 
var tip, cvet, id, name, Item,ser 

UO.AddObject('Item') 
while uo.Targeting() 
wait(100) 
wend

UO.TextOpen() 
UO.Click('Item') 
wait(300)
ser = UO.GetSerial('Item') 
name = UO.GetName('Item') 
tip = UO.GetGraphic('Item') 
cvet = UO.GetColor('Item') 
UO.TextPrint(name) 
UO.TextPrint(tip + '  ' + cvet + '  ' + ser) 
end sub

Kynep · Post by **Kynep** » 2008-01-30 21:13:35

Avel Mink wrote:Все время пишет вместо значений нули (кроме имени)

Поправил

Avel Mink · Post by **Avel Mink** » 2008-01-30 21:17:31

Хы, ответил быстрее чем я сам поправил ) А можно еще допустим чтобы в имени не писались цифровые значения, вместо '3 Silver Ore', чтоб писалось просто 'Silver Ore' ?

Kynep · Post by **Kynep** » 2008-01-30 21:19:37

Avel Mink wrote:Хы, ответил быстрее чем я сам поправил ) А можно еще допустим чтобы в имени не писались цифровые значения, вместо '3 Silver Ore', чтоб писалось просто 'Silver Ore' ?

Это сложно и незачем, для такого скрипта

Avel Mink · Post by **Avel Mink** » 2008-01-30 21:25:00

Все равно спасибо

Kynep · Post by **Kynep** » 2008-01-30 21:28:12

Avel Mink wrote:Все равно спасибо

Да не за что(играю на ДРВ, приму в дар ГП :roll:

)))

Yoko

Считывание инфы из-под таргета

Считывание инфы из-под таргета

Re: Считывание инфы из-под таргета