Yoko

All sides of Injection
It is currently 2024-04-28 09:08:13

All times are UTC+02:00




Post new topic  Reply to topic  [ 7 posts ] 
Author Message
PostPosted: 2004-05-18 10:47:04 
Offline

Joined: 2004-05-04 12:07:16
Posts: 20
ИДея такая, если мана 100
каст спел пойзон
пока мана не будет допустим 5....
чтоб до 5 маны он кастовал пойзон подряд
кому не сложно сделайте плиз

_________________
[LD] Lamer's Death


Top
   
PostPosted: 2004-05-18 14:16:58 
Offline
User avatar

Joined: 2004-04-06 12:27:32
Posts: 118
Kosmozone wrote:
ИДея такая, если мана 100
каст спел пойзон
пока мана не будет допустим 5....
чтоб до 5 маны он кастовал пойзон подряд
кому не сложно сделайте плиз


Code:
#каст пойзона на последний таргет.
sub Pois()
   VAR ManaNeed=5 ;  сколько надо маны сам ставь, по идее 9
   UO.Set('lasttarget','laststatus')
   If NOT UO.Poisoned('lasttarget') Then
   
      If UO.Mana>=ManaNeed Then
         UO.Cast('Poison','laststatus')
      Else
         UO.Print("Malo manki!")
      Endif
   Else
      UO.Print("4ar uge otravlen")
   Endif
end sub



Top
   
 Post subject:
PostPosted: 2004-05-19 06:50:41 
Offline

Joined: 2004-05-04 12:07:16
Posts: 20
не... не работает....
мне нужен для прокачки магии :)
что со 100 кастовал кастовал кастовал пока маны не будет допустим 5
если маны 5 юз скил медитация

_________________
[LD] Lamer's Death


Top
   
 Post subject:
PostPosted: 2004-05-19 11:00:03 
Offline
User avatar

Joined: 2004-04-06 12:27:32
Posts: 118
Kosmozone wrote:
не... не работает....
мне нужен для прокачки магии :)
что со 100 кастовал кастовал кастовал пока маны не будет допустим 5
если маны 5 юз скил медитация



Ты бы если хоть чуть чуть понимал скрипт, не ответил бы таким тупым постом. Советую почитать хелп, просмотреть все команды используемые в этом скрипте, понять что они делают, и потом уже просить что то другое.


Top
   
 Post subject:
PostPosted: 2004-05-19 11:12:33 
Offline

Joined: 2004-05-04 12:07:16
Posts: 20
Psimorph wrote:
Kosmozone wrote:
не... не работает....
мне нужен для прокачки магии :)
что со 100 кастовал кастовал кастовал пока маны не будет допустим 5
если маны 5 юз скил медитация



Ты бы если хоть чуть чуть понимал скрипт, не ответил бы таким тупым постом. Советую почитать хелп, просмотреть все команды используемые в этом скрипте, понять что они делают, и потом уже просить что то другое.

по-моему не я не понимаю скрипт, а ты не понимаешь идею, твой скрипт я потестил, он не для меня, все команды у тебя элементарные.... имхо

_________________
[LD] Lamer's Death


Top
   
 Post subject:
PostPosted: 2004-05-19 15:07:39 
Offline
User avatar

Joined: 2004-04-06 12:27:32
Posts: 118
добавь туда while NOT Uo.Dead()
и if UO.Mana<ManaNeed then
UO.Skill('meditation')
wait(5000)
endif

и тд.. добавь проверку на медитациЮ, тоесть отмедитировал он или нет, и всё будет ок. я ж гаварю, нужно самому просто малёха его модифицировать и всё ок


Top
   
 Post subject:
PostPosted: 2004-05-20 01:46:30 
Offline

Joined: 2004-04-16 00:56:28
Posts: 19
Что вы за бред гоните?
Code:
VAR Fish='0x097B'
VAR TAR='0x009C15FF'

Sub Main()
VAR x = 0,y = 0,z = 0
   While NOT UO.Dead()
      If UO.Mana == UO.Int Then
         Repeat
            UO.DeleteJournal()
            UO.WaitTargetObject(TAR)
            UO.Cast('Poison')
            x = UO.Mana
            Repeat
               Wait(100)
            Until UO.InJournal("fizzle") OR x > UO.Mana
         Until UO.Mana < 9
      Else
         Repeat
            UO.UseSkill('Medit')
            Wait(1000)
         Until UO.Mana == UO.Int
      EndIf
      y = UO.SkillVal('Magery',2)/10
      z = UO.SkillVal('Meditation',2)/10
      UO.Print('Your skill Magery is '+str(y)+' And Meditation '+str(z)+'')
      UO.UseType(Fish)
      Wait(100)
      UO.UseType(Fish)
      Wait(100)
      UO.UseType(Fish)
   Wend
End Sub


Можно проще но мне нужен был такой!


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

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 49 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