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

Fishing Oldparadise
http://forum.yoko.com.ua/viewtopic.php?f=20&t=11936		 Page 1 of 1
Author:  Flame [ 2007-05-10 18:15:47 ]
Post subject:  Fishing Oldparadise
Долгое время пользовался изи, но последнюю неделю у меня виснет уо из за него после того, как половит пол часика! вот и решил может поможите мне со скриптом на инжект!

1. Должен одеватй лук и ставить кемп про атаке монстра.
2. При атаке должен пероеодевать скилл вещи на простые,т.е скилл робу на робу, скилл шапку на шлем, скилл клок на другой клок!
3. Плавать после того, как выловит всё вокруг!
4. Лут монстов не нужен и поднятия с палобы выловленого тоже!

Скину скрипт на котором я ловлю рыбу на изи и вам станет ясно....

set %pole XHF
set %fish DQD_EQD_FQD_GQD_DMF_EQD_FQD_NSH_DPH_CUD
set %somabanka RLNRJMD
set %Roba FWL
set %Roba2 DWL
Set %Mask NZH
set %Mask2 HJL
set %Cloack DCI

moving:
msg back$
wait 14s
msg stop$
gosub fishing
msg back$
wait 14s
msg stop$
gosub fishing
msg back$
wait 14s
msg stop$
gosub fishing
msg forward$
wait 45s
msg stop$
gosub fishing
wait 1s
goto moving

sub fishing
wait 5s
for %xx -5 5
{
for %yy -5 5
{
finditem %pole
set #LOBJECTID #FINDID
event macro 17 0
wait 2
target 5s
set #LTARGETX #CHARPOSX + %xx
set #LTARGETY #CHARPOSY + %yy
set #LTARGETKIND 3
event macro 22 0
wait 3
gosub proverka
}
}
return

sub proverka
set %overtime #SCNT + 15
loop:
if #hits < #str
{
Finditem %Roba2 c_ , #backpackid
set #lobjectID #findid
event macro 17 0
wait 20
Finditem %Cloack c_ , #backpackid
set #lobjectID #findid
event macro 17 0
wait 20
Finditem %Mask2 c_ , #backpackid
set #lobjectID #findid
event macro 17 0
wait 20
Finditem %Roba2 c_ , #backpackid
set #lobjectID #findid
event macro 17 0
msg .arm bow $
msg .camp $
wait 25s
Finditem %Roba c_ , #backpackid
set #lobjectID #findid
event macro 17 0
wait 10
Finditem %Cloack c_ , #backpackid
set #lobjectID #findid
event macro 17 0
wait 10
Finditem %Mask c_ , #backpackid
set #lobjectID #findid
event macro 17 0
wait 10
finditem ZLF
set #LOBJECTID #FINDID
event macro 17 0
wait 10
event macro 23 0
wait 6s
return
}
deletejournal
scanjournal 1
if There_are_no_ in #JOURNAL || Try_fishing_ in #JOURNAL || That_is_too in #JOURNAL || You_fail_to_catch_ in #JOURNAL || Fishing_has in #JOURNAL || #SCNT >= %overtime
return
if You_pull in #JOURNAL || seconds_before in #JOURNAL
{
wait 1s
return
}
goto loop



поможите?!?! заранее спасибо!
Author:  Rivory [ 2007-05-10 20:02:20 ]
Post subject: 
используй теги
Code:
[code][/code]
Author:  Flame [ 2007-05-10 23:54:12 ]
Post subject: 
Code:
set %pole XHF 
set %fish DQD_EQD_FQD_GQD_DMF_EQD_FQD_NSH_DPH_CUD 
set %somabanka RLNRJMD 
set %Roba FWL 
set %Roba2 DWL 
Set %Mask NZH 
set %Mask2 HJL 
set %Cloack DCI 

moving: 
msg back$ 
wait 14s 
msg stop$ 
gosub fishing 
msg back$ 
wait 14s 
msg stop$ 
gosub fishing 
msg back$ 
wait 14s 
msg stop$ 
gosub fishing 
msg forward$ 
wait 45s 
msg stop$ 
gosub fishing 
wait 1s 
goto moving 

sub fishing 
wait 5s 
for %xx -5 5 
{ 
for %yy -5 5 
{ 
finditem %pole 
set #LOBJECTID #FINDID 
event macro 17 0 
wait 2 
target 5s 
set #LTARGETX #CHARPOSX + %xx 
set #LTARGETY #CHARPOSY + %yy 
set #LTARGETKIND 3 
event macro 22 0 
wait 3 
gosub proverka 
} 
} 
return 

sub proverka 
set %overtime #SCNT + 15 
loop: 
if #hits < #str 
{ 
Finditem %Roba2 c_ , #backpackid 
set #lobjectID #findid 
event macro 17 0 
wait 20 
Finditem %Cloack c_ , #backpackid 
set #lobjectID #findid 
event macro 17 0 
wait 20 
Finditem %Mask2 c_ , #backpackid 
set #lobjectID #findid 
event macro 17 0 
wait 20 
Finditem %Roba2 c_ , #backpackid 
set #lobjectID #findid 
event macro 17 0 
msg .arm bow $ 
msg .camp $ 
wait 25s 
Finditem %Roba c_ , #backpackid 
set #lobjectID #findid 
event macro 17 0 
wait 10 
Finditem %Cloack c_ , #backpackid 
set #lobjectID #findid 
event macro 17 0 
wait 10 
Finditem %Mask c_ , #backpackid 
set #lobjectID #findid 
event macro 17 0 
wait 10 
finditem ZLF 
set #LOBJECTID #FINDID 
event macro 17 0 
wait 10 
event macro 23 0 
wait 6s 
return 
} 
deletejournal 
scanjournal 1 
if There_are_no_ in #JOURNAL || Try_fishing_ in #JOURNAL || That_is_too in #JOURNAL || You_fail_to_catch_ in #JOURNAL || Fishing_has in #JOURNAL || #SCNT >= %overtime 
return 
if You_pull in #JOURNAL || seconds_before in #JOURNAL 
{ 
wait 1s 
return 
} 
goto loop
Author:  Flame [ 2007-05-12 15:55:10 ]
Post subject: 
Ладненько я всё понял, помогите тогда ошибку выяснить в моём скрипте.... почему он виснет полсе 30-60 мин. ловли??
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/