Yoko

All sides of Injection
It is currently 2026-01-16 19:56:25

All times are UTC+02:00




Post new topic  Reply to topic  [ 4 posts ] 
Author Message
PostPosted: 2004-08-29 17:10:53 
Offline

Joined: 2004-08-14 10:33:40
Posts: 4
Плз отзывчивый люди :)
я в пррогромировании на инжект 0
дайте плз боевые скрипты кто какие юзаю и обясните как пользовотся очень прошу
ну типа того кастовать пойзон если физл опчть кастовать потом принажатии на эту клавишу он кастовася на того же человека
или хилится не снимая шит и оружие и тд!


Top
   
 Post subject:
PostPosted: 2004-08-30 10:01:37 
Offline
Expert!
User avatar

Joined: 2004-05-31 09:31:51
Posts: 838
Code:
#============================================================== 
#  Healing() - memoryzed current weapon, bandageself, armed
#--------------------------------------------------------------
sub Healing()
   UO.SetArm('CWeapon')
   UO.Exec("bandageself")
   wait(300)
   UO.Arm('CWeapon')
end sub

#==============================================================
#  Arrow() - cast magic arrow on laststatus
#--------------------------------------------------------------
sub Arrow()
   VAR ManaNeed=4
   UO.Set('lasttarget','laststatus')
   if UO.Mana>=ManaNeed then
      UO.Cast('Magic Arrow','laststatus')
   else
      UO.Print("Low mana!!!")
   endif
end sub


#==============================================================
#  Poison() - cast poison on laststatus if target-char not
#             poisoned and your char have enought mana
#--------------------------------------------------------------
sub Poison()
   VAR ManaNeed=9
   VAR ScrollManaNeed=4
   UO.Set('lasttarget','laststatus')
   If NOT UO.Poisoned('lasttarget') Then
      UO.FindType('0x1F40',-1,'my')
      If UO.GetQuantity('finditem')>0 Then
         If UO.Mana>=ScrollManaNeed Then
            UO.WaitTargetObject('lasttarget')
            UO.UseObject('finditem')
            UO.Print("Scroll")
         Else
            UO.Print("Low mana!!! Scroll!")
         Endif
      Else
         If UO.Mana>=ManaNeed Then
            UO.Cast('Poison','laststatus')
         Else
            UO.Print("Low mana!!!")
         Endif
      Endif
   Else
      UO.Print("Character already poisoned!")
   Endif
end sub


#==============================================================
#  Cure() - cast cure to self from scroll, if she found
#           or from spellbook
#--------------------------------------------------------------
sub Cure()
   VAR ManaNeed=6
   VAR ManaNeedScroll=3
   If UO.Poisoned() Then
      UO.FindType('0x1F37',-1,'my')
      If UO.FindCount()>0 Then
         If UO.Mana>=ManaNeedScroll Then
            UO.WaitTargetSelf()
            UO.UseObject('finditem')
            UO.Print("Scroll!!!")
         Else
            UO.Print("Low mana scroll!!!")
         Endif
      Else
         If UO.Mana>=ManaNeed Then
            UO.Cast('Cure','self')
            UO.Print("Spell!!!")
         Else
            UO.Print("Low mana spell!!!")
         Endif
      Endif
   Else
      UO.Print("You allready not sick!!!")
   Endif
end sub


#==============================================================
#  Heal() - cast heal to self from scroll, if she found
#           or from spellbook
#--------------------------------------------------------------
sub Heal()
   VAR ManaNeed=4
   VAR ManaNeedScroll=2
   If UO.Life<UO.Str Then
      UO.FindType('0x1F31',-1,'my')
      If UO.FindCount()>0 Then
         If UO.Mana>=ManaNeedScroll Then
            UO.WaitTargetSelf()
            UO.UseObject('finditem')
            UO.Print("Scroll!!!")
         Else
            UO.Print("Low mana scroll!!!")
         Endif
      Else
         If UO.Mana>=ManaNeed Then
            UO.Cast('Heal','self')
            UO.Print("Spell!!!")
         Else
            UO.Print("Low mana spell!!!")
         Endif
      Endif
   Else
      UO.Print("Your HP at maximum!!!")
   Endif
