!set exolist  =!char 1 to -2 of pentagon,pentagram,pyramid3,pyramid1,cross,tie,pyramid1b,V,twosqr,pyramid2,stool,triangle,asterisk,cube,H,IXI,pyramid1c,pizza3,house,bigsquare,grill,threesqr,diag,foursqr,M,pyramid1d,pyramid2b,pizza4,W,
!set titlelist=!char 1 to -2 of ~10: Pentágono,~10: Pentagrama,~10: Pirámide III,3: Pirámide I,5: Cruz,5: Pajarita,5: Pirámide Ib,5: V,6: Dos cuadrados,6: Pirámide II,6: Taburete,6: Triángulo,7: Asterisco,7: Cubo,7: H,7: Pajarita,7: Pirámide Ic,7: Pizza 3,8: Casa,8: Cuadrado,8: Rejilla,8: Tres cuadrados,9: Cuadrado + diagonales,9: Cuatro cuadrados,9: M,9: Pirámide Id,9: Pirámide IIb,9: Pizza 4,9: W,
!set exototal =!itemcnt $exolist

