Скрипт на лут (пвм) Оском(о1)

Ask for scripts here

Moderators: Murderator+, Murderator

Post Reply
-Dark-
Posts: 7
Joined: 2008-02-10 01:51:23

Скрипт на лут (пвм) Оском(о1)

Post by -Dark- »

Вобщем вот так...

sub lootpvm()
DIM W[19]
var c
W[1] = 0x0eed ;Гп
W[2] = 0x0f8f ;Квест Реагенты
W[3] = 0x0f8b ;
W[4] = 0x0f90 ;
W[5] = 0x0f7d ;
W[6] = 0x0f83 ;
W[7] = 0x0f7f ;
W[8] = 0x0f8a ;
W[9] = 0x0f7e ;
W[10] = 0x1f1c ;Драгон\Титан Рок
W[11] = '0x1078,0x0455' ;Черн Кожа
W[12] = '0x1078,0x08A1' ;Зел Кожа
W[13] = '0x1078,0x0676' ;Кр Кожа
W[14] = '0x1078,0x0486' ;Демон Кожа
W[15] = '0x1078,0x0380' ;Сер Кожа
W[16] = '0x1078,0x084D' ;Голд Кожа
W[17] = '0x1078,0x0487' ;Кристл Кожа
W[18] = '0x1078,0x0482' ;Сильвер Кожа
W[19] = '0x1078,0x08A5' ;Титан Кожа

UO.UseObject('lastcorpse')
wait(100)
uo.exec("warmode '0'")
uo.waittargetobject('lastcorpse')
uo.usetype(0x0F51)
wait(400)

for c=1 to 19
uo.findtype(W[c],"-1","lastcorpse")
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2then
UO.Grab("0","finditem")
wait(600)
end if
wait(10)
next
end sub


Запирается на этой строчке ...[uo.findtype(W[c],"-1","lastcorpse")]
хотя вроде все правильно ...
и еше если можно подскажите как добавить чтобы он лутал все это.. если есть труп. и лутал
вот это с земли.
ID=0x41517C24 Type=0x0F8F UQTBGOD Colour: 0x0000 (это реагент)
+
ID=0x4034FE88 Type=0x0EED OFZGRMD Colour: 0x0000 (это гп)

И еше если добавить чтобы он печатал что взял будет воообще супер =)

Заранее сеньк =)
Destruction
Junior Expert
Posts: 3221
Joined: 2004-06-24 22:08:56

Post by Destruction »

Вообще-то он в следущей строчке должен упираться - пробела-то не хватает :)

В любом случае - юзаем теги, ибо нефиг, забанить бы вас всех.. :evil:
YokoInjection CodeSweeper
Function not found?
Possession of mathematics at the level of art - a gift that is only available for election.
Sorry for my clumsy English.
Telegram: @tatikom
-Dark-
Posts: 7
Joined: 2008-02-10 01:51:23

Post by -Dark- »

Ненадо нас банить +) лучше со скриптом помоги +) :twisted:

кстати что такое "теги" ?)
-Dark-
Posts: 7
Joined: 2008-02-10 01:51:23

Re: Скрипт на лут (пвм) Оском(о1)

Post by -Dark- »

Code: Select all

sub lootpvm() 
DIM W[19]
var c
W[1] = 0x0eed ;Гп
W[2] = 0x0f8f ;Квест Реагенты
W[3] = 0x0f8b ;
W[4] = 0x0f90 ;
W[5] = 0x0f7d ;
W[6] = 0x0f83 ;
W[7] = 0x0f7f ;
W[8] = 0x0f8a ;
W[9] = 0x0f7e ;
W[10] = 0x1f1c ;Драгон\Титан Рок
W[11] = '0x1078,0x0455' ;Черн Кожа
W[12] = '0x1078,0x08A1' ;Зел Кожа
W[13] = '0x1078,0x0676' ;Кр Кожа
W[14] = '0x1078,0x0486' ;Демон Кожа
W[15] = '0x1078,0x0380' ;Сер Кожа
W[16] = '0x1078,0x084D' ;Голд Кожа
W[17] = '0x1078,0x0487' ;Кристл Кожа
W[18] = '0x1078,0x0482' ;Сильвер Кожа
W[19] = '0x1078,0x08A5' ;Титан Кожа