end sub


#==============================================================
#  GHeal() - cast greater heal to self from scroll, if she
#            found or from spellbook
#--------------------------------------------------------------
sub GHeal()
   VAR ManaNeed=11
   VAR ManaNeedScroll=5
   If UO.Life<UO.Str Then
      UO.FindType('0x1F49',-1,'my')
      If UO.FindCount()>0 Then
         If UO.Mana>=ManaNeedScroll Then
            UO.WaitTargetSelf()
            UO.UseObject('finditem')
            UO.Print("Scroll!!!")
         Else
   UO.UseType('0x0F0E','0x09DF') ; total mana potion
         Endif
      Else
         If UO.Mana>=ManaNeed Then
            UO.Cast('Greater Heal','self')
            UO.Print("Spell!!!")
         Else
            UO.Print("Low mana spell!!!")
         Endif
      Endif
   Else
      UO.Print("Your HP at maximum!!!")
   Endif
end sub


#==============================================================
#  Paral() - cast Paralyze to last status from scroll, if she
#            found or from spellbook
#--------------------------------------------------------------
sub Paral()
   UO.Set('lasttarget','laststatus')
   UO.FindType('0x1F52',-1,'my')
   If UO.GetQuantity('finditem')>0 then
      if UO.Mana>=14 then
         UO.WaitTargetObject('lasttarget')
         UO.UseObject('finditem')
      else
      endif
   else
      if UO.Mana>=28 then
         UO.Cast('Paralyze','laststatus')
      else
      endif
   endif
end sub


#==============================================================
#  Flame() - cast Flame Strike to last status from scroll,
#            if she found or from spellbook
#--------------------------------------------------------------
sub Flame()
   UO.Set('lasttarget','laststatus')
   UO.FindType('0x1F5F',-1,'my')
   If UO.GetQuantity('finditem')>0 then
      if UO.Mana>=22 then
         UO.WaitTargetObject('lasttarget')
         UO.UseObject('finditem')
         UO.Say("An Ex Por")
      else
      endif
   else
      if UO.Mana>=45 then
         UO.Cast('Flame Strike','laststatus')
      else
      endif
   endif
end sub


#==============================================================
#  Light() - cast Lighting to last status from scroll,
#            if she found or from spellbook
#--------------------------------------------------------------
sub Light()
   UO.Set('lasttarget','laststatus')
   UO.FindType('0x1F4A',-1,'my')
   If UO.GetQuantity('finditem')>0 then
      if UO.Mana>=10 then
         UO.WaitTargetObject('lasttarget')
         UO.UseObject('finditem')
         UO.Print("Scroll")
      else
         UO.Print("Low mana!!! Scroll!")
      endif
   else
      if UO.Mana>=20 then
         UO.Cast('Lightning','laststatus')
         UO.Print("Spell")
      else
         UO.Print("Low mana!!! Spell!")
      endif
   endif
end sub


Лови и создай нормальное имя при регистрации.....а то zzz123 как то.... не думаю что это твой реальный ник.
PS
Это форум а не лавка заказов.....

_________________
Все просто.
BETEPAH ™


Top
   
 Post subject:
PostPosted: 2004-09-01 10:48:30 
Offline

Joined: 2004-07-19 07:36:16
Posts: 15
спс огромное за твой скрипт мне помогает =))))
нашет ника скоро сменю =)


Top
   
 Post subject:
PostPosted: 2004-09-01 12:06:50 
Offline
Expert!
User avatar

Joined: 2004-05-31 09:31:51
Posts: 838
qqqqqq wrote:
спс огромное за твой скрипт мне помогает =))))
нашет ника скоро сменю =)

Спасибо не мне а Savage ибо это его скрипты.

_________________
Все просто.

BETEPAH ™


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

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 4 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:  
cron
Powered by phpBB® Forum Software © phpBB Limited