Code:
alias -l autor { 
if ($1 == begin) return -
if ($hget(myhashtable,%i).item) return Auto Join %i $ifmatch:hdel myhashtable $ifmatch
if ($1 == end) return -
}
alias -l aj.add {
var %i = 1
while ($hget(myhashtable,%i).item) { inc %i }
var %i = $calc(%i + 1)
hadd myhashtable $+(AutoJoin,%i) $$?=What Channel Name?"
}
menu menubar {
Auto Join
.Add:aj.add
.Delete
...$submenu($autor($1))
}

That should work wink