Народ Помогите

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
korn
Posts: 5
Joined: 2005-08-20 01:45:11
Contact:

Народ Помогите

Post by korn »

У кого есть скрипт на BOMBI но чтоб он их не кидал в одну кучу HELP PLIZZZ :cry:
Scripts Writer
Posts: 2259
Joined: 2005-04-19 18:00:29
Location: Московская область
Contact:

Post by Scripts Writer »

а как ему кидать?
korn
Posts: 5
Joined: 2005-08-20 01:45:11
Contact:

Post by korn »

nu ja videl u igrakov on tipo kakoojeto koli4estvo pod nogi igroku i kakojeto koli4esto po bokam
Scripts Writer
Posts: 2259
Joined: 2005-04-19 18:00:29
Location: Московская область
Contact:

Post by Scripts Writer »

ну и?
korn
Posts: 5
Joined: 2005-08-20 01:45:11
Contact:

Post by korn »

nu esli est takoje script moze6 napisat ili skazi xot 4e tam nado vpisat !
Scripts Writer
Posts: 2259
Joined: 2005-04-19 18:00:29
Location: Московская область
Contact:

Post by Scripts Writer »

Code: Select all

sub ExplodeHim()
	VAR i
	For i=1 to 10
		UO.FindType('0x0F0D','0x0B99','backpack')
		If UO.GetQuantity('finditem') Then
			CheckLag()
			UO.Drop('1',STR(UO.GetX('laststatus')),STR(UO.GetY('laststatus')),STR(UO.GetZ('laststatus')),'finditem')
			uo.print(str(i))
			wait(300)
		Else
			uo.exec("terminate explodehim")
			UO.Print("Explosives not found!")
		EndIf
	Next
   uo.Print('let's cast')
end sub
Scripts Writer
Posts: 2259
Joined: 2005-04-19 18:00:29
Location: Московская область
Contact:

Post by Scripts Writer »

вот скрипт чтобы закладывать. строку

Code: Select all

uo.Drop
пропиши 4 раза, и замени координаты чтобы он вокруг обкладывал( + - 1 ). ну вот и всё
korn
Posts: 5
Joined: 2005-08-20 01:45:11
Contact:

Post by korn »

senxx
Scripts Writer
Posts: 2259
Joined: 2005-04-19 18:00:29
Location: Московская область
Contact:

Post by Scripts Writer »

Code: Select all

sub ExplodeHim() 
   VAR i 
   For i=1 to 6 
      UO.FindType('0x0F0D','0x0B99','backpack') 
      If UO.GetQuantity('finditem') Then 
         CheckLag() 
         UO.Drop('1',STR(UO.GetX('laststatus')),STR(UO.GetY('laststatus')),STR(UO.GetZ('laststatus')),'finditem') 
         uo.print(str(i)) 
         wait(300) 
      Else 
         uo.exec("terminate explodehim") 
         UO.Print("Explosives not found!") 
      EndIf 
   Next 
         UO.Drop('1',STR(UO.GetX('laststatus')+1),STR(UO.GetY('laststatus')),STR(UO.GetZ('laststatus')),'finditem') 
         UO.Drop('1',STR(UO.GetX('laststatus')-1),STR(UO.GetY('laststatus')),STR(UO.GetZ('laststatus')),'finditem') 
         UO.Drop('1',STR(UO.GetX('laststatus')),STR(UO.GetY('laststatus')+1),STR(UO.GetZ('laststatus')),'finditem') 
         UO.Drop('1',STR(UO.GetX('laststatus')),STR(UO.GetY('laststatus')-1),STR(UO.GetZ('laststatus')),'finditem') 
   uo.Print('let's cast') 
end sub
так примерно ))
Last edited by Scripts Writer on 2006-03-12 12:01:39, edited 2 times in total.
korn
Posts: 5
Joined: 2005-08-20 01:45:11
Contact:

Post by korn »

pffff takajeta tufta polu4ilas !
Post Reply