alias alphabet { if $1 && $2 { var %a 96, %aa 122 while %aa > %a { inc %a | var %alphabet. $+ %a $chr(%a) } } return %alphabet. [ $+ [ $calc($asc($1) + $2) ] ] }
alias alphabet { if $1 && $2 { var %a 96, %aa 122 while %aa > %a { inc %a | var %alphabet. $+ %a $chr(%a) } } var %alphabet.tmp = %alphabet. [ $+ [ $calc($asc($1) + $2) ] ] if !%alphabet.tmp { var %b = $2 while %b >= 26 && !%alphabet. [ $+ [ $calc($asc($1) + %b) ] ] { dec %b 26 } return %alphabet. [ $+ [ $calc($asc($1) + %b) ] ] } return %alphabet.tmp }