Yoko :: наверно читерство??

Yoko http://forum.yoko.com.ua/

наверно читерство?? http://forum.yoko.com.ua/viewtopic.php?f=20&t=3513	Page 1 of 2

Author:	Gromiz [ 2005-03-26 18:23:45 ]
Post subject:	наверно читерство??
уважаемые читеры! помогите ! мне нужен скрипт на обкладывание вокруг себя бумаги, на дистанции в 4 клетки? у меня есть скрипт, но он медленный...можете подсказать или мож кто-то скинет его, очень надо ..плиз, а? да..и после обкладывания чтоб эту бумагу собирал ...тож быстро??

Author:	666Man666 [ 2005-03-26 18:35:17 ]
Post subject:
http://yoko.netroof.net/forum/viewtopic ... light=drop

Author:	Gromiz [ 2005-03-26 18:43:38 ]
Post subject:
-( у меня типо такого...... а не знаете как потом собрать их все ???

Author:

SAMURAI [ 2005-03-26 20:07:19 ]

Post subject:

Gromiz wrote:

-(
у меня типо такого......

а не знаете как потом собрать их все ???

По типу этого...

Code:

#   Potions Types & Color  -=#=-                     -=#=- 
Var ExplosionPotionType      =     "0x0F0E"            # Explosion Potion Type. 
Var ExplosionPotionColor     =     "0x0009"            # Explosion Potion Color. 

sub NoBomb() 
VAR Exit 
Exit=0 
UO.Set("finddistance","3") 
repeat 
UO.FindType(ExplosionPotionType,ExplosionPotionColor,'ground') 
if UO.GetQuantity('finditem')>0 then 
UO.Grab('0','finditem') 
wait(800) 
Else 
Exit=1 
endif 
until Exit==1 
end sub

Author:

Gromiz [ 2005-03-26 20:28:53 ]

Post subject:

SAMURAI wrote:

По типу этого...

Code:

#   Potions Types & Color  -=#=-                     -=#=- 
Var ExplosionPotionType      =     "0x0F0E"            # Explosion Potion Type. 
Var ExplosionPotionColor     =     "0x0009"            # Explosion Potion Color. 

sub NoBomb() 
VAR Exit 
Exit=0 
UO.Set("finddistance","3") 
repeat 
UO.FindType(ExplosionPotionType,ExplosionPotionColor,'ground') 
if UO.GetQuantity('finditem')>0 then 
UO.Grab('0','finditem') 
wait(800) 
Else 
Exit=1 
endif 
until Exit==1 
end sub

хмм не работает =((

Author:	Gromiz [ 2005-03-26 20:55:28 ]
Post subject:
ок уже..сам подправил -)) а есть что-то на раскидку вокруг себя продвинутую версиюю .. или что-то подобное ?????

Author:	Gromiz [ 2005-03-26 22:44:45 ]
Post subject:
подскажите как сделать, чтоб активировать эксплоужены и кинуть их в разные точки?? подряд??

Author:	Gromiz [ 2005-03-27 02:45:44 ]
Post subject:
киньте читерские примочки плиз??

Author:

I'm [ 2005-03-27 09:38:38 ]

Post subject:

Самая читерская :lol:

Обкладывает место вокруг персонажа на 3 клетки

Помагает при таминге страшной живности в опасном регионе :lol:

Писалась очень давно, еще во времена первого знакомства с инжей и

Code:

For....
....
Next

Code:

sub BlockPlace()
Var o
Var BlockType   =   "0x1B9B"
Var WaitTime   =   50
Dim PlaceX[24]
   PlaceX[0]   =   3
   PlaceX[1]   =   2
   PlaceX[2]   =   1
   PlaceX[3]   =   0
   PlaceX[4]   =   -1
   PlaceX[5]   =   -2
   PlaceX[6]   =   -3
   PlaceX[7]   =   -3
   PlaceX[8]   =   -3
   PlaceX[9]   =   -3
   PlaceX[10]   =   -3
   PlaceX[11]   =   -3
   PlaceX[12]   =   -3
   PlaceX[13]   =   -2
   PlaceX[14]   =   -1
   PlaceX[15]   =   0
   PlaceX[16]   =   1
   PlaceX[17]   =   2
   PlaceX[18]   =   3
   PlaceX[19]   =   3
   PlaceX[20]   =   3
   PlaceX[21]   =   3
   PlaceX[22]   =   3
   PlaceX[23]   =   3
   
Dim PlaceY[24]   
   PlaceY[0]   =   3
   PlaceY[1]   =   3
   PlaceY[2]   =   3
   PlaceY[3]   =   3
   PlaceY[4]   =   3
   PlaceY[5]   =   3
   PlaceY[6]   =   3
   PlaceY[7]   =   2
   PlaceY[8]   =   1
   PlaceY[9]   =   0
   PlaceY[10]   =   -1
   PlaceY[11]   =   -2
   PlaceY[12]   =   -3
   PlaceY[13]   =   -3
   PlaceY[14]   =   -3
   PlaceY[15]   =   -3
   PlaceY[16]   =   -3
   PlaceY[17]   =   -3
   PlaceY[18]   =   -3
   PlaceY[19]   =   -2
   PlaceY[20]   =   -1
   PlaceY[21]   =   0
   PlaceY[22]   =   1
   PlaceY[23]   =   2

For o=0 to 23
   UO.FindType(BlockType,"-1")
   UO.Drop("1",PlaceX[o],PlaceY[o],"0","finditem")
   Wait(WaitTime)
   ; You can use checklag if you want.
Next
end sub

Author:	Gromiz [ 2005-03-27 10:00:18 ]
Post subject:
I'm wrote: Самая читерская Обкладывает место вокруг персонажа на 3 клетки Помагает при таминге страшной живности в опасном регионе (==прикольный скрипт ..... а это зачем??=))) Code: For.... .... Next

Author:	Gromiz [ 2005-04-04 19:06:25 ]
Post subject:
все скрипты работают...уже хорошо.....НО появляется одна проблема....когда ставлю квадрат на себя....то из=за неровности поверхности....ветки пропадают...... ... . .......можно сделать так, чтоб скрипт клал на землю ветки, а то по координатам X,Y,Z.....они пропадают(наверно проваливаются) ....мне надо не для боевых действий.

Author:	I'm [ 2005-04-04 21:59:24 ]
Post subject:
Gromiz wrote: I'm wrote: Самая читерская Обкладывает место вокруг персонажа на 3 клетки Помагает при таминге страшной живности в опасном регионе (==прикольный скрипт ..... а это зачем??=))) Code: For.... .... Next Попробуй удалить их из кода и узнаеш =) Ух давно писал еще для тамки найта и уника на DrW

Author:

Gromiz [ 2005-04-05 12:57:03 ]

Post subject:

я использую вот этот......но он работает только на ровной поверхности....а если там будет бугорок....то скрипт ветки "закапывает"....и там можно пройти

Code:

sub BlockPlace()
Var o
Var BlockType   =   "0x1B9B"
Var WaitTime   =   50
Dim PlaceX[24]
   PlaceX[0]   =   3
   PlaceX[1]   =   2
   PlaceX[2]   =   1
   PlaceX[3]   =   0
   PlaceX[4]   =   -1
   PlaceX[5]   =   -2
   PlaceX[6]   =   -3
   PlaceX[7]   =   -3
   PlaceX[8]   =   -3
   PlaceX[9]   =   -3
   PlaceX[10]   =   -3
   PlaceX[11]   =   -3
   PlaceX[12]   =   -3
   PlaceX[13]   =   -2
   PlaceX[14]   =   -1
   PlaceX[15]   =   0
   PlaceX[16]   =   1
   PlaceX[17]   =   2
   PlaceX[18]   =   3
   PlaceX[19]   =   3
   PlaceX[20]   =   3
   PlaceX[21]   =   3
   PlaceX[22]   =   3
   PlaceX[23]   =   3
   
Dim PlaceY[24]   
   PlaceY[0]   =   3
   PlaceY[1]   =   3
   PlaceY[2]   =   3
   PlaceY[3]   =   3
   PlaceY[4]   =   3
   PlaceY[5]   =   3
   PlaceY[6]   =   3
   PlaceY[7]   =   2
   PlaceY[8]   =   1
   PlaceY[9]   =   0
   PlaceY[10]   =   -1
   PlaceY[11]   =   -2
   PlaceY[12]   =   -3
   PlaceY[13]   =   -3
   PlaceY[14]   =   -3
   PlaceY[15]   =   -3
   PlaceY[16]   =   -3
   PlaceY[17]   =   -3
   PlaceY[18]   =   -3
   PlaceY[19]   =   -2
   PlaceY[20]   =   -1
   PlaceY[21]   =   0
   PlaceY[22]   =   1
   PlaceY[23]   =   2

For o=0 to 23
   UO.FindType(BlockType,"-1")
   UO.Drop("1",PlaceX[o],PlaceY[o],"0","finditem")
   Wait(WaitTime)
   ; You can use checklag if you want.
Next
end sub

прям не знаю что делать.......

Author:	Gromiz [ 2005-04-05 18:53:20 ]
Post subject:

Author:	Gromiz [ 2005-04-07 08:37:48 ]
Post subject:

Author:	=god= [ 2005-04-07 12:25:08 ]
Post subject:
STR(uo.GetZ("self")) или что то вроде этого. поставь вместо 0

Author:	Gromiz [ 2005-04-07 16:00:27 ]
Post subject:
=god= wrote: STR(uo.GetZ("self")) или что то вроде этого. поставь вместо 0 вот так : Code: UO.Drop('1',STR(UO.GetX('my')-2),STR(UO.GetY('my')),0,'finditem') все равно....закапывает ветки =))))

Author:	=god= [ 2005-04-07 18:00:50 ]
Post subject:
ну и где ты 0 убрал ? вот как: UO.Drop('1',STR(UO.GetX('my')-2),STR(UO.GetY('my')),STR(UO.GetZ('my')),'finditem')

Author:	Gromiz [ 2005-04-07 18:29:50 ]
Post subject:
все равно ...не на бугорок кладет,а в него..... ну иии лан.....буду как в старые времена--- руками докладывать.. . . . .....спасибо.

Author:	I'm [ 2005-04-07 21:22:56 ]
Post subject:
Попробуй преподнять вещь Вместо 0 по Z поставь 3 или 5 типо этого чтонить

Page 1 of 2	All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited https://www.phpbb.com/