Kads man ludzu varetu saja scp ielikt lai sudainaas zivis met uz zemes ?
Jau ieprieks paldies !
set %pole XHF
set %fish DQD_EQD_FQD_GQD_DMF_EQD_FQD_NSH_DPH_CUD
set %somabanka ZLVBKMD
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
{
msg .arm Newbie Item $
msg .camp heal $
wait 15s
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
Toggle shoutbox Chat
|
Fishing Help
Started by kabacis, Dec 20 2010 20:45
No replies to this topic
0 user(s) are reading this topic
0 members, 0 guests, 0 anonymous users