on 1:dialog:orden:init:0:{
   var %a
   var %t 0
   %info_bote = $readini(juegos.ini,juegos,$nick)
   if (%info_bote != $null) {
     var %r1 = $gettok(%info_bote,1,32)
     var %r2 = $gettok(%info_bote,2,32)
     var %r3 = $gettok(%info_bote,3,32)
     did -a $dname 1 $str(0,$calc(15 - $len(%r1))) $+ %r1 %r2  %r3
     inc %a 1
     inc %t 1
   }
   var %a 1
   while ($did($dname,1,%t)) {
     if (%a > 3) {
       dialog -x $dname
       halt
     }
     else {
       msg $chan $gettok(%info_bote,2,32))  $gettok(%info_bote,1,32)
       inc %a 1
       dec %t 1
     }
   }
 }