UOS - Kegmaker

////-Kegmaker-////
//-By kakel_anders (Player - UOG:Demise)-//
// Requires tinkering and Carpentry
// Have atleast 1 tinkerkit in backpack at start
// Have resourcecontainer with Boards, Ingots and Bottles
// Win
if not findalias 'kegresources'
msg 'Where are resources?'
promptalias 'kegresources'
endif
if not findalias 'kegdestination'
msg 'Where should kegs go?'
promptalias 'kegdestination'
endif
// Restock Ingots
if @counttype 0x1bf2 '0' 'backpack' < 50
movetype 0x1bf2 'kegresources' 'backpack' (0 0 0) 0 100
pause 500
endif
if @counttype 0x1bf2 '0' 'kegresources' < 200
headmsg 'Out of ingots in restock!' 34 'self'
pause 1000
headmsg 'Halting script!' 34 'self'
stop
endif
// Restock planks
if counttype 0x1bd7 '0' 'backpack' < 50
movetype 0x1bd7 'kegresources' 'backpack' (0 0 0) 0 100
  pause 500
endif
if @counttype 0x1bd7 '0' 'kegresources' < 200
headmsg 'Out of boards in restock!' 34 'self'
pause 1000
headmsg 'Halting script!' 34 'self'
stop
endif
// Restock bottles
if counttype 0xf0e '0' 'backpack' < 50
movetype 0xf0e 'kegresources' 'backpack' (0 0 0) 0 10
  pause 500
endif
if @counttype 0xf0e '0' 'kegresources' < 200
headmsg 'Out of boards in restock!' 34 'self'
pause 1000
headmsg 'Halting script!' 34 'self'
stop
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
  // 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
// Make 3 barrelstaves
for 3
usetype 0x1034 'backpack'
waitforgump 0x38920abd 15000
replygump 0x38920abd 1
waitforgump 0x38920abd 15000
replygump 0x38920abd 2
waitforgump 0x38920abd 15000
pause 1000
endfor
// Make 2 barrel lids
for 2
usetype 0x1034 'backpack'
waitforgump 0x38920abd 15000
replygump 0x38920abd 1
waitforgump 0x38920abd 15000
replygump 0x38920abd 9
waitforgump 0x38920abd 15000
pause 1000
endfor
// Make 1 kegtap
usetype 0x1eb8 'backpack'
waitforgump 0x38920abd 15000
replygump 0x38920abd 15
waitforgump 0x38920abd 15000
replygump 0x38920abd 16
waitforgump 0x38920abd 15000
pause 1000
// Make 1 barrelhoop
usetype 0x1eb8 'backpack'
waitforgump 0x38920abd 15000
replygump 0x38920abd 15
waitforgump 0x38920abd 15000
replygump 0x38920abd 37
waitforgump 0x38920abd 15000
pause 1000
// Assemble keg
usetype 0x1034 'backpack'
waitforgump 0x38920abd 15000
replygump 0x38920abd 15
waitforgump 0x38920abd 15000
replygump 0x38920abd 135
waitforgump 0x38920abd 15000
pause 1000
// Assemble potionkeg
usetype 0x1eb8 'backpack'
waitforgump 0x38920abd 15000
replygump 0x38920abd 43
waitforgump 0x38920abd 15000
replygump 0x38920abd 51
waitforgump 0x38920abd 15000
pause 1000
// Move keg to container
if findtype 0x1940 '0' 'backpack'
  movetype 0x1940 'backpack' 'kegdestination'
endif