set %gems HVF_ZVF_EVF_BVF_VVF_NVF_ZLF_GVF_UVF_TTO
set %misc POF_OZF_VLK_LNK
set %rares JKH_RJG_SJG_FJG_MWL_NSH_ALH
set %lootbag PHQNKMD
Main:
Finditem YFM G_2
if #findid <> x
{
set #lobjectid #findid
event macro 17 0
ignoreitem #findid
}
Gosub Loot %rares
Gosub Loot %misc
Gosub loot %gems
wait 5
goto main



SUb Loot
if #conttype <> YFM
return
set %cont #contid
Finditem %1 C_ , %cont
if #findid = x
return
exevent drag #findid #findstack
exevent dropc %lootbag
wait 10
return