Wow, I've been up all night because CEO let me die, and here is what I've come up with.

I started with the popular CEO Medic as a basis, and got about 10 minutes in before I rage quit and started from scratch. I have tried to keep ALL unnecessary code out of my script to make it as fast as possible.

I intend to use this script whilst solo'ing Lady M with my sampire. But I'm sure it could be used in many more environments.

Still 1-2 things to yet be added, but have a play and let me know what ya think so far.

To Do List:
1. Add pause for paralysis

;==================================
; Script Name: Reaper's Dexxer Healer
; Author: The Reaper
; Version: 1.0
; Client Tested with: 7.0.10.3
; EUO version tested with: 1.5.186
; Purpose: Heal your lazy ass on freeshards.
; Should work on OSI servers also.
; Special thanks to CEO for his CEOMedic
; and a couple of other short snippets of code.
; Also thanks to Nilmer's Speedy Menu Builder
;==================================
; The red level is the % health at which you want chivalry to heal,
; otherwise it will default to bandages.
; The yellow level is the % stamina at which chivalry will divine fury
set %red 35
set %yellow 70

initevents

event Macro 8 2 ;open status bar
wait 20
set #contPosX 850
set #contPosY 400

chooseskill chiv
if #skill < 600
   {
   display ok You having a laugh, a PvE dexxer with no chiv, rofl.
   halt
   }
chooseskill heal
if #skill < 1000
   {
   display ok Come on, this isn't a healing trainer, get at least GM healing.
   halt
   }

