@LOOP ACLS R=RND(1) IF R==0 GOTO@1 IF R==1 GOTO@2 GOTO@LOOP で良いかと…(あくまで初心者の意見なのでもう少し良いのがあるかもしれません。)