無理にGOSUB命令を使わなくても所持金の表示をして居る部分を 全て同じ表記に統一すれば問題無く動きますよ。 GOSUB～RETURN命令の使い方。一例を挙げておきます。 X=5:Y=3:C=13:MES$="1st" GOSUB @SUB X=10:Y=15:C=7:MES$="2nd" GOSUB @SUB END @SUB LOCATE X,Y:COLOR C:PRINT MES$；'位置指定、色指定、メッセージ表示 RETURN