Yoko

All sides of Injection
It is currently 2025-12-26 07:20:43

All times are UTC+02:00




Post new topic  Reply to topic  [ 68 posts ]  Go to page 1 2 3 4 Next
Author Message
 Post subject: ламб+мин2
PostPosted: 2005-02-24 20:07:23 
Offline

Joined: 2005-02-08 18:39:50
Posts: 444
Location: Moscow
Люди!! топик закрыли, а так и не помогли....помогите!!


--------------------------------------------------------------------------------

открылся новый шард: http://www.guo.nm.ru--Это резервный сайт!!
так вот на этом шарде как-то прикрыли скрипты на лумбер и мининг...
как они это сделали не знаю....может можно обойти эту систему как-нить?? ...а то копать и рубить руками...кхе...это жизни не хватит...

прошу откликнуться !! и помоч ...можете попробовать прям на самом шарде,...там введена авторегистрация -))


Top
   
 Post subject:
PostPosted: 2005-02-25 18:43:23 
Offline

Joined: 2005-02-08 18:39:50
Posts: 444
Location: Moscow
что?? никто не знает ??


Top
   
 Post subject:
PostPosted: 2005-02-25 19:06:32 
Offline
Expert!
User avatar

Joined: 2004-10-15 22:38:04
Posts: 1396
Location: Moscow City.
Знаем :)
Ответ придет чуть попоже :)


Top
   
 Post subject:
PostPosted: 2005-02-25 19:08:39 
Offline

Joined: 2005-02-08 18:39:50
Posts: 444
Location: Moscow
I'm wrote:
Знаем :)
Ответ придет чуть попоже :)


оо..рулезьь...жду... :wink:


Top
   
 Post subject:
PostPosted: 2005-02-25 19:42:26 
Offline
Expert!
User avatar

Joined: 2004-10-15 22:38:04
Posts: 1396
Location: Moscow City.
В общем так тк я очень линивая личность и все такое.
Тебе необходимо заменить ряд сообщение на которые реагирует скрипт :)
Типо:
Code:
"That is too far away." 
"You can't reach this."
"You fail to find any useable ore"
"AbRaCaDaBrA ArBaDaCaRbA"
и другие....

На сообщения Готики.
Пример:
Code:
"There is nothing here to mine for."
"You can't use the %s where it is."

Я прорыл квадрат 2х2 и продолжаю рыть :lol:


Top
   
 Post subject:
PostPosted: 2005-02-25 19:45:28 
Offline

Joined: 2005-02-08 18:39:50
Posts: 444
Location: Moscow
I'm wrote:
В общем так тк я очень линивая личность и все такое.
Тебе необходимо заменить ряд сообщение на которые реагирует скрипт :)
Типо:
Code:
"That is too far away." 
"You can't reach this."
"You fail to find any useable ore"
"AbRaCaDaBrA ArBaDaCaRbA"
и другие....

На сообщения Готики.
Пример:
Code:
"There is nothing here to mine for."
"You can't use the %s where it is."

Я прорыл квадрат 2х2 и продолжаю рыть :lol:



а в какой скрпит втыкать-то ?? :roll:


Top
   
 Post subject:
PostPosted: 2005-02-25 19:57:44 
Offline
Expert!
User avatar

Joined: 2004-10-15 22:38:04
Posts: 1396
Location: Moscow City.
Gromiz wrote:
а в какой скрпит втыкать-то ?? :roll:

Ну на пример в твой который якобы рабочий :lol:


Top
   
 Post subject:
PostPosted: 2005-02-25 20:01:10 
Offline

Joined: 2005-02-08 18:39:50
Posts: 444
Location: Moscow
вот мой ..но он не пашет
Code:
sub main() 
var mx, my, mz, i, j
repeat
uo.addobject("Shovel",0x400D47A7) # ID лопаты или, чем ты, там, копаешь
na4:
; gotoxy(5136,1181) #точка копки
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.UseSkill("Hiding")
wait(4000)
wend
UO.Print("Now Mining In: "+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")
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)
endif
wend
UO.DeleteJournal()
if uo.Weight>740 then # максимальный вес
loot()
goto na4
endif
next
next
until uo.dead()
end sub

sub unloadore()
VAR TempX,TempY,i,Exit
VAR UnloadX=5518, UnloadY=1434
VAR UnloadCont='0x401d7b11' # Ид сундука
DIM Ore[5]

TempX=UO.GetX()
TempY=UO.GetY()

While UO.GetEasyUO(99)=='1'
wait(3000)
Wend

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) ; storecontainer
wait(500)
For i=0 to 3
Exit=0
repeat
UO.FindType(Ore[i])

if UO.GetQuantity('finditem')>0 then
UO.Grab('0','finditem')
wait(1500)
Else
Exit=1
endif
until Exit==1
Next

UO.UnSetReceivingContainer()
end sub


Top
   
 Post subject:
PostPosted: 2005-02-25 20:07:55 
Offline
Expert!
User avatar

Joined: 2004-10-15 22:38:04
Posts: 1396
Location: Moscow City.
Тебе нужен этот кусок
Code:
while not UO.InJournal("no ore here") and not UO.InJournal("location") and not UO.InJournal("far away") and not UO.InJournal("in rock") 
#...
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")


Top
   
 Post subject:
PostPosted: 2005-02-25 20:11:22 
Offline

Joined: 2005-02-08 18:39:50
Posts: 444
Location: Moscow
I'm wrote:
Тебе нужен этот кусок
Code:
while not UO.InJournal("no ore here") and not UO.InJournal("location") and not UO.InJournal("far away") and not UO.InJournal("in rock") 
#...
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")


