Что здесь не так?

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
gomer
Posts: 3
Joined: 2005-09-09 15:12:28

Что здесь не так?

Post by gomer »

Code: Select all

sub main()
   VAR kursa         = 0x1515 ; Ðóáàøêà êóðñîâàÿ
VAR eda           = 0x097B ; ñâèíèíà
Var Mana          = 100     ; Ìàíà ïåðöà
VAR i=0;
VAR Localtime;
sub meditate()
UO.DeleteJournal()
repeat
  if i > 300 then
  UO.Print("edaa")
    uo.usetype(eda)
    i=0
  endif
  i=i+1
  uo.equipt("Shirt", kursa)
  UO.Print("Equip")
  repeat
   wait(500)
   test()
  until UO.Mana < Mana
  repeat
  uo.unequip('Shirt')
  wait(500)
  Until NOT UO.InJournal("You have no")
  UO.UseSkill('Meditation')
  wait(500)
  repeat
   if UO.InJournal("You lose your concentration") then
    UO.UseSkill('Meditation')
    UO.SetJournalLine(UO.InJournal("You lose your concentration")-1,"Fixed")
   endif
   wait(500)
   
   test()
  Until UO.InJournal("at peace")

  wait(500)
  test()
  UO.SetJournalLine(UO.InJournal("at peace")-1,"Fixed")
Until UO.SkillVal('Meditation',1)==1000
end sub

sub test()
var start;
 if UO.InJournal("World save has been initiated.") then
  UO.SetJournalLine(UO.InJournal("World save")-1,"Fixed")
  UO.Click('self')
  start=UO.Timer()
  repeat
   wait(500)
  until UO.InJournal("TvoeImya: TvoeImya") or UO.Timer() - start > 300

 end if
end sub
end sub


Ошибка в 10 линии.

Заранее спасибо.

Destruction: Проблема в том, что, что код надо класть в тэги [ CODE] и [ /CODE], без пробелов.
Grin
Expert!
Posts: 2580
Joined: 2005-05-04 14:05:19
Location: Москва

Post by Grin »

фантастишьный вариант...
утебя саб в сабе...
Post Reply