Скрипт на новый тип маининга=)

[Kaifrat]

Можно такой скрипт :
Чтобы летал по рунбукам ( ДрВ ) по шахтам ...1 или 2 без раздницы..
Главное чтобы : при появлении пк , пил инвиску и сразу реколился по рунки домой, дома скидывал руду в сундук и ждал х время чтобы опять прыгнутьв шахту ...можно такой скрипт плиз, оченнь буду благодарен ...

[Kaifrat]

Ну можно в этот скрипт всунуть чтобы при появлении пк пил инвис? Если не сложно, то чтобы еще просил тыкнуть на бутылки ...пере копание кнчно ...

Code: Select all

sub maning() 
#BETEP™# 
var mx, my, mz, i, j, jor, ser, noto 
Uo.exec("set norbcheck 1"); äëÿ ðåêîëà 
uo.exec("set norbcalc 1"); òîæå 

uo.print('!!Âûáåðè Ëîïàòó!! ') 
uo.exec('addobject Shovel') 
while uo.targeting() 
wait(100) 
wend 
  
uo.print('!!Âûáåðè Ðóíáóê!! ') 
uo.exec('addobject Runebook') 
while uo.targeting() 
wait(100) 
wend 

na4alo: 
mx = UO.GetX("self") 
my = UO.GetY("self") 
mz = UO.GetZ("self") 
UO.DeleteJournal() 
for i = mx-4 to mx+4 
for j = my -4 to my+4 
while not UO.Hidden() 
UO.Warmode("0") 
uo.print("Ïðÿ÷åìñÿ...") 
UO.UseSkill("Hiding") 
wait(4000) 
wend 
UO.Print("Êîïàåì â êîîðäèíàòàõ: "+str(mx-i)+" "+str(my-j)) 
while not UO.InJournal("no ore here") and not UO.InJournal("location") and not UO.InJournal("far away") and not UO.InJournal("in rock") and not UO.InJournal("Iron Ore") and not UO.InJournal("Copper") and not UO.InJournal("Rusty Ore") and not UO.InJournal("Old Copper") and not UO.InJournal("Dull Copper") and not UO.InJournal("Bronze") and not UO.InJournal("Shadow")
UO.DeleteJournal() 
if uo.waiting() then 
uo.canceltarget() 
endif 
UO.Waittargettile("1341", str(i), str(j), str(mz)) 
UO.Useobject("Shovel") 
while not UO.InJournal("You put") and not UO.InJournal("heavy") and not UO.InJournal("location") and not UO.InJournal("no ore") and not UO.InJournal("but fail") and not UO.InJournal("far away") and not UO.InJournal("in rock") 
wait (500) 
if uo.injournal("heavy") or uo.dead() then 
pwav()                    
Pause() 
endif 
for jor = 0 to 9    
ser = uo.journalserial(jor) 
noto = uo.getnotoriety(ser) 
if noto <> 1 and noto <> 0 and not uo.injournal("elemental") then 
if uo.waiting() then 
uo.canceltarget() 
endif 
Save() 
pwavw() 
wait(180000) ; âðåìÿ â ñåêóíäàõ ïðè îæèäàíèè ïîêà óéäåò ÏÊ 
loot() 
wait(3000) 
goto reccal 
endif 
next    
wend 
if uo.weight > 545 then  ; Ìàêñèìàëüíûé âåñ ïðè êîòîðîì äîìîé ñ ðóäîé 
goto end 
endif 
wend 
UO.DeleteJournal() 
next 
next 
goto na4alo 
end: 
if uo.waiting() then 
uo.canceltarget() 
endif 
uo.exec("recall Runebook 21") ; äîìîé ( â ðóíáóêå ñëîò 1 ) 
wait(10000) 
loot() 
wait(3000) 
reccal: 
uo.deletejournal() 
if uo.waiting() then 
uo.canceltarget() 
endif 
uo.exec("recall Runebook 94") ; â øàõòó ( â ðóíáóêå ñëîò 8 ) 
mx = UO.GetX("self") 
my = UO.GetY("self") 
wait(10000) 
if not UO.GetX("self") <> mx and not UO.GetY("self") <> my then 
goto reccal 
endif 
goto na4alo 
end sub 

