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

Считывание инфы из-под таргета
http://forum.yoko.com.ua/viewtopic.php?f=20&t=13155		 Page 1 of 1
Author:  Avel Mink [ 2008-01-30 20:04:49 ]
Post subject:  Считывание инфы из-под таргета
Нужен срочно маленький скрипт, который считывает информацию из-под таргета и записывает ее. Например запускаю скрипт, появляется таргет, я им клацаю на рунбук, а в блокнот записывается строка такого типа

Quote:
Runebook
0x0EFA 0x0510 0x404070A3


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

Заранее спасибо.
ЗЫ: Нужен срочно
Author:  Kynep [ 2008-01-30 20:14:58 ]
Post subject:  Re: Считывание инфы из-под таргета
Avel Mink wrote:
Нужен срочно маленький скрипт, который считывает информацию из-под таргета и записывает ее. Например запускаю скрипт, появляется таргет, я им клацаю на рунбук, а в блокнот записывается строка такого типа

Quote:
Runebook
0x0EFA 0x0510 0x404070A3


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

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


По моему уже пора хелп прочитать, это скрипт на пять команд. Неужели лень хоть что то самому написать?
Author:  Avel Mink [ 2008-01-30 20:29:51 ]
Post subject: 
Я же не прошу чего-то сверхестественного, мне нужен этот скрипт срочно. Напиши пожалуйста

ЗЫ: Я бы и сам написал, но не знаю какими командами считывается Тип/Цвет/ID
Author:  Kynep [ 2008-01-30 20:45:33 ]
Post subject: 
Avel Mink wrote:
Я же не прошу чего-то сверхестественного, мне нужен этот скрипт срочно. Напиши пожалуйста

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


Code:
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
Author:  Avel Mink [ 2008-01-30 21:11:24 ]
Post subject: 
Вот как получилось правильно


Code:
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
Author:  Kynep [ 2008-01-30 21:13:35 ]
Post subject: 
Avel Mink wrote:
Все время пишет вместо значений нули (кроме имени)


Поправил
Author:  Avel Mink [ 2008-01-30 21:17:31 ]
Post subject: 
Хы, ответил быстрее чем я сам поправил ) А можно еще допустим чтобы в имени не писались цифровые значения, вместо '3 Silver Ore', чтоб писалось просто 'Silver Ore' ?
Author:  Kynep [ 2008-01-30 21:19:37 ]
Post subject: 
Avel Mink wrote:
Хы, ответил быстрее чем я сам поправил ) А можно еще допустим чтобы в имени не писались цифровые значения, вместо '3 Silver Ore', чтоб писалось просто 'Silver Ore' ?


Это сложно и незачем, для такого скрипта
Author:  Avel Mink [ 2008-01-30 21:25:00 ]
Post subject: 
Все равно спасибо
Author:  Kynep [ 2008-01-30 21:28:12 ]
Post subject: 
Avel Mink wrote:
Все равно спасибо


Да не за что(играю на ДРВ, приму в дар ГП :roll: )))
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/