• No registered tag exist.

5 REM イシモムヨウ
10 IF R=8 THEN GOTO 100
11 IF R=9 THEN GOTO 110
12 IF R=10 THEN GOTO 120
13 IF R=11 THEN GOTO 130
14 IF R=12 THEN GOTO 140
15 IF R=13 THEN GOTO 150
16 IF R=14 THEN GOTO 160
100 LOCATE 0,20:? "シ゛ツハホ゛ク、   ":WAIT 60:? "ネコハナンテ゛ス!":? "PUSH BUTTON":GOTO 1000
110 LOCATE 0,20:? "シ゛ツハホ゛ク、   ":WAIT 60:? "ロホ゛ットナノニフ゛キヨウナンテ゛ス、、、":? "PUSH BUTTON":GOTO 1000
120 LOCATE 0,20:? "シ゛ツハホ゛ク、   ":WAIT 60:? "キオクリョクニハシ゛シンカ゛アルンテ゛ス!":? "PUSH BUTTON":GOTO 1000
130 LOCATE 0,20:? "シ゛ツハホ゛ク、   ":WAIT 60:? "ヘヒ゛カ゛コワインテ゛ス、、、":? "PUSH BUTTON":GOTO 1000
140 LOCATE 0,20:? "シ゛ツハホ゛ク、   ":WAIT 60:? "トッテモヒ゛ヒ゛リナンテ゛ス、、、":? "PUSH BUTTON":GOTO 1000
150 LOCATE 0,20:? "LEDヲテンメツサセルコトヲ、フ゜ロク゛ラマーハ、「Lチカ」ッテイウンタ゛ヨ!":FOR M=1 TO 5:LED 1:WAIT 30:LED 0:WAIT 30:NEXT:? "PUSH BUTTON":GOTO 1000
160 FOR M=0 TO 31:LOCATE M,1:?CHR$(#FF):NEXT:LOCATE 0,20:? "キミモフ゜ロク゛ラミンク゛ヲハシ゛メナイカイ?":WAIT 60:? "PUSH BUTTON":GOTO 1000
1000 B=BTN()
1001 IF B=1 THEN LRUN0
1002 GOTO 1000

Pagetop