а что с этим куском делать ??

ведь у меня ошибка:

Error opening key
HKEY_CURRENT_USER\Software\EasyUO


Top
   
 Post subject:
PostPosted: 2005-02-25 20:16:45 
Offline
Expert!
User avatar

Joined: 2004-10-15 22:38:04
Posts: 1396
Location: Moscow City.
Что ты намекаеш мне что я промахнулся? :lol:
Фиг тебе я даж туда несмотрел :lol:
Найди в скрипте упоминания на все строки с EasyUO и замени их =)
P.S. EasyUO видел только раз в жизни, на второе свидание ненастаиваю :)


Top
   
 Post subject:
PostPosted: 2005-02-25 20:20:15 
Offline

Joined: 2005-02-08 18:39:50
Posts: 444
Location: Moscow
I'm wrote:
Что ты намекаеш мне что я промахнулся? :lol:
Фиг тебе я даж туда несмотрел :lol:
Найди в скрипте упоминания на все строки с EasyUO и замени их =)
P.S. EasyUO видел только раз в жизни, на второе свидание ненастаиваю :)


в скрипте нет EasyUO
и что ты хочешь сказать, ч о я :залетел, попал, обломался
как все плохо мле.....


Top
   
 Post subject:
PostPosted: 2005-02-25 20:22:30 
Offline
Expert!
User avatar

Joined: 2004-10-15 22:38:04
Posts: 1396
Location: Moscow City.
А ето что?
Code:
While UO.GetEasyUO(99)=='1' 
wait(3000)
Wend

Говорю чесно что с изей я пас.


Top
   
 Post subject:
PostPosted: 2005-02-25 20:28:10 
Offline

Joined: 2005-02-08 18:39:50
Posts: 444
Location: Moscow
ну я то темболее...пас..я ваще не рулю..и не знаю что это такое!!!!


Top
   
 Post subject:
PostPosted: 2005-02-25 20:35:18 
Offline
Expert!
User avatar

Joined: 2004-10-15 22:38:04
Posts: 1396
Location: Moscow City.
Попробуй как я писал многим выше в предыдущем топике.
У меня работает :lol:
Quote:
У кого не стояла изиуо, скопируйте это в easy.reg файл
и запустите его.
Code:
Windows Registry Editor Version 5.00 

[HKEY_CURRENT_USER\Software\EasyUO]
"WndData.Top"=dword:00000148
"WndData.Left"=dword:000000d1
"WndData.Height"=dword:0000015d
"WndData.Width"=dword:00000300
"WndData.Split"=dword:0000006d
"WndData.InitDir"=""
"WndData.StayOnTop"=dword:00000000
"WndData.PauseKey"=dword:0000000c
"WndData.PauseContinue"=dword:00000000
"Toolbar.Standard"=dword:00000001
"Variables.Show"=dword:00000000
"Variables.Standard"=dword:00000001
"Variables.User"=dword:00000000
"Variables.Defined"=""
"*99"="0"
"*1"="0"
"*0"="0"
"*2"="0"



Top
   
 Post subject:
PostPosted: 2005-02-25 20:38:53 
Offline

Joined: 2005-02-08 18:39:50
Posts: 444
Location: Moscow
I'm wrote:
Попробуй как я писал многим выше в предыдущем топике.
У меня работает :lol:
Quote:
У кого не стояла изиуо, скопируйте это в easy.reg файл
и запустите его.
Code:
Windows Registry Editor Version 5.00 

[HKEY_CURRENT_USER\Software\EasyUO]
"WndData.Top"=dword:00000148
"WndData.Left"=dword:000000d1
"WndData.Height"=dword:0000015d
"WndData.Width"=dword:00000300
"WndData.Split"=dword:0000006d
"WndData.InitDir"=""
"WndData.StayOnTop"=dword:00000000
"WndData.PauseKey"=dword:0000000c
"WndData.PauseContinue"=dword:00000000
"Toolbar.Standard"=dword:00000001
"Variables.Show"=dword:00000000
"Variables.Standard"=dword:00000001
"Variables.User"=dword:00000000
"Variables.Defined"=""
"*99"="0"
"*1"="0"
"*0"="0"
"*2"="0"




ща попробую....погодь я качал с дрв инстал ульты ...там ничего не случиться??а то если накроет будет плохо


Top
   
 Post subject:
PostPosted: 2005-02-25 20:41:53 
Offline
Expert!
User avatar

Joined: 2004-10-15 22:38:04
Posts: 1396
Location: Moscow City.
Нет, неслучится.


Top
   
 Post subject:
PostPosted: 2005-02-25 20:44:53 
Offline

Joined: 2005-02-08 18:39:50
Posts: 444
Location: Moscow
I'm wrote:
Нет, неслучится.


у меня что-то такого файла нет...мож надо в uo.reg


Top
   
 Post subject:
PostPosted: 2005-02-25 20:54:35 
Offline
Expert!
User avatar

Joined: 2004-10-15 22:38:04
Posts: 1396
Location: Moscow City.
Создай его :lol:


Top
   
 Post subject:
PostPosted: 2005-02-25 20:58:18 
Offline

Joined: 2005-02-08 18:39:50
Posts: 444
Location: Moscow
I'm wrote:
Создай его :lol:

хмехно еслиб я знал как..это же не просто создать текстовый документ и запихнуть туда все.....


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 68 posts ]  Go to page 1 2 3 4 Next

All times are UTC+02:00


Who is online

Users browsing this forum: Bing [Bot] and 3 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:  
Powered by phpBB® Forum Software © phpBB Limited