Loop should look like this: /varset nSongs $strlen(@DOTs) /for EachSong 1 to @nSongs /varset Songs(@EachSong) $mid($calc(@EachSong-1),1,@DOTs) /echo Song @EachSong: $char(gem,@Songs(@EachSong)) /next EachSong I also added this at the end of the circ routine as mobs have been warping since the latest...