alias reloj {

.titlebar $time
while ( %time < $time ) {
inc %time
.titlebar $time
}