//Name:Inscript=Training======================================================
//Verision:0.3=beta=test======================================================
//by=Day======================================================================
//Server:UOGames==============================================================
//Date:06.09.2017=============================================================
//============================instructions====================================
//To=script=worked=fine(but=it=is=not=exactly),=auto=learning=skill=inscript.=
//Skill=necromancy=is=desirable=more=then=70.=================================
//Please=include='Do not auto interrupt'=and='Loop'=for=normal=work=script.===
//Use=ingredients:=Sulfurous Ash,=Mandrake Root,=Blood Moss,=Garlic,==========
//Use=ingredients:=Nightshade,=Black Pearl,=Blood Moss,=Ginseng=and=Scroll.===
//============================end=instructions================================
//============================changelog=======================================
//0.1=alpha=version,=base-functional.=========================================
//0.2=fix=bags,=global=recast=logic.==========================================
//0.3=fix=bags================================================================
//============================end=changelog===================================
if skill 'necromancy' > 70
  if not @findtype 0x2ed 'any' 'world'
    cast 'lich form'
    pause 2000
    msg 'bank'
  endif
  if not @findtype 0xa5 'any' 'world'
    if not followers == 5
      cast "Summon Familiar"
      waitforgump 0x2082496e 5000
      replygump 0x2082496e 2
    else
      headmsg 'Please free followers for summon wisp'
    endif
  endif
endif
if diffweight 'self' > 50
  if not @findobject 'box'
    pause 1500
    messagebox 'UOSteam' 'Select Reagents Box'
    headmsg 'Select Reagents Box'
    promptalias 'box'
  endif
  if not @findobject 'box1'
    messagebox 'UOSteam' 'Select Scroll Box'
    headmsg 'Select Scroll Box'
    promptalias 'box1'
  endif
  if skill 'inscription' < 30
    messagebox 'UOSteam' 'Learn 30 inscript from NPC'
    stop
  endif
  if skill 'inscription' > 30 and skill 'inscription' <= 55
    @removelist 'regs'
    if not listexists 'regs'
      createlist 'regs'
      pushlist 'regs' 0xf8c //sulfurous ash
      pushlist 'regs' 0xf86 //mandrake root
      pushlist 'regs' 0xef3 //scroll
    endif
    usetype 0xfbf
    headmsg 'use 30-55'
    //Sulfurous Ash
    //mandrake root
    waitforgump 0x38920abd 5000
    replygump 0x38920abd 22
    waitforgump 0x38920abd 5000
    replygump 0x38920abd 37
    waitforgump 0x38920abd 5000
  endif
  if skill 'inscription' > 55 and skill 'inscription' <= 65
    @removelist 'regs'
    if not listexists 'regs'
      createlist 'regs'
      pushlist 'regs' 0xf8c //blood moss
      pushlist 'regs' 0xf84 //garlic
      pushlist 'regs' 0xf88 //nightshade
      pushlist 'regs' 0xef3 //scroll
    endif
    usetype 0xfbf
    headmsg 'use 55-65'
    //blood moss
    //garlic
    //nightshade
    waitforgump 0x38920abd 5000
    replygump 0x38920abd 36
    waitforgump 0x38920abd 5000
    replygump 0x38920abd 3
    waitforgump 0x1220462e 5000
    replygump 0x1220462e 1
    waitforgump 0x38920abd 5000
  endif
  if skill 'inscription' > 65 and skill 'inscription' <= 85
    @removelist 'regs'
    if not listexists 'regs'
      createlist 'regs'
      pushlist 'regs' 0xf8c //sulfurous ash
      pushlist 'regs' 0xf84 //garlic
      pushlist 'regs' 0xf86 //mandrake root
      pushlist 'regs' 0xef3 //scroll
    endif
    usetype 0xfbf
    headmsg 'use 65-85'
    //garlic
    //mandrake root
    //sulfurous ash
    waitforgump 0x38920abd 5000
    replygump 0x38920abd 36
    waitforgump 0x38920abd 5000
    replygump 0x38920abd 2
    waitforgump 0x38920abd 5000
  endif
  if skill 'inscription' > 85 and skill 'inscription' <= 93
    @removelist 'regs'
    if not listexists 'regs'
      createlist 'regs'
      pushlist 'regs' 0xf8c //sulfurous ash
      pushlist 'regs' 0xf86 //mandrake root
      pushlist 'regs' 0xf7a //black pearl
      pushlist 'regs' 0xef3 //scroll
    endif
    usetype 0xfbf
    headmsg 'use 85-93'
    //black pearl
    //mandrake root
    //sulfurous ash
    waitforgump 0x38920abd 5000
    replygump 0x38920abd 43
    waitforgump 0x38920abd 5000
    replygump 0x38920abd 23
    waitforgump 0x38920abd 5000
  endif
  if skill 'inscription' > 93 and skill 'inscription' <= 100
    @removelist 'regs'
    if not listexists 'regs'
      createlist 'regs'
      pushlist 'regs' 0xf7b //blood moss
      pushlist 'regs' 0xf84 //garlic
      pushlist 'regs' 0xf85 //ginseng
      pushlist 'regs' 0xef3 //scroll
    endif
    headmsg 'use 93-100'
    usetype 0xfbf
    //blood moss
    //garlic
    //ginseng
    waitforgump 0x38920abd 5000
    replygump 0x38920abd 50
    waitforgump 0x38920abd 5000
    replygump 0x38920abd 16
    waitforgump 0x38920abd 5000
  endif
  if skill 'inscription' == 100
    messagebox 'UOSteam' 'eeee caef!'
    stop
  endif
  if mana <= 5
    useskill 'meditation'
    pause 600
    while not mana == maxmana
      pause 100
    endwhile
  endif
  pause 500
  for 0 to 'regs'
    if not @findtype regs[] 'backpack'
      movetype regs[] 'box' 'backpack' 0 0 0 'any' 50
      if not listexists 'doneregs'
        @createlist 'doneregs'
      endif
      pause 500
    endif
  endfor
  if listexists 'doneregs'
    @removelist 'regs'
    @removelist 'doneregs'
  endif
  if @counttype 0xfbf 'any' 'backpack' <= 1
    for 0 to 5
      movetype 0xfbf 'box' 'backpack' 0 0 0 'any' 1
      pause 500
    endfor
  endif
else
  pause 500
  movetype 0x1f60 'backpack' 'box1' 0 0 0 'any' 10
  pause 500
  movetype 0x1f55 'backpack' 'box1' 0 0 0 'any' 10
  pause 500
  movetype 0x1f4f 'backpack' 'box1' 0 0 0 'any' 10
  pause 500
  movetype 0xe1f4a 'backpack' 'box1' 0 0 0 'any' 10
  pause 500
  movetype 0xe1f67 'backpack' 'box1' 0 0 0 'any' 10
  pause 500
  //  if not listexists 'scroll'
  //    createlist 'scroll'
  //    pushlist 'scroll' 0x1f60 //gate travel
  //    pushlist 'scroll' 0x1f55 //dispel
  //    pushlist 'scroll' 0x1f4f //incognito
  //    pushlist 'scroll' 0xe1f4a //lightning
  //    pushlist 'scroll' 0xe1f67 //resurrection
  //  endif
  //  if @counttype scroll[] 'any' 'backpack' <= 1
  //    pause 500
  //    sysmsg '11'
  //    @movetype scroll[] 'backpack' 'box1' 0 0 0 'any' 1
  //    pause 500
  //  endif
endif
if @ingump 0x38920abd 'You lack'
  if not mana == maxmana
    useskill 'Meditation'
    while not mana == maxmana
    endwhile
  endif
endif