пить кровь с проверкой стамины, поправьте плиз
Старший Лейтенант (5889885)14 лет
Necromancer
Сообщений: 1234
Рег. 1.05.2010
31 августа 2011 21:43
Сообщение #1

Помогите скрипт отредактировать.

 

 

Sub Krov() ; Выпивание крови вампиром.
UO.DeleteJournal()
If UO.stam<=20 Then
UO.Print("Пью СТАМИНКУ! Жми хил ещё раз!!!")
Var Type='0x0E24'
Var Color='0x0676'
UO.FindType(Type, Color, 2)
UO.UseObject('finditem')
UO.DeleteJournal()
wait(100)
else
Var Type='0x0E24'
Var Color='0x0020'
UO.FindType(Type, Color, 2)
UO.UseObject('finditem')
Endsub

 

 

Пишет, что ошибка в 11 строке

Что-то с типом связано... Похоже, что он первый тип - стамины, запомнил.. а второй запомнить не может ( крови)

Variable already defined - TYPE

Прапорщик (1548031)14 лет
Ranger
Сообщений: 1842
Рег. 5.06.2010
31 августа 2011 21:48
Сообщение #2
Как я понял тебе надо если меньше 20 стамины пил стаминку и затем сразу кровь ?
Старший Лейтенант (5889885)14 лет
Necromancer
Сообщений: 1234
Рег. 1.05.2010
31 августа 2011 21:49
Сообщение #3

Это былоб замечательно...

Но если нет желания писать - можно просто, чтоб пил стаминку , когда стама меньше 20 :) А дальше уже сам второй раз кнопкой жмёшь и он уже кровь после проверки пьёт)  А ещё лучше подкорректировать кол-во стамины, т.к. хз скоко на банку крови надо )

А то сегодня бегали за форестами.. и понял, что стамину сам пока не могу контролировать :)

13 лет
Ranger
Сообщений: 1043
Рег. 18.06.2011
1 сентября 2011 14:53
Сообщение #4

Попробуй вот так


Sub Krov() ; Выпивание крови вампиром. 

Var Type='0x0E24', i

DIM color[2]

color[0]='0x0676' 

color[1]='0x0020' 

   If UO.stam<=20 Then 

     for i = 0 to 1

       if uo.Count(type,color[i]) then

          UO.UseType(type,color[i])

          wait(100) ; паузу надо регулировать на питье 2 банок.
       endif

     next

   Endif

Endsub



Интересно а тут вообще теги ХОТЬ КАК ТО работают? :)

Старший Лейтенант (5889885)14 лет
Necromancer
Сообщений: 1234
Рег. 1.05.2010
1 сентября 2011 15:28
Сообщение #5
Пасиб .. буду пробовать сегодня вечером или завтра после работы ) 

Frozen
3 сентября 2011 03:49
Сообщение #6
[url=http://forsazh.net/]Мне нравятся Ваши посты [/url] [url=http://e-stroyka.com/]Ценные рекомендации, беру на заметку [/url]

Гости
Сообщений: 9
Рег. 11.07.2011
3 сентября 2011 09:53
Сообщение #7
Спамер? О_о

Frozen
4 сентября 2011 04:24
Сообщение #8
гений?о_О
13 лет
Ranger
Сообщений: 1043
Рег. 18.06.2011
4 сентября 2011 17:41
Сообщение #9

Интересно, я думал тут рекламщики не  пройдут :)

Последние посетители (0):

 
Сейчас: 24 ноября 2024 00:01