LOCATE 44,24+V?CHR$(57867*(1AND MAINCNT/24)) UNTIL B AND 48 V=!V*(B<32) COLOR #TGRAY LOCATE 44,24+V:?CHR$(0) LOCATE 44,25-V:?"→" BEEP 4-V RETURN V END これは「RPGではい・いいえ」を選ぶプログラムの例