Page 1 of 1
Помогите
Posted: 2008-01-15 11:24:42
by Avel Mink
1.Добавьте пожалуйста в скрипт, если не найдена бутыль в которую нужно кидать стрелку, кастуется на себя Dispel
Code: Select all
Sub UnParalyze() ; Кидание стрелки в антифриз, для выхода из парализа
Var Type='0x0F0D'
Var Color='0x0B99'
UO.FindType(Type, Color, 2)
If UO.Mana>=4 Then
UO.Cast('Magic Arrow','finditem')
Else
UO.Print("############")
UO.Print("### No mana ###")
UO.Print("############")
Endif
Endsub
2.Нужен небольшой скрипт, который при запуске атачил персонажа, который последний тебя атаковал (будь-то магия или физически)
Posted: 2008-01-15 12:23:16
by stickman
1.
Code: Select all
Sub UnParalyze() ; Кидание стрелки в антифриз, для выхода из парализа
Var Type='0x0F0D'
Var Color='0x0B99'
UO.FindType(Type, Color, 2)
if uo.findcount('finditem') = 0 then
uo.cast('Dispel', 'self')
else
If UO.Mana>=4 Then
UO.Cast('Magic Arrow','finditem')
Else
UO.Print("############")
UO.Print("### No mana ###")
UO.Print("############")
Endif
endif
Endsub
Posted: 2008-01-15 15:02:44
by Kynep
stickman wrote:1.
Работа над ошибками:
Code: Select all
Sub UnParalyze() ; Кидание стрелки в антифриз, для выхода из парализа
Var Type='0x0F0D'
Var Color='0x0B99'
UO.FindType(Type, Color, 'ground')
if uo.findcount() == 0 then
uo.cast('Dispel', 'self')
else
If UO.Mana >= 4 Then
UO.Cast('Magic Arrow','finditem')
Else
UO.Print("############")
UO.Print("### No mana ###")
UO.Print("############")
Endif
endif
Endsub
Posted: 2008-01-16 01:28:38
by stickman
Kynep wrote:stickman wrote:1.
Работа над ошибками:
Code: Select all
Sub UnParalyze() ; Кидание стрелки в антифриз, для выхода из парализа
Var Type='0x0F0D'
Var Color='0x0B99'
UO.FindType(Type, Color, 'ground')
if uo.findcount() == 0 then
uo.cast('Dispel', 'self')
else
If UO.Mana >= 4 Then
UO.Cast('Magic Arrow','finditem')
Else
UO.Print("############")
UO.Print("### No mana ###")
UO.Print("############")
Endif
endif
Endsub

Posted: 2008-01-17 12:47:59
by NBKua
Code: Select all
UO.Print("############")
UO.Print("### No mana ###")
UO.Print("############")
абезательна замени эти строки на вот такие ато работать нибуит
Code: Select all
UO.Print("##########################")
UO.Print("### ВСЕ ПРИЕХАЛИ ЖОППА ТУД ###")
UO.Print("##########################")