sub loot()    ; ïåðåêëàäêà ðóäû â ñóíäóê 
if uo.waiting() then 
uo.canceltarget() 
endif 
VAR a,Exit 
VAR UnloadCont='0x402BDBBF' ; ÀÉÄÈ ñóíäóêà äëÿ ðóäû  
DIM Ore[5] 
Ore[0]=0x19B9 ; 4 and more ore 
Ore[1]=0x19B7 ; 1 ore 
Ore[2]=0x19BA ; 2 ore 
Ore[3]=0x19B8 ; 3 ore 
UO.SetReceivingContainer(UnloadCont) 
wait(500) 
For a=0 to 3 
Exit=0 
repeat 
UO.FindType(Ore[a]) 
if UO.GetQuantity('finditem')>0 then 
UO.Grab('0','finditem') 
wait(1500) 
Else 
Exit=1 
endif 
until Exit==1 
Next 
UO.UnSetReceivingContainer() 
end sub 

sub Save() ; Ðåêîëë îò ÏÊ ïðè èõ ïîÿâëåíèè (â ïàêå ðóíêà â áåçîïàñíîå ìåñòî è ðåãè) 
var mx, my 
reccal: 
uo.deletejournal() 
if uo.waiting() then 
uo.canceltarget() 
endif 
mx = UO.GetX("self") 
my = UO.GetY("self") 
UO.DeleteJournal() 
UO.FindType('0x1F14',-1,'my') 
wait(200) 
UO.Cast('Recall','finditem') 
wait(4000) 
if not UO.GetX("self") <> mx and not UO.GetY("self") <> my then 
goto reccal 
endif 
end sub 

sub pwav() ; çâóê ïðè âûêàïûâàíèè ÝËÅÌÅÍÒÀËÀ 
uo.playwav("E:\UO\inject\SOUND\chanting sound 01.wav") 
endsub 

sub pwavw(); çâóê ïðè ïîÿâëåíèè ÏÊ 
uo.playwav("E:\UO\inject\SOUND\chanting sound 01.wav") 
endsub 

sub Pause() ; Ïàóçà ñêðèïòà åñëè âûêîïàëè Ýëåìà (ïðîäîëæèòü ñêàçàâ GO ) 
UO.DeleteJournal() 
REPEAT 
WAIT(3000) 
UO.Print("!!!ÑÊÐÈÏÒ ÍÀ ÏÀÓÇÅ!!!!") 
UNTIL UO.InJournal('GO') 
UO.Print("!!!ÑÊÐÈÏÒ ÏÐÎÄÎËÆÅÍ!!!!") 
endif

[Dron D.]

ищи в поиске таких тем куча куча куча.

[LordTom]

мое отношение абсолютно лояльное, каждый волен сам решать с кем ему и как, главное, чтобы мои или чьи-либо эстетические, религиозные и др. чувства не были задеты, т.е. у себя на кухне - все что угодн
мама Ляля просто пробуй каждый день класть. Криков не надо. Только тут надо терпение и еще раз терепение. Как тренировка. 2-3 раза в день. Заплачет - опять на ручки возьмёш. А в один прекрасный день

[Kaifrat]

А можно вопрос, чем этот тип майнинга новый ?

От пк больше шансов убежать есть ...

Нету таких скриптов чтобы он пил инвиску, искал...Помогите плиз !

[Kaifrat]

Напишите тогда просто чтобы он пил инвику ...Просил выдилить , перед копанием инвиски, и при появлении пк пил ...и куда засунуть его ...вот и вся просьба.

[Toretto]

Ну вот например чтото типа того.
Можешь зациклить и включить отдельным субом
будет сматываться от всех кроме елема

Code: Select all

sub Sample() 
var jor, ser, noto
for jor = 0 to 9   

if UO.InJournal(":") then
wait(100)
ser = uo.journalserial(jor)
noto = uo.getnotoriety(ser)
if noto > 0 and not uo.injournal("Elemental") then
UO.DeleteJournal() 
UO.UseType('0x0F0E','0x0631') ; invis potion
wait(500)
uo.exec("waittargettype 0x1F14") ;тип руны к дому, которая в бекпеке
uo.exec("usetype 0x1F4C") ;скролл рекола
uo.print("Recall Home")
wait(100)
endif 
endif 
end sub

А вообще на эту тему было уже много разговоров.