Вторник, 24.06.2025, 18:51
[nIrVaNa]
Приветствую Вас Призывник | RSS

Меню сайта
Ultima Online
  • Ultima Online DRW
    • .::Games::.
  • EVE Online
  • Russia EVE-RU
  • Ukrainian EVE-UA
  • [6OP3bIE CAHTEXHuru] EVE
  • L2Europa.com
  • Clan Viktoria L2Europa.com
    • Мини-чат
    Главная » Статьи » Мои статьи
    Скрипт на Alchemy на всё
    sub Alchemy(Reagent,MinimumReags,Choice) 
    while uo.Count('0x0F0E','0x0000')>0 and uo.Count(Reagent)>=MinimumReags 
    uo.DeleteJournal() 
    wait(150)
    uo.Exec("waitmenu 'What sort of potion do you want to' "+Choice) 
    uo.UseType(reagent) 
    while not uo.InJournal('You put') and not uo.InJournal('You toss the failed') 
    wait(950) 
    wend 
    wend 
    end sub 

    ####################### 
    ### Greater Agility ### 
    ####################### 
    sub MakeGreaterAgility() 
    Alchemy('0x0F7B', 3, "'Greater Agility'") 
    end sub 

    ##################### 
    ### Deadly Poison ### 
    ##################### 
    sub MakeDeadlyPoison() 
    Alchemy('0x0F88', 8, "'Deadly Poison'") 
    end sub 

    ###################### 
    ### Greater Poison ### 
    ###################### 
    sub MakeGreaterPoison() 
    Alchemy('0x0F88', 4, "'Greater Poison'") 
    end sub 

    ###################### 
    ### Poison ### 
    ###################### 
    sub MakePoison() 
    Alchemy('0x0F88', 2, "'Poison'") 
    end sub 

    #################### 
    ### Invisibility ### 
    #################### 
    sub MakeInvisibility() 
    Alchemy('0x0F91', 4, "'Invisibility'") 
    end sub 

    ################## 
    ### Total Mana ### 
    ################## 
    sub MakeTotalMana() 
    Alchemy('0x0F87', 6, "'Total Mana'") 
    end sub 

    #################### 
    ### Greater Heal ### 
    #################### 
    sub MakeGreaterHeal() 
    Alchemy('0x0F85', 7, "'Greater Heal'") 
    end sub 

    #################### 
    ### Greater Cure ### 
    #################### 
    sub MakeGreaterCure() 
    Alchemy('0x0F84', 6, "'Greater Cure'") 
    end sub 

    ################# 
    ### Stoneskin ### 
    ################# 
    sub MakeStoneskin() 
    Alchemy('0x0F85', 1, "'Stoneskin'") 
    end sub 

    ################## 
    ### NightSight ### 
    ################## 
    sub MakeNightsight() 
    Alchemy('0x0F8D', 2, "'Nightsight'") 
    end sub 

    ############ 
    ### Heal ### 
    ############ 
    sub MakeHeal() 
    Alchemy('0x0F85', 5, "'(2)'") 
    end sub 


    ##################### 
    ### Total Refresh ### 
    ##################### 
    sub MakeTotalRefresh() 
    Alchemy('0x0F7A', 6, "'Total Refresh'") 
    end sub 

    ######################## 
    ### Greater Strength ### 
    ######################## 
    sub MakeGreaterStrength() 
    Alchemy('0x0F86', 5, "'Greater Strength'") 
    end sub 

    ######################### 
    ### Greater Explosion ### 
    ######################### 
    sub MakeGreaterExplosion() 
    Alchemy('0x0F8C', 10, "'Greater Explosion'") 
    end sub

    ######################### 
    ### Shrink ### 
    ######################### 
    sub MakeShrink() 
    Alchemy('0x0F78', 9, "'Shrink'") 
    end sub


    Категория: Мои статьи | Добавил: -=DavidJones=- (14.11.2008)
    Просмотров: 1416 | Рейтинг: 0.0/0
    Всего комментариев: 0
    Добавлять комментарии могут только зарегистрированные пользователи.
    [ Регистрация | Вход ]
    Статистика
    Онлайн всего: 1
    Гостей: 1
    Пользователей: 0
    Наш опрос
    Как Вам наш сайт
    [ Результаты · Архив опросов ]
    Всего ответов: 244
    Copyright MyCorp © 2025