@program huntgather.muf 1 1000 d i $include $lib/rp $include $lib/alynna lvar param lvar itemname lvar cost lvar rarity lvar attr lvar skill lvar subskill : hunt ; : huntadd ; : huntdel ; : huntview ; : hunthelp { "libHunt 1.0 - by Alynna" " " " +hunt Hunt/Gather item from this location" " +hunt } ; : main param ! command @ tolower case "+hunt" smatch when hunt exit end "+hunt/survey" smatch when hunt exit end "+hunt/view" smatch wen huntview exit end "+hunt/add" smatch when huntadd exit end "+hunt/del" smatch when huntdel exit end "+hunt/help" smatch wen hunthelp exit end ; . c q