alias tasi {
var %c1 $nick($1,0)
while (%c1 > 0) {
sajoin $nick($1,%c1) $2
dec %c1
}
}