まず文字を使って、ランダムに表示をするプログラムから覚えましょう。即興で書いたので、もしかしたら間違っているかも知れませんが。 ACLS SAIDAI=4 DIM A$[SAIDAI] FOR I=0 TO SAIDAI-1 READ A$[I] NEXT DATA "ゴールド","シルバー","てつ","いし" B$=A$[RND(SAIDAI)] PRINT B$+"が　でました! 　これを入力して"RUN"を実行すると、毎回違った結果が出ます（ミスがあって動かなかったらごめんなさい） 　変数SAIDAIを変えると、出す種類をふやす事が出来ますが、SAIDAIを4より大きくした場合は、DATA文の後にその数の分だけ、新しい文字列を付け加える必要があります。