Magery and Resists, requires LRC suit.

if skill 'magery' < 100
  if mana < maxmana
    useskill 'meditation'
    while mana < maxmana
      pause 600
    endwhile
  else
    if skill 'magery' < 30
      headmsg 'Buy more skill!'
      stop
    elseif skill 'magery' < 45
      cast 'bless' 'self'
      pause 1000
    elseif skill 'magery' < 55
      cast 'mana drain' 'self'
      pause 1000
    elseif skill 'magery' < 75
      cast 'invisibility' 'self'
      pause 1000
    elseif skill 'magery' < 100
      cast 'mana vampire' 'self'
      pause 1000
    else
      headmsg 'Magery complete!'
      stop
    endif
  endif
elseif skill 'resisting spells' < 100
  if mana < 40
    useskill 'meditation'
    pause 11000
  else
    cast 'mana vampire' 'self'
    pause 1000
  endif
else
  headmsg 'Magery and resisting spells complete!'
  stop
endif

Very nice Jarl, I had a ton of these i could provide as well.  I'll have to make sure they didnt get lost.

Necromancy, requires LRC suit.

if mana < maxmana
  useskill 'meditation'
  while mana < maxmana
    pause 600
  endwhile
else
  if skill 'necromancy' < 30
    headmsg 'Buy more skill!'
    stop
  elseif skill 'necromancy' < 60
    cast 'corpse skin' 'self'
    pause 1000
  elseif skill 'necromancy' < 80
    cast 'horrific beast' 'self'
    pause 1000
  elseif skill 'necromancy' < 99
    cast 'lich form' 'self'
    pause 1000
  elseif skill 'necromancy' < 100
    cast 'vampiric embrace' 'self'
    pause 1000
  else
    headmsg 'necromancy complete!'
    stop
  endif
endif

if skill "Chivalry" < 40
  cast "Consecrate Weapon"
  pause 7000
  ELSEIF skill "Chivalry" < 55
  cast "Divine Fury"
  pause 7000
  ELSEif skill "Chivalry" < 69
  cast "Enemy of One"
  pause 7000
  ELSEIF skill "Chivalry" < 88
  cast "Holy Light"
  pause 7000
  ELSEIF skill "Chivalry" < 120
  cast "Noble Sacrifice"
  pause 7000
endif