Jump to content


Toggle shoutbox Chat Open the Shoutbox in a popup

Прямая связь с администрацией по скайпу: gods.dragon
@  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% и вроде как я поправил это.
@  Artemy Shan : (13 February 2024 - 02:44) Сменился айпи для входа в игру. Теперь заходим через: loginserver=login.oldp.net,2593 или loginserver=91.121.232.151,2593

Photo

Автохил Есть У Кого Такой?


  • Please log in to reply
2 replies to this topic

#1 mastermag

mastermag

    Newbie

  • Members
  • 6 posts

Posted 14 October 2013 - 00:29

чтоб и бинты были и если хп падает меньше определённой отметки пил банку?



#2 wormbass

wormbass
  • Members
  • 3 posts

Posted 21 April 2014 - 12:14

...



#3 VIenki

VIenki

    Novice Player

  • Members
  • 149 posts

Posted 21 April 2014 - 12:18

initevents
initevent
uoswap:
if #charname <> NIck
{
UOXL swap
goto uoswap
}
    restart:
set %BandageUse #true
set %GhUse #true
set %MeetUse #true
set %FishUse #true

set %Bandage ZLF
set %BandageTime 21

set %Gh EHJ_LHJ_VGJ_SGJ
set %GhTime 212
set %GhWarn 5

set %Meet VRD
set %MeetCol 73
set %MeetTime 312
set %MeetWarn 5

set %Fish EQD
set %FishCol 38
set %FishTime 312
set %FishWarn 5

set %TrapedKey T
set %Tmsg1 You_are_frozen_and_can_not_move
set %Tmsg2 You_can't_reach_that
set %Tmsg3 Tou_can't_use_that_in_your_current_state
set %BandageTimeTrue #SCNT2
set %GhTimeTrue #SCNT2
set %MeetTimeTrue #SCNT2
set %FishTimeTrue #SCNT2
;================= CheckHP =====================
start:
finditem %Bandage C_ , #backpackID
if #findkind = -1
set %BandageUse #false
finditem %Bandage C_ , #backpackID
if #findkind <> -1
set %BandageUse #true
finditem %Gh C_ , #backpackID
if #findkind = -1
set %GhUse #false
finditem %Gh C_ , #backpackID
if #findkind <> -1
set %GhUse #True
finditem %Meet C_ , #backpackID
if #findkind = -1
set %MeetUse #false
finditem %Meet C_ , #backpackID
if #findkind <> -1
set %MeetUse #true
finditem %Fish C_ , #backpackID
if #findkind = -1
set %FishUse #false
finditem %Fish C_ , #backpackID
if #findkind <> -1
set %FishUse #true

set %BandageHP #maxhits - 1
set %GhHP #maxhits - 140
set %MeetHP #maxhits - 70
set %FishHP #maxhits - 50

if %Tmsg1 in #SysMsg || %Tmsg2 in #SysMsg || %Tmsg3 in #SysMsg || %Tmsg1 in #journal || %Tmsg2 in #journal || %Tmsg3 in #journalq
gosub Trapped
if %BandageUse && #Hits < %BandageHP && #SCNT2 >= %BandageTimeTrue
gosub UseBandage
if %GhUse && #Hits < %GhHP && #SCNT2 >= %GhTimeTrue
gosub UseGh
if %MeetUse && #Hits < %MeetHP && #SCNT2 >= %MeetTimeTrue
gosub UseMeet
if %FishUse && #Hits < %FishHP && #SCNT2 >= %FishTimeTrue
gosub UseFish
;================= Title =======================

set %BandageTimer %BandageTimeTrue - #scnt2 && %BandageUse <> #false
if %BandageTimer <= 0
set %BandageTimer Ready
if %BandageUse = #false
set %BandageTimer Off
set %GhTimer %GhTimeTrue - #scnt2 && %GhUse <> #false
if %GhTimer <= 0
set %GhTimer Ready
if %GhUse = #false
set %GhTimer Off
set %MeetTimer %MeetTimeTrue - #scnt2 && %MeetUse <> #false
if %MeetTimer <= 0
set %MeetTimer Ready
if %MeetUse = #false
set %MeetTimer Off
set %FishTimer %FishTimeTrue - #scnt2 && %FishUse <> #false
if %FishTimer <= 0
set %FishtTimer Ready
if %FishUse = #false
set %FishtTimer Off
setuotitle Ultima Online - #charname ( , #shard , ) ,  Bandages: %BandageTimer GH: %GhTimer  Meet: %MeetTimer  Fish: %FishtTimer
goto start
;================= UseBandage ==================
Sub UseBandage
gosub check
  set %ltarget #ltargetID
  set %lobject #lobjectID
   finditem %Bandage C_ , #backpackid
  if #findkind <> -1 8
set #lobjectid #findid
event macro 17 0
wait 5
event macro 23 0
set #lobjectID %lobject
set #ltargetID %lobject
set #ltargetID #enemyid
set %BandageTimeTrue #scnt2 + %BandageTime
return
;================= UseGh =======================
sub UseGh
gosub check
finditem %Gh C_ , #backpackID
if #Findcol = 1159 2
ignoreitem #findID
gosub UseGh
set %AmountGh #findstack
set #lobjectid #findid
event macro 17 0
wait 5
finditem %Gh C_ , #backpackID
if #findstack = %AmountGh - 1
goto Start
set %GhTimeTrue #scnt2 + %GhTime
if %GhWarn >= %AmountGh
Gosub Warrning
return
;================= UseMeet =====================
Sub UseMeet
gosub check
finditem %Meet C_ , #backpackID
if #findkind <> -1
{
meet:
finditem %Meet C_ , #backpackID
if #findCOL <> %MeetCol 2
ignoreitem #findID
goto meet
set %AmountMeet #findstack
set #lobjectid #findid
event macro 17 0
wait 5
finditem %Meet C_ , #backpackID
if #findstack = %AmountMeet - 1
goto Start
set %MeetTimeTrue #scnt2 + %MeetTime
if %MeetWarn >= %AmountMeet
Gosub Warrning
}
return
;================= UseFish =====================
sub UseFish
gosub check
Fish:
finditem %Fish C_ , #backpackID
if #findCOL <> %FishCol
{
ignoreitem #findID
goto Fish
}
set %AmountFish #findstack
set #lobjectid #findid
event macro 17 0
wait 5
finditem %Fish C_ , #backpackID
if #findstack = %AmountFish - 1
goto Start
set %FishTimeTrue #scnt2 + %FishTime
if %FishWarn >= %AmountFish
Gosub Warrning
return
;================= Trapped =====================
Sub Trapped
key %TrapedKey
return
;================= GHOST CHECK =================
sub check
if #charghost = yes 4
 finditem %GH C_ , #backpackID
 if #findkind <> -1
 goto restart
 gosub check
return
;================= Warrning =====================
sub Warrning
set #sysmsgcol 38
event sysmessage WARNING
event sysmessage GH: %AmountGh  MEET: %AmountMeet FISH: %AmountFish
return



упс не заметил что надо было на инжу.
п.с эт на изи)






0 user(s) are reading this topic

0 members, 0 guests, 0 anonymous users