Скрипт на фишинг

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
Snakinski
Posts: 8
Joined: 2009-04-01 16:04:35

Скрипт на фишинг

Post by Snakinski »

СПС ВСЕМ
Last edited by Snakinski on 2009-04-09 22:25:05, edited 1 time in total.
Snakinski
Posts: 8
Joined: 2009-04-01 16:04:35

Post by Snakinski »

Раньше все четко работало но поменяли скрипты на ловлю и теперь немогу разобраться как настроить под новых монстров .
Я думаю поменяли айди монстров илибо место их расположение ... в макросе немогу найти эти места
I'm
Expert!
Posts: 1396
Joined: 2004-10-15 22:38:04
Location: Moscow City.
Contact:

Post by I'm »

Перенес, добавил [ code ]
Автор уточни что за шард
The End.
Snakinski
Posts: 8
Joined: 2009-04-01 16:04:35

Post by Snakinski »

шард uorespect.ru
DreadLord
Posts: 42
Joined: 2009-02-28 15:02:09
Location: Украина
Contact:

Post by DreadLord »

Code: Select all

sub checkmon()
uo.ignorereset()
uo.ignore('self')
uo.exec('set finddistance 0')
uo.findtype('-1', '-1', '1')
while uo.findcount() > 0
  if uo.getnotoriety('finditem') > 0 then
    uo.msg('Stop')
    uo.msg('Iecaei noeo!') # АХТУНГ??!!
    uo.usetype('0x13AF')
    uo.usetype('0x1B76')
    uo.attack('finditem')
    while uo.gethp('finditem') > 0
      if uo.life < 50 then 
        uo.usetype('0x0F0C')
      endif
      wait(1000)
    wend 
    loot()
    wait(1000)
  else
    uo.ignore('finditem')
  endif
  uo.findtype('-1', '-1', '1')
wend
uo.ignorereset()
end sub
Last edited by DreadLord on 2009-04-05 11:40:34, edited 2 times in total.
///
Snakinski
Posts: 8
Joined: 2009-04-01 16:04:35

Post by Snakinski »

Теперь монстра убивает но потом неловит )
но монстра находит и четко убивает
вставить бы туда задержку какуюнибудь чтобы пытался ловить через какоето время
DreadLord
Posts: 42
Joined: 2009-02-28 15:02:09
Location: Украина
Contact:

Post by DreadLord »

Что-то мне лут не нравится...

Code: Select all

sub loot() 
VAR Corpse = UO.GetSerial( 'lastcorpse' ) , s, exit 
UO.waittargetobject('lastcorpse') 
UO.Usetype ('0x13F6') 
wait(500) 
DIM loot[3] 
loot[0] = 0x0EED 
loot[1] = 0x14EB 
loot[2] = 0x1078 
UO.SetReceivingContainer('backpack') 
for s = 0 to 2 
  repeat 
    exit = 0 
    UO.FindType(Loot[s],-1,'lastcorpse') 
    if UO.GetQuantity('finditem') > 0 then 
      UO.Grab('0', 'finditem') 
      wait(3000) 
    else 
       exit = 1 
    endif 
  until exit ==1 
Next 
UO.UnSetReceivingContainer() 
uo.usetype ('0x13F6') 
end sub
///
Snakinski
Posts: 8
Joined: 2009-04-01 16:04:35

Post by Snakinski »

Все ровно работает только монстра не режет
Респект и уважуха тебе мэн .. спасибо за потраченое время
Snakinski
Posts: 8
Joined: 2009-04-01 16:04:35

Post by Snakinski »

ЫЫ
Post Reply