!set exolist  =!char 1 to -2 of rectangle,resto,System2x2,
!set titlelist=!char 1 to -2 of Rectngulo,Restaurante,Sistema 2x2,
!set exototal =!itemcnt $exolist

