Магери...Плзззз

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
Дикий Левый СОСОК
Posts: 3
Joined: 2006-07-16 15:28:21
Contact:

Магери...Плзззз

Post by Дикий Левый СОСОК »

я все понимаю что вы мне сейчас напишите чтоб я пользовался серчем... но я уже столько искал что мне просто плохо уже от всех скриптов.. они мне уже сняться...прошу вас сделать такой скрипт...
Каст на Себа Енержи Болт... чтоб хилился бинтами...и Медитировал...и не костовал пока полностью не отмедитирует и не отхилиться...еще извеняюся за наглость... если сможите еще чтоб добирал с банка реги на Каст... и Бинты... ) плз зделайте если сможите.. кто зделает тому Респект и Уважуха...!!!
Nmy
Expert!
Posts: 2152
Joined: 2005-09-14 15:31:58
Location: Latvia

Post by Nmy »

Code: Select all

sub NightSight()
VAR m, h
VAR bag = '0x4009B6A4' ; bag with reagents and bandages
While UO.SkillVal( 'Magery' ) < 1000

uo.findtype('0x0F7A', -1 ,'backpack')
if uo.findcount() < 10 then
uo.msg('Bank')
wait(1000)
uo.useobject( bag )
uo.findtype('0x0F7A', -1 , bag )
if uo.findcount() then
uo.moveitem('finditem','100','backpack')
checklag()
else
return
end if
end if

uo.findtype('0x0F88', -1 ,'backpack')
if uo.findcount() < 10 then
uo.msg('Bank')
wait(1000)
uo.useobject( bag )
uo.findtype('0x0F88', -1 , chest )
if uo.findcount() then
uo.moveitem('finditem','100','backpack')
checklag()
else
return
end if
end if

uo.findtype('0x0E21', -1 ,'backpack')
if uo.findcount() < 10 then
uo.msg('Bank')
wait(1000)
uo.useobject( bag )
uo.findtype('0x0F88', -1 , chest )
if uo.findcount() then
uo.moveitem('finditem','100','backpack')
checklag()
else
return
end if
end if

m = uo.mana
uo.cast('Energy Bolt','self')
repeat
wait(50)
until uo.mana < m

while uo.life < uo.str
uo.useskill('Meditation')
wait(100)
uo.bandageself()
wait(2500)
wend

while uo.mana < uo.int
uo.useskill('Meditation')
wait(1000)
wend

wend
end sub
чтоб небыло очень долго при хилинге он уже будет сторатся медитировать... надеюсь это немешает друг другу на вашем шарде
Дикий Левый СОСОК
Posts: 3
Joined: 2006-07-16 15:28:21
Contact:

Post by Дикий Левый СОСОК »

