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

plz help so skripton na Tinkering
http://forum.yoko.com.ua/viewtopic.php?f=20&t=5380		 Page 1 of 1
Author:  Cornor [ 2005-10-05 14:28:01 ]
Post subject:  plz help so skripton na Tinkering
est skript :
Code:
#==============================================================
#  MakeLockPick() - crafting Lockpick
#
#  Journal has been deleted!!!
#--------------------------------------------------------------
sub makelockpick()
   VAR c,Cont='0x4009B90C';
   while NOT UO.Dead()
      ToHide()

      UO.FindType('0x1bef','0x0000','backpack') ;iron in BP
      if UO.GetQuantity('finditem')<=3 then

         UO.FindType('0x14fb','0x0000','backpack') ;lockpick
         If UO.GetQuantity('finditem')>0 Then
            UO.SetReceivingContainer(Cont)
            wait(1000)
            UO.Grab('all','finditem')
            wait(1000)
            UO.UnSetReceivingContainer()
         Endif

         UO.FindType('0x1BEF','0x0000',Cont) ;iron in cont
         wait(1000)
         UO.Grab('99','finditem')
         wait(1000)
      endif

      CheckLag()
      UO.Exec("waitmenu 'Tinkering' 'Tools' 'Tools' 'lock'")
      UO.UseType('0x1EBC') ; tinker tools
      while NOT UO.InJournal("You put") AND NOT UO.InJournal("Tinkering failed")
         wait(300)
      wend
   wend
end sub


PROBLEMA : posle kazdogo World Save skript zbivaetsa ja igrajy na servere DRW
Author:  Cornor [ 2005-10-05 15:11:47 ]
Post subject: 
nu 4to nikto pomo4 nemozet ????
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/