Yoko

Posted: **2005-04-05 18:14:17**

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 вырос!

если что пешите это мой первый скрипт выложинный здесь и мне хочется слышать ваше мнение

Posted: **2005-04-05 20:47:08**

ты крут как мая бабушка

Posted: **2005-04-05 20:53:48**

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

этот скрипт просит много народу и я думаю многим я помог, а твои потколы не к чему!

Posted: **2005-04-05 20:58:10**

да да ты Просто Скрипт супер теперь и я буду качать этот скил вау крута работает =) долго мучился ?
P.S научи меня так писать скрипты

Posted: **2005-04-05 21:01:38**

завязывай стебаться...

Posted: **2005-04-05 21:05:21**

вот шас все будут качать этот скил я на полным серьёзе
тут не до смеха токо зачем реканектор ?

Posted: **2005-04-05 21:10:57**

Mguai wrote:вот шас все будут качать этот скил я на полным серьёзе
тут не до смеха токо зачем реканектор ?

у тебя с конектом всё ок? всегда? - везёт.

Posted: **2005-04-05 21:16:16**

конект Сказка не когда не жалавался

Posted: **2005-04-06 17:16:18**

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

как у тебя с интелектом? Я вроде напесал, что это первый выложенный скрип соответственно можно понять что я толька учюсь! И вопросик можно? Я думаю можно вот кагда твой ребёнок дабьётся чего то самостаятельно ты его тоже так поткалывать будешь? Своими дибильными потколыми ты просто всем паказываешь на сколька у тебя развето мышление и тактичность с другими людьми! И если ты поюзаешь поиск то найдешь, что этот скрпт наиболее удобен чем выложенные здесь ранее и конект у меня тоже хороший и реконектор здесь для тех у каво с ним плохо и такой МЕГА СКРИПТЁР как ты не смог понять зачем он здесь?

Posted: **2005-04-06 18:34:08**

harosh POKA

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

Posted: **2005-04-06 20:18:46**

kostya11 wrote:harosh POPKA

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

спасибо за потдершку

Posted: **2005-04-06 20:46:09**

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

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

Posted: **2005-04-08 09:36:09**

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...