UOS - Carpentrytrainer

// Carpentrymacro by kakel_anders (Player - UOG:Demise)
/////////
//If you do not have 50+ Tinkeringskill, have hammers and tinkerkits for restock in the resourcebag!
/////////
if not findalias 'resourcebag'
  promptalias 'resourcebag'
endif
if not findalias 'carptrashbarrel'
  promptalias 'carptrashbarrel'
endif
//
//// Keep the hammers comming!
if @counttype 0x102a 'any' 'backpack' < 3 and skill 'tinkering' > 50
  for 5
    usetype '0x1eb8'
    pause 1000
    replygump 0x38920abd 8
    pause 500
    replygump 0x38920abd 79
  endfor
elseif skill 'tinkering' < 50
  for 5
    @movetype 0x102a 'resourcebag' 'backpack'
  endfor
endif
//
//// Keep tinkerkits comming!
if @counttype 0x1eb8 'any' 'backpack' < 3 and skill 'tinkering' > 50
  for 5
    usetype '0x1eb8'
    pause 1000
    replygump 0x38920abd 8
    pause 500
    replygump 0x38920abd 23
  endfor
elseif skill 'tinkering' < 50
  for 5
    @movetype 0x1eb8 'resourcebag' 'backpack'
  endfor
endif
//
//// Restock planks
if @counttype 0x1bd7 'any' 'backpack' < 50
  pause 2000
  @movetype 0x1bd7 'resourcebag' 'backpack' (0 0 0) 0 200
  pause 1000
endif
//
//// Restock ingots
if @counttype 0x1bf2 'any' 'backpack' < 50
  pause 500
  useobject 'resourcebag'
  pause 500
  @movetype 0x1bf2 'resourcebag' 'backpack' (0 0 0) 0 50
endif
//
//// Crafting
if skill 'carpentry' < 30
  sysmsg 'Buy 30 skillpoints from vendor before start!'
  stop
endif
if skill 'carpentry' < 48
  //30 - 47 Medium Crate
  usetype '0x102a'
  pause 1000
  replygump 0x38920abd 15
  pause 500
  replygump 0x38920abd 16
  pause 1000
  @movetype 0xe3f 'backpack' 'carptrashbarrel'
elseif skill 'carpentry' < 53
  //48 - 52 Large Crate
  usetype '0x102a'
  pause 1000
  replygump 0x38920abd 23
  pause 1000
  @movetype 0xe3d 'backpack' 'carptrashbarrel'
elseif skill 'carpentry' < 60
  //53 - 59 Wooden Shield
  usetype '0x102a'
  pause 1000
  replygump 0x38920abd 29
  pause 500
  replygump 0x38920abd 2
  pause 1000
  @movetype 0x1b7a 'backpack' 'carptrashbarrel'
elseif skill 'carpentry' < 74
  //60 - 73 Fukiyas
  usetype '0x102a'
  pause 1000
  replygump 0x38920abd 22
  pause 500
  replygump 0x38920abd 30
  pause 1000
  @movetype 0x27aa 'backpack' 'carptrashbarrel'
elseif skill 'carpentry' < 79
  //74 - 78 Quarterstaffs
  usetype '0x102a'
  pause 1000
  replygump 0x38920abd 22
  pause 500
  replygump 0x38920abd 9
  pause 1000
  @movetype 0xe89 'backpack' 'carptrashbarrel'
elseif skill 'carpentry' < 82
  //79 - 81 Gnarled staffs
  usetype '0x102a'
  pause 1000
  replygump 0x38920abd 22
  pause 500
  replygump 0x38920abd 16
  pause 1000
  @movetype 0x13f8 'backpack' 'carptrashbarrel'
elseif skill 'carpentry' < 96
  //82 - 95 Black Staffs
  usetype '0x102a'
  pause 1000
  replygump 0x38920abd 22
  pause 500
  replygump 0x38920abd 93
  pause 1000
  @movetype 0xdf0 'backpack' 'carptrashbarrel'
elseif skill 'carpentry' < 100
  //96 - 100 Wild Staffs
  usetype '0x102a'
  pause 1000
  replygump 0x38920abd 22
  pause 500
  replygump 0x38920abd 44
  pause 1000
  @movetype 0x2d25 'backpack' 'carptrashbarrel'
endif
if skill 'carpentry' == 100
  messagebox 'Success!' 'Goodluck on your adventures!! Best regards- kakel_anders'
endif