Нужен простой инскрипт

[koko]

Собственно Сабж
Простой настолько что в бекпаке лежат реги и бланки.
Заранее благодарен

[Kynep]

Собственно Сабж
Простой настолько что в бекпаке лежат реги и бланки.
Заранее благодарен

Рисуем вортов:

Code: Select all

sub insk_vort()
   
   VAR blank = '0x0E34'
   
   UO.CancelMenu()
   UO.AutoMenu('Spell Circles', 'Eighth Circle')
   wait(100)
   UO.AutoMenu('Spell Circle 8', 'Energy Vortex')
   wait(100)
   
   UO.FindType(blank, '-1', 'backpack')
   If UO.FindCount() > 0 then
      repeat
         UO.DeleteJournal()
         UO.UseObject('finditem')
         repeat
            wait(100)
         until UO.InJournal('You put') or UO.InJournal('You fail')
         wait(1000)
         UO.FindType(blank, '-1', 'backpack')
      until not UO.FindCount()
   else
      UO.Print('Нет скролов')
      UO.Exec('terminate insk')
   end if
   UO.Print('Нет скролов')
   UO.Exec('terminate insk')
end sub

[koko]

please very just script on inscript

[Kynep]

up

[koko]

а как же медитация( да и потом этот чето непашет(

[Kynep]

а как же медитация( да и потом этот чето непашет(

Все пашет на ура, могу выложить видео. Просто если лень учиться править(тем более уже три раза показанно что править), я не могу помочь, надоело.

[koko]

все еще прошу

[koko]

up, i need this script.
This men is stupin, many talk little doing.
Just script on inscript
Reggs in beckpac clear scrolls in beckpac too
inscript in beckpac.

Народ помогите пожалуйста.

Ps "Meditation need too"