 'GAME' RCL #131d #64d BLANK PICT STO { #0d #0d } PVIEW #1d #1d BLANK PICT STO #131d #130d BLANK MEM DROP 0 DO 3 PICK EVAL IF DUP TYPE 11 == THEN 1 END UNTIL DUP TYPE 25 == END DROP 