>>>вот срипт на кресты и фаер филд(огненная стенка)

Anything and all.

Moderators: Murderator+, Murderator

DokKor
Posts: 47
Joined: 2006-02-04 14:57:35

>>>вот срипт на кресты и фаер филд(огненная стенка)

Post by DokKor »

Code: Select all

sub main() 
UO.Print("Hello from function MAIN")
end sub

Sub abs(n)
if n < 0 then
return n*(-1)
else
return n
end if
end sub

sub WS_X_WS()
; -----------------------------------------------------
var LTimer, MyMana
var mX = UO.GetX('laststatus')
var mY = UO.GetY('laststatus')
var mZ = UO.GetZ('laststatus')
var mT = '400'
; -- Wall of Stone # 1 --------------------------------
if UO.GetX('laststatus') > UO.GetX('self') then
UO.WaitTargetTile( mT, STR(mX-2), STR(mY), STR(mZ))
UO.Cast('Wall of Stone')
else
UO.WaitTargetTile( mT, STR(mX+2), STR(mY), STR(mZ))
UO.Cast('Wall of Stone')
endif
LTimer = UO.Timer()
MyMana = UO.Mana
repeat
wait(100)
until UO.Mana < MyMana || UO.Timer() > LTimer+30
; -- Wall of Stone # 2 --------------------------------
if UO.GetY('laststatus') > UO.GetY('self') then
UO.WaitTargetTile( mT, STR(mX), STR(mY-2), STR(mZ))
UO.Cast('Wall of Stone')
else
UO.WaitTargetTile( mT, STR(mX), STR(mY+2), STR(mZ))
UO.Cast('Wall of Stone')
endif
LTimer = UO.Timer()
MyMana = UO.Mana
repeat
wait(100)
until UO.Mana < MyMana || UO.Timer() > LTimer+30
; -- Fire Field ---------------------------------------
if UO.GetY('laststatus') > UO.GetY('self') then
UO.WaitTargetTile( mT, STR(mX), STR(mY-2), STR(mZ))
UO.Cast('Fire Field')
else
UO.WaitTargetTile( mT, STR(mX), STR(mY+2), STR(mZ))
UO.Cast('Fire Field')
endif
end sub



топик с этим скриптом был создан чуть позже, и по поиску всё просматриваеться! :twisted: [/quote]
DokKor
Posts: 47
Joined: 2006-02-04 14:57:35

Re: >>>вот срипт на кресты и фаер филд(огненная сте

Post by DokKor »

дороботайте на скролы и киньте сюда
1a2a3a4a5a6a
Posts: 173
Joined: 2006-02-10 13:26:37

Post by 1a2a3a4a5a6a »

Я не понимаю, как таким скриптом можно поставить в кресты?
1. Противник быстрее выберется, чем поставятся кресты.
2. Очень неудобно, когда скрипт ставит сразу 2 стенки, причем одна может сбиться, если не там встал.
CONDOMchick
Posts: 362
Joined: 2005-04-23 20:18:57

Post by CONDOMchick »

1a2a3a4a5a6a wrote:Я не понимаю, как таким скриптом можно поставить в кресты?
1. Противник быстрее выберется, чем поставятся кресты.
2. Очень неудобно, когда скрипт ставит сразу 2 стенки, причем одна может сбиться, если не там встал.


Code: Select all

sub st() 
uo.deletejournal()
VAR x1,x2,y1,y2,sx,sy,limit

x1=0
x2=0
y1=0
y2=0

uo.Set('finddistance','8')
na:
uo.findtype('0x0080',-1,'ground')
if uo.findcount()>0 then
sx=str(uo.getx('finditem'))
sy=str(uo.gety('finditem'))
if x1==1 and x2==1 or y1==1 and y2==1 then
GOTO pox
endif
if sx==str(uo.getx('laststatus')+1) and sy==str(uo.gety('laststatus')) then
x1=1
endif

if sx==str(uo.getx('laststatus')-1) and sy==str(uo.gety('laststatus')) then
x2=1
endif

if sx==str(uo.getx('laststatus')) and sy==str(uo.gety('laststatus')+1) then
y1=1
endif

if sx==str(uo.getx('laststatus')) and sy==str(uo.gety('laststatus')-1) then
y2=1
endif

uo.ignore('finditem')
GoTo na
endif

pox:
uo.ignorereset()

uo.print(str(x1)+str(x2)+str(y1) + str(y2))
if x1==0 and x2==0 and y1==0 and y2==0 then

 uo.waittargettile("400",str(uo.getx('laststatus')),str(uo.gety('laststatus')),str(uo.getz('laststatus')))
uo.cast("Wall of Stone")
endif
if y1==1 and y2==1 then

   if str(uo.getx())>str(uo.getx('laststatus')) then
       uo.waittargettile("400",str(uo.getx('laststatus')+1),str(uo.gety('laststatus')),str(uo.getz('laststatus')))
uo.cast("Wall of Stone")
else
 uo.waittargettile("400",str(uo.getx('laststatus')-1),str(uo.gety('laststatus')),str(uo.getz('laststatus')))
uo.cast("Wall of Stone")
   endif
endif

if x1==1 and x2==1 then

  if str(uo.gety())>str(uo.gety('laststatus')) then
       uo.waittargettile("400",str(uo.getx('laststatus')),str(uo.gety('laststatus')+1),str(uo.getz('laststatus')))
uo.cast("Wall of Stone")
else
 uo.waittargettile("400",str(uo.getx('laststatus')),str(uo.gety('laststatus')-1),str(uo.getz('laststatus')))
uo.cast("Wall of Stone")
   endif
endif
limit=0
#or not uo.injournal('Target is not') or not uo.injournal('sufficient mana')
while not uo.injournal('In Sanct Ylem')
wait(100)
limit=limit+1
if limit==100 then
goto end
endif
wend
uo.msg('       ')
wait(50)
uo.msg('        ')
wait(50)
uo.msg('       ')
end:
end sub


1 нажатие - одна стенка
Dragon World. [since 2004]
Scripts Writer
Posts: 2259
Joined: 2005-04-19 18:00:29
Location: Московская область
Contact:

Post by Scripts Writer »

1 нажатие, 1 стенка-но у меня всего 3 стркои весь скрипт занимает, хотя я в ручную ставлю,ибо надёжнее=\
1a2a3a4a5a6a
Posts: 173
Joined: 2006-02-10 13:26:37

Post by 1a2a3a4a5a6a »

You Must Die wrote:1 нажатие, 1 стенка-но у меня всего 3 стркои весь скрипт занимает, хотя я в ручную ставлю,ибо надёжнее=\

А если пригорок? А если заслоняет что-либо? Как тогда?
1a2a3a4a5a6a
Posts: 173
Joined: 2006-02-10 13:26:37

Post by 1a2a3a4a5a6a »

CONDOMchick, спасибо за скрипт. Хотя я его до конца не погонял, ибо времени нету, но вроде тот, что нужно.
Toolmate
Posts: 104
Joined: 2005-08-18 09:09:18
Location: RUSSIA

Post by Toolmate »

А для ранки как такую фишку сделать?
-=^NOVA RunUO 2 Server^=-
www.nova-uo.com
сферовское ПВП
IRC Server: irc.netbynet.ru; канал: #nova
DokKor
Posts: 47
Joined: 2006-02-04 14:57:35

Post by DokKor »

You Must Die wrote:1 нажатие, 1 стенка-но у меня всего 3 стркои весь скрипт занимает, хотя я в ручную ставлю,ибо надёжнее=\



ну да, но вель моно же тот скрипт на 3 куска разделить, и на три кнопки забиндить,


З,Ы,- тот кто там не понимал как таким скриптом моно убить ВООБЩЕ,ставь как хочешь, люди просили я выложил"
Scripts Writer
Posts: 2259
Joined: 2005-04-19 18:00:29
Location: Московская область
Contact:

Post by Scripts Writer »

автохилинги,автострелки,автокресты... чё за чушь,ребята-один лаг и вся ваша система пойдёт в пух и прах- это для тех у кого руки кривые, за слова отвечу, ибо у папосов дрв,альфы,антареса -каждое действие на 1 кнопку,и без всяких там вы.бонов. Даже скрипт ранее на закладку бомб + стрелка, эффективен только по отдельности- на одну кнопку заложил, на другую кидаешь стрелку. Хорош мудрить, учитесь играть по русски
DokKor
Posts: 47
Joined: 2006-02-04 14:57:35

Post by DokKor »

You Must Die wrote:автохилинги,автострелки,автокресты... чё за чушь,ребята-один лаг и вся ваша система пойдёт в пух и прах- это для тех у кого руки кривые, за слова отвечу, ибо у папосов дрв,альфы,антареса -каждое действие на 1 кнопку,и без всяких там вы.бонов. Даже скрипт ранее на закладку бомб + стрелка, эффективен только по отдельности- на одну кнопку заложил, на другую кидаешь стрелку. Хорош мудрить, учитесь играть по русски



уважаю
SESTRA
Posts: 223
Joined: 2006-02-21 09:31:41
Contact:

Post by SESTRA »

А ето просто некоторые как автор хотят чтоб было так " чар бегает сам киляет всех мобов плееров и тд и лут несет в банк " вот типатого)
А Я че Я не че !
Edred
Expert!
Posts: 2544
Joined: 2004-04-03 17:36:29
Location: Saint-Petersburg

Post by Edred »

SESTRA wrote:А ето просто некоторые как автор хотят чтоб было так " чар бегает сам киляет всех мобов плееров и тд и лут несет в банк " вот типатого)


Плееров в текущих версиях инжекта - маловероятно, а вот скрипты на тотальную зачистку данжей - вполне по возможностям. У меня раньше был написан мной и АГРСом (по идее и счас где-то на двд валяется, просто надо наконец собраться и раскопать ту помойку, что мне записали с моего компа на предыдущем месте работы) скриптик на подобную зачистку Коветуса. Чар ночами летал в коветус, зачищал его от риперов, птиц (как там они зовутся, забыл счас, давно не играл) и прочего, периодически летал на базу разгружаться, естественно, автохил, контроль армов и оружия, контроль других чаров и драпанье от них и прочее. За ночь 15-20к перьев без проблем.

Для You Must Die: это только твое мнение. Поэтому прибавляй ИМХО.
DokKor
Posts: 47
Joined: 2006-02-04 14:57:35

Post by DokKor »

SESTRA wrote:А ето просто некоторые как автор хотят чтоб было так " чар бегает сам киляет всех мобов плееров и тд и лут несет в банк " вот типатого)



ты как ? дкрак ? ты топиков видел сколько с прозбьбой выложить скрипт етот , я нашел и выложил, сам им не пользуюся даже, и в инже нету! всё ручками ручками! и читай внимательнеЙ!
Scripts Writer
Posts: 2259
Joined: 2005-04-19 18:00:29
Location: Московская область
Contact:

Post by Scripts Writer »

Edred wrote:
SESTRA wrote:А ето просто некоторые как автор хотят чтоб было так " чар бегает сам киляет всех мобов плееров и тд и лут несет в банк " вот типатого)


Плееров в текущих версиях инжекта - маловероятно, а вот скрипты на тотальную зачистку данжей - вполне по возможностям. У меня раньше был написан мной и АГРСом (по идее и счас где-то на двд валяется, просто надо наконец собраться и раскопать ту помойку, что мне записали с моего компа на предыдущем месте работы) скриптик на подобную зачистку Коветуса. Чар ночами летал в коветус, зачищал его от риперов, птиц (как там они зовутся, забыл счас, давно не играл) и прочего, периодически летал на базу разгружаться, естественно, автохил, контроль армов и оружия, контроль других чаров и драпанье от них и прочее. За ночь 15-20к перьев без проблем.

Для You Must Die: это только твое мнение. Поэтому прибавляй ИМХО.


поповоду скриптов наночь-не спорю, но во время пвп. ИМХО ЧУШЬ
SESTRA
Posts: 223
Joined: 2006-02-21 09:31:41
Contact:

Post by SESTRA »

Ну я так образно)
А Я че Я не че !
DokKor
Posts: 47
Joined: 2006-02-04 14:57:35

Post by DokKor »

SESTRA wrote:Ну я так образно)




всё яно, не флудили бы, а переделали бы людям скрипт! на скролы
BigMouseI
Posts: 93
Joined: 2006-04-15 09:00:35

Post by BigMouseI »

DokKor wrote:
SESTRA wrote:Ну я так образно)




всё яно, не флудили бы, а переделали бы людям скрипт! на скролы


Сложно заменить UO.Cast('спелл')
на UO.Usetype('тип скролов спелла')
DokKor
Posts: 47
Joined: 2006-02-04 14:57:35

Post by DokKor »

BigMouseI wrote:
DokKor wrote:
SESTRA wrote:Ну я так образно)




всё яно, не флудили бы, а переделали бы людям скрипт! на скролы


Сложно заменить UO.Cast('спелл')
на UO.Usetype('тип скролов спелла')



не моё занятие ;)
BigMouseI
Posts: 93
Joined: 2006-04-15 09:00:35

Post by BigMouseI »

DokKor wrote:
BigMouseI wrote:
DokKor wrote:
SESTRA wrote:Ну я так образно)




всё яно, не флудили бы, а переделали бы людям скрипт! на скролы


Сложно заменить UO.Cast('спелл')
на UO.Usetype('тип скролов спелла')



не моё занятие ;)


Мдааааааааа, ну если тебе лень, то почему другим должно быть нет??
Post Reply