UO.UseObject('lastcorpse')
wait(100)
uo.exec("warmode '0'")
uo.waittargetobject('lastcorpse')
uo.usetype(0x0F51)
wait(400)

for c=1 to 19
uo.findtype(W[c],"-1","lastcorpse")
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2then
UO.Grab("0","finditem")
wait(600)
end if
wait(10)
next
end sub


Запирается на этой строчке ...[uo.findtype(W[c],"-1","lastcorpse")]
хотя вроде все правильно ...
и еше если можно подскажите как добавить чтобы он лутал все это.. если есть труп. и лутал
вот это с земли.
ID=0x41517C24 Type=0x0F8F UQTBGOD Colour: 0x0000 (это реагент)
+
ID=0x4034FE88 Type=0x0EED OFZGRMD Colour: 0x0000 (это гп)

И еше если добавить чтобы он печатал что взял будет воообще супер =)
Edred
Expert!
Posts: 2544
Joined: 2004-04-03 17:36:29
Location: Saint-Petersburg

Post by Edred »

Читай уроки по скриптингу. Там все внятно объяснено. И как раз скрипт на лут трупа разбирается в качестве примера. И та ошибка, которую ты в своем скрипте совершил, особо там отмечена.
Ни один скрипт не работает? Пора обновить Инжект...
Все работает, но хочется большего? Пора переходить на стелс...
-Dark-
Posts: 7
Joined: 2008-02-10 01:51:23

Post by -Dark- »

Edred wrote:Читай уроки по скриптингу. Там все внятно объяснено. И как раз скрипт на лут трупа разбирается в качестве примера. И та ошибка, которую ты в своем скрипте совершил, особо там отмечена.


А прост поправить трудно? Обезательно показать какой ты умный. :cry:
Edred
Expert!
Posts: 2544
Joined: 2004-04-03 17:36:29
Location: Saint-Petersburg

Post by Edred »

Угу. Потому как ты уже 35724-ый, кто об этом просит.
Ни один скрипт не работает? Пора обновить Инжект...
Все работает, но хочется большего? Пора переходить на стелс...
-Dark-
Posts: 7
Joined: 2008-02-10 01:51:23

Post by -Dark- »

Edred wrote:Угу. Потому как ты уже 35724-ый, кто об этом просит.


Представляю :D я тут полазил такихже как я много +) но что делать если некогда обычно читать пособия по скриптам и прочие ...работа учеба ... и просто жить то когда ?) Мне лично учебы и инста хватает по горло +) хочется только либ посидет в уошке часок на ночь ... либо если у девушки есть время то с ней побыть . :D Кстати скоро буду в Питере +)
таксь ладно чтот я от скрипта отехал +)

Если действительно комуто не лень Исправить скрипт буду презнателен :) , если человек будет с оскома готов чтони будь дать +)
если что аська 3 666 30
-Dark-
Posts: 7
Joined: 2008-02-10 01:51:23

Post by -Dark- »

кстати оч странно точно такойже скрипт на лут плееров .. и все пашет.
режет лутает то что сказали ...а мобов нехочет . :cry:
Edred
Expert!
Posts: 2544
Joined: 2004-04-03 17:36:29
Location: Saint-Petersburg

Post by Edred »

-Dark- wrote:но что делать если некогда обычно читать пособия по скриптам и прочие ...работа учеба ... и просто жить то когда ?) Мне лично учебы и инста хватает по горло +) хочется только либ посидет в уошке часок на ночь ... либо если у девушки есть время то с ней побыть .


Интересное мнение. Почему-то тут явно предполагается, что у "экспертов" времени навалом и им просто делать больше нечего, кроме как сидеть на форуме и каждому разжевывать их элементарные ошибки в скриптах.

Никаких проблем указать тебе на твою ошибку нет, но если я это сделаю - то через несколько дней ты запостишь новый скрипт с подобной ошибкой, потом еще один и так далее. И все время будешь ждать что кто-то смилостивится и укажет тебе на эту ошибку. Не вижу в этом смысла. Гораздо больше смысла в том, чтобы помочь кому-то научиться писать свои скрипты. А для этого человек должен этого хотеть. И начать с уроков.
Ни один скрипт не работает? Пора обновить Инжект...
Все работает, но хочется большего? Пора переходить на стелс...
Post Reply