Yoko

Code: Select all

,snap [формат] [путь:имя] - сделать скриншот экрана. 
формат - "jpg"/"bmp" 
по умолчанию сохраняется в виде screenxx.bmp в папке инжекта

Code: Select all

,snap "bmp" "e:/games/uo/screen:name"

Code: Select all

uo.moveitem('finditem', STR(q) ,'backpack',140,30,0)

Code: Select all

Sub REGS()
    VAR amount = 60
    VAR r, q, RegBag = 0x40175FF4
    Dim reg[8]
    reg[1] = 0x0F84
    reg[2] = 0x0F85
    reg[3] = 0x0F86
    reg[4] = 0x0F7A
    reg[5] = 0x0F7B
    reg[6] = 0x0F8C
    reg[7] = 0x0F8D
    reg[8] = 0x0F88
    uo.ignorereset()
    For r = 1 to 8
        if uo.count( reg[r] )<>amount then
            q = amount - uo.count( reg[r] )
            if q <> 0 then
                if q > 0 then
                    uo.useobject( RegBag )
                    CheckLag()
                    uo.findtype( reg[r] , -1 , RegBag )
                    If uo.findcount() == 0 then
                        uo.msg('НИФИГА НЕТ РЕГОВ')
                        return
                    endif
                    uo.moveitem('finditem', STR(q) ,'backpack',140,30,0)
                    wait(400)
                    CheckLag()
                else
                    q = q*-1
                    uo.findtype( reg[r] , -1 ,'my')
                    uo.moveitem('finditem', STR(q) , RegBag )
                    wait(400)
                    CheckLag()
                endif
            endif
        endif
    next
    uo.print('ПЕРЕКЛАДКА РЕГОВ ЗАКОНЧЕНА')
end sub

Code: Select all

,snap "bmp" "e:\games\uo\screen:name"

Code: Select all

uo.set('lasttarget','laststatus')

Code: Select all

Sub Flame()
   VAR ManaNeed=45
   VAR ScrollManaNeed=22
   UO.Set('lasttarget','laststatus')
      UO.FindType('0x1F5F',-1,'my')
      If UO.GetQuantity('finditem')>0 Then
         If UO.Mana>=ScrollManaNeed Then
            UO.WaitTargetObject('lasttarget')
            UO.UseObject('finditem')
            UO.Print("Scroll")
         Else
            UO.Print("Low mana!!! Scroll!")
         Endif
      Else
         If UO.Mana>=ManaNeed Then
            UO.Cast('Flame Strike','laststatus')
         Else
            UO.Print("Low mana!!!")
         Endif
      Endif
end sub