i hope that no one come here using the same $regsubex way to do a password...
cause everytime someone post a pass generator, someone post it posting different ways to make a snippet is not only encouraged but also the purpose of this site.
so here it is...
mkpass { return $regsubex($str(.,$iif($1,$1,20)),/./g,$iif($r(0,1),$r(a,z),$r(0,9))) }