49 replies to this topic

[jetijs]

pozalsta dajte skript dlja begging easyuo,inzekt skripti nerabotajet :(

[EnFlame]

толк сдесь просто так кидать? тогда появится куча других бегеров и будете мешать друг другу.
на сколько я знаю, тут только один такой скрыпт на easy uo и этот мой, продам за 10кк.

[Ta6ypeTka]

толк сдесь просто так кидать? тогда появится куча других бегеров и будете мешать друг другу.
на сколько я знаю, тут только один такой скрыпт на easy uo и этот мой, продам за 10кк.

i esli ne sikret skoko zana4 zarabativaew?

[jetijs]

menja netu takoi deneg

[EnFlame]

i esli ne sikret skoko zana4 zarabativaew?

как с метематикой?
с 200.0% бегинга за раз даёт 2к, беггинг идёт 30 секунд + 10 сек реколл, во итоге за 40 секунд 2к, дальше считай сам.

[imja1]

как с метематикой?
с 200.0% бегинга за раз даёт 2к, беггинг идёт 30 секунд + 10 сек реколл, во итоге за 40 секунд 2к, дальше считай сам.

NICE
a zas4jot skilla skorost' begginga povishajetsa ? nu skazem , pri 240 - prosit 20 sekund ...

Avtoru topika - use search button , 4el vikladival scp na Injection 100%

[jetijs]

imja,ja uze skazal !! inzekt skripti nerabotajet!!

[bot]

imja,ja uze skazal !! inzekt skripti nerabotajet!!

hrenova kada ruki pod h.j zato4ini

[Mmm]

толк сдесь просто так кидать? тогда появится куча других бегеров и будете мешать друг другу.
на сколько я знаю, тут только один такой скрыпт на easy uo и этот мой, продам за 10кк.

А почему только твой))

[Jisd]

Enflame.....
слушай, вот ты говориш продаёш свой скрипт за 10кк да? Если я у тебя его куплю, ты мне его даёш вместе с рунбуками, и скоко у тебя марков ?

[Mmm]

Enflame.....
слушай, вот ты говориш продаёш свой скрипт за 10кк да? Если я у тебя его куплю, ты мне его даёш вместе с рунбуками, и скоко у тебя марков ?

Тебе что тяжело сделать рунбук?
напишы мну в скайп
xadb1k

[EnFlame]

А почему только твой))

Тебе что тяжело сделать рунбук?
напишы мну в скайп
xadb1k

давай я тебе напишу и посмотрю ли это мой скрипт, если нет можешь ему продать или что там ты ещё хотел


edit: да, этот был мой, просто один чел, в игре Leon, Abramovich, на форумe валидол, написал типо под себя

;=====================================================================

; Script Name: OldParadise Begger

; Author: Baxa

; Version: 1.1

...

[Oceanvortex]

prodam takoizhe skript kak u enflame ( tachnee peredelanij enflame na lubiji garada s runebookom za 5kk) Enflame- owned

[EnFlame]

Чтобы настроить:
1) поставить ИД рунебука

set %runebookID DCBMLMD

2) поставить время, какое он максимально проводит к вендору

set %failTime 1800 ; 600 = 1min

если у вас большой скилл можете оставит и так, если маленкий скил, надо поставить больше (~3000)
3) замарчивать рунебук и по очереди вписать ИД вендоров, вот ИД первого вендора

gosub Recall 266 280 GKJGB ; 1st recall rune [by reagents] & vendor's ID

цыфри - это координаты рунок в книге, ИД вендоров можно узнать протягивая их Status Bar'ы и посмотря #CONTID в EasyUO.

Летает через реги, на ночь надо примерно 1к регов. Это не значит, что скрипт могут использовать только магы/клеры, но, одеваясь на достаточно magery, через реги могут летать все классы. Нету нкакой разгрузки, потому что это лишнее.

;=====================================================================

; Script Name: OldParadise Begger

; Author: EnFlame

; Version: 1.1

; Client tested with: 2.0.3

; EUO version tested with: EasyUO 1.5 Version 137

; Shard OSI/FS: FS

; Public Release: 03/20/06

; Revision Date: 07/31/07

; Global Variables Used: -

; Purpose: Fast to train begging skill and earn some money.

; Description: Script recalls to vendor using reagents, uses begging

; skill, follows to vendor, recalls to the next vendor.

;=====================================================================

initevents

set %runebookID DCBMLMD

set %failTime 1800 ; 600 = 1min

;---------------------------------------------------------------------

set #sysmsgcol 38

chooseskill Begging

if #skill < 2000

 set %uoTitle #true

else

 set %uoTitle #false

;---------------------------------------------------------------------

RecallingSystem:

gosub Recall 266 280 GKJGB ; 1st recall rune [by reagents] & vendor's ID

gosub Recall 266 453 XQYHB ; 2nd recall rune [by reagents] & vendor's ID

gosub Recall 301 280 EIFIB; 3rd recall rune [by reagents] & vendor's ID

gosub Recall 301 453 TLJIB ; 4th --/--/--

gosub Recall 335 280 HUYHB ; 5th --/--/--

gosub Recall 335 453 XRKIB ; 6th --/--/--

gosub Recall 370 280 XNUHB ; 7th --/--/--

gosub Recall 370 453 USZIB; 8th --/--/--

gosub Recall 434 280 AATIB; 9th --/--/--

gosub Recall 434 453 BRNIB ; 10th --/--/--

gosub Recall 471 280 CRJLC ; 11th --/--/--

gosub Recall 471 453 SZYIB ; 12th --/--/--

gosub Recall 505 280 TPSIB; 13th --/--/--

gosub Recall 505 453 XZYGB ; 14th --/--/--

gosub Recall 540 280 ZEFIB; 15th --/--/--

gosub Recall 540 453 AZLIB; 16th --/--/--

goto RecallingSystem

;---------------------------------------------------------------------

sub Recall

set %tries 0

if %uoTitle

gosub setTitle

set %oldPosX #charposx

set %oldPosY #charposy

if #mana < #maxmana

event macro 13 46

_openRunebook:

finditem %runebookID C_ , #backpackid

 if #findkind = -1

 {

  event sysmessage Runebook not found.

  pause

 }

set #lobjectid #findid

event macro 17 0

wait 20

gosub check

_click:

click %1 386

wait 10

click %2 349

gosub check

if #result = failed && %tries < 5

 {

 set %tries %tries + 1

 goto _openRunebook

 }

if %tries = 5

 return

gosub Begging

return

;---------------------------------------------------------------------

sub Begging

set %failTimer #scnt2 + %failTime

set %currentGold #gold

set %try 0

_begging:

finditem %3 G_12

 if #findcnt < 1

  return

gosub moveToVendor

_target:

event macro 13 6

set %lag #scnt + 10

while #targcurs <> 1

 {

  wait 1

   if ( ( %currentGold <> #gold ) || ( #scnt2 > %failTimer ) )

	return

   if #scnt > %lag

	{

	gosub moveToVendor

	goto _target

	}

 }

finditem %3

  if #findcnt = 0 || #scnt2 > %failTimer

  return

if #targcurs = 1 && #finddist < 3

{

 finditem %3

 set #ltargetid #findid

 set #ltargetkind 1

 event macro 22 0

}

else

{

 gosub moveToVendor

 goto _target

}

wait 20

event macro 13 6

set #scnt 0

repeat

 {

  finditem %3

  event pathfind #findx #findy #findz 1

  wait 20

   if ( ( %currentGold <> #gold ) || ( #targcurs = 1 ) || ( #scnt2 > %failTimer ) )

	return

 }

until #scnt > 35

 if ( ( %currentGold <> #gold ) || ( #targcurs = 1 ) || ( #scnt2 > %failTimer ) )

  return

 if #scnt > 35

  {

   set %try %try + 1

   event sysmessage Retrying begging ( , %try , )

  }

goto _begging

return

;---------------------------------------------------------------------

sub setTitle

 if #skill = 2000

  {

   set %uoTitle #false

   setuotitle Ultima Online - #charname ( , #shard , )

   return

  }

str len #skill

str ins #skill #dot #strres

setuotitle Ultima Online - #charname ( , #shard , ) Begging Skill: #strres , %

return

;---------------------------------------------------------------------

sub moveToVendor

event macro 23 0

wait 10

repeat

 {

  finditem %3

  if #findcnt = 0

  return

  event pathfind #findx #findy #findz

  wait 20

 }

until #finddist < 2 || #scnt2 > %failTimer

return

;---------------------------------------------------------------------

sub check

set %teleportOverTime #scnt + 20

_checking:

if #contname = generic_gump && #contsize = 577_426

 return

if ! ( ( #charposx = %oldPosX ) && ( #charposy = %oldPosY ) )

 return

if #scnt > %teleportOverTime

{

 click 400 360

 return failed

}

wait 10

goto _checking

return

;---------------------------------------------------------------------

; ..::eNd::..

[Mmm]

Я впринцепе знаю для чего ты это сделал, но это глупо...

[EnFlame]

мне пох, и так нагло всё на лево и право идёт, самому про уо пох, пусть беггинг тоже исчезает.

[Knife.]

всё гоод,пусть люди пользуються.

[Arsenikum]

мне пох, и так нагло всё на лево и право идёт, самому про уо пох, пусть беггинг тоже исчезает.

Krasavec 5+

[Mmm]

Krasavec 5+

Тут дело совсем не в этом...тут сыграл 1фактор...не мне, значет никому...

[Helpnik]

Zachot tjebje enflame i vsjo tak krasiva abisnjil
Nu vchom was prablema uze samava utra vizu v minoc i brit polnij etimi begingami ti fig terj pa begingujiw :/ Enflame bil prav beging umrjot!
Njelzja wtob on kakta dverji atkrivalbi :/