sorry bout earlier post.

k can anyone tell me how to change the quest from a simple bow, to lethal darts? and if they know the number?

tryin to make it just grab the lethal darts quest, toggle the crossbow bolt stack in bag, and turn it in... here is what i have, but it says cant find vendor, and i dont have the right quest number cause it keeps passing it by.

gosub cyclequests
  gosub mark
  gosub finishquest
  wait 10
  goto loop

set %QUEST_Lethal_Darts 6415424


;===== Fletching setup =====
  menu get EUOComboBoxQuest
  if #MENURES = 1 && ( %quest_type <> FLETCHING || %mintinkertools = N/A )
  {
    set %quest_type FLETCHING
    ;set %tool UFG
    ;set %toolresource KTL
    ;set %toolresourceamt 3
    ;set %mintinkertools 2
    ;set %maxtinkertools 2
   ; set %mincraftingtools 2
    ;set %maxcraftingtools 4
    ;set %craftitemchain_tool cat_4-nextpage-nextpage-sel_1
    ;set %craftitemchain cat_4-sel_1
    ;set %ressource TLK
    ;set %reshue 1 ; 1-wood, 2-oak, 3-ash, 4-yew, 5-hearwood, 6-bloodwood, 7-frostwood
    set %item LNK
    set %string %QUEST_Lethal_Darts
    set %itemamount 1
    ;set %itemresourcecnt 7
    ;set %resamount 1   ; was 70
    ;set %cat 3
    ;set %page 1
    ;set %itemnum 3
    ;set %vendortype bowcrafter$
    ;set %rail1 tobowcrafter
    ;set %rail2 frombowcrafter
    ;set %pakboards 1540
  }
  sub mark
  {
    gosub HandleContextMenu NULL #CHARID %CONTEXT_Toggle_Quest_Item
    finditem %item C_ , #backpackid
    while #findkind <> -1
    {
      if #findcol <> 1258
      {
        set #ltargetid #findid
        set #ltargetkind 1
        wait 0
        target 3s
        event macro 22
      }
      ignoreitem #findid mark
      finditem %item C_ , #backpackid
    }
    repeat
      {
        wait 5
        key ESC
        wait 5
      }
    until #TARGCURS = 0
  return
}
;----------------------------------------------------------------
sub cyclequests
  {
    NAMESPACE PUSH
    NAMESPACE LOCAL cyclequests
    gosub findvendor %vendortype
    if #RESULT = #FALSE
    {
      display ok Cannot locate a vendor for this quest.
      stop
    }
    gosub SelectQuest NULL %vendor %string -1 ; loop until found, no count
    NAMESPACE POP
  return
}
;----------------------------------------------------------------
sub finishquest
  {
    gosub findvendor %vendortype
    set #lobjectid %vendor
finishquest_loop2:
    event macro 17
    gosub Gumpwait NULL paperdoll_gump paperdoll_gump
    set !clickx #CONTPOSX + 80
    set !clicky #CONTPOSY + 80
    click !clickx !clicky dmc r
    gosub GumpAndSizeWait NULL generic_gump %quest_gump_size
    if #RESULT = #TRUE
      goto finishquest_loop2
    set %tempx #CONTPOSX
    set %tempy #CONTPOSY
    gosub OffsetClick 131 464 dmc
    gosub GumpAndSizeWait NULL generic_gump %quest_gump_size
    gosub OffsetClick 131 464 dmc
    wait 5
    set %temp_scnttimeout #SCNT + 5
    set %temp_rval #FALSE
finishquest_loop1:
    if #CONTNAME <> generic_gump && #contsize <> %quest_gump_size
      return %temp_rval
    if #SCNT > %temp_scnttimeout
    {
      set %clickx %tempx + 350
      set %clicky %tempy + 400
      click %clickx %clicky f
      set %temp_rval #TRUE
      set %temp_scnttimeout #SCNT + 5
      wait 5
    }
    goto finishquest_loop1

  return #FALSE ; never gets here.
}
;----------------------------------------------------------------
sub findvendor
  {
    namespace push
    namespace local FV
    set !temp_lpc #LPC
    set #LPC 1000
find_vendor:
    set !temp_vendortype %1
    finditem IS_HS_XU_AV_WYTIB G_20
    if #findkind <> -1
    {
findvendor_loop1:
      str pos !temp_vendortype $
      if #STRRES <> 0
      {
        set !str_len #STRRES
        set #STRRES !str_len - 1
        str left !temp_vendortype #STRRES
        set !present_property #STRRES
        str del !temp_vendortype 1 !str_len
        set !temp_vendortype #STRRES
        event property #findid
        set !quest_giver quest , #spc , giver
        if !present_property in #property && !Cillitha in #property
        {
          set %vendor #findid
          ignoreitem reset vendors
          set #LPC !temp_lpc
          namespace pop
          return #true
        }
        else
        {
          goto findvendor_loop1
        }
      }
      ignoreitem #findid vendors
      goto find_vendor
    }
    ignoreitem reset vendors
    set #LPC !temp_lpc
    namespace pop
  return #false
}

sorry to hear you got nailed for making glacial items... those were sweet and still are!!!  welcome to the site

hehe its ok. i didnt lose much when they nailed me. i got smart and stored the gold on different account. Atm I am working on Library donations scripts that craft items, recalls turns em in rinse and repeats, also working on adding to the heartwood questing script to include the tinkering and the blacksmithing. Any other ideas please let me know.

Milkman Out!!

And as far as the glacial stuff all it was was an imprisoned dog, and used a script that drag dropped the item as i stabled it. was pretty easily and netted me almost 3bil in gold . wooters

Hello All,

Im not sure if most of you may remember me or not. I am the infamous Milkman Dan. I used to do alot of script righting for RUNUO Freeshards and for EASYUO As well.

I was the creater of the first every carpentry/Tinkering bod system, the Peerless system, and tons of other scripts. On RUNUO, you can search my name milkman_dan and see some of my post.

As far as regular OSI UO servers, i was the one they nailed for duping all the Glacial Items, Blue Cloaks, and gold clothing. hehe ya that was me.

Ive been playing uo since BETA Days, and now Im back to rebuild what i left behind. Im a great script writer as well, looking for new ideas. Give me a shout with any ya have. Thank you