annuncio

Comprimi
Ancora nessun annuncio.

скрипт на килл и дискорд ближайшего моба (

Comprimi
X
 
  • Filtro
  • Ora
  • Visualizza
Elimina tutto
nuovi messaggi

  • скрипт на килл и дискорд ближайшего моба (

    codice:
    Sub KillDiscord()
    	var i,j,fl,c,lasttimer
    	fl = 0
    	UO.IgnoreReset()
    	i = 1
    	while i <= 12 and fl <> 1 
    	UO.Set( 'finddistance', i ) 
    		UO.FindType( '-1' , '-1', '1')
    		if UO.findcount() > 0 then
    			c = UO.findcount()
    			j = 1
    			while j <= c and fl <> 1
    				UO.FindType( '-1' , '-1', '1')
    				if UO.GetNotoriety( 'finditem' ) == 3 then
    					fl = 1
    					uo.waittargetobject( 'finditem' )
    					uo.say(' ')
    					uo.say('all kill')
    					lasttimer = UO.Timer()
    					repeat 
               				wait(50) 
             			until UO.InJournal("all kill") or UO.Timer()>LastTimer+300 
             			uo.DeleteJournal("all kill") 
             			uo.DeleteJournal("all kill") 
    					uo.waittargetobject( 'finditem' )
    					uo.useskill( 'Enticement')
    				endif
    				UO.Ignore( 'finditem') 
    			j = j + 1
    			wend
    		endif
    		i = i + 1
    	wend
    end sub
    бывает что глючит. помогает несколько раз полрял нажать на кнопку
    Ultima modifica di fnurov; 19-01-2008, 15:54.

  • #2
    вирму кидает на одного ближайшего, найта на друго блаижайшего
    codice:
    Sub Kill2Nearest()
    	var i,j,fl,c,lasttimer
    	fl = 0
    	UO.IgnoreReset()
    	i = 1
    	while i <= 12 and fl <> 2 
    	UO.Set( 'finddistance', i ) 
    		UO.FindType( '-1' , '-1', '1')
    		if UO.findcount() > 0 then
    			c = UO.findcount()
    			j = 1
    			while j <= c and fl <> 2
    				UO.FindType( '-1' , '-1', '1')
    				if UO.GetNotoriety( 'finditem' ) == 3 then
    					if fl == 1 then
    						fl = 2
    						uo.waittargetobject( 'finditem' )
    						uo.say(' ')
    						uo.say('wyrm kill')
    						lasttimer = UO.Timer()
    						repeat 
               					wait(50) 
             				until UO.InJournal("wyrm kill") or UO.Timer()>LastTimer+300 
             				uo.DeleteJournal("wyrm kill") 
             				uo.DeleteJournal("wyrm kill") 
    					endif
    					if fl == 0 then
    						fl = 1
    						uo.waittargetobject( 'finditem' )
    						uo.say(' ')
    						uo.say('night kill')
    						lasttimer = UO.Timer()
    						repeat 
               					wait(50) 
             				until UO.InJournal("night kill") or UO.Timer()>LastTimer+300 
             				uo.DeleteJournal("night kill") 
             				uo.DeleteJournal("night kill") 
    					endif
    				endif
    				UO.Ignore( 'finditem') 
    			j = j + 1
    			wend
    		endif
    		i = i + 1
    	wend
    end sub

    Commenta


    • #3
      кидает пета на ближайшего пк или крима
      codice:
      Sub KillPkOrCrim()
      	var i,j,fl,c,lasttimer
      	fl = 0
      	UO.IgnoreReset()
      	i = 1
      	while i <= 12 and fl <> 1 
      	UO.Set( 'finddistance', i ) 
      		UO.FindType( '-1' , '-1', '1')
      		if UO.findcount() > 0 then
      			c = UO.findcount()
      			j = 1
      			while j <= c and fl <> 1
      				UO.FindType( '-1' , '-1', '1')
      				if UO.GetNotoriety( 'finditem' ) == 4 or UO.GetNotoriety( 'finditem' ) == 6  then
      					fl = 1
      					uo.waittargetobject( 'finditem' )
      					uo.say(' ')
      					uo.say('all kill')
      					lasttimer = UO.Timer()
      					repeat 
                 				wait(50) 
               			until UO.InJournal("all kill") or UO.Timer()>LastTimer+300 
               			uo.DeleteJournal("all kill") 
               			uo.DeleteJournal("all kill") 
      				endif
      				UO.Ignore( 'finditem') 
      			j = j + 1
      			wend
      		endif
      		i = i + 1
      	wend
      end sub

      Commenta

      Sto operando...
      X