Подправте

[www.i.ru]

Code: Select all

sub forkkk()
Var Fork='0x1405'
Var X=600
        repeat
         UO.Equipt( 'Rhand', Fork )
         wait(100)
         until UO.GetGraphic( UO.ObjAtLayer( 'Rhand' ) ) == Fork
      Endif
   Else
      If UO.GetGraphic( UO.ObjAtLayer( 'Rhand' ) ) == Fork Then
 Endif
end sub

Все нормально делает! (меняет оружие на вилку) но в конце выдает ошибку=(( исправте пожалуйсто

[www.i.ru]

Code: Select all

sub autohealcure(); 1
VAR t = 600
VAR y = 600

     repeat
       uo.deletejournal()
        if uo.InJournal('You have been mortally wounded!') then
            while uo.InJournal('You are no longer mortally wounded')
                wait(50)
            wend
        Endif

        if UO.Life < UO.Str - 8 then
            uo.deletejournal()
            uo.exec("bandageself")

            repeat
                if uo.poisoned() OR UO.Life < 80 OR UO.Stamina < 80 then
                    UO.SetArm('Weapon')
                    wait (t)
                    uo.unequip( "Lhand" )
                    wait (y)
                    if uo.poisoned() AND UO.Count('0x0F07','0x0000') > 0 then
                        while uo.poisoned() AND UO.Count('0x0F07','0x0000') > 0
                            uo.usetype('0x0F07','0x0000')
                            wait (t)
                        wend
                    Endif
                    if UO.Life < 80 AND UO.Count('0x0F0C','0x0000') > 0 then
                        while UO.Life < 80 AND UO.Count('0x0F0C','0x0000') > 0
                            uo.usetype('0x0F0C','0x0000')
                            wait (t)
                        wend
                    Endif
                    if UO.Stamina < 80 AND UO.Count('0x0F0B','0x0000') > 0 then
                        while  UO.Stamina < 80 AND UO.Count('0x0F0B','0x0000') > 0
                            uo.usetype('0x0F0B','0x0000')
                            wait (t)
                        wend
                    Endif
                    wait(y)
                    UO.Arm('Weapon')
                else
                    wait (50)
                endif
                wait(50)
            until uo.InJournal('You finish applying the bandages | You apply the bandages | You heal what little damage your | That being is not damaged')

        else
            wait (50)
        endif

        if uo.poisoned() AND UO.Count('0x0F07','0x0000') > 0 then
            UO.SetArm('Weapon')
            wait (t)
            uo.unequip( "Lhand" )
            wait (y)
            while  uo.poisoned() AND UO.Count('0x0F07','0x0000') > 0
                uo.usetype('0x0F07','0x0000')
                wait (t)
            wend
            wait(y)
            UO.Arm('Weapon')
        else
            wait (50)
        endif
        if UO.Stamina < 80 AND UO.Count('0x0F0B','0x0000') > 0 then
            UO.SetArm('Weapon')
            wait (t)
            uo.unequip( "Lhand" )
            while UO.Stamina < 80 AND UO.Count('0x0F0B','0x0000') > 0
                uo.usetype('0x0F0B','0x0000')
                wait (t)
            wend
            wait(y)
            UO.Arm('Weapon')
        else
            wait (50)
        Endif

    until uo.dead()
end sub

Я пытался оставить только чтобы был авто отхил от яда... но не получилось...
Помогите убрать все лишнеие только чтобы был отхил от яда и все

[www.i.ru]

Что бы он щит снимал одевал... а не оружие