@KOUNYUで所持金の計算をしているのは数値変数のKANEですよね。 その後KANE$の内容は操作していないので所持金の計算をする前の KANEを文字列にした内容が入ったままになってるので所持金の表示が 変わらないという事です。 所持金の計算をして表示をする前にKANE$=STR$(KANE)を行って 現在の所持金に更新して下さい。 所持金の表示ですが、? "(省略)";KANEとすると桁が減ったときに正しく 表示されないのでSTR$(KANE,4)の様に右詰の文字列で表示した方が 良いかと思います。