Помогите дайте скрипт на фишинг !

Сообщения : 9 Дата регистрации : 2008-12-10

Кому не жалко .. дайте скрипт на фишинг заранее благодарен !

Admin Сообщения : 32 Дата регистрации : 2008-10-31

sub main()
uo.deletejournal()
var mx, my, mz, i, j
mx = UO.GetX("self")
my = UO.GetY("self")
mz = UO.GetZ("self")
for i = mx+2 to mx+6
for j = my-6 to my+6
UO.Print("Now Fishing In: "+str(mx-i)+" "+str(my-j))
UO.Waittargettile("1341", str(i), str(j), str(mz))
UO.Usetype("0x0DBF")
uo.deletejournal()
while not UO.InJournal("You pull") and not UO.InJournal("location") and not UO.InJournal("no fish") and not UO.InJournal("but fail") and not UO.InJournal("far away") and not UO.InJournal("in water")
wait(100)
if uo.life < 100 then
uo.closeuo()
endif
wend
next
next
uo.say("right")
wait(12500)
uo.say("stop")
uo.exec("exec main")
end sub

Макрос только ловит, мобов самому бить и т.д

Сообщения : 9 Дата регистрации : 2008-12-10

Спасибо ...
уменя есть макрос на изиуо ...
его реально переделать под инжект ?

Код:: set %pole XHF
set %fish DQD_EQD_FQD_GQD_DMF_EQD_FQD_NSH_DPH_CUD
set %somabanka JFMBMMD

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 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 90s
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
{
key F9
if #hits < 90
msg .camp $
if #hits < 65
msg .drink heal$
finditem #enemyid
if #findcnt >= 1
{
gosub follow
}
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
#####################################
sub follow
repeat
{
finditem #enemyid
event pathfind #FINDX #FINDY #FINDZ 1 3s
wait 1s
}
until #findcnt = 0
wait 2
key F8
return

Сообщения : 2 Дата регистрации : 2008-12-11

а есть смысл ловить простой удкой?

Сообщения : 9 Дата регистрации : 2008-11-30

да если у тебя 3к фишинга

» дайте ктонить ссылку на новый шард!