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

Статистика прокачки
http://forum.yoko.com.ua/viewtopic.php?f=20&t=3606		 Page 1 of 1
Author:  Denton [ 2005-04-05 18:38:06 ]
Post subject:  Статистика прокачки
Вроде написал довольно полезный скрипт-примочку для основного макроса. Смысл такой: если в журнале отлетит фраза "Stop!" то основная макра тормозится, а дополнение выводило окошко текста и писало изменение в скилле, время прокачки, кол-во ресурсов израсходованных\выкопанных.
Author:  Mguai [ 2005-04-05 20:50:05 ]
Post subject: 
а ты долго думал ? чтоб такое написать...
Author:  Denton [ 2005-04-05 21:35:46 ]
Post subject: 
Я его не обдумывал еще.
Author:  Denton [ 2005-04-06 15:10:49 ]
Post subject: 
Моя версия скрипта:
Code:
sub sledilka(mainskill)
var time, success, fizzle, resources, skill
skill=uo.skillval(mainskill)
resources=uo.count(material)
time=0
success=0
fizzle=0
while not uo.injournal("Stop!")
   repeat
      time=time+1
      wait(1000)
   until uo.injournal("put") or uo.injournal("fail") or uo.injournal("Stop!")
   if uo.injournal("put") then
      success=success+1
      uo.deletejournal()
   endif
   if uo.injournal("fail") then
      fizzle=fizzle+1
      uo.deletejournal()
   endif
wend
resources=resources-uo.count(material)
skill=(uo.skillval(mainskill)-skill)/10
uo.textopen()
uo.textprint("Скилл вырос на "+str(skill))
uo.textprint("за "+str(time)+" секунд")
uo.textprint("При этом было использовано "+str(resources)+" материала")
uo.textprint("Статистика успехов\физлов")
uo.textprint("Успешных "+str(success)+" попыток")
uo.textprint("Безуспешных "+str(fizzel)+" попыток")
uo.deletejournal()
uo.Print('Все функции скрипта выключены!') 
uo.DeleteJournal() 
uo.Exec('terminate all') 
wait(100) 
uo.Exec('terminate all') 
wait(100) 
uo.Exec('terminate all') 
wait(100) 
end sub

В начало текста основного макроса добавить такие строки:
Code:
var skill
skill="скил за которым следим"

После этого, вот такое:
Code:
uo.exec('addtype material') 
while uo.targeting() 
wait(100) 
wend
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/