Нужен скрипт на форенсик!

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
Sh@dow
Posts: 4
Joined: 2006-02-13 17:32:30

Нужен скрипт на форенсик!

Post by Sh@dow »

Нужен скрипт на форенсик желательно такой чтобы убивал нуба качал на нем форенсик и ресал и заново повторял процес ! скиньте плз!
Kynep
Expert!
Posts: 1348
Joined: 2006-02-07 08:51:40
Location: г. Старый Оскол
Contact:

Re: Нужен скрипт на форенсик!

Post by Kynep »

Sh@dow wrote:Нужен скрипт на форенсик желательно такой чтобы убивал нуба качал на нем форенсик и ресал и заново повторял процес ! скиньте плз!


Code: Select all

sub forenc()
VAR i, an, nub= #ID нуба поставь
VAR skiltime= '5000'#Время действия скила Форенсик
VAR bint= # Тут поставь тип бинтов
uo.Set('finddistance','3')
while not uo.dead()
uo.FindType(nub,'1','ground')
 if uo.Count('finditem') > 0 then
       uo.WarMode(true)
       an = uo.GetSerial('finditem')
       uo.Attack(an)
   while not uo.InJournal('Body')
       wait(500)
   wend
   for i = 0 to 50
       uo.waittargetobject('lastcorpse')
       uo.UseSkill('Forensic ')
       wait(skiltime)
    next
       uo.waittargetobject(an)
       uo.usetype(bint)
 end if
wend
end sub
Grin
Expert!
Posts: 2580
Joined: 2005-05-04 14:05:19
Location: Москва

Post by Grin »

Ребят вы скрипты которые пишете сами проверяете?;)
Ладно в логике ошибится или еще чего тотам... но очевидное...
+ много лишнего...
flake
Expert!
Posts: 746
Joined: 2004-08-11 23:56:17
Location: The Citadel
Contact:

Post by flake »

Чето мне не кажется, что они их проверяют. Типы везде даже не вставленны.
Kynep
Expert!
Posts: 1348
Joined: 2006-02-07 08:51:40
Location: г. Старый Оскол
Contact:

Post by Kynep »

flake wrote:Чето мне не кажется, что они их проверяют. Типы везде даже не вставленны.



Ну типы можно и удалить, а вот на счет проверок... да ты прав, просто я пишу на коленках, и прверить нет возможности :(
Grin
Expert!
Posts: 2580
Joined: 2005-05-04 14:05:19
Location: Москва

Post by Grin »

просто проверка штука наглядное...
а вот

Code: Select all

uo.FindType(nub,'1','ground') 
if uo.Count('finditem') > 0 then

это идиотизм...
Когда вы поймете что каунт принимает на себя тип?!
Destruction
Junior Expert
Posts: 3221
Joined: 2004-06-24 22:08:56

Post by Destruction »

Grin wrote:просто проверка штука наглядное...
а вот

Code: Select all

uo.FindType(nub,'1','ground') 
if uo.Count('finditem') > 0 then

это идиотизм...
Когда вы поймете что каунт принимает на себя тип?!

Ага, первым аргументом... Неужели так тяжело глянуть в хелп, если не помнишь? :idea:
Sfagnum
Expert!
Posts: 1284
Joined: 2004-07-04 00:14:58
Contact:

Post by Sfagnum »

Destruction wrote:
Grin wrote:просто проверка штука наглядное...
а вот

Code: Select all

uo.FindType(nub,'1','ground') 
if uo.Count('finditem') > 0 then

это идиотизм...
Когда вы поймете что каунт принимает на себя тип?!
Ага, первым аргументом... Неужели так тяжело глянуть в хелп, если не помнишь? :idea:
вообщем Грин может и не прально выразился.... но я с ним АпслютнА согласен...
ЗЫ особо обращаем внимание где считает uo.Count()

PPS а "[уhlp_...]" - не пашет ща?
Post Reply