Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Topics - camotbik

Pages: 1 [2] 3 4
16
Cool Links! / room makeover
« on: September 25, 2011, 02:08:42 PM »

17
Combat/Healing/Looting / CAMOTbIK's Scout
« on: September 25, 2011, 05:47:00 AM »
Code: [Select]
;=====================================================================
; Script Name: CAMOTbIK's Scout
; Author: CAMOTbIK
; Version: 0.1 Alfa
; Client Tested with: 7.0.14.0
; EUO version tested with: 1.92
; Shard OSI / FS:  FS WWW.RWUO.COM
; Revision Date: 2011/09/25
; Public Release: 2011/09/25
; Global Variables Used: None
; Purpose: To ressurect/heal your friends, pickup stuff while staying
; hidden and check for incoming enemy players.
;=====================================================================
Basically I use this script on champs with second account, using my ninja to auto ressurect/heal my friends, warn for incoming raids(party chat), pickup gold and power scrolls, while stay hidden.
Setup:
Code: [Select]
set %friends1 [AAA]
set %friends2 [BBB]
set %friends3 [CCC]
set %friends4 [COM]
set %bos ID
Note that i play on ML shard, and I haven't added ghost/living types of gargoles, if you need them, just add them to %characters variable.

18
Cool Links! / animal lover
« on: September 24, 2011, 01:59:00 PM »

Well this was funny.

19
Cool Links! / i said no!
« on: September 23, 2011, 11:51:51 AM »

20
ScriptUO Questions and Answers / Just sayin
« on: September 22, 2011, 09:04:01 AM »
First of all, I just love SUO. It's been great help in writing scripts. And I've come up with a suggestion, to implement an autocomplete, or something similar, like we have in several php editors. That would be just awesome!

21
Misc. Scripts / CAMOTbIK's Journal logger
« on: September 22, 2011, 08:58:32 AM »
Code: [Select]
;=====================================================================
; Script Name: CAMOTbIK's Journal logger
; Author: CAMOTbIK
; Version: 0.4 Alfa
; Client Tested with: 7.0.14.0
; EUO version tested with: 1.92
; Shard OSI / FS:  FS WWW.RWUO.COM
; Revision Date: 2011/09/22
; Public Release: 2011/09/22
; Global Variables Used: None
; Purpose: Journal log
;=====================================================================

Nothing fancy, but this little thing helps me read the chat, when I come back from whatever I was doing..



22
Script Debug / Really could use some help here.
« on: September 19, 2011, 04:48:31 AM »
I'm having here a really big problem and I'm seeking for some help. Since today I'm experiencing major client crashes - 7-10 minutes of running the script and BAM! That sucker(crash notification) pops up. It's really odd, because I have been farming points the night before and had no issues. In the morning did some edits( I've tried Freddy's Recalling sub - http://www.scriptuo.com/index.php?topic=8427.0 ) got the first 4 client crashes over 7-10 minutes and changed back to the s7 recalling sub. I have over written the old version - HOW DUMB OF ME! My first thought was that #findindex is a bit buggy, but then I've noticed that the client crashes 80% of the time at the donation vendor. So I'm a bit confused now. If you see anything that could cause a client crash - please let me know.
Code: [Select]
;=====================================================================
; Script Name: Item Buyer & Donator
; Author: CAMOTbIK
; Version: 0.2 Alfa
; Client Tested with: 7.0.14.0
; EUO version tested with: 1.92
; Shard OSI / FS:  FS WWW.RWUO.COM
; Revision Date: 2011/09/19
; Public Release: 2011/09/16
; Global Variables Used: None
; Purpose: Buying stuff from vendors and donating it.
; Req - 100% LRC suite, runebooks with marked runes to vendors, a
; rune to bank and a rune to donation vendor inside %vendorbook1.
;=====================================================================
;========================== EDITABLES ================================
;=====================================================================
set %vendorbook1 UOLZSMD ; first runebook with vendors
set %vendorbook2 NBYQZMD ; second runebook with vendors
set %vendorbook3 RQXQZMD ; third runebook with vendors
set %startrune 1
set %endrune 14
set %donaterune 15 ; donation rune number in first runebook with vendors
set %bankrune 16   ; bank rune in first runebook with vendors
set %donation_vendor CAWG ; donation npc id
set %charname Darth
set %maxpoints 800000
;=====================================================================
;========================== DO NOT EDIT ==============================
;=====================================================================
set %donation_item BSF
set %vendortype IS_HS_NCB_OCB
set %start_time #scnt
set %gold_spend 0
set %items_donated 0
set %points 0

while #charname <> %charname
 uoxl swap
gosub donation
menu Clear
menu Window Title C's Donator
menu Window Color ActiveBorder
menu Window Size 190 70
menu Font Transparent #true
menu Font Align Right
menu Font Name MS Sans Serif
menu Font Size 8
menu Font Color Yellow
menu Font BGColor Black
menu List Create EUOListBox1 0 -9 250 200
menu List Add EUOListBox1 Items donated : %items_donated
menu List Add EUOListBox1 Gold spend    : %gold_spend
menu List Add EUOListBox1 Points : %points
menu List Add EUOListBox1 Time : %points %Time
menu List Add EUOListBox1 Status: %1
menu Show 421 300

;=====================================================================
;========================== MAINLOOP =================================
;=====================================================================
repeat
  for %i 1 3   ; 1-3 vendorbooks
  {
    set %current_book %vendorbook . %i
    for %current_rune %startrune %endrune
    {
      gosub check_gold
      gosub mana_check
      gosub update Recalling , #spc , Vendorbook . %i , #spc , [ , #spc , %current_rune , #spc , ]
      gosub s7UseRunebook %current_book %current_rune r
      gosub buy
      gosub donation
    }
  }
until #charghost = yes || %points > %maxpoints
if %points > %maxpoints
gosub update You , #spc , have , #spc , reached , #spc , %maxpoints , #spc , points.
halt
;=====================================================================
;========================== BUY BATTLE AXES ==========================
;=====================================================================
sub buy
  finditem %vendortype G_8
  for #FINDINDEX 1 #FINDCNT
  {
    if #FINDREP = 7
    {
      event Property #findID
      if Blacksmith in #property || Weaponsmith in #property || Guildmaster in #property || guildmistress in #property
      {
        gosub update Buying..
        set %gold #gold
        exevent Popup #findid 2
        wait 1s
        if #gold <> %gold
        {
          set %current_gold %gold - #gold
          set %gold_spend %gold_spend + %current_gold
        }
      }
      else
        ignoreitem #findid
    }
    else
      ignoreitem #findid
  }
return
;=====================================================================
;========================== WAIT FOR MANA ============================
;=====================================================================
sub mana_check
  while #mana < 10
  {
    gosub update Waiting , #spc , for , #spc , mana..
    wait 1s
  }
return
;=====================================================================
;========================== DONATE THE BATTLE AXES ===================
;=====================================================================
sub donation
  finditem %donation_item c_ , #backpackid
  if #findcnt > 0
  {
    set %cnt #findcnt
    gosub update Recalling , #spc , to , #spc , library
    gosub s7UseRunebook %vendorbook1 %donaterune r
    gosub update Donating
    set #lobjectid %donation_vendor
    event macro 17
    gosub waitforgump 345_359
    gosub OffsetClick 305 342
    gosub waitforgump 345_359
    gosub OffsetClick 305 342
    gosub waitforgump 345_359
    msg $
    gosub OffsetClick 39 240
    wait 2s
    msg %cnt $
    gosub waitforgump 345_359
    gosub OffsetClick 284 42
    set %items_donated ( %items_donated + %cnt )
    set %points ( %points + %cnt * 9 )
  }
return
;=====================================================================
;========================== OFFSET CLICK =============================
;=====================================================================
sub OffsetClick
  set %tempx %1 + #CONTPOSX
  set %tempy %2 + #CONTPOSY
  click %tempx %tempy f
return
;=====================================================================
;========================== WAIT FOR GUMP ============================
;=====================================================================
sub waitforgump
  set %timeout #scnt + 10
  while #contsize <> %1
  {
    wait 1
    if #scnt > %timeout
    {
      return #false
    }
  }
  wait 1
return #true
;=====================================================================
;========================== CHECK FOR GOLD ===========================
;=====================================================================
sub check_gold
  if #gold < 3000
  {
    gosub update Not , #spc , enough , #spc , gold..
    gosub mana_check
    gosub update Recalling , #spc , to , #spc , bank
    gosub s7UseRunebook %vendorbook1 %bankrune r
    event macro 1 1 sacar 4000
  }
return
;=====================================================================
;========================== UPDATE MENU ==============================
;=====================================================================
sub update
  menu Delete EUOListBox1
  menu List Create EUOListBox1 0 -4 197 129
  menu List Add EUOListBox1 Items donated : %items_donated
  menu List Add EUOListBox1 Gold spend    : %gold_spend
  menu List Add EUOListBox1 Points : %points
  gosub Calc_time
  menu List Add EUOListBox1 Time : #result
  menu List Add EUOListBox1 Status: %1
return
;=====================================================================
;========================== CALCULATE TIME ===========================
;=====================================================================
Sub Calc_Time
  Set %TT #Scnt - %start_time
  Set %hours %TT / 3600
  Set %mins ( %TT / 60 ) - ( %hours * 60 )
  Set %secs %TT % 60
  If %hours =< 9
    Set %hours 0 , %hours
  If %mins =< 9
    Set %mins 0 , %mins
  If %secs =< 9
    Set %secs 0 , %secs
  Set %total_time %hours , : , %mins , : , %secs
return %total_time
;=====================================================================
;========================== HAPPY END ================================
;=====================================================================
; Script Name:  sub s7UseRunebook
; Author:  snicker7
; Version:  2.0
; Client Tested with:  4.0.11c
; EUO version tested with:  1.42/1.5
; Shard OSI / FS:  OSI/FS
; Revision Date:  24Aug05
; Public Release:  24Aug05
; Global Variables Used: N/A
; Purpose:  Failsafe sub to recall, gate, sacred journey flawlessly. Options to use scrolls, default locations, recharge books with scrolls in pack if book runs out of charges, and perfect gate travel. Not for the feint of heart!
;===================================================Speak to the hand
;======= This file includes the main sub and =======Speak to the hand
;===== several support subs that are required. =====Speak to the hand
;===================================================Speak to the hand
;===== Much love for T-Mo and BM, but I needed =====Speak to the hand
;====== to write something I could only blame ======Speak to the hand
;======= myself for if it fails. even though =======Speak to the hand
;=================== it doesn't. ===================Speak to the hand
;===================================================Speak to the hand

; ===================================================================== ;
; ///////////////////////////////////////////////////////////////////// ;
; // EXCERPTS FROM S7SUBS.EUO ///////////////////////////////////////// ;
; ///////////////////////////////////////////////////////////////////// ;
; // Any reproduction of the subroutines below is strictly pro- /////// ;
; // hibited without express written permission of the author ///////// ;
; // (snicker7). Violation of the above will result in malicious ////// ;
; // actions by the aforementioned author performed upon your person // ;
; // including but not limited to: bodily harm, slander, maternal ///// ;
; // insults, possible legal action, and callin' the five-oh. Thank /// ;
; // you. ///////////////////////////////////////////////////////////// ;
; ///////////////////////////////////////////////////////////////////// ;
; ===================================================================== ;

;=/ 1NCLUD3D SUBS: /================================Speak to the hand
; s7UseRunebook: Duh, you know why it's there.
; s7ScanJournalFor: SuperMultiParameterJournalScanning Power!
; s7MoveToPos: Legendary snicker7 brand name drag and drop sub. updated!
; s7MoveToCont: Wrapper for the above sub, updated for 1.5 exevents!
; s7WaitForAction: Mildly obsolete, begging for a rewrite object-delay sub!
; s7WaitForVars: Classic sysvar wait sub. One line shorter than Quintok's!
;===================================================Speak to the hand

;----
;* @name s7UseRunebook
;* @author snicker7
;* @ver 2.0a 24Aug05
;* @purpose   do anything and everything travel related with a runebook
;* @params    %1   Rune or Runebook item ID to use
;*      %2   number of rune to travel to, use "default" for runes or default in runebook
;*      %3   travel method:
;*         r: recall
;*         g: gate
;*         c: sacred journey
;*         s: scrolls
;* @dependencies
;*      s7WaitForVars
;*      s7WaitForAction
;*      s7ScanJournalFor
;*      s7MoveToCont for recharging runebooks
;* @returns    #true   on success
;*      ERR_*   various errors.
;* @notes    none
;* @example:    gosub s7UseRunebook %bookID 14 r
;* @status done
sub s7UseRunebook
  if %0 < 3 || _ , %2 , _ notin _1_2_3_4_5_6_7_8_9_10_11_12_13_14_15_16_default_
    return ERR_IncorrectParams
  namespace push
  namespace local _s7URB
  set !runebook %1
  set !index %2
  set !method %3
  set !fails 0
  if #contsize = 452_236
  {
    set !_cx #contposx + 20
    set !_cy #contposy + 20
    click !_cx !_cy r f dmc
    wait 5
  }
  for !_ 1 1
  {
    finditem OTF_JEF_KEF G_0
    if #findkind <> -1
      set !_ 0
  }
  for !orb 1 1
  {
    if !fails > 2 2
      namespace pop
      return ERR_ , #journal
    set !jStart #jindex + 1
    if !index <> default
    {
      gosub s7WaitForAction 12
      set #lobjectid !runebook
      event macro 17 0
      gosub s7WaitForVars contname = generic_gump contsize = 452_236 3
      if ! #result 2
        set !fails !fails + 1
        set !orb 0
      if #result
      {
        set !_cy #contposy + 196
        set !_cx #contposx + 105 + ( ( ( !index / 2 ) + ( !index % 2 ) ) * 35 )
        if !index > 8
          set !_cx !_cx + 30
        click !_cx !_cy f dmc
        wait 5
        set !_cx #contposx + 135
        set !_cy #contposy + 144
        if !method = G
          set !_cy !_cy + 20
        if !method = C
          set !_cy !_cy + 36
        if !method = S
          set !_cy !_cy - 76
        if ( !index % 2 ) = 0
          set !_cx !_cx + 160
        set !charpos #charposx , _ , #charposy
        set !timeout #scnt2
        click !_cx !_cy f dmc
      }
    }
    if !index = default
    {
      set #ltargetid !runebook
      set #ltargetkind 1
      if !method = c
        event macro 15 210
      if !method = r
        event macro 15 31
      if !method = g
        event macro 15 51
      if !method = s
      {
        finditem WTL C_ , #backpackid
        if #findkind = -1 2
          namespace pop
          return ERR_NoRecallScrolls
        if #findkind <> -1 3
          set #lobjectid #findid
          gosub s7WaitForAction 12
          event macro 17 0
      }
      for !_ 1 1
      {
        if #targcurs <> 1
          set !_ 0
        gosub s7ScanJournalFor !jStart fizzles more_reagents tithing_points insufficient_mana
        if #result 3
          set !_ 1
          set !orb 0
          wait 20
      }
      set !charpos #charposx , _ , #charposy
      set !timeout #scnt2
      event macro 22 0
    }
    if !orb = 1
    {
      for !success 1 1
      {
        if #charposx , _ , #charposy = !charpos && !method in _r_c_s_
          set !success 0
        if !method = g
        {
          finditem OTF_JEF_KEF G_0
          if #findkind = -1
            set !success 0
          if #findkind <> -1
          {
            set #lobjectid #findid
            gosub s7WaitForAction 12
            event macro 17 0
            for !_ 1 1
            {
              if #charposx , _ , #charposy = !charpos
                set !_ 0
              if #contname = generic_gump && #contsize = 420_280
              {
                set !_cx #contposx + 20
                set !_cy #contposy + 260
                click !_cx !_cy f dmc
              }
            }
          }
        }
        gosub s7ScanJournalFor !jStart fizzles location_is_blocked not_yet_recovered no_charges_left more_reagents tithing_points insufficient_mana not_marked
        if #result || !timeout + 60 < #scnt2
        {
          if no_charges in #journal
          {
            finditem WTL C_ , #backpackid
            if #findkind = -1
              set !fails 2
            if #findkind <> -1
            {
              set !scrolls #findid
              finditem !runebook
              set #findmod 0
              gosub s7WaitForAction 12
              event drag !runebook
              for !_ 1 1
              {
                if #lliftedkind <> 1 2
                  wait 1
                  set !_ 0
              }
              str pos #contsize _
              set #strres #strres - 1
              str left #contsize #strres
              set !_cx #findx + #strres / 2
              str pos #contsize _
              str del #contsize 1 #strres
              set !_cy #findy + #strres / 2
              click !_cx !_cy p f dmc
              gosub s7MoveToCont !scrolls !runebook #backpackid 20_10
            }
          }
          set !fails !fails + 1
          set !success 1
          set !orb 0
        }
      }
      wait 20
    }
  }
namespace pop
return #true

sub s7ScanJournalFor
  set !SJFje #jindex + 1
  for !SJFji %1 !SJFje
  {
    scanjournal !SJFji
    for !SJFpi 2 %0
    {
      if % . !SJFpi in #journal
        return #true
    }
  }
return #false

;----
;* @name s7MoveToPos
;* @author snicker7
;* @ver 1.2 24Aug05
;* @purpose Just Another Item Dragger.
;* @params    %1 is the item to be dragged
;*      %2 is the x-coord to drop to
;*       %3 is the y-coord to drop to
;*      %4 is the timeout in seconds
;*       %5 is the amount to be dragged (blank for all)
;* @returns    #true if drop was successful
;*      #false on error (drop to backpack, insufficient params, failed to drag)
;*      halt on critical error
;* @notes moves any item to a position on the screen. Will
;*   attempt to drop on character if drop fails. If character
;*   drop fails, halts and error message to avoid crash.
;* @dependencies
;*      s7WaitForAction
;* @example: call s7Subs.euo s7MoveToPos #findid 7 9 4 77
;* @status unknown
sub s7MoveToPos
  if %0 < 4
    return #false
  namespace Push
  namespace Local _s7MvToPos
  set !_ID %1
  set !_x %2
  set !_y %3
  set !_tO %4
  set !_Amt #spc
  if %0 > 4
    set !_Amt %5
  set !_retry 0
  _s7MvToPos_SD:
  finditem !_ID
  if #findkind = -1 2
    namespace pop
    return #false
  gosub s7WaitForAction 13
  event drag #findid
  if #findstack > 1
  {
    set !_timeOut #scnt
    for !_ 1 1
    {
      if #contname <> stack_gump && #contname <> drag_gump
      {
        wait 1
        if !_timeOut + !_tO < #scnt
        {
          set !_retry !_retry + 1
          if !_retry > 2 2
            namespace pop
            return #false
          goto _s7MvToPos_SD
        }
        set !_ 0
      }
    }
    if !_Amt > #findstack
      set !_Amt #findstack
    msg !_Amt , $
  }
  set !_retry 0
  set !_timeOut #scnt
  for !_ 1 1
  {
    if #lliftedkind <> 1
    {
      wait 1
      if !_timeOut + !_tO < #scnt
      {
        set !_retry !_retry + 1
        if !_retry > 2 2
          namespace pop
          return #false
        goto _s7MvToPos_SD
      }
      set !_ 0
    }
  }
  set !_retry 0
  click !_x !_y p
  set !_timeout #scnt
  for !_ 1 1
  {
    if #lliftedkind = 1
    {
      wait 1
      if !_timeout + !_t0 < #scnt
      {
        set !_retry !_retry + 1
        if !_retry = 1
        {
          set !_x #clixres / 2
          set !_y ( #cliyres / 2 ) - 30
          click !_x !_y p
          set #result #false
          set !_timeout #scnt
        }
        if !_retry = 2 2
          display ok You have failed to drop an item to the correct position.$$The script is now halting to prevent a crash.
          halt
      }
      set !_ 0
    }
  }
  set #result #true
  namespace pop
return #result

;----
;* @name s7MoveToCont
;* @author snicker7
;* @ver 1.2 24Aug05
;* @purpose A wrapper for the sub s7MoveToPos for moving to containers.
;* @params    %1 is the item to be dragged
;*      %2 is the container to drag to
;*      %3 is the mother container in which %2 is contained
;*       %4 is the #findmod value for the container
;*       %5 is the amount to be dragged (blank for all)
;* @returns none
;* @notes this is mad basic. no error checking. That is up to you.
;* @dependencies   s7MoveToPos
;* @example: call s7Subs.euo s7MoveToCont #findid #backpackid #charid 140_220
;* @status tested good
sub s7MoveToCont
  namespace Push
  namespace Local _s7MoveToCont
  set !_ID %1
  set !_DCont %2
  set !_MCont %3
  set !_FMod %4
  if 1_5 in #euover
  {
    set !_Amt 65535
    if %0 > 4
      set !_Amt abs %5
    finditem !_ID
    if #findkind = -1 2
      namespace pop
      return #false
    gosub s7WaitForAction 13
    exevent drag #findid !_Amt
    exevent dropc !_DCont
    namespace pop
    return #true
  }
  set !_Amt #spc
  if %0 > 4
    set !_Amt %5
  set #result #true
  set !_retry 0
  for !_ 1 1
  {
    finditem !_DCont C_ , !_MCont
    if #findkind = -1
    {
      set #lobjectid !_MCont
      gosub s7WaitForAction 13
      event macro 17 0
      gosub s7WaitForVars contid = !_MCont 3
      if ! #result
      {
        set !_retry !_retry + 1
        if !_retry > 2 2
          namespace pop
          return #false
      }
      set !_ 0
    }
  }
  set !_retry 0
  set #findmod !_Fmod
  for !_ 1 1
  {
    gosub s7MoveToPos !_ID #findx #findy 4 !_Amt
    if ! #result
    {
      set !_retry !_retry + 1
      if !_retry > 2 2
        namespace pop
        return #false
      set !_ 0
    }
  }
namespace Pop
return #true

;----
;* @name s7WaitForAction
;* @author snicker7
;* @ver 1.1 31Jan05
;* @purpose waits 1.3 seconds before continuing, useful for waiting to perform
;*    another action
;* @params    none
;* @returns none
;* @notes probably not an original idea, but I need to use it frequently and it
;*    was easier to write it myself than to try to look for it as written by
;*    someone else

;* @example: call s7Subs.euo s7WaitForAction 13
;* @status tested good
sub s7WaitForAction
  _s7WaitForAction:
  if %_s7ActionTimer + %1 > #scnt2 2
    wait 1
    goto _s7WaitForAction
  set %_s7ActionTimer #scnt2
return

;----
;* @name s7WaitForVars
;* @author snicker7, inspired by Quintok, and of course, Smertrios
;* @ver 1.2 24Aug05
;* @purpose Multiple input sysvar waiter.
;* @params    %1*n is the gump sysvar being checked
;*      %2*n is the comparative operator (>, <, <>, =, etc)
;*      %3*n is the desired value of the sysvar
;*      %nfinal is the timeout in seconds
;* @returns #false if it times out
;*          #true if success
;* @notes    %1 does not require the preceding number sign
;*      one line shorter than Q's, no disrespect son
;*      originally written by Smertrios, included in Lexia
;*      Multiple inputs by Quintok, Obfuscation and name-
;*      spacing by snicker7!
;* @example: call s7Subs.euo s7WaitForVars contID = #backpackID contSize = 7_9 3
;* @status tested good
sub s7WaitForVars
  namespace Push
  namespace Local _s7WFVs
  set !C %0 / 3
  set !T #scnt + 5
  if ( %0 % 3 ) = 1
    set !T #scnt + % . %0
  for !i 1 !C
  {
    set !o 3 * !i - 2
    set !p !o + 1
    set !q !o + 2
    if ! ( # . % . !o % . !p % . !q )
      set !i 0
    if #scnt > !T 2
      namespace pop
      return #false
  }
  namespace Pop
return #true

23
Off Topic / contra suo
« on: September 15, 2011, 01:58:17 AM »





24
Script Debug / CAMOTbIK's Move
« on: September 13, 2011, 02:13:49 AM »
I woke up, and had this great idea in my mind. So I've made it and I'm looking for some testers.
Code: [Select]
;===========================================================
; Script Name: CAMOTbIK's Move
; Author: CAMOTbIK
; Version: 0.1 Alfa
; Client Tested with: 7.0.14.0
; EUO version tested with: 1.92
; Shard OSI / FS:  FS WWW.RWUO.COM
; Revision Date: 2011/09/13
; Public Release: 2011/09/13
; Global Variables Used: None
; Purpose: Move using pathfind and on fail using move instead
;===========================================================
; Usage; Gosub move X Y Timeout(seconds)
;===========================================================
Sub Move
  if #charposx <> %1 && #charposy <> %2
  {
    set %_pathfind_fail #false
    set %_jindex #jindex
    set %timer_move ( #sCnt + %3 )
    event pathfind %1 %2
    repeat
      {
        if #jindex >= %_jindex
        {
          scanjournal %_jindex
          if can't_get_there in #journal
            set %_pathfind_fail #true
          set %_jindex %_jindex + 1
        }
      }
    until #charposx = %1 && #charposy = %2 || #scnt > %timer_move || %_pathfind_fail = #true
    if #charposx <> %1 && #charposy <> %2
      move %1 %2 a %3 , s
  }
return

25
Script Snippets / CAMOTbIK's Team speak
« on: September 11, 2011, 10:47:06 AM »
Code: [Select]
;===========================================================
; Script Name: CAMOTbIK's Team Speak
; Author: CAMOTbIK
; Version: 0.1f Alfa
; Client Tested with: 7.0.14.0
; EUO version tested with: 1.92
; Shard OSI / FS:  FS WWW.RWUO.COM
; Revision Date: 2011/09/11
; Public Release: 2011/09/11
; Global Variables Used: None
; Purpose: To scan journal and do requested commands
;===========================================================
Example of usage: If some one says move nickname, the character will move to the spoken nickname.
This is just a snippet with only move command in. I don't want to publish the complete script, but if you are clever enough, you will make your own commands.

26
Script Debug / Equip
« on: September 09, 2011, 04:58:44 AM »
Working now on a Equipment script, maybe someone has all the types of weapons/shields/two handed weapons ?

Code: [Select]
set %weapons TOH_LMH_GFF_FUO_VRH
set %twohanded TOH_LMH_GFF
set %shields OIK_CIK_OIK
set %bow TOH
set %heavy LMH
set %papedroll_id SNGJ
set %wooden OIK
set %harvester FUO
set %heater CIK
set %staff GFF
set %kryss VRH

gosub equip %wooden %papedroll_id
gosub equip %harvester %papedroll_id
gosub equip %kryss %papedroll_id
gosub equip %bow %papedroll_id
gosub equip %heater %papedroll_id
gosub equip %harvester %papedroll_id
gosub equip %wooden %papedroll_id
gosub equip %kryss %papedroll_id
gosub equip %heavy %papedroll_id
gosub equip %wooden %papedroll_id
gosub equip %kryss %papedroll_id
gosub equip %staff %papedroll_id

sub equip
  finditem %1 C_ , %2
  if #findcnt = 0
  {
    if %1 in %weapons
    {
      if %1 in %twohanded
      {
        finditem %shields C_ , %2
        if #findcnt > 0
        {
          exevent drag #findid
          exevent dropc #backpackid
          wait 10
        }
      }
      finditem %weapons C_ , %2
    }
    if %1 in %shields
    {
     finditem %twohanded C_ , %2
      if #findcnt > 0
      {
        exevent drag #findid
        exevent dropc #backpackid
        wait 10
      }
      finditem %shields C_ , %2
    }
    if #findcnt > 0
    {
      exevent drag #findid
      exevent dropc #backpackid
      wait 10
    }
    finditem %1 C_ , #backpackid
    if #findcnt > 0
    {
      exevent drag #findid
      exevent Droppd %2
      wait 10
    }
  }
return

27
Combat/Healing/Looting / CAMOTbIK's Tamers third hand
« on: September 06, 2011, 08:20:15 AM »
I was hunting at doom with a bunch of friends and I've noticed that I have to Heal/Cure/Ress /Bandage a lot.  So I made this little script to help me and maybe you out..
Code: [Select]
=====================================================================
   Script Name: CAMOTbIK's Tamers third hand
   Author: CAMOTbIK
   Version: 0.1g Alfa
   Client Tested with: 7.0.14.0
   EUO version tested with: 1.92
   Shard OSI / FS:  FS WWW.RWUO.COM
   Revision Date: 2011/09/20
   Public Release: 2011/09/06
   Global Variables Used: None
   Purpose: To help you keep alive your pets and your mates
=====================================================================
* Usings modified Cromes bone cutter and discorder.
 Changelog.
  0.1c - Code optimization. Added Journal scan to bandage routine.
  0.1d - Fixed - Getting names error,  Menu now shows which target you are bandaging/healing/curing, etc, etc.
  0.1e - Fixed Stop button error,  Code optimization, Auto target(on command K-- I have set only the types of boses in doom! Set your own types of monsters in %monsters variable).
  0.1f - Fixed Bone cutting error,  Code optimization, Modified AllKill(K), Modified Autobandage(mortal timer(%mortal_wait) allready bandaged timer(%notdamaged_wait)), Auto loot.
  0.1g - Window title now shows #charname #hits #stamina #mana, on attack it's changed to #hits under attack and a sound plays. Added discordance on All Kill(K).


  Setup.
  * Click yellow button to setup your mount pet.
  * Click blue, dark blue, green or purple button to setup your additional pet or friends pet or even your friend himself.
  * Click cure yourself check box if you want to cure yourself when you are poisoned
  * Click heal yourself check box if you want to heal yourself when you are -20 of max hits
  * Click cut bones if you are in doom and want to cut df's bones
   *Click auto target check box if you want auto target %monsters on all kill(K)
   *Click discordance check box if you want to discord your target after seting target with all kill(K)
   *Click autoloot check box if you want to autoloot %loot or specified properties %loot_property 1-5
  B - run to target and bandage it until you have moved or pressed stop
  H - cast greater heal on your target
  C - cast arch cure on your target
  I - cast invisibility on your target
  R - cast resurrection on your target
  M/D - mount / dismount
  K - all kill / set discordance target
  F - all follow
  G - all guard

My recommendation for auto target is to use it only in doom or in similar places where you have only one monster, because with more monsters you may get in to trouble.

28
Freeshard specific scripts / CAMOTbIK's Skara Brae Tamer
« on: September 04, 2011, 08:27:40 PM »
Code: [Select]
; Script Name: Skara Brae Tamer
; Author: CAMOTbIK
; Version: 2.1 Alfa
; Client Tested with: 7.0.14.0
; EUO version tested with: 1.92
; Shard OSI / FS:  FS www.RWUO.com
; Revision Date: 2011/08/17
; Public Release: 2011/08/17
; Global Variables Used: None
; Purpose: To train animal taming to skillcap

Tames and releases horses/bulls in Skara Brae animal farm untill you have reached your skillcap.


29
General UO Chat / Uo sound samples in cartoons.
« on: September 04, 2011, 02:21:06 AM »
I was surfing the web and came up to this cartoon that contained sounds from uo, particularly grizzly bear sound on 3:55.

and 36:14 dire wolf

30
General UO Chat / Old screenshot, 1 night.
« on: August 29, 2011, 12:44:51 PM »
Well today I found some OLD one night screenshots from a pre aos freeshard. Dragon World.



























Pages: 1 [2] 3 4