It could be something like this.
REPEAT
?"Your options are..."
...
INPUT "Do which action number?",A
IF A=="1" THEN GOTO @EXPLORE
IF A=="2" THEN GOTO @REST
IF A=="3" THEN GOTO @EAT
UNTIL 1
Any non-zero number after the UNTIL forces it to always go back up to the REPEAT. You could achieve the same thing by replacing "REPEAT" with "@label" and "UNTIL" with "GOTO @label".
0そうだね プレイ済み