Yoko

All sides of Injection
It is currently 2025-10-21 23:42:15

Unanswered topics | Active topics


» » »

All times are UTC+02:00



Post new topic  Reply to topic  Page 1 of 1
  [ 13 posts ] 
  Print view Previous topic | Next topic 
Author Message
mort
PostPosted: 2007-07-13 14:54:51 
Offline

Joined: 2007-07-02 12:26:55
Posts: 10
Quote:
var buylistname='tobuy'
var numspots=13
sub Pokupka()
DIM Spot[13]
Spot[0]='0x12345678'
Spot[1]='0x12345678'
Spot[2]='0x12345678'
Spot[3]='0x12345678'
Spot[4]='0x12345678'
Spot[5]='0x12345678'
Spot[6]='0x12345678'
Spot[7]='0x12345678'
Spot[8]='0x12345678'
Spot[9]='0x12345678'
Spot[10]='0x12345678'
Spot[11]='0x12345678'
Spot[12]='0x12345678'
Spot[13]='0x12345678'


var j=0

UO.Print("Начинаем скупку!")
For j=0 To numspots-1
GoToByRune(Spot[j])
UO.Buy(buylistname)
wait(3000)
next
end sub


Sub GoToByRune(rune)
Spot:
UO.DeleteJournal()
ManaCheck()
UO.Cast("Recall",rune)
while NOT UO.InJournal("fizzle") AND NOT UO.InJournal("charges")
If UO.InJournal("fizzle") Then
goto Spot
EndIf
End Sub


Sub ManaCheck()
If UO.mana<15 Then
while UO.mana<100
UO.UseSkill('Meditation')
while NOT UO.InJournal('You must') AND UO.Mana<100 AND NOT UO.InJournal("You lose")
wait(500)
wend
UO.DeleteJournal()
wend
EndIf
end Sub

написал скрипт на скупку,13 рун,но единственная фигня,когда медитируешь,если подымается скил медитации,то полный стояк,как избавится
Top
   
Reply with quote  
Scripts Writer
 Post subject:
PostPosted: 2007-07-13 15:04:13 
Offline

Joined: 2005-04-19 18:00:29
Posts: 2259
Location: Московская область
Телепаты в отпуске
Top
   
Reply with quote  
ADEPT_ABP
 Post subject:
PostPosted: 2007-07-13 18:01:08 
Offline
User avatar

Joined: 2006-05-12 08:03:45
Posts: 223
Попробуй так:
Code:
while uo.mana < uo.int
   UO.UseSkill("Meditation")
UO.DeleteJournal()
   while not uo.injournal("You are at peace") and not UO.InJournal("You lose your concentration")
      wait(200)
   wend
wend

На DRW - работает. Или, после проверки журнала
Code:
while NOT UO.InJournal('You must') AND UO.Mana<100 AND NOT UO.InJournal("You lose")
, поставь задержку поменьше 200 или 100.
Top
   
Reply with quote  
mort
 Post subject:
PostPosted: 2007-07-13 21:19:37 
Offline

Joined: 2007-07-02 12:26:55
Posts: 10
эту херню я решил,просто отключил отображение прироста скила на экране,у меня теперь другая трабла,если скрипт физлит рекол по руне,то он её пропускает,если ещё раз физл опять руну пропустит как исправить?
Top
   
Reply with quote  
ADEPT_ABP
 Post subject:
PostPosted: 2007-07-14 11:17:39 
Offline
User avatar

Joined: 2006-05-12 08:03:45
Posts: 223
Пример.(...это отрывок из скрипта на мининг, над которым я долго корптел. :mrgreen: )
Code:
var idrunehome
cast:   ;метка
idrunehome = "0x404D14BB"
uo.deletejournal()
   if UO.mana > 20 then
       uo.cast("Recall",idrunehome)
        wait(3700)
               endif
if uo.injournal("The spell fizzle") then
 goto cast: ;переход на метку cast:
endif
Top
   
Reply with quote  
mort
 Post subject:
PostPosted: 2007-07-14 13:12:19 
Offline

Joined: 2007-07-02 12:26:55
Posts: 10
ADEPT_ABP wrote:
Пример.(...это отрывок из скрипта на мининг, над которым я долго корптел. :mrgreen: )
Code:
var idrunehome
cast:   ;метка
idrunehome = "0x404D14BB"
uo.deletejournal()
   if UO.mana > 20 then
       uo.cast("Recall",idrunehome)
        wait(3700)
               endif
if uo.injournal("The spell fizzle") then
 goto cast: ;переход на метку cast:
endif

респект,всё работает,спасибо
Top
   
Reply with quote  
u0rypT
 Post subject:
PostPosted: 2007-07-19 23:47:40 
Offline
User avatar

Joined: 2004-12-30 18:13:16
Posts: 175
Location: Russia
Есть готовый под оском. ЛС... хотя...

_________________
Design, webdev, coding, c#, php, asp.net, xml, perl, sql, ajax, drawing, illustrating, restoration, photo, photoshop, schedule, pron, guitar, lead-guitar, js, jsp, java, dom, html, *nix, struts, cs, etc
Top
   
Reply with quote  
ADEPT_ABP
 Post subject:
PostPosted: 2007-07-21 20:09:54 
Offline
User avatar

Joined: 2006-05-12 08:03:45
Posts: 223
Однажды мне заманало на Маркете набирать имена вендоров вкупе с BUY.
Вот. Пробуйте.
Code:
sub main()
   UO.AddObject('vendor')
    UO.Print('С кем торгуем?') 
   while UO.Targeting() 
    wait(10)
   wend
wait(1000)
uo.say(uo.GetName('vendor')+" buy")
end sub

Не помню только работает или нет? Не тестил. :mrgreen:
Top
   
Reply with quote  
Mihail
 Post subject:
PostPosted: 2007-07-23 16:56:41 
Offline
Expert!
User avatar

Joined: 2005-05-20 20:30:10
Posts: 548
будет работать при условии что ты хоть раз видел имя вендора
Top
   
Reply with quote  
Scripts Writer
 Post subject:
PostPosted: 2007-07-23 18:29:47 
Offline

Joined: 2005-04-19 18:00:29
Posts: 2259
Location: Московская область
ADEPT_ABP wrote:
Однажды мне заманало на Маркете набирать имена вендоров вкупе с BUY.
Вот. Пробуйте.
Code:
sub main()
   UO.AddObject('vendor')
    UO.Print('С кем торгуем?') 
   while UO.Targeting() 
    wait(10)
   wend
wait(1000)
uo.say(uo.GetName('vendor')+" buy")
end sub

Не помню только работает или нет? Не тестил. :mrgreen:


Строка

Code:
uo.say(uo.GetName('vendor')+" bye")
в начале скрипта не помешает.

п.с. Еще можно добавить клик по объекту перед тем как произнести его имя.


Mihail wrote:
будет работать при условии что ты хоть раз видел имя вендора


На ДРВ есть 3 локации в которых собраны вендоры игроков. Когда по столбу попадаешь в одну из этих локаций имена показываются сразу у всех, так что работать наверно будет.
Top
   
Reply with quote  
ADEPT_ABP
 Post subject:
PostPosted: 2007-07-23 19:01:08 
Offline
User avatar

Joined: 2006-05-12 08:03:45
Posts: 223
Scripts Writer wrote:
" bye")
Это что?

_________________
Играю на drw.ru
Использую инжект 505.18 VeNd0r
Начинающий скриптер.
Top
   
Reply with quote  
+GhosT+
 Post subject:
PostPosted: 2007-07-24 11:11:46 
Offline

Joined: 2007-06-10 06:00:59
Posts: 36
Выложи полныи скрипт на скупку !
Top
   
Reply with quote  
ADEPT_ABP
 Post subject:
PostPosted: 2007-07-24 21:25:50 
Offline
User avatar

Joined: 2006-05-12 08:03:45
Posts: 223
+GhosT+ wrote:
Выложи полныи скрипт на скупку !

Ты это кому? mort-у? Так он в самом верху(правда не совсем рабочий). Если мне, то - у меня нет такого скрипта. Scripts Writer - пошлёт в поиск(я кстати там нашёл всяких разных). И ещё немало-важный момент, - 100% работающих скриптов - небывает. Любой если работает, то не долго. Так как есть нюанс с железом... да и по мелочи. Ведь шарды и инжекты бывают разные. :D

_________________
Играю на drw.ru

Использую инжект 505.18 VeNd0r

Начинающий скриптер.
Top
   
Reply with quote  
Display posts from previous:  Sort by  
Post new topic  Reply to topic  Page 1 of 1
  [ 13 posts ] 

» » »

All times are UTC+02:00

Who is online

Users browsing this forum: Bing [Bot] and 9 guests

You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
cron
Powered by phpBB® Forum Software © phpBB Limited