Forensic Evaluation

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
POPKA
Posts: 70
Joined: 2005-01-23 17:42:03
Contact:

Forensic Evaluation

Post by POPKA »

Code: Select all

sub main()
UO.Exec('terminate Reconnector')
wait(100)
UO.Exec('exec Reconnector')
repeat
uo.useskill('Forensic Evaluation')
uo.waittargetobject('0x40008D53') # id труп куклы каторый валется на многих серваках
wait(4000)
until uo.dead()
end sub
sub Reconnector()
    var ReconnectTime, RFlag
    ReconnectTime = '0'
    RFlag = 1
    Repeat
          While (UO.ObjAtLayer('Bpack') == '')
                if RFlag Then
                   ReconnectTime = MakeTime()
                   RFlag = 0
                endif
                Wait(20000) # WorldSave Protection
                UO.Say('')
                Wait(3000)
                UO.Say('')
                Wait(3000)
                UO.Say('')
                Wait(3000)
                UO.LDblClick(357,164)
                UO.LClick(616,459)
                Wait(3000)       
          WEnd
          Wait(3000)
          if (RFlag == 0) and (ReconnectTime <> '0') Then
             UO.Exec('terminate main')
             UO.Exec('exec main')
             UO.TextOpen()
             UO.TextPrint('Disconnected & Reconnected @ '+ReconnectTime)
             RFlag = 1
             ReconnectTime = '0'
          endif
    Until false
end sub


скоро зделаю чтоб можно было стать в Брите и качаться на трупах совсем не беспкоясь за то что они пропадут. Кстати играю на дрв и скилл этот шустро растёт за 2 часа на 60 вырос! :D
если что пешите это мой первый скрипт выложинный здесь и мне хочется слышать ваше мнение
Mguai
Posts: 83
Joined: 2004-06-18 09:03:31
Contact:

Post by Mguai »

ты крут как мая бабушка :twisted:
POPKA
Posts: 70
Joined: 2005-01-23 17:42:03
Contact:

Post by POPKA »

Mguai wrote:ты крут как мая бабушка :twisted:


этот скрипт просит много народу и я думаю многим я помог, а твои потколы не к чему!
Mguai
Posts: 83
Joined: 2004-06-18 09:03:31
Contact:

Post by Mguai »

да да ты Просто Скрипт супер теперь и я буду качать этот скил вау крута работает =) долго мучился ?
P.S научи меня так писать скрипты :wink:
Sfagnum
Expert!
Posts: 1284
Joined: 2004-07-04 00:14:58
Contact:

Post by Sfagnum »

завязывай стебаться...
Mguai
Posts: 83
Joined: 2004-06-18 09:03:31
Contact:

Post by Mguai »

вот шас все будут качать этот скил я на полным серьёзе
тут не до смеха токо зачем реканектор ?
Sfagnum
Expert!
Posts: 1284
Joined: 2004-07-04 00:14:58
Contact:

Post by Sfagnum »

Mguai wrote:вот шас все будут качать этот скил я на полным серьёзе
тут не до смеха токо зачем реканектор ?
у тебя с конектом всё ок? всегда? - везёт.
Mguai
Posts: 83
Joined: 2004-06-18 09:03:31
Contact:

Post by Mguai »

конект Сказка не когда не жалавался :twisted:
POPKA
Posts: 70
Joined: 2005-01-23 17:42:03
Contact:

Post by POPKA »

Mguai wrote:конект Сказка не когда не жалавался :twisted:



как у тебя с интелектом? Я вроде напесал, что это первый выложенный скрип соответственно можно понять что я толька учюсь! И вопросик можно? Я думаю можно вот кагда твой ребёнок дабьётся чего то самостаятельно ты его тоже так поткалывать будешь? Своими дибильными потколыми ты просто всем паказываешь на сколька у тебя развето мышление и тактичность с другими людьми! И если ты поюзаешь поиск то найдешь, что этот скрпт наиболее удобен чем выложенные здесь ранее и конект у меня тоже хороший и реконектор здесь для тех у каво с ним плохо и такой МЕГА СКРИПТЁР как ты не смог понять зачем он здесь?
kostya11
Posts: 32
Joined: 2004-10-28 13:39:41

Post by kostya11 »

harosh POKA :lol: :lol: :lol: :lol: :lol: :lol:

budu oooooochenj blagodaren jeslji sdelaesh etoto forensik skript chtobi sam iskal trupa na zemle!!!!! spasibo tebe bolshoe!!
POPKA
Posts: 70
Joined: 2005-01-23 17:42:03
Contact:

Post by POPKA »

kostya11 wrote:harosh POPKA :lol: :lol: :lol: :lol: :lol: :lol:

budu oooooochenj blagodaren jeslji sdelaesh etoto forensik skript chtobi sam iskal trupa na zemle!!!!! spasibo tebe bolshoe!!


спасибо за потдершку
Savage
Expert!
Posts: 1205
Joined: 2004-04-04 11:13:54
Location: Балаково, Саратовская обл.
Contact:

Post by Savage »

Думаю супервалк найдешь сам и реконект прилепишь :)

Code: Select all

sub foren()
   While NOT UO.Dead()
      UO.FindType('0x2006',-1,'ground')
      If UO.FindCount() Then
         If UO.GetDistance('finditem')>3 Then
            SuperWalk(0,0,'finditem')
         EndIf
         UO.WaitTargetObject('finditem')
         UO.UseSkill('Forensic Evaluation')
         wait(3000)
      Else
         wait(10000)
      Endif
   Wend
end sub
Infectous
Posts: 55
Joined: 2004-07-29 16:29:52

Post by Infectous »

Try this

Works on Dominaria, something I tossed together real quick for a friend... it could use some checks but I am GM everything so I didn't bother...
Post Reply