10 CLS:A="ク゛ーチョキハ゜ー":B="マケ アイコカチ!":R=RND(3):?STR$(A+R*3,3),"vs ";:WAIT12:K=INKEY()-49:IF K/3 CONT ELSE ?STR$(A+K*3,3):BEEP:WAIT90:W=SIN((R-K)*120)/222+1:?STR$(B+W*3,3):IF W=1 WAIT90:CONT
確かに相手の手が先に見えている……けど、反射神経が追いつきません! じゃんけんといえど、ひと工夫でゲーム性が出てくるのですね……。勉強になります。