Спасибо за скрипт огромное просто...) но он чето не пашет... ((( и у нас на шарде хилинг с медитом друг другу не мишают...
воть тебе моя ася стукни ...когда будешь свободен...179426226
Nmy
Expert!
Posts: 2152
Joined: 2005-09-14 15:31:58
Location: Latvia

Post by Nmy »

у меня нету аськи, спроси чтоб експерты посмотрели и поправили ... что он делает\неделает ?
Nmy
Expert!
Posts: 2152
Joined: 2005-09-14 15:31:58
Location: Latvia

Post by Nmy »

Code: Select all

sub NightSight()
VAR m, h
VAR bag = '0x4009B6A4' ; bag with reagents and bandages
While UO.SkillVal( 'Magery' ) < 1000

uo.findtype('0x0F7A', -1 ,'backpack')
if uo.findcount() < 10 then
uo.msg('Bank')
wait(1000)
uo.useobject( bag )
uo.findtype('0x0F7A', -1 , bag )
if uo.findcount() then
uo.moveitem('finditem','100','backpack')
checklag()
else
return
end if
end if

uo.findtype('0x0F88', -1 ,'backpack')
if uo.findcount() < 10 then
uo.msg('Bank')
wait(1000)
uo.useobject( bag )
uo.findtype('0x0F88', -1 , bag )
if uo.findcount() then
uo.moveitem('finditem','100','backpack')
checklag()
else
return
end if
end if

uo.findtype('0x0E21', -1 ,'backpack')
if uo.findcount() < 10 then
uo.msg('Bank')
wait(1000)
uo.useobject( bag )
uo.findtype('0x0F88', -1 , bag )
if uo.findcount() then
uo.moveitem('finditem','100','backpack')
checklag()
else
return
end if
end if

m = uo.mana
uo.cast('Energy Bolt','self')
repeat
wait(50)
until uo.mana < m

while uo.life < uo.str
uo.useskill('Meditation')
wait(100)
uo.bandageself()
wait(2500)
wend

while uo.mana < uo.int
uo.useskill('Meditation')
wait(1000)
wend

wend
end sub

Sub CHECKLAG() 
	del('backpack') 
	uo.click('backpack') 
	repeat 
	wait(50) 
	until uo.injournal('backpack') 
	del('backpack') 
end sub 

Sub DEL(msg) 
	while uo.injournal(msg) 
	uo.setJournalLine(uo.injournal(msg)-1,"Is Empty!") 
	wend 
end sub
uo.bandageself()
wait(2500) здесь поставь свою задержку
Last edited by Nmy on 2006-07-17 17:08:50, edited 1 time in total.
Дикий Левый СОСОК
Posts: 3
Joined: 2006-07-16 15:28:21
Contact:

Post by Дикий Левый СОСОК »

chest - ИНЖЕКТ НИ ПОНИМАЕТ ЧТО ЭТО ТАКОЕ...и не работает скрипт...вообще не работает....
пожайлуста напищите мне еще один скриптец... можно и без достования регов из банка.. плззз... а просто чтоб костовал на себя Флайм Страйк... потом полностью отхилился и полностью отмедитировал... Хилл и Медит друг другу не мишают на нашем сервере...помогите плз...
Nmy
Expert!
Posts: 2152
Joined: 2005-09-14 15:31:58
Location: Latvia

Post by Nmy »

ой :oops:

поправил !
ShadowX
Posts: 30
Joined: 2006-07-17 16:22:48

Post by ShadowX »

Code: Select all

Sub Magery() 
   VAR band="0x0e21"
   VAR sunduk = '0x40024af4' 
   VAR targ = '0x4041C420' 
   VAR mir = 'You are at peace' 
   VAR SA = '0x0f8c'
   VAR SS = '0x0f8d' 
   VAR MaxHP
      UO.SetGlobal( 'TimeProcess', str( UO.Timer() ) )
   MaxHP=uo.getmaxhp()
   UO.UseObject( sunduk ) 
   wait(1000) 
   CheckLag() 
   While not uo.dead()
   	  If uo.life<MaxHP then
   	     repeat
   	     uo.findtype("0x0e21",'-1','backpack')
         If uo.findcount()<2 then
            uo.moveitem('finditem','0',sunduk)
      		wait(800)
      		uo.findtype("0x0e21",'-1',sunduk)
	  		UO.grab('2','finditem')
	  		wait(600)
   		 end if
   	  	    uo.bandageself()
   	  		wait(1500)
   	  	until uo.getHP()==uo.getMaxHP()
   	  end if
      If UO.Count( SA ) == 0 Then 
         UO.Findtype( SA, '-1', sunduk ) 
         	If UO.FindCount() == 0 Then 
            	UO.Print( 'SA not found, script terminated' ) 
            	return 
        	Endif 
         UO.MoveItem( 'finditem', '100' ) 
         wait(500) 
         CheckLag() 
      Endif 
      If UO.Count( SS ) == 0 Then 
         UO.Findtype( SS, '-1', sunduk ) 
         	If UO.FindCount() == 0 Then 
            	UO.Print( 'SS not found, script terminated' ) 
            	return 
        	Endif 
         UO.MoveItem( 'finditem', '100' ) 
         wait(500) 
         CheckLag() 
      Endif 
      If UO.Mana <= 40 Then 
         DeleteJournal( mir ) 
         repeat 
            UO.UseSkill( 'Meditation' ) 
            wait(2000) 
         until UO.InJournal( mir ) 
      Endif 
      UO.WaitTargetSelf()
      UO.Cast( 'Flame Strike' ) 
      wait(5000) 
   Wend 
endsub 
Введи вначале серийник сундука в скрипт. В сундук положи суфриона, сс и бинтов. Он все оттуда будет брать и кастить в себя фс. Удачи :wink:
[url=http://www.userbars.com/][img]http://www.userbars.com/galerie/images/files/3/9/mtv.png[/img][/url]
Post Reply