!set exolist  =!char 1 to -2 of Intdoubl,Intdoubl2,Intdoubl3,Intdoubl4,
!set titlelist=!char 1 to -2 of ػ I,ػ II,ػ III,ػ IV,
!set exototal =!itemcnt $exolist

