automacro refine {
	location payon 145 173
	exclusive 1
	call autorefine
}

macro autorefine {
	#Nama barang yang akan ditempa
	$barang = Tidal Shoes [1]

	$aman = c r0 c r0 c c n
	$kaga = c r0 c r0 c c r0 c c n
	$waw = c r0 c r0 c c r0 c w8 c n

	#Lockmap X Y
	#$lockmapxy = 145 173

	#NPC Location
	$location = 144 173

	#Memulai auto refine
		goto begin

		:begin
			do conf autoTalkCont 0
			#do move $lockmapxy
			goto satu

		:auto
			do c @storage
			do storage get Elunium 50
			do storage close
			goto begin

		:satu
			$this = @inventory($barang)
			if ($this == -1) goto dua
			if (@inventory(Elunium) == -1) goto auto
			do eq @inventory($barang)
			do talknpc $location $aman
			goto satu

		:dua
			$this = @inventory(+1 $barang)
			if ($this == -1) goto tiga
			if (@inventory(Elunium) == -1) goto auto
			do eq @inventory(+1 $barang)
			do talknpc $location $aman
			goto dua

		:tiga
			$this = @inventory(+2 $barang)
			if ($this == -1) goto empat
			if (@inventory(Elunium) == -1) goto auto
			do eq @inventory(+2 $barang)
			do talknpc $location $aman
			goto tiga

		:empat
			$this = @inventory(+3 $barang)
			if ($this == -1) goto lima
			if (@inventory(Elunium) == -1) goto auto
			do eq @inventory(+3 $barang)
			do talknpc $location $aman
			goto empat

		:lima
			$this = @inventory(+4 $barang)
			if ($this == -1) goto enam
			if (@inventory(Elunium) == -1) goto auto
			do eq @inventory(+4 $barang)
			do talknpc $location $aman
			goto lima

		:enam
			$this = @inventory(+5 $barang)
			if ($this == -1) goto tujuh
			if (@inventory(Elunium) == -1) goto auto
			do eq @inventory(+5 $barang)
			do talknpc $location $aman
			goto enam

		:tujuh
			$this = @inventory(+6 $barang)
			if ($this == -1) goto delapan
			if (@inventory(Elunium) == -1) goto auto
			do eq @inventory(+6 $barang)
			do talknpc $location $kaga
			goto tujuh

		:delapan
			$this = @inventory(+7 $barang)
			if ($this == -1) goto sembilan
			if (@inventory(Elunium) == -1) goto auto
			do eq @inventory(+7 $barang)
			do talknpc $location $kaga
			goto delapan

		:sembilan
			$this = @inventory(+8 $barang)
			if ($this == -1) goto end
			if (@inventory(Elunium) == -1) goto auto
			do eq @inventory(+8 $barang)
			do talknpc $location $waw
			goto sembilan

		:end
			do conf autoTalkCont 1
			log -------------------------------------------------
			log ------------------------------------------------
			log --------------Menempa Selesai------------------
			log ----------------------------------------------
			log ---------------------------------------------
release all
}