Page 1 of 1

медитация

Posted: 2005-03-19 21:27:30
by Gromiz
вот я тут переписал чей-то скрипт на медитацию.....ОЧЕНЬ ПРОСТОЙ скрипт без наворотов...
..
....как вы считаете он нормальный для прокачки медитации....
если нет,то помогите подправить -_))) сенк

Code: Select all

#########################
#####_______VER_1_______#
#########################
#берете курсовыю вещь в пак
#и запускаете скрипт
#
#замените ти вещи в NS
#
sub Meditation() 
   VAR NS='0x171B'   ; тут замените тип на свой
  
   While NOT UO.Dead() 
      While UO.Mana>=97  ;__________тут меняем если надо и там -))
         UO.DeleteJournal() 
         UO.UseType(NS) 
         wait(5000) 
      wend 

UO.Undress() 
Repeat 
wait(500)       

      If UO.Mana<97 Then ;_________и тут
         While UO.Mana<UO.Int 
            UO.DeleteJournal() 
            UO.Useskill('Meditation') 
            Repeat 
               wait(100) 
            until UO.InJournal("You are") OR UO.InJournal("You lose") 
         Wend 
      Endif 
      
Endif 
   Wend 
end sub 
....да и если можно улучшить производительность...напишите.!