Yoko

All sides of Injection
It is currently 2025-10-11 10:26:05

All times are UTC+02:00




Post new topic  Reply to topic  [ 3 posts ] 
Author Message
 Post subject: Подправте
PostPosted: 2008-04-22 13:25:57 
Offline

Joined: 2007-09-28 13:04:46
Posts: 65
Code:
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



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


Top
   
 Post subject:
PostPosted: 2008-04-22 13:46:34 
Offline

Joined: 2007-09-28 13:04:46
Posts: 65
Code:
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



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


Top
   
 Post subject:
PostPosted: 2008-04-22 13:47:15 
Offline

Joined: 2007-09-28 13:04:46
Posts: 65
Что бы он щит снимал одевал... а не оружие


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 3 posts ] 

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 2 guests


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
Powered by phpBB® Forum Software © phpBB Limited