RosettaCodeData/Task/Flow-control-structures/360-Assembly/flow-control-structures-4.360

         LA     3,8                r3 loop counter
LOOP     EQU    *
         ...                       loop 8 times  (r3=8,7,...,2,1)
         BCT    3,LOOP             r3=r3-1 ; if r3<>0 then loop