set %yellowhp ( ( ( #maxhits * 10 ) * %yellow / 100 ) ) / 10 )
set %redhp ( ( ( #maxhits * 10 ) * %red / 100 ) ) / 10 )
set %yellowstam ( ( ( #maxstam * 10 ) * %yellow / 100 ) ) / 10 )
set %redstam ( ( ( #maxstam * 10 ) * %red / 100 ) ) / 10 )
set %yellowmana ( ( ( #maxmana * 10 ) * %yellow / 100 ) ) / 10 )
set %redmana ( ( ( #maxmana * 10 ) * %red / 100 ) ) / 10 )
set %lasthp 0
set %laststam 0
set %lastmana 0
; Current OSI bandage delay
; This one seems to be the current formula now, if heals overlap increment  11 by 1 until they don't
set %aid_delay ( 11 - #dex / 20 ) * 10

gosub InitMenu

;Main Script Body
;===========================================
Loop:
gosub Health
gosub Stamina
gosub UpdateStatus
gosub pausebutton
goto Loop

sub Health
if #hits = #maxhits
   {
   menu font color black
   menu delete action
   menu font bgcolor lime
   menu text action 50 35 Ok
   return
   }

if #hits < %redhp
   {
   if C in #charstatus
      {
      menu font color red
      menu delete action
      menu font bgcolor yellow
      menu text action 50 35 Oooohhh *bleep*, poisoned AND nearly dead.
      repeat
            {
            event macro 15 201
            target 2s
            event macro 23 0
            wait 10
            }
      until C <> #charstatus
      }
   }
     
if #hits < %redhp
   {
   menu font color red
   menu delete action
   menu font bgcolor yellow
   menu text action 50 35 Last ditched attempt to save your ass!
   event macro 15 202
   target 2s
   event macro 23 0
   }
if #scnt2 < %usenextaid
   {
   return
   }
if C in #charstatus
   {
   finditem ZLF C
   if #findkind <> -1
      {
      menu font color black
      menu delete action
      menu font bgcolor yellow
      menu text action 50 35 Poisoned (Aids)
      set #lobjectid #findid
      event macro 17 0
      target 1s
      event macro 23 0
      set %usenextaid ( #scnt2 + %aid_delay )
      return
      }
   }
if #hits < #maxhits
   {
   finditem ZLF C
   if #findkind <> -1
      {
      menu font color black
      menu delete action
      menu font bgcolor yellow
      menu text action 50 35 Healing (Aids)
      set #lobjectid #findid
      event macro 17 0
      target 1s
      event macro 23 0
      set %usenextaid ( #scnt2 + %aid_delay )
      }
   }
return

sub Stamina
if #mana < 15
   {
   return
   }
if #stamina < %yellowstam
   {
   event macro 15 205
   wait 10
   }
return

sub pausebutton
if #menubutton <> N/A
   {
   menu delete pausebutton
   menu text color black
   menu button pausebutton 0 60 330 20 Resume
   set #menubutton N/A
   gosub ResumeButton
   }
return

sub ResumeButton
repeat
      {
      wait 1
      }
      until #menubutton <> N/A
menu delete pausebutton
menu font bgcolor red
menu button pausebutton 0 60 330 20 Pause
set #menubutton N/A
return

sub UpdateStatus
gosub CkHp
gosub CkStam
gosub CkMana
return

sub CkHp
if %lasthp = #hits
   {
   return
   }
menu font bgcolor lime
if #hits < %yellowhp
   {
   menu font bgcolor yellow
   }
if #hits < %redhp
   {
   menu font bgcolor red
   }
menu delete hp
menu font color black
menu text hp 28 5 #hits , / , #maxhits
set %lasthp #hits
return

sub CkStam
if %laststam = #stamina
   {
   return
   }
menu font bgcolor lime
if #stamina < %yellowstam
   {
   menu font bgcolor yellow
   }
if #stamina < %redstam
   {
   menu font bgcolor red
   }
menu delete stamina
menu font color black
menu text stamina 243 5 #stamina , / , #maxstam
set %laststam #stamina
return

sub CkMana
if %lastmana = #mana
   {
   return
   }
menu font bgcolor lime
if #mana < %yellowmana
   {
   menu font bgcolor yellow
   }
if #mana < %redmana
   {
   menu font bgcolor red
   }
menu delete mana
menu font color black
menu text mana 127 5 #mana , / , #maxmana
set %lastmana #mana
return



;Menu Sub
sub InitMenu
 menu clear
 Menu hideEUO
 Menu window size 330 80
 Menu show
 Menu window color black
 Menu font bgcolor red
 Menu font size 10
 menu Window Title The Reaper's PvE Dexxer Auto-Healer
 menu button pausebutton 0 60 330 20 Pause
 menu font color red
 Menu font bgcolor blue
 menu text Thp 5 5 HP:
 menu text Tmana 90 5 Mana:
 menu text Tstamina 190 5 Stamina:
 menu text Taction 5 35 Action:
 menu font bgcolor lime
 menu font color black
 menu text hp 28 5 #hits , / , #maxhits
 menu text mana 127 5 #mana , / , #maxmana
 menu text stamina 243 5 #stamina , / , #maxstam
 menu text bgcolor orange
 menu text Tchar 200 35 Character:
 menu text char 262 35 #charname
 menu text action 50 35 Ok
 set #menubutton N/A
 menu show 850 600
 wait 30
gosub UpdateStatus
return

PS - Nilmer has a speedy menu builder that really helped me with this, since I've never actually made my own menu's from scratch before, definitely work a look.

PPS - Have fun!!

Hello fellow scripters.

Over the next week or so I'm going to be re-writing my ninja training script. My biggest problem is that the free shard I play doesn't have the ability to LS or DS a horse in tram while not guilded.

So, how do we solve this. Any thoughts would be appreciated.

Regards

Reaper

Hey all, even the best of us get stuck with a script now and again, so here I am

Ok, I'm writing a ToT farmer, which could just as easily be used to farm fame or karma I guess.

I would like a sub to permanently have a shadow wisp active, although, I can't get past the gump window to choose the pet I want.
With the ninja skill, it simply defaulted to the last one used, although this isn't the same for some reason.

Any help would be appreciated.

Finished script will be uploaded as always

Thanks

My 3rd script for you guys.

Very simple to use, for sub 30 skills you will need a weapon equipped in your main hand.
I don't like carebear scripts, so you need to do this manually.

;==================================
; Script Name: Reaper's Necro Trainer
; Author: The Reaper
; Version: 1.0
; Client Tested with: 7.0.10.3
; EUO version tested with: 1.5.186
; Purpose: Train necro for freeshards.
; Should work on OSI servers also.
;==================================

;==================================
; Set this value to 5 if you are eperiencing
; "Insufficient mana for this spell" Issues
set %setwait 5
; Set this value to your faster casting reduction
; 1FC = 2    2FC = 5  (2FC is necro cap)
set %fc 5
; DO NOT alter below this line
;==================================
initevents
event Macro 8 2 ;open status bar
wait 20
set #contPosX 550
set #contPosY 550

set %skilltraining necro
chooseskill %skilltraining
set %startingskill #skill
set %currentskill #skill
gosub showmenu

if #skill < 300
   {
   display yesno Do you have a weapon equipped in your main hand?
   if #dispRes = no
      {
      display ok Please equip a weapon in your main hand before restarting script
      halt
      }
   }

Loop:
gosub Choosespell
gosub Cast
gosub Checkskill
gosub Checkmana
goto Loop

;SUBS
;=================================================

sub showmenu
  menu clear
  menu window title Necro Trainer
  menu window size 180 95
  menu window color black
  menu font name arial
  menu font size 12
  menu font color Red
  menu font bgcolor black
  menu text title 5 5 NECRO TRAINER.
  menu font size 8
  menu font color lime
  menu text mageryskill 5 25 Current skill:
  menu text gains 5 40 Total gains:
  menu text casting 5 55 Casting:
  menu font color yellow
    str len %currentskill
    str ins %currentskill #dot #strRes
    menu delete currentskill
    menu text currentskill 68 25 #strRes
    set %totalgains %currentskill - %startingskill
    str len %totalgains
    str ins %totalgains #dot #strRes
    menu delete totalgains
    menu text totalgains 68 40 #strRes
  menu font align right
  menu text credit 176 80 by The Reaper
  menu font align left
  menu show
return

sub Choosespell
if #skill = #skillcap
   {
   display You have reached your Necromancy Skill cap of #skill
   halt
   }


  if #skill < 300
  {
    set %spell 104    ; Curse Weapon 0-30
    set %manatocast 7
    set %castdelay 10
    set %masochistic blade
    menu delete currentspell
    menu text currentspell 68 55 Curse Weapon
    return
  }

if #skill < 500
  {
    set %spell 116    ; Wraith Form 30-50
    set %manatocast 17
    set %castdelay 40
    set %masochistic 0
    menu delete currentspell
    menu text currentspell 68 55 Wraith Form
    return
  }

if %currentskill < 711
  {
    set %spell 106    ; Horrific Beast 50-71
    set %manatocast 11
    set %castdelay 40
    set %masochistic 0
    menu delete currentspell
    menu text currentspell 68 55 Horrific Beast
    return
  }

if %currentskill > 809
  {
    while E in #charStatus
      {
        event macro 15 106
        wait 1s
      }

if %currentskill < 810
  {
    set %spell 115    ; Wither 71-81
    set %manatocast 23
    set %castdelay 15
    set %masochistic 0
    menu delete currentspell
    menu text currentspell 68 55 Wither
    return
  }

if #skill < 1050
  {
    set %spell 107    ; Lich Form 81-105
    set %manatocast 23
    set %castdelay 40
    set %masochistic 0
    menu delete currentspell
    menu text currentspell 68 55 Lich Form
    return
  }

if #skill < 1200
  {
    set %spell 113    ; Vampiric Embrace 105-120
    set %manatocast 23
    set %castdelay 40
    set %masochistic 0
    menu delete currentspell
    menu text currentspell 68 55 Vampiric Embrace
    return
  }

return

sub Cast
    event macro 15 %spell
    if %masochistic = 1
       {
       target 2s
       wait 5
       event macro 23 0
       return
       }
    if %masochistic = blade
       {
       wait %castdelay - %FCR
       return
       }
    wait %castdelay - %FCR
    wait 5
    return

return

sub Checkskill
  chooseskill %skilltraining
  if #skill > %currentskill
  {
    set %currentskill #skill
    sound
    str len %currentskill
    str ins %currentskill #dot #strRes
    menu delete currentskill
    menu text currentskill 68 25 #strRes
    set %totalgains %currentskill - %startingskill
    str len %totalgains
    str ins %totalgains #dot #strRes
    menu delete totalgains
    menu text totalgains 68 40 #strRes
  }
return

sub Checkmana
wait %setwait
if #mana < %manatocast
    {
    event macro 13 46
          loop2:
          if #mana < #maxmana
          {
          goto loop2
          }
    }
return



I'd already written the script. By rights that script should have reference to the EUO poster of the original, but since he'd adapted the script off someone else's mage training script without reference, I figured he didn't deserve it

Starting my necro and magery scripts now.

FYI I never post multi-skill scripts as I feel that there is simply too much coding to the bulk of them and thus they take a lot longer to code AND train the skill intended. I will however butcher scripts for the relevant lines of coding.

Ok, I'll start by saying no I'm NOT French. It just seemed like a good thing to start with.

I am an old school scripter. I used to use this site when it was called winuo or something along those lines. Good to see TM is still around. It's a shame that you've lost 3 out of the 5 best scripts ever written. Mainly my Ninjitsu trainer 36 hours 0-120 that took me hours of coding, if anyone still has it I would really like a copy. It had shadow jumping in it, would have been coded by either "Grim Reaper" "The Reaper" "Inflammable" "Incarnate" or "Incarcerate" just a few of my pseudonyms. Also my magery and bushido scripts However it's good to see that TM still has the good old HW quester. Brings back memories of logging into jail....... rofl!!!

Anyway, after a 3 year break, I'M BACK!!! I started on the free-shard "Demise" and instantly registered onto that crappy EUOX site to get a few scripts. GOD, they are letting monkeys write their material now. First 3 scripts I found were rated quite high but were absolutely PANTS. A resist trainer, that didn't know how to regen and tracked the magery skill instead of the resist skill, WOW that's a good script. So if your after a proper script to train resisting spells, I've posted one for you guys.

My Return To UO:
Well I quit playing when my BokBok Bush Ninja Swords Super UBER tank/dps template got WTF PWNED by the OSI nerf bat. Yes I was an elitist!

Shortly after that I started to miss UO, so I started a free-shard called UO Valor, really good shard, good people, fun to play, but sadly now uninhabited So I went in search of another MMORPG. I think we all know where the search would lead me, yes, to that "Death of OSI" World of Warcraft. Well, I have to tell you, it's a fantastically coded game. Despite all the bitching, the coding on there is fantastic. The only issue with it is...... it's not sandbox enough.

Well I played WoW for 3 years on and off, and recently sold my account. Now, what game do I play next??

A friend of mine has been playing EVE Online on and off for several years now, and well, it seemed like a good idea. A game where you can win EVERYTHING and lose EVERYTHING in the blink of an eye. A game where PvP actually costs you something. Finally a game that rivals the best and original MMORPG that is ULTIMA ONLINE!!

Where am I now? Well I'm currently playing EVE and UO: Demise. So I'm back writing scripts, as can be expected.

If you have any combat training skill requests, let me know. I'll see what I can do.

See you all soon.

The Reaper