モナーシステム開発　第３部

>>867
――――――――――――――――――――────────
for N88互換BASIC for Windows95
.
10 SCREEN 1:WIDTH 80,25:CONSOLE 1,25,0,1:CLS 3
12 X=10:Y=10
15 *START
20 X1=0:Y1=0:COLOR 7
25 LOCATE X,Y+0:PRINT " ∧＿∧"
30 LOCATE X,Y+1:PRINT "（ ；´∀｀）"
40 LOCATE X,Y+2:PRINT "（　　　　）"
50 LOCATE X,Y+3:PRINT "｜ ｜　| "
60 LOCATE X,Y+4:PRINT "（_＿）＿）"
65 I=INPUT$(1)
70 IF I="6" THEN X1=1:GOTO *MOVE
80 IF I="4" THEN X1=-1:GOTO *MOVE
90 IF I="8" THEN Y1=-1:GOTO *MOVE
100 IF I="2" THEN Y1=1:GOTO *MOVE
110 GOTO 20
200 *MOVE
245 CLS 3
250 X=X+X1:Y=Y+Y1:GOTO *START
＿＿　 ＿＿＿_＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
　 　 ∨　　　 　　ﾋﾟｰ
　　　　　　　ｶﾀｶﾀ＿＿＿_　＿＿＿
　　　∧＿∧　　|｜＼　　 .＼　 |◎ |
　　　（　´∀｀）　|｜　　|￣￣|　 |：[].|
　┌（　　つ／￣l｜ ／￣￣/　 | ＝|
　 |└ ヽ　|二二二」二二二二二二二二」
　　￣］|_＿）_） .|　||　　　　　　　 |　||
　　／￣＼　 ／ . || 　 　　　　／　 ||
　 ◎　　◎..［＿___||　　　 　 .［＿＿||
I=INPUT$(1) ｶﾞ ｷﾒﾃ ﾓﾅｰ
20，25ｷﾞｮｳﾒ ﾃﾞ ｶﾄﾞｸｾｲﾓ UPﾓﾅｰ
CLS ﾓ ﾀｸｻﾝ ﾂｶｯﾃ ﾗｸﾆﾅﾙ ﾓﾅｰ