Jump to content


Toggle shoutbox Chat Open the Shoutbox in a popup

@  opas : (17 August 2025 - 21:52) Сервер ещё ддосят?
@  Costesti : (05 August 2025 - 20:36) Акк Kosmo тебе делать больше нету Бомжара ходить по шахтам убивать минера ?
@  Artemy Shan : (04 July 2025 - 03:34) Перезапуск проекта: https://forum.oldp.n...howtopic=106329
@  Costesti : (10 June 2025 - 22:26) Артём закрой сервер толку от него ноль так как лаги бешеные ничего не сделать
@  Costesti : (10 June 2025 - 21:03) бля это у меня сервер только логает или у всех?
@  papasha : (10 June 2025 - 15:13) @Costesti da kanesna vvodit, uze dohuja obnov vishlo za 7 let poslednix!!
@  Costesti : (09 June 2025 - 18:34) Артём ты там нововведения водишь?
@  Costesti : (09 June 2025 - 18:31) Сервер работает?
@  Costesti : (31 May 2025 - 23:46) Шан комп меняй уже игру не тянет
@  Costesti : (31 May 2025 - 20:02) мда никому не нужен этот сервер
@  fr33 : (29 May 2025 - 14:07) shenahnan gnom
@  fr33 : (29 May 2025 - 14:07) gm zb!!!1 lagi ept
@  Costesti : (28 May 2025 - 22:43) и это опять и за сейвы
@  Costesti : (28 May 2025 - 22:43) Народ да у кого там номер Шана пускай чинит сервер
@  Costesti : (27 May 2025 - 21:38) Вопрос Крафтить молоко можно?
@  fr33 : (26 May 2025 - 17:33) gm blad chini lag
@  Costesti : (23 May 2025 - 22:37) Бешеные лаги
@  Costesti : (17 May 2025 - 22:54) Опять лаги на Сервере
@  fr33 : (12 May 2025 - 15:21) ble daite mne gm i zdelaju pvp vam
@  Mokasin : (12 May 2025 - 09:04) Puišiem nav garlaicīgi xDDD

Peks

Member Since 04 Dec 2008
Offline Last Active Dec 08 2008 00:17
-----

Topics I've Started

Script Uz Fišingu.

04 December 2008 - 22:47

Rekur script uz fišingu !

sub main()
### выбрасывать от сюда
var fishtapki1 =0x170B
var fishtapki2 =0x170D
var fishtapki3 =0x170E
var fishtapki4 =0x170F
var fishtapki5 =0x1710
var fishtapki6 =0x1711
var fishtapki7 =0x170C
var sos =0x099F
var net =0x0DC8
### до сюда

var x,y
while not uo.dead()
for x=0 to 6
for y=0 to 6
UO.Exec("waittargettile 0 "+STR(UO.GetX()+x)+" "+STR(UO.GetY()+y)+" 0")
zabros()
UO.Exec("waittargettile 0 "+STR(UO.GetX()-x)+" "+STR(UO.GetY()-y)+" 0")
zabros()
next
next
endif
wend
end sub

sub zabros()
UO.UseType(0x097B)
uo.findtype('0x0dbf',-1,'my')
if uo.findcount()==0 then
uo.usefromground('0x3eae')
uo.findtype('0x0dbf',-1,'lastcontainer')
uo.equip('Rhand', 'finditem')
endif
wait(1000)
uo.usetype('0x0dbf')
while not (uo.injournal("fish") or uo.injournal("seem to be") or uo.injournal("he looks") or uo.injournal("soggy") or uo.injournal("away") or uo.injournal("attract") or uo.injournal("find"))
wait(100)
UO.MoveItem('fishtapki1',0,'0x0E77')
UO.MoveItem('fishtapki2',0,'0x0E77')
UO.MoveItem('fishtapki3',0,'0x0E77')
UO.MoveItem('fishtapki4',0,'0x0E77')
UO.MoveItem('fishtapki5',0,'0x0E77')
UO.MoveItem('fishtapki6',0,'0x0E77')
UO.MoveItem('fishtapki7',0,'0x0E77')
UO.MoveItem('sos',0,'0x0E77')
UO.MoveItem('net',0,'0x0E77')
wend
uo.deletejournal()
end sub