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

Добавьте 1 функцию в скрипт плз!
http://forum.yoko.com.ua/viewtopic.php?f=17&t=44965
Page 1 of 1

Author:  Михаил Киргизов [ 2019-02-24 13:33:30 ]
Post subject:  Добавьте 1 функцию в скрипт плз!

нужно добавить как наберает определёный вес,чар улетает по руне она находиться в банке.


Code:
VAR Kirka = '0x0E85' ; ??? ?????  
sub minamine()
   #?????????
   VAR MaxVes =550 ; ?????? ?? ??????
   VAR TileNum = '1339' ; ???? ??????
   #??????????
   VAR x, y, t, k, oldx, oldy, wh, togg
   #?????????
   VAR ms1 = "There is no ore here to mine"
   VAR ms2 = "You can't use"
   VAR ms3 = "You put the"
   VAR ms4 = "You loosen"
   VAR ms5 = "You have no"
   VAR ms6 = "Try mining in rock"
   VAR ms7 = "??.."
   VAR ms8 = "broke the "
   #???????!
   while 1
      wait(300)
      oldx = uo.getx(480,98) #???????? ??? ??: ????? ? ???????
      oldy = uo.gety(83,377)
      wait (3000)
      UO.Set('quiet','1') #???????? ?????????...
      for y=-2 to 2
         for x=-2 to 2
            k = 0
            repeat
               UO.DeleteJournal()
               t = UO.Timer()
               k = k + 1
               UO.CancelTarget()
               wait(300)
               UO.WaitTargetTile( TileNum, STR( UO.GetX() + x ), STR( UO.GetY() + y ), 0)
               UO.UseType( Kirka )
               #########################
               repeat
                  wait(300)
               until UO.InJournal(ms1) OR UO.InJournal(ms2) OR UO.InJournal(ms3) OR UO.InJournal(ms4) OR UO.InJournal(ms5) OR UO.InJournal(ms6) OR UO.InJournal(ms7) OR UO.InJournal(ms8)
               #########################
               If UO.Weight > MaxVes Then
                  ; ????....
                  UO.Print(" Overweight!" )
                  return
               Endif
            until ( NOT UO.InJournal(ms4) AND NOT UO.InJournal(ms3) OR (k > 7) )
         next
      next
      UO.Set('quiet','0') #??????
      uo.print( '??????? ?????????????.') #?????? ??? ???????...
      wait(3000)
      oldx = uo.getx(480,98) #??? ??? ?? ??????.
      oldy = uo.gety(83,377)
      if wh == '1' then #??????
         uo.press (33)
         uo.press (33)
         uo.press (33)
      else #?????
         uo.press (35)
         uo.press (35)
         uo.press (35)
      endif
      wait(300)
      if (uo.getx() == oldx) and (uo.gety() == oldy) then
         uo.print('?????!')
         if wh == '1' then #??????????? wh ? ???????? ?????
            uo.press(36)
            uo.press(36)
            uo.press(36)
            wh = '0'
         else
            wh = '1'
            uo.press(36)
            uo.press(36)
            uo.press(36)
         end if
      else
         uo.print('????????.')
      endif
      wait(300) # ???.... ??????!
   wend
endsub



буду благодарен